-
Notifications
You must be signed in to change notification settings - Fork 0
/
RC700.MAC
executable file
·106 lines (105 loc) · 2.99 KB
/
RC700.MAC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
;
; Z3TCAP file: RC700.Z80
;
ESC EQU 27 ; Escape character
;
; The first character in the terminal name must not be a space. For
; Z3TCAP.TCP library purposes only, the name terminates with a space
; and must be unique in the first eight characters.
;
TNAME: DB 'Rc700 patched' ; Name of terminal (13 chars)
;
GOFF: DB GOELD-TNAME ; Graphics offset from Z3TCAP start
;
; Terminal configuration bytes B14 and B15 are defined and bits assigned
; as follows. The remaining bits are not currently assigned. Set these
; bits according to your terminal configuration.
;
; B14 b7: Z3TCAP Type.... 0 = Standard TCAP 1 = Extended TCAP
;
; bit: 76543210
B14: DB 10000000B ; Configuration byte B14
;
; B15 b0: Standout....... 0 = Half-Intensity 1 = Reverse Video
; B15 b1: Power Up Delay. 0 = None 1 = Ten-second delay
; B15 b2: No Auto Wrap... 0 = Auto Wrap 1 = No Auto Wrap
; B15 b3: No Auto Scroll. 0 = Auto Scroll 1 = No Auto Scroll
; B15 b4: ANSI........... 0 = ASCII 1 = ANSI
;
; bit: 76543210
B15: DB 00000001B ; Configuration byte B15
;
; Single character arrow keys or WordStar diamond
;
DB 'E'-40H ; Cursor up
DB 'X'-40H ; Cursor down
DB 'D'-40H ; Cursor right
DB 'S'-40H ; Cursor left
;
; Delays (in ms) after sending terminal control strings
;
DB 0 ; CL delay
DB 0 ; CM delay
DB 0 ; CE delay
;
; Strings start here
;
CL: DB 'L'-40H,0 ; Home cursor and clear screen
CM: DB 'F'-40H,'%r%+ %+ ',0 ; Cursor motion macro
CE: DB '^'-40H,0 ; Erase from cursor to end-of-line
SO: DB 0 ; Start standout mode
SE: DB 0 ; End standout mode
TI: DB 0 ; Terminal initialization
TE: DB 0 ; Terminal deinitialization
;
; Extensions to standard Z3TCAP
;
LD: DB 'B'-40H,0 ; Delete line at cursor position
LI: DB 'A'-40H,0 ; Insert line at cursor position
SA: DB 0 ; Set screen attributes macro
AT: DB 0 ; Attribute string
CD: DB 31, 0 ; Erase from cursor to end-of-screen
;
; The attribute string contains the four command characters to set
; the following four attributes for this terminal in the following
; order: Normal, Blink, Reverse, Underscore
;
RC: DB 0 ; Read current cursor position
RL: DB 0 ; Read line until cursor
;
; Graphics TCAP area
;
GOELD: DB 0 ; Graphics On/Off delay in ms
;
; Graphics strings
;
GO: DB 0 ; Graphics mode On
GE: DB 0 ; Graphics mode Off
CDO: DB 0 ; Cursor Off
CDE: DB 0 ; Cursor On
;
; Graphics characters
;
GULC: DB 0 ; Upper left corner
GURC: DB 0 ; Upper right corner
GLLC: DB 0 ; Lower left corner
GLRC: DB 0 ; Lower right corner
GHL: DB 0 ; Horizontal line
GVL: DB 0 ; Vertical line
GFB: DB 0 ; Full block
GHB: DB 0 ; Hashed block
GUI: DB 0 ; Upper intersect
GLI: DB 0 ; Lower intersect
GIS: DB 0 ; Mid intersect
GRTI: DB 0 ; Right intersect
GLTI: DB 0 ; Left intersect
;
; Fill remaining space with zeros
;
REPT 128-($-TNAME)
DB 0
ENDM
END
;
; End of Z3TCAP
;