home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / jsage / znode3 / uploads / tcap-tvi.lbr / TCAP8BIT.ZZ0 / TCAP8BIT.Z80
Encoding:
Text File  |  1990-12-02  |  4.5 KB  |  147 lines
  1. ; TERMINAL CAPABILITIES DATA (TCAP)
  2. ;
  3. ; NZTCAP:  TVI965-8.Z80 for TeleVideo-965 for 8-bit transmission
  4. ; Author:  Gene Pizzetta
  5. ; Date:    June 3, 1990
  6. ; Version: 1.0
  7. ; Based on NZWYS60.Z80 for Wyse-60, Version 2.2, by Joe Wright
  8. ;
  9. ; HISTORY OF NZWYS60.Z80:
  10. ;
  11. ; Version 2.2 -- 3 February 90
  12. ;    Moved the CD (clear to end of screen) string back after LI string.
  13. ;    Define B13 as offset from NZTCAP to GOELD.
  14. ;
  15. ; Version 2.1 -- 19 January 90
  16. ;    Added Read Cursor and Read Line functions.
  17. ;    Graphics characters now in a table instead of individual strings.
  18. ;
  19. ; Version 2.0 -- 12 December 89
  20. ;    Modified for new VLIB4 graphics and for new SETATT and SETATR routines.
  21. ;    The SA: macro string is modified for the routines and a new string,
  22. ;    AT: is added to contain the four main attributes for this terminal:
  23. ;    Normal, Blink, Reverse, Underscore
  24. ;
  25. ; Version 1.0 -- 12 October 87 -- Joe Wright
  26. ;
  27. ; EXTENDED TERMCAP DATA FOR NZ:
  28. ;
  29. ; This is the proposed TermCap Data for the New Z-System.
  30. ; It more fully describes the terminal and its capabilities.
  31. CtrlA    equ    01h
  32. CtrlB    equ    02h
  33. CtrlC    equ    03h
  34. CtrlD    equ    04h
  35. CtrlI    equ    09h
  36. CtrlJ    equ    0Ah
  37. CtrlK    equ    0Bh
  38. CtrlL    equ    0Ch
  39. CtrlM    equ    0Dh
  40. CtrlN    equ    0Eh
  41. CtrlO    equ    0Fh
  42. CtrlR    equ    12h
  43. ESC    equ    1Bh
  44. Ctrl_    equ    1Fh
  45. ; I have adopted the convention that a terminal name is terminated
  46. ; with a space character, therefore no spaces within the name.
  47. ; Also that the terminal name is unique in the first eight characters.
  48. ;
  49. NZTCAP:    db    'TVI-965      ' ; Name of terminal (13 bytes)
  50. ;
  51. ; The Graphics section is no longer fixed so we must provide an
  52. ; offset to it.  One byte is sufficient for a two-record TCAP.
  53. ;
  54. B13:    db    GOELD-NZTCAP    ; Offset to GOELD
  55. ;
  56. ; Bit 7 of B14 indicates the new Extended TCAP.  Bits 6-0 are undefined.
  57. ;
  58. B14:    db    10000000b    ; Extended TCAP
  59. ;
  60. ; It is often desirable to differentiate terminals with other than
  61. ; their commands.  For example TeleVideo 955 has the same command
  62. ; set as Wyse 60 but takes less time to initialize (reset).
  63. ;
  64. ; 16 bits are now reserved for indicating terminal charactistics
  65. ; which cannot be known from the strings.  I have defined five
  66. ; of these bits for my own purposes.  
  67. ;
  68. ; B15 b0    Standout    0 = Half-Intensity, 1 = Reverse Video
  69. ; B15 b1    Power Up Delay    0 = None, 1 = 10-second delay
  70. ; B15 b2    No Wrap        0 = Line Wrap, 1 = No Wrap
  71. ; B15 b3    No Scroll    0 = Scroll, 1 = No Scroll
  72. ; B15 b4    ANSI        0 = ASCII, 1 = ANSI
  73. ;
  74. B15:    db    00000000b    ; dim, no delay, wrap, scroll, ASCII
  75. ;
  76.     db    'E'-'@'        ; Cursor up
  77.     db    'X'-'@'        ; Cursor down
  78.     db    'D'-'@'        ; Cursor right
  79.     db    'S'-'@'        ; Cursor left
  80.     db    50        ; CL delay for screen clear
  81.     db    00        ; CM delay for cursor motion
  82.     db    00        ; CE delay for clear to end-of-line
  83.  
  84. ; Strings start here.
  85.  
  86. CL:    db    ESC,'+',0    ; CL Home cursor and clear screen    0
  87.     db    ESC,'=%+ %+ ',0    ; CM Cursor motion            1
  88.     db    ESC,'T',0    ; CE Clear to end-of-line        2
  89.     db    ESC,')',0    ; SO Standout on            3
  90.     db    ESC,'(',0    ; SE Standout end            4
  91.     db    0        ; TI Terminal init            5
  92.     db    ESC,'(',0    ; TE Terminal de-init            6
  93. ;
  94. ; Extensions to Standard Z3TCAP 
  95. ;
  96. LD:    db    ESC,'R',0    ; LD Line delete            7
  97. LI:    db    ESC,'E',0    ; LI Line insert            8
  98. CD:    db    ESC,'Y',0    ; CD Clear to end of screen        9
  99. ;
  100. ; Set Attribute strings once again included.
  101. ;
  102. SA:    db    ESC,'G%+0',0    ; SA Set attributes            10
  103. AT:    db    '0248',0    ; AT Attributes                11
  104. ;
  105. ; These two allow reading the Terminal's screen.
  106. ;
  107. RC:    db    ESC,'?',0    ; RC Read current cursor position    12
  108. RL:    db    ESC,'6',0    ; RL Read line until cursor        13
  109. ;
  110. ; Graphics start here.    Wyse-60 goes graphic with bit 7 set.
  111. ;
  112. GOELD:    db    0        ; Graphics on/off delay            0
  113. ;
  114. ; Graphics strings offset from Delay value.
  115. ;
  116.     db    0        ; GS Graphics on            1
  117.     db    0        ; GE Graphics end            2
  118.     db    ESC,'.0',0    ; CDO Cursor off            3
  119.     db    ESC,'.3',0    ; CDE Cursor enable            4
  120. ;
  121. ; Graphics Characters
  122. ;
  123.     db    CtrlB+80h    ; GULC Upper left corner    [*]    5
  124.     db    CtrlC+80h    ; GURC Upper right corner    [*]    6
  125.     db    CtrlA+80h    ; GLLC Lower left corner    [*]    7
  126.     db    CtrlD+80h    ; GLRC Lower right corner    [*]    8
  127.     db    CtrlK+80h    ; GHL Horizontal line        [-]    9
  128.     db    CtrlJ+80h    ; GVL Vertical line        [|]    10
  129.     db    Ctrl_+80h    ; GFB Full block        [*]    11
  130.     db    CtrlR+80h    ; GHB Hashed block        [#]    12
  131.     db    CtrlN+80h    ; GUI Upper intersection    [+]    13
  132.     db    CtrlO+80h    ; GLI Lower intersection    [+]    14
  133.     db    CtrlI+80h    ; GIS Intersection        [+]    15
  134.     db    CtrlL+80h    ; GRTI Right intersection    [+]    16
  135.     db    CtrlM+80h    ; GLTI Left intersection    [+]    17
  136. ;
  137. ;  Fill unused space with nulls
  138. ;
  139.      REPT    128-($-NZTCAP)
  140.     db    0
  141.      ENDM
  142. ;
  143.     end
  144. ;
  145. ;  End of NZTCAP
  146. ;
  147.