Mercurial > hg > Members > kono > nitros9-code

comparison defs/scfdefs @ 2024:e396d4f24b27

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Ran each file through pretty print
author boisy
date Tue, 14 Mar 2006 12:20:57 +0000
parents 338690d16f53
children
comparison
equal deleted inserted replaced
2023:dbaeafb56535 2024:e396d4f24b27
1 IFNE SCFDEFS-1 1 IFNE SCFDEFS-1
2 2
3 SCFDEFS set 1 3 SCFDEFS SET 1
4 4
5 ******************************************************************** 5 ********************************************************************
6 * SCFDefs - Sequential Character File Manager Definitions 6 * SCFDefs - Sequential Character File Manager Definitions
7 * 7 *
8 * $Id$ 8 * $Id$
38 * Updated comments for clarity. 38 * Updated comments for clarity.
39 * 39 *
40 * 2004/05/17 Boisy G. Pitre 40 * 2004/05/17 Boisy G. Pitre
41 * Added higher baud rates. 41 * Added higher baud rates.
42 42
43 nam SCFDefs 43 NAM SCFDefs
44 ttl Sequential File Manager Definitions 44 TTL Sequential File Manager Definitions
45 45
46 46 PAG
47 pag
48 ******************************* 47 *******************************
49 * SCF Device Descriptor Offsets 48 * SCF Device Descriptor Offsets
50 * 49 *
51 * These definitions are for SCF device descriptors. 50 * These definitions are for SCF device descriptors.
52 51
53 org M$DTyp 52 ORG M$DTyp
54 IT.DVC rmb 1 Device type (DT.SCF) 53 IT.DVC RMB 1 Device type (DT.SCF)
55 IT.UPC rmb 1 Uppercase flag 54 IT.UPC RMB 1 Uppercase flag
56 IT.BSO rmb 1 Backspace behavior 55 IT.BSO RMB 1 Backspace behavior
57 IT.DLO rmb 1 Delete behavior 56 IT.DLO RMB 1 Delete behavior
58 IT.EKO rmb 1 Echo flag 57 IT.EKO RMB 1 Echo flag
59 IT.ALF rmb 1 Auto linefeed flag 58 IT.ALF RMB 1 Auto linefeed flag
60 IT.NUL rmb 1 End-of-line null count 59 IT.NUL RMB 1 End-of-line null count
61 IT.PAU rmb 1 Page pause flag 60 IT.PAU RMB 1 Page pause flag
62 IT.PAG rmb 1 Number of lines per page 61 IT.PAG RMB 1 Number of lines per page
63 IT.BSP rmb 1 Backspace character 62 IT.BSP RMB 1 Backspace character
64 IT.DEL rmb 1 Delete-line character 63 IT.DEL RMB 1 Delete-line character
65 IT.EOR rmb 1 End-of-record character 64 IT.EOR RMB 1 End-of-record character
66 IT.EOF rmb 1 End-of-file character 65 IT.EOF RMB 1 End-of-file character
67 IT.RPR rmb 1 Reprint-line character 66 IT.RPR RMB 1 Reprint-line character
68 IT.DUP rmb 1 Duplicate-last-line character 67 IT.DUP RMB 1 Duplicate-last-line character
69 IT.PSC rmb 1 Pause character 68 IT.PSC RMB 1 Pause character
70 IT.INT rmb 1 Interrupt character 69 IT.INT RMB 1 Interrupt character
71 IT.QUT rmb 1 Quit character 70 IT.QUT RMB 1 Quit character
72 IT.BSE rmb 1 Backspace echo character 71 IT.BSE RMB 1 Backspace echo character
73 IT.OVF rmb 1 Bell character 72 IT.OVF RMB 1 Bell character
74 IT.PAR rmb 1 Parity 73 IT.PAR RMB 1 Parity
75 IT.BAU rmb 1 Baud rate 74 IT.BAU RMB 1 Baud rate
76 IT.D2P rmb 2 Attached device name string offset 75 IT.D2P RMB 2 Attached device name string offset
77 IT.XON rmb 1 X-ON character 76 IT.XON RMB 1 X-ON character
78 IT.XOFF rmb 1 X-OFF character 77 IT.XOFF RMB 1 X-OFF character
79 IT.COL rmb 1 Number of columns for display 78 IT.COL RMB 1 Number of columns for display
80 IT.ROW rmb 1 Number of rows for display 79 IT.ROW RMB 1 Number of rows for display
81 IT.XTYP rmb 1 Extended type (added by BRI) 80 IT.XTYP RMB 1 Extended type (added by BRI)
82 81
83 IFGT Level-1 82 IFGT Level-1
84 * Window Descriptor Additions 83 * Window Descriptor Additions
85 * For CoCo window, where IT.PAR = $80 84 * For CoCo window, where IT.PAR = $80
86 org IT.ROW+1 85 ORG IT.ROW+1
87 IT.WND rmb 1 Window number (matches device name) ($2E) 86 IT.WND RMB 1 Window number (matches device name) ($2E)
88 IT.VAL rmb 1 Use defaults on Init (0=no, 1=yes) 87 IT.VAL RMB 1 Use defaults on Init (0=no, 1=yes)
89 IT.STY rmb 1 Screen type default 88 IT.STY RMB 1 Screen type default
90 IT.CPX rmb 1 Column start default 89 IT.CPX RMB 1 Column start default
91 IT.CPY rmb 1 Row start default 90 IT.CPY RMB 1 Row start default
92 IT.FGC rmb 1 Foreground color default 91 IT.FGC RMB 1 Foreground color default
93 IT.BGC rmb 1 Background color default 92 IT.BGC RMB 1 Background color default
94 IT.BDC rmb 1 Border color default 93 IT.BDC RMB 1 Border color default
95 ENDC 94 ENDC
96 95
97 96
98 pag 97 PAG
99 ******************** 98 ********************
100 * SCF Static Storage 99 * SCF Static Storage
101 * 100 *
102 * SCF devices must reserve this space for SCF 101 * SCF devices must reserve this space for SCF
103 * 102 *
104 org V.USER 103 ORG V.USER
105 V.TYPE rmb 1 Device type or parity 104 V.TYPE RMB 1 Device type or parity
106 V.LINE rmb 1 Lines left until end of page 105 V.LINE RMB 1 Lines left until end of page
107 V.PAUS rmb 1 Immediate Pause request 106 V.PAUS RMB 1 Immediate Pause request
108 V.DEV2 rmb 2 Attached device's static 107 V.DEV2 RMB 2 Attached device's static
109 V.INTR rmb 1 Interrupt char 108 V.INTR RMB 1 Interrupt char
110 V.QUIT rmb 1 Quit char 109 V.QUIT RMB 1 Quit char
111 V.PCHR rmb 1 Pause char 110 V.PCHR RMB 1 Pause char
112 V.ERR rmb 1 Accumulated errors 111 V.ERR RMB 1 Accumulated errors
113 V.XON rmb 1 X-On char 112 V.XON RMB 1 X-On char
114 V.XOFF rmb 1 X-Off char 113 V.XOFF RMB 1 X-Off char
115 V.KANJI rmb 1 Kanji mode flag 114 V.KANJI RMB 1 Kanji mode flag
116 V.KBUF rmb 2 Kana - Kanji convert routine work address 115 V.KBUF RMB 2 Kana - Kanji convert routine work address
117 V.MODADR rmb 2 Kana - Kanji convert module address 116 V.MODADR RMB 2 Kana - Kanji convert module address
118 V.PDLHd rmb 2 Open path descriptor list head pointer 117 V.PDLHd RMB 2 Open path descriptor list head pointer
119 V.RSV rmb 5 Reserve bytes for future expansion 118 V.RSV RMB 5 Reserve bytes for future expansion
120 V.SCF equ . Total SCF manager static overhead 119 V.SCF EQU . Total SCF manager static overhead
121 120
122 121
123 pag 122 PAG
124 *********************** 123 ***********************
125 * Character Definitions 124 * Character Definitions
126 * 125 *
127 C$NULL set 0 Null char 126 C$NULL SET 0 Null char
128 C$RPET set $01 (CTRL-A - SOH) Repeat last input line 127 C$RPET SET $01 (CTRL-A - SOH) Repeat last input line
129 C$INTR set $03 (CTRL-C - ETX) Keyboard interrupt 128 C$INTR SET $03 (CTRL-C - ETX) Keyboard interrupt
130 C$RPRT set $04 (CTRL-D - EOT) Reprint current input line 129 C$RPRT SET $04 (CTRL-D - EOT) Reprint current input line
131 C$QUIT set $05 (CTRL-E - ENQ) Keyboard Abort 130 C$QUIT SET $05 (CTRL-E - ENQ) Keyboard Abort
132 C$BELL set $07 (CTRL-G - BEL) Line overflow warning 131 C$BELL SET $07 (CTRL-G - BEL) Line overflow warning
133 C$BSP set $08 (CTRL-H - BS ) Back space 132 C$BSP SET $08 (CTRL-H - BS ) Back space
134 C$RARR set $09 Right Arrow 133 C$RARR SET $09 Right Arrow
135 C$EL set $05 Erase Line 134 C$EL SET $05 Erase Line
136 C$LF set $0A Line feed 135 C$LF SET $0A Line feed
137 C$HOME set $0B Home position Code 136 C$HOME SET $0B Home position Code
138 C$Clsgr set $15 Graphic screen clear (use FM-11) 137 C$Clsgr SET $15 Graphic screen clear (use FM-11)
139 C$Clsall set $16 Graphic & character clear (use FM-11) 138 C$Clsall SET $16 Graphic & character clear (use FM-11)
140 C$CR set $0D Carriage return 139 C$CR SET $0D Carriage return
141 C$FORM set $0C (CTRL-L - FF ) Form Feed ... screen clear 140 C$FORM SET $0C (CTRL-L - FF ) Form Feed ... screen clear
142 C$SI set $0F Shift IN Code 141 C$SI SET $0F Shift IN Code
143 C$SO set $0E Shift OUT Code 142 C$SO SET $0E Shift OUT Code
144 C$DELETE set $10 Delete char (for SCF enhanced line editing) 143 C$DELETE SET $10 Delete char (for SCF enhanced line editing)
145 C$XON set $11 (CTRL-Q - DC1) Transmit Enable 144 C$XON SET $11 (CTRL-Q - DC1) Transmit Enable
146 C$INSERT set C$XON Insert char (for SCF enhanced line editing) 145 C$INSERT SET C$XON Insert char (for SCF enhanced line editing)
147 C$XOFF set $13 (CTRL-S - DC3) Transmit Disable 146 C$XOFF SET $13 (CTRL-S - DC3) Transmit Disable
148 C$PLINE set C$XOFF Print remaining line (for SCF enhanced line editing) 147 C$PLINE SET C$XOFF Print remaining line (for SCF enhanced line editing)
149 C$PAUS set $17 (CTRL-W - ETB) Pause character 148 C$PAUS SET $17 (CTRL-W - ETB) Pause character
150 C$DEL set $18 (CTRL-X - CAN) Delete line 149 C$DEL SET $18 (CTRL-X - CAN) Delete line
151 C$SHRARR set $19 Shift Right-Arrow 150 C$SHRARR SET $19 Shift Right-Arrow
152 C$EOF set $1B (CTRL-[ - ESC) END of file 151 C$EOF SET $1B (CTRL-[ - ESC) END of file
153 C$RGT set $1C Cursor right 152 C$RGT SET $1C Cursor right
154 C$LFT set $1D Cursor left 153 C$LFT SET $1D Cursor left
155 C$UP set $1E Cursor up 154 C$UP SET $1E Cursor up
156 C$DWN set $1F Cursor down 155 C$DWN SET $1F Cursor down
157 C$SPAC set $20 Space 156 C$SPAC SET $20 Space
158 C$PERD set '. 157 C$PERD SET '.
159 C$COMA set ', 158 C$COMA SET ',
160 159
161 160
162 pag 161 PAG
163 ********************************************* 162 *********************************************
164 * Sequential Character Path Descriptor Format 163 * Sequential Character Path Descriptor Format
165 * 164 *
166 * A path descriptor is created for every new path that is open 165 * A path descriptor is created for every new path that is open
167 * via the I$Open system call (processed by IOMan). Process 166 * via the I$Open system call (processed by IOMan). Process
168 * descriptors track state information of a path. 167 * descriptors track state information of a path.
169 * 168 *
170 org PD.FST 169 ORG PD.FST
171 PD.DV2 rmb 2 Output device table pointer 170 PD.DV2 RMB 2 Output device table pointer
172 PD.RAW rmb 1 Read/Write or ReadLn/WritLn mode 171 PD.RAW RMB 1 Read/Write or ReadLn/WritLn mode
173 PD.MAX rmb 2 ReadLn high byte count 172 PD.MAX RMB 2 ReadLn high byte count
174 PD.MIN rmb 1 Devices are "mine" if clear 173 PD.MIN RMB 1 Devices are "mine" if clear
175 PD.STS rmb 2 Status routine module addr 174 PD.STS RMB 2 Status routine module addr
176 PD.STM rmb 2 Reserved for status routine 175 PD.STM RMB 2 Reserved for status routine
177 org PD.OPT 176 ORG PD.OPT
178 rmb 1 Device type 177 RMB 1 Device type
179 PD.UPC rmb 1 Case (0=both, 1=upper only) 178 PD.UPC RMB 1 Case (0=both, 1=upper only)
180 PD.BSO rmb 1 Backspace (0=BSE, 1=BSE,SP,BSE) 179 PD.BSO RMB 1 Backspace (0=BSE, 1=BSE,SP,BSE)
181 PD.DLO rmb 1 Delete (0=BSE over line, 1=CRLF) 180 PD.DLO RMB 1 Delete (0=BSE over line, 1=CRLF)
182 PD.EKO rmb 1 Echo (0=No Echo) 181 PD.EKO RMB 1 Echo (0=No Echo)
183 PD.ALF rmb 1 Auto linefeed (0=No auto LF) 182 PD.ALF RMB 1 Auto linefeed (0=No auto LF)
184 PD.NUL rmb 1 End of Line null count 183 PD.NUL RMB 1 End of Line null count
185 PD.PAU rmb 1 Page pause (0=No end of page pause) 184 PD.PAU RMB 1 Page pause (0=No end of page pause)
186 PD.PAG rmb 1 Lines per page 185 PD.PAG RMB 1 Lines per page
187 PD.BSP rmb 1 Backspace character 186 PD.BSP RMB 1 Backspace character
188 PD.DEL rmb 1 Delete Line character 187 PD.DEL RMB 1 Delete Line character
189 PD.EOR rmb 1 End of Record character (read only) 188 PD.EOR RMB 1 End of Record character (read only)
190 PD.EOF rmb 1 End of File character 189 PD.EOF RMB 1 End of File character
191 PD.RPR rmb 1 Repront Line character 190 PD.RPR RMB 1 Repront Line character
192 PD.DUP rmb 1 Dup Last Line character 191 PD.DUP RMB 1 Dup Last Line character
193 PD.PSC rmb 1 Pause character 192 PD.PSC RMB 1 Pause character
194 PD.INT rmb 1 Keyboard interrupt character (CTRL-C) 193 PD.INT RMB 1 Keyboard interrupt character (CTRL-C)
195 PD.QUT rmb 1 Keyboard quit character (CTRL-E) 194 PD.QUT RMB 1 Keyboard quit character (CTRL-E)
196 PD.BSE rmb 1 Backspace echo character 195 PD.BSE RMB 1 Backspace echo character
197 PD.OVF rmb 1 Line overflow character (BELL) 196 PD.OVF RMB 1 Line overflow character (BELL)
198 PD.PAR rmb 1 Parity code 197 PD.PAR RMB 1 Parity code
199 PD.BAU rmb 1 ACIA baud rate (Color Computer) 198 PD.BAU RMB 1 ACIA baud rate (Color Computer)
200 PD.D2P rmb 2 Offset of DEV2 name 199 PD.D2P RMB 2 Offset of DEV2 name
201 PD.XON rmb 1 ACIA X-ON character 200 PD.XON RMB 1 ACIA X-ON character
202 PD.XOFF rmb 1 ACIA X-OFF character 201 PD.XOFF RMB 1 ACIA X-OFF character
203 OPTCNT equ .-PD.OPT Total user settable options 202 OPTCNT EQU .-PD.OPT Total user settable options
204 PD.ERR rmb 1 Most recent I/O error status 203 PD.ERR RMB 1 Most recent I/O error status
205 PD.TBL rmb 2 Device table addr (copy) 204 PD.TBL RMB 2 Device table addr (copy)
206 PD.PLP rmb 2 Path Descriptor List Pointer 205 PD.PLP RMB 2 Path Descriptor List Pointer
207 PD.PST rmb 1 Current path status 206 PD.PST RMB 1 Current path status
208 207
209 208
210 * PD.PST values Path Descriptor Status byte 209 * PD.PST values Path Descriptor Status byte
211 * 210 *
212 PST.DCD equ %00000001 Set if DCD is lost on Serial port 211 PST.DCD EQU %00000001 Set if DCD is lost on Serial port
213 212
214 213
215 * PD.PAR definitions 214 * PD.PAR definitions
216 * 215 *
217 * Parity 216 * Parity
218 PARNONE equ %00000000 217 PARNONE EQU %00000000
219 PARODD equ %00100000 218 PARODD EQU %00100000
220 PAREVEN equ %01100000 219 PAREVEN EQU %01100000
221 PARMARK equ %10100000 220 PARMARK EQU %10100000
222 PARSPACE equ %11100000 221 PARSPACE EQU %11100000
223 222
224 * PD.BAU definitions 223 * PD.BAU definitions
225 * 224 *
226 * Baud rate 225 * Baud rate
227 B110 equ %00000000 226 B110 EQU %00000000
228 B300 equ %00000001 227 B300 EQU %00000001
229 B600 equ %00000010 228 B600 EQU %00000010
230 B1200 equ %00000011 229 B1200 EQU %00000011
231 B2400 equ %00000100 230 B2400 EQU %00000100
232 B4800 equ %00000101 231 B4800 EQU %00000101
233 B9600 equ %00000110 232 B9600 EQU %00000110
234 B19200 equ %00000111 233 B19200 EQU %00000111
235 B38400 equ %00001000 234 B38400 EQU %00001000
236 B57600 equ %00001001 235 B57600 EQU %00001001
237 B115200 equ %00001010 236 B115200 EQU %00001010
238 * Word size 237 * Word size
239 WORD8 equ %00000000 238 WORD8 EQU %00000000
240 WORD7 equ %00100000 239 WORD7 EQU %00100000
241 * Stop bits 240 * Stop bits
242 STOP1 equ %00000000 241 STOP1 EQU %00000000
243 STOP2 equ %00010000 242 STOP2 EQU %00010000
244 243
245 ENDC 244 ENDC