“NZVT100 AZM@«‡NZVT100 FOR5õ‡NZVT100 Z3T"Èv‡ ; NZTCAP: NZVT100.AZM ; Author: Bob Kiesling ; Date: 8 September 91 ; Version: 1.0 ; VERSION: 1.0 8 September 91 ; Modified from NZWYS60.Z80 Version 2.0 by Joe Wright, and translated ; for the z80mr public-domain assembler. Tested on a Microterm Ergo 301, ; a VT100 clone. Standout = Reverse Video (Bright is hard on the eyes.) ; Extended Termcap Data for NZ ; This is the proposed TermCap Data for the New Z-System. ; It more fully describes the terminal and its capabilities. ESC EQU 27 ; ASCII escape character ; I have adopted the convention that a terminal name is terminated ; with a space character, therefore no spaces within the name. ; Also that the terminal name is unique in the first eight characters. ; NZTCAP: DB 'VT100 ' ; Name of terminal (13 bytes) ; ; The Graphics section is no longer fixed so we must provide an ; offset to it. One byte is sufficient for a two-record TCAP. ; B13: DB GOELD-NZTCAP ; Offset to GOELD ; ; Bit 7 of B14 indicates the new Extended TCAP. Bits 6-0 are undefined. ; B14: DB 10000000B ; Extended TCAP ; ; It is often desirable to differentiate terminals with other than ; their commands. For example TeleVideo 955 has the same command ; set as Wyse 60 but takes less time to initialize (reset). ; ; 16 bits are now reserved for indicating terminal charactistics ; which cannot be known from the strings. I have defined five ; of these bits for my own purposes. ; ; B15 b0 Standout 0 = Half-Intensity, 1 = Reverse Video ; B15 b1 Power Up Delay 0 = None, 1 = 10-second delay ; B15 b2 No Wrap 0 = Line Wrap, 1 = No Wrap ; B15 b3 No Scroll 0 = Scroll, 1 = No Scroll ; B15 b4 ANSI 0 = ASCII, 1 = ANSI ; B15: DB 00010101B ; Reverse Video, No Wrap, ANSI ; ; These equates are necessary because z80mr doesn't allow expressions in ; db statements. ; WordStar command keys CUP equ 'E'-'@' CDN equ 'X'-'@' CRT equ 'D'-'@' CLT equ 'S'-'@' ; DB CUP ; Cursor up DB CDN ; Cursor down DB CRT ; Cursor right DB CLT ; Cursor left DB 00 ; Cl delay DB 00 ; Cm delay DB 00 ; Ce delay ; Strings start here. CL: DB ESC,'[2J',0 ; Cl string 0 DB ESC,'[%i%2;%2H',0 ; Cm string 1 DB ESC,'[K',0 ; Ce string 2 DB ESC,'[7m',0 ; So string 3 DB ESC,'[m',0 ; Se string 4 DB 0 ; Ti string 5 DB 0 ; Te string 6 ; ; Extensions to Standard Z3TCAP ; LD: DB 0 ; Line Delete 7 LI: DB 0 ; Line Insert 8 CD: DB ESC,'[J',0 ; Clear to end of screen 9 ; ; Set Attribute strings once again included. ; SA: DB ESC,'[%m',0 ; Set Attributes 10 AT: DB '01457',0 ; Attributes 11 ; ; These two allow reading the Terminal's screen. ; RC: DB ESC,'[6n',0 ; Read current cursor position 12 RL: DB 0 ; Read line until cursor 13 ; ; Graphics start here. Wyse-60 goes graphic with bit 7 set. ; GOELD: DB 0 ; On/Off Delay 0 ; ; Graphics strings offset from Delay value. ; DB ESC,'(0',0 ; Graphics On 1 DB ESC,'(B',0 ; Graphics Off 2 DB 0 ; Cursor Off 3 DB 0 ; Cursor On 4 ; Graphics Characters DB 'l' ; Upper Left Corner 5 DB 'k' ; Upper Right Corner 6 DB 'm' ; Lower Left Corner 7 DB 'j' ; Lower Right Corner 8 DB 'q' ; Horizontal Line 9 DB 'x' ; Vertical Line 10 DB 0 ; Full Block 11 DB 'a' ; Hashed Block 12 DB 'w' ; Upper Intersect 13 DB 'v' ; Lower Intersect 14 DB 'n' ; Mid Intersect 15 DB 'u' ; Right Intersect 16 DB 't' ; Left Intersect 17 ; ; Fill unused space with nulls ; DS 128-($-NZTCAP) ; END ; ; End of NZTCAPD NZVT100.LBR -- 8 Sept. 91 This is an extended TERMCAP for the DEC VT100 and ANSI-compatible terminals which conforms to the VLIB4D termcap standard. Includes all graphics characters with the exception of a filled box. Standout video is translated to reverse (bright is hard on the eyes). Code modified to assemble with the Z80mr public-domain assembler. VT100 M€[%i%2;%2H[%m01457(0(Blkmjqxawvnut