home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / beehive / program / ws4pat.arc / WS4PAT.INF < prev    next >
Encoding:
Text File  |  1991-08-11  |  6.3 KB  |  190 lines
  1.  
  2. This is the header section of WS4PAT.MAC.  The .HEX file is released
  3. today for your use and comments.  The source is not available yet.
  4.  
  5. I have been reading of the problems involving the ZCPR3 shell stack.
  6. This patch does not address that at all.  If we determine that WS4 
  7. could solve the problem itself, I will put the necessary code in the
  8. next WS4PAT.
  9.  
  10. ; Overlay: WS4PAT.MAC
  11. ; Author:  Joe Wright
  12. ; Date:    20 November 87
  13. ; Version: 1.0
  14.  
  15. VERS    EQU    10        ; Release
  16.  
  17. MONTH    EQU    11        ; November
  18. DAY    EQU    20        ; 20th
  19. YEAR    EQU    87        ; 1987
  20.  
  21. ; The purpose of this overlay is to provide a generic ZCPR3 version of
  22. ; WordStar which will not require specific terminal installation but will
  23. ; take its lead from the TCAP.  NZTCAP is expanded to include all (and more)
  24. ; that WordStar requires for its operation.
  25.  
  26. ; Based on PATCH.LST in the WordStar 4.0 release, this overlay installs
  27. ; all but Printer patches.  All new code is at EXTRA.  MORPAT and CRTPAT
  28. ; areas are unused and therefore still available for small patches.
  29.  
  30. ; Assemble WS4PAT.MAC to a .HEX file with SLRMAC and overlay your current
  31. ; WS.COM with it as follows:
  32.  
  33. ;    MLOAD WSZ.COM=WS.COM,WS4PAT.HEX
  34.  
  35. ; The overlay supports video attributes of the TeleVideo 955 and Wyse 60.
  36. ; It was tested only superficially for VT-100, using the Wyse 60 in VT-100
  37. ; emulation mode.
  38.  
  39. ; This overlay expects a ZCPR3 system with extended NZTCAP.  All the code
  40. ; at VIDATT: and EXTRA: is my own.  Before running WordStar with this
  41. ; overlay, you must create and install a NZTCAP for your terminal.  I have
  42. ; provided an example here for TeleVideo 955 and the file NZWYS60.MAC
  43. ; as prototypes for your NZTCAP.  If you run it with your normal TCAP,
  44. ; WordStar will not know how to do LINE INSERT and LINE DELETE functions
  45. ; and will slow a little and paint the screen more.
  46.  
  47. ;----------------------------------------------------
  48. ;
  49. ; NZCPR TERMINAL CAPABILITIES DATA
  50. ;  In order determine specific terminals without regard to the ascii name,
  51. ;  we now use the last byte of the name field as a 'type' byte.  Until now,
  52. ;  the types are assigned as follows:
  53. ;
  54. ;    ASCII types (0-15)
  55. ;
  56. ;    TeleVideo 955    00h
  57. ;    TeleVideo 925    01h
  58. ;    Wyse 60        02h
  59. ;    Wyse 50        03h
  60. ;
  61. ;    ANSI types (16-31)
  62. ;
  63. ;    VT-100        10h
  64. ;
  65. ; WS4PAT simply looks at bit 4 to determine ASCII or ANSI types.
  66. ;
  67. ;NZTCAP:
  68. ;    DB    'TVI-955        ' ; Name of terminal (Always 15 characters)
  69. ;    DB    0        ; ASCII type (TeleVideo 955)
  70. ;    DB    'K'-'@'        ; Cursor up
  71. ;    DB    'J'-'@'        ; Cursor down (re-programmed from ^V)
  72. ;    DB    'L'-'@'        ; Cursor right
  73. ;    DB    'H'-'@'        ; Cursor left
  74. ;    DB    0        ; CL delay
  75. ;    DB    0        ; CM delay
  76. ;    DB    0        ; CE delay
  77. ;    DB    ESC,'+',0    ; CL string        1st (NZTCAP+17H)
  78. ;    DB    ESC,'=%+ %+ ',0    ; CM string        2nd
  79. ;    DB    ESC,'T',0    ; CE string        3rd
  80. ;    DB    ESC,')',0    ; SO string        4th
  81. ;    DB    ESC,'(',0    ; SE string        5th
  82. ;    DB    0        ; TI string        6th
  83. ;    DB    0        ; TE string        7th
  84. ;
  85. ; Extensions to Standard Z3TCAP
  86. ;
  87. ;    DB    ESC,'R',0    ; Line Delete        8th
  88. ;    DB    ESC,'E',0    ; Line Insert        9th
  89. ;    DB    ESC,'G',0    ; Set Attributes    10th
  90. ;
  91. ;  FILL UNUSED SPACE WITH NULLS
  92. ;
  93. ;    REPT    128-($-NZTCAP)
  94. ;    DB    0
  95. ;     ENDM
  96. ;----------------------------------------------------
  97. ;
  98. ; WS4PAT will treat the full complement of TeleVideo functions and attributes.
  99. ; Any of the functions may be omitted (replaced with null) with the exception
  100. ; of the CM (Cursor Movement) string.  WordStar will work around any other
  101. ; missing capabilities if your particular terminal doesn't support them.
  102. ; 
  103. ; The custom routine POSCUR uses WordStar's cursor position in HL and sends
  104. ; the expanded CM string to the terminal.
  105. ;
  106. ; The CM string in NZTCAP is a macro of sorts.  Characters in the string will
  107. ; be sent to the terminal as they appear.  The special case is the COMMAND
  108. ; lead-in character '%'.  The character following the '%' indicates the action
  109. ; required.  Nine commands are supported as follows:
  110. ;
  111. ;    %I        Increment Row/Col by 1 (before D, 2, 3 or .)
  112. ;    %D        Send Row/Col as one, two or three ascii digits
  113. ;    %2        Send Row/Col as two ascii digits
  114. ;    %3        Send Row/Col as three ascii digits
  115. ;    %.        Send Row/Col as binary
  116. ;
  117. ;    %R        Send Col before Row
  118. ;    %+        Add the next character to Row/Col and send it
  119. ;    %N        Send a NULL (00h)
  120. ;
  121. ;    \        Send the next character literally (except null)
  122. ;
  123. ; The %N command, new in NZTCAP, allows a null (00h) to be sent to the
  124. ; terminal (no nulls are allowed within CM strings).
  125. ;
  126. ; The \ command permits sending a literal % or \ to the terminal.
  127. ; Use '\%' to send the percent sign or '\\' to send backslant.
  128. ;
  129. ; These commands allow virtually any terminal to be supported by WordStar.
  130. ;
  131. ; The prototype TeleVideo command is  ESC = ROW COL  where row and col
  132. ; are biased by the space character (20h).  The CM string for this in
  133. ; assembly language:  1BH,'=%+ %+ ',0  or..
  134. ;
  135. ;    DB    1BH,'='        ; Lead-in string
  136. ;    DB    '%+ '        ; Send Row + 32
  137. ;    DB    '%+ '        ; Send Col + 32
  138. ;    DB    0        ; Terminate the string (not sent)
  139. ;
  140. ; The prototype ANSI (VT-100) command is  ESC [ ROW ; COL H  where row and
  141. ; col are ascii decimal digits beginning with 1 rather than 0.  The CM string
  142. ; for this is:  1BH,'[%I%D;%DH',0  or if you prefer..
  143. ;
  144. ;    DB    1BH,'['        ; Lead in string
  145. ;    DB    '%I'        ; Row/Col begin at 1 instead of 0
  146. ;    DB    '%D'        ; Send Row in decimal
  147. ;    DB    ';'        ; Send delimiter
  148. ;    DB    '%D'        ; Send Col in decimal
  149. ;    DB    'H'        ; Send trailing H
  150. ;    DB    0        ; Terminate the string (not sent)
  151. ;
  152. ; The Hazeltine 1500 is strange enough to demonstrate NZTCAP flexibility.
  153. ; The CM string is  7EH,11H,'%R%.%+ ',0  or..
  154. ;
  155. ;    DB    7EH,11H        ; Lead-in string
  156. ;    DB    '%R'        ; Reverse Row/Col
  157. ;    DB    '%.'        ; Send Col in binary
  158. ;    DB    '%+ '        ; Send Row + 32
  159. ;    DB    0        ; Terminate the string (not sent)
  160. ;
  161. ; In order to use this powerful parser for attribute strings as well as
  162. ; CM strings, enter PARSE with HL pointing to the first character of a
  163. ; null-terminated string and DE containing the value to be parsed.
  164. ; A complex VT-200 SGR string is prototyped as:
  165. ;
  166. ;SGR:    DB    ESC,'[%R%D;%Dm',0
  167. ;
  168. ; You would clear attributes with the following code.
  169. ;
  170. ;    LXI    H,SGR
  171. ;    LXI    D,0
  172. ;    CALL    PARSE
  173. ;    ...
  174. ;
  175. ; The resulting string to the terminal is:
  176. ;
  177. ;    ESC [ 0 ; 0 m
  178. ;
  179. ; To set the VT-200 to blinking:
  180. ;
  181. ;    LXI    H,SGR
  182. ;    LXI    D,4
  183. ;    CALL    PARSE
  184. ;
  185. ; The terminal gets:
  186. ;
  187. ;    ESC [ 0 ; 4 m
  188. ;
  189. ; End of WS4PAT.INF
  190.