home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / ZSYS / SIMTEL20 / ZSIG / VISUAL50.ASM < prev    next >
Assembly Source File  |  2000-06-30  |  7KB  |  171 lines
  1.  
  2. ;              **** DRAFT--Not Final ****
  3. ;                 ZCPR 3.3 System TCAP
  4. ;
  5. ; Version for the Visual 50 in the Hazeltine emulation mode using
  6. ;        Escape as a lead in character.
  7. ;
  8. ; Copyright 1985, 1986 by Richard Conn, Dennis Wright, and Echelon, Inc.
  9. ;                        All Rights Reserved
  10. ;
  11. ; Note on Padding:
  12. ;        All entries which have an asterisk (like, *) following
  13. ;        their one-line explanation have delays which may be
  14. ;        variable.
  15. ; Note on Definition:
  16. ;            If a function is not available for a particular terminal,
  17. ;               its string should be 0 and its delay should be 0 (if it has
  18. ;               a delay).
  19. ;
  20. ;
  21. ; Section 1: Basic Terminal Characteristics
  22. ;
  23. ;    YU    Single Character Generated by Uparrow Key on Keyboard
  24. ;    YD    Single Character Generated by Downarrow Key on Keyboard
  25. ;    YL    Single Character Generated by Leftarrow Key on Keyboard
  26. ;    YR    Single Character Generated by Rightarrow Key on Keyboard
  27. ;        Note: If no arrow keys or arrow keys generate more than
  28. ;        one character (like VT100), then use WordStar convention
  29. ;        for these codes: YU=^E, YD=^X, YL=^S, YR=^D
  30. ;
  31. ;    CL    Clear Screen String (has a delay which may be variable);
  32. ;        cursor is placed in home position (upper left corner) when
  33. ;        this sequence is complete
  34. ;
  35. ;    CM    Cursor Motion String (see explanation of codes in the Manual)
  36. ;
  37. ;    CE    Clear to End of Line String; cursor is left at original
  38. ;        position when this sequence is complete
  39. ;
  40. ;    SO    Begin Highlighting (Reverse Video or Dim); no character
  41. ;        positions on the screen are used by this sequence (ie, cursor
  42. ;        does not move after this sequence is complete)
  43. ;    SE    End Highlighting (return to Normal display intensity); no
  44. ;        character positions on the screen are used by this sequence
  45. ;
  46. ;    TI    Initialize Terminal String; it is preferred that nothing be
  47. ;        output to the screen by this sequence, but no output is not
  48. ;        required
  49. ;    TE    Deinitialize Terminal String; it is preferred that nothing
  50. ;        be output to the screen by this sequence
  51. ;
  52. envor2:
  53.     db    'Visual 50/Hazel '    ; Name of Terminal (16 chars)
  54.     db    'E'-'@'            ; YU (YU = Cursor UP)
  55.     db    'X'-'@'            ; YD (YD = Cursor DOWN)
  56.     db    'D'-'@'            ; YL (YL = Cursor LEFT)
  57.     db    'S'-'@'            ; YR (YR = Cursor RIGHT)
  58.     db    15            ; CL Delay (CL = Clear Screen)*
  59.     db    0            ; CM Delay (CM = Cursor Motion)
  60.     db    2            ; CE Delay (CE = Clear to EOL)
  61.     db    1bh,'\'-'@',0        ; CL String
  62.     db    1bh,'Q'-'@','%r%.%.',0    ; CM String
  63.     db    1bh,'O'-'@',0        ; CE String
  64.     db    1bh,'Y'-'@',0        ; SO String (SO = Stand Out Mode)
  65.     db    1bh,'_'-'@',0        ; SE String (SE = End Stand Out Mode)
  66.     db    0            ; TI String (TI = Terminal Init)
  67.     db    0            ; TE String (TE = Terminal Deinit)
  68. ;
  69. ;    Section 2: Business Graphics
  70. ;
  71. ;  The following strings are used to create graphics symbols.
  72. ; If your terminal does not support business graphics, make (GO) and (GE)
  73. ; a non-zero non-printable character that has no effect on your
  74. ; terminal and use ASCII characters like '*' to replace the graphics
  75. ; characters.  Recommended character values are indicated in [], like [*].
  76. ; An alternate recommendation using '.' and ':' will be made with release
  77. ; of ZCPRB3.
  78. ;
  79.     db    0            ; GO Delay (GO = Graphics On)
  80.     db    0            ; GE Delay (GE = Graphics End)
  81.     db    1bh,'F',0        ; GO  - Graphics on string
  82.     db    1bh,'G',0        ; GE  - Graphics end string
  83.     db    's',0            ; GULC - Upper left corner [*]
  84.     db    'l',0            ; GURC - Upper right corner [*]
  85.     db    'e',0            ; GLLC - Lower left corner [*]
  86.     db    'm',0            ; GLRC - Lower right corner [*]
  87.     db    '`',0            ; GHL  - Horizontal line [-]
  88.     db    'a',0            ; GVL  - Vertical line [|]
  89.     db    '*',0            ; GFB  - Full block [*]
  90.      db    '#',0            ; GHB  - Hashed block [#]
  91.     db    'd',0            ; GUI  - Upper intersect [+]
  92.     db    'c',0            ; GLI  - Lower intersect [+]
  93.     db    'b',0            ; GIS  - Intersection [+]
  94.     db    'o',0            ; GRTI - Right intersect [+]
  95.     db    'n',0            ; GLTI - Left intersect [+]
  96. ;
  97. ;    Section 3: Windowing
  98. ;
  99. ;     The following environmental data must be present if window 
  100. ; routines are to be used.  GCM (Graphic Character Mask) contains
  101. ; any bits that are not used by on screen graphics characters. 
  102. ; GCD (Graphics Chararacter Difference) are the bits that are 
  103. ; stripped (by the terminal) from a sent graphics character to
  104. ; form the on screen graphics character. 
  105. ;
  106.     db    00h              ; GCM - Graphic character mask byte
  107.     db    00h              ; GCD - Graphic char difference bit(s)
  108. ;
  109. ; The next string can be either a terminal control code or an
  110. ; address of a user supplied subroutine.  If a user supplied routine
  111. ; is to be used set the U1 address accordingly.  Remember if an
  112. ; address is placed here and both bytes of the address are 00h,
  113. ; then the RAT string will be used.  If the RAT string is null the RSP
  114. ; string will be used.  At least one of these two functions must be
  115. ; available for window routines, RAT is prefered.
  116. ;
  117. ; If a RAT user supplied routine is to be used it must return the
  118. ; characters as follows:
  119. ;
  120. ; RAT - Read character at cursor position must return the character
  121. ;       at the current cursor position in the (A) register.
  122. ;
  123. ;
  124.      db    1bh,'!','P'-'@',0    ; RAT - Read char at current cursor
  125.                     ;       position
  126. ;    db    0            ; Zero if using RSP
  127. ;
  128. ; Set the following address non-zero if user supplied RAT subroutine
  129. ; is to be used.
  130. ;
  131.     dw    0            ; U1  - Use user supplied RAT routine
  132. ;
  133.     db    0            ; RSP - Read screen page
  134. ;
  135. ; If RSP is to be used the following two bytes must be defined; if not,
  136. ; make them zero.
  137. ;
  138.      db    00h            ; ELM - End of line mark
  139.     db    00h            ; EPM - End of screen mark
  140. ;
  141. ; These bytes are the screen codes sent by the terminal at the end of
  142. ; each line (ELM) and end of page (EPM).  Some terminals like the WYSE 50
  143. ; may have graphics character codes that are the same as the ELM or EPM
  144. ; codes.  In this case an alternative graphic character must be used.
  145. ;
  146. ;    Section 4: Extended Terminal Characteristics
  147. ;               (More to be added in banked ZCPRB3 256-byte version)
  148. ;
  149. ;    CD    Clear to End of Display; the cursor is not moved by this
  150. ;        action
  151. ;    KL    Keyboard Lock; the keys on the keyboard are made inoperative
  152. ;    KU    Keyboard Unlock; the keys on the keyboard are made operative
  153. ;
  154. ;    CDO    Cursor Display Off; Cursor is no longer displayed, no
  155. ;        character positions on the screen are used by this sequence
  156. ;    CDE    Cursor Display Enable; Cursor is displayed, no character
  157. ;        positions on the screen are used by this sequence
  158. ;
  159.     db    10            ; CD Delay (CD = Clear to End Display)*
  160.     db    1bh,'k',0        ; CD String
  161.     db    1bh,'U'-'@',0        ; KL String (KL = Keyboard Lock)
  162.     db    1bh,'F'-'@',0        ; KU String (KU = Keyboard Unlock)
  163.     db    1bh,'m',0        ; CDO String (Cursor Display Off)
  164.     db    1bh,'X',0        ; CDE String (Cursor Display Enable)
  165. ;
  166.     ds    80H-($-envor2)        ; Make exactly 80H bytes long
  167. ;
  168. ; End of ZCPR 3.3 TCAP
  169. ;
  170.     END
  171.