annotate defs/scfdefs @ 556:28a203bbd2cc

findstr and signal finished.
author roug
date Tue, 22 Oct 2002 19:09:04 +0000
parents 911983420d77
children 903ccb6c06cf
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
373
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 0
diff changeset
1 ifeq SCFDEFS
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 0
diff changeset
2
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 0
diff changeset
3 SCFDEFS set 1
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 0
diff changeset
4
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
5 nam SCFDefs
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
6 ttl Sequential File Manager (SCF) Definitions
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
8 *****************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
9 * Edition History
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
10 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
11 * Date Changes Made by
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12 * -------- ------------------------------------------------------------ ---
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13 * 84/01/11 Added V.KANJI, V.KBUF, V.MODADR for new kanji input process Y.O
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14 * 85/04/20 Added V.PDLHd Path Descriptor List Head MGH
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15 * 85/04/21 Added PD.PLP and PD.PST for modem handling MGH
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
16 * 87/06/23 Updated with Dev Desc info KKD
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 * 98/10/03 Consolidated L1/L2 scfdefs BGP
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
18
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20 *******************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21 * SCF Device Descriptor Offsets
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
22 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
23 org M$DTyp
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
24 IT.DVC rmb 1 Device class
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
25 IT.UPC rmb 1 Uppercase flag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
26 IT.BSO rmb 1 Backspace behavior
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27 IT.DLO rmb 1 Delete behavior
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
28 IT.EKO rmb 1 Echo flag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 IT.ALF rmb 1 Auto linefeed flag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
30 IT.NUL rmb 1 End-of-line null count
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
31 IT.PAU rmb 1 Page pause flag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
32 IT.PAG rmb 1 Number of lines per page
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
33 IT.BSP rmb 1 Backspace character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
34 IT.DEL rmb 1 Delete-line character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
35 IT.EOR rmb 1 End-of-record character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
36 IT.EOF rmb 1 End-of-file character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
37 IT.RPR rmb 1 Reprint-line character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
38 IT.DUP rmb 1 Duplicate-last-line character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
39 IT.PSC rmb 1 Pause character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
40 IT.INT rmb 1 Interrupt character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
41 IT.QUT rmb 1 Quit character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
42 IT.BSE rmb 1 Backspace echo character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
43 IT.OVF rmb 1 Bell character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
44 IT.PAR rmb 1 Parity
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
45 IT.BAU rmb 1 Baud rate
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
46 IT.D2P rmb 2 Attached device name string offset
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
47 IT.XON rmb 1 X-ON character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
48 IT.XOFF rmb 1 X-OFF character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
49 IT.COL rmb 1 Number of columns for display
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
50 IT.ROW rmb 1 Number of rows for display
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
51 IT.XTYP rmb 1 Extended type (added by BRI)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
52
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
53 ifgt Level-1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
54 * Window Descriptor Additions
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
55 * For CoCo window, where IT.PAR = $80
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
56 org IT.ROW+1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
57 IT.WND rmb 1 Window number (matches device name) ($2E)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
58 IT.VAL rmb 1 Use defaults on Init (0=no, 1=yes)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
59 IT.STY rmb 1 Screen type default
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
60 IT.CPX rmb 1 Column start default
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
61 IT.CPY rmb 1 Row start default
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
62 IT.FGC rmb 1 Foreground color default
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
63 IT.BGC rmb 1 Background color default
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
64 IT.BDC rmb 1 Border color default
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
65 endc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
66
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
67 pag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
68 ************************************************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
69 * Static storage requirements
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
70 * SCF Devices must reserve this space for SCF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
71 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
72 org V.USER
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
73 V.TYPE rmb 1 Device type or parity
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
74 V.LINE rmb 1 Lines left until end of page
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
75 V.PAUS rmb 1 Immediate Pause request
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
76 V.DEV2 rmb 2 Attached device's static
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
77 V.INTR rmb 1 Interrupt char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
78 V.QUIT rmb 1 Quit char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
79 V.PCHR rmb 1 Pause char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
80 V.ERR rmb 1 Accumulated errors
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
81 V.XON rmb 1 X-On char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
82 V.XOFF rmb 1 X-Off char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
83 V.KANJI rmb 1 Kanji mode flag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
84 V.KBUF rmb 2 Kana - Kanji convert routine work address
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
85 V.MODADR rmb 2 Kana - Kanji convert module address
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
86 V.PDLHd rmb 2 Open path descriptor list head pointer
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
87 V.RSV rmb 5 Reserve bytes for future expansion
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
88 V.SCF equ . Total SCF manager static overhead
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
89
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
90 ***********************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
91 * Character Definitions
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
92 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
93 C$NULL set 0 Null char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
94 C$RPET set $01 (ctl A - SOH) Repeat last input line
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
95 C$INTR set $03 (ctl C - ETX) Keyboard interrupt
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
96 C$RPRT set $04 (ctl D - EOT) Reprint current input line
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
97 C$QUIT set $05 (ctl E - ENQ) Keyboard Abort
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
98 C$BELL set $07 (ctl G - BEL) Line overflow warning
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
99 C$BSP set $08 (ctl H - BS ) Back space
433
911983420d77 Added symbolics for enhanced SCF line editing
boisy
parents: 373
diff changeset
100 C$RARR set $09 Right Arrow
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
101 C$EL set $05 Erase Line
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
102 C$LF set $0A Line feed
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
103 C$HOME set $0B Home position Code
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
104 C$Clsgr set $15 Graphic screen clear (use FM-11)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
105 C$Clsall set $16 Graphic & character clear (use FM-11)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
106 C$CR set $0D Carriage return
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
107 C$FORM set $0C (ctl L - FF ) Form Feed ... screen clear
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
108 C$SI set $0F Shift IN Code
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
109 C$SO set $0E Shift OUT Code
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
110 C$XON set $11 (ctl Q - DC1) Transmit Enable
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
111 C$XOFF set $13 (ctl S - DC3) Transmit Disable
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
112 C$PAUS set $17 (ctl W - ETB) Pause character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
113 C$DEL set $18 (ctl X - CAN) Delete line
433
911983420d77 Added symbolics for enhanced SCF line editing
boisy
parents: 373
diff changeset
114 C$SHRARR set $19 Shift Right-Arrow
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
115 C$EOF set $1B (ctl [ - ESC) END of file
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
116 C$RGT set $1C Cursor right
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
117 C$LFT set $1D Cursor left
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
118 C$UP set $1E Cursor up
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
119 C$DWN set $1F Cursor down
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
120 C$SPAC set $20 Space
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
121 C$PERD set '.
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
122 C$COMA set ',
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
123
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
124 pag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
125 *************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
126 * FILE DESCRIPTOR OFFSETS
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
127 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
128 org PD.FST
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
129 PD.DV2 rmb 2 OUTPUT DEV TBL PTR
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
130 PD.RAW rmb 1 READ/WRITE OR RDLIN/WRLIN MODE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
131 PD.MAX rmb 2 READLINE HIGH BYTE COUNT
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
132 PD.MIN rmb 1 DEVICES ARE "MINE" IF CLEAR
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
133 PD.STS rmb 2 Status routine module addr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
134 PD.STM rmb 2 Reserved for Status routine
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
135 org PD.OPT
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
136 rmb 1 DEVICE TYPE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
137 PD.UPC rmb 1 CASE (0=BOTH, 1=UPPER ONLY)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
138 PD.BSO rmb 1 BACKSP (0=BSE, 1=BSE,SP,BSE)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
139 PD.DLO rmb 1 DELETE (0=BSE OVER LINE, 1=CRLF)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
140 PD.EKO rmb 1 ECHO (0=NO ECHO)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
141 PD.ALF rmb 1 AUTOLF (0=NO AUTO LF)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
142 PD.NUL rmb 1 END of LINE NULL COUNT
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
143 PD.PAU rmb 1 PAUSE (0=NO END of PAGE PAUSE)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
144 PD.PAG rmb 1 LINES PER PAGE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
145 PD.BSP rmb 1 BACKSPACE charACTER
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
146 PD.DEL rmb 1 DELETE LINE charACTER
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
147 PD.EOR rmb 1 END of RECORD char (READ ONLY)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
148 PD.EOF rmb 1 END of FILE char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
149 PD.RPR rmb 1 REPRINT LINE char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
150 PD.DUP rmb 1 DUP LAST LINE char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
151 PD.PSC rmb 1 PAUSE char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
152 PD.INT rmb 1 KBD INTR char (ctl c)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
153 PD.QUT rmb 1 KBD QUIT char (ctl q)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
154 PD.BSE rmb 1 BACKSPACE ECHO charACTER
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
155 PD.OVF rmb 1 LINE OVERFLOW char (BELL)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
156 PD.PAR rmb 1 PARITY CODE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
157 PD.BAU rmb 1 ACIA BAUD RATE (Color Computer)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
158 PD.D2P rmb 2 OFFSET of DEV2 name
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
159 PD.XON rmb 1 ACIA X-ON char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
160 PD.XOFF rmb 1 ACIA X-OFF char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
161 OPTCNT equ .-PD.OPT Total user settable options
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
162 PD.ERR rmb 1 Most recent I/O error status
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
163 PD.TBL rmb 2 Device Table addr (copy)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
164 PD.PLP rmb 2 Path Descriptor List Pointer
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
165 PD.PST rmb 1 Current Path Status
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
166
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
167 ********************************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
168 * PD.PST values Path Descriptor Status byte
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
169 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
170 PST.DCD equ %00000001 Set if DCD is lost on Serial port
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
171
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
172 pag
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
173 ************************************************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
174 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
175 * SCF PD.PAR definitions
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
176 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
177 * Baud rate
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
178 B110 equ 0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
179 B300 equ 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
180 B600 equ 2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
181 B1200 equ 3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
182 B2400 equ 4
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
183 B4800 equ 5
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
184 B9600 equ 6
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
185 B19200 equ 7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
186 * Word size
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
187 WORD8 equ %00000000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
188 WORD7 equ %00100000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
189 * Parity
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
190 PARNONE equ %00000000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
191 PARODD equ %00100000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
192 PAREVEN equ %01100000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
193 PARMARK equ %10100000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
194 PARSPACE equ %11100000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
195 * Stop bits
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
196 STOP1 equ %00000000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
197 STOP2 equ %00010000
373
c07686556109 Added ifeq statements at top to allow for multiple use's of same def
boisy
parents: 0
diff changeset
198 endc
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
199