Mercurial > hg > Members > kono > nitros9-code
annotate defs/scf.d @ 1919:028161cd3535
uses ss.fd
author | boisy |
---|---|
date | Fri, 25 Nov 2005 12:39:54 +0000 |
parents | 9d95e3246a61 |
children |
rev | line source |
---|---|
1629 | 1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1760
27e85b681dab
Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents:
1630
diff
changeset
|
2 ; scf - Sequential File Manager Definitions |
1629 | 3 ; |
4 ; $Id$ | |
5 ; | |
1760
27e85b681dab
Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents:
1630
diff
changeset
|
6 ; SCF stands for 'Sequential Character Filemanager' and is a package of |
27e85b681dab
Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents:
1630
diff
changeset
|
7 ; subroutines that define the logical structure of a serial device. |
1629 | 8 ; |
9 ; The data structures in this file give SCF its 'personality' and are used | |
10 ; by SCF itself, as well as applications that will require disk I/O. | |
11 ; | |
12 ; Edt/Rev YYYY/MM/DD Modified by | |
13 ; Comment | |
14 ; ------------------------------------------------------------------ | |
15 ; 2004/07/02 Boisy G. Pitre | |
1760
27e85b681dab
Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents:
1630
diff
changeset
|
16 ; Created |
1629 | 17 |
1630
7af4d12008f4
Updated ChangeLogs with slight formatting differences
boisy
parents:
1629
diff
changeset
|
18 .title Sequential File Manager Definitions |
7af4d12008f4
Updated ChangeLogs with slight formatting differences
boisy
parents:
1629
diff
changeset
|
19 |
7af4d12008f4
Updated ChangeLogs with slight formatting differences
boisy
parents:
1629
diff
changeset
|
20 .area SCF (ABS) |
1629 | 21 |
1630
7af4d12008f4
Updated ChangeLogs with slight formatting differences
boisy
parents:
1629
diff
changeset
|
22 .ifndef Level |
7af4d12008f4
Updated ChangeLogs with slight formatting differences
boisy
parents:
1629
diff
changeset
|
23 Level == 1 |
7af4d12008f4
Updated ChangeLogs with slight formatting differences
boisy
parents:
1629
diff
changeset
|
24 .endif |
1629 | 25 |
26 .page | |
27 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
28 ; SCF Device Descriptor Offsets | |
29 ; | |
30 ; These definitions are for SCF device descriptors. | |
31 | |
1785 | 32 IT.DVC == 0h18 ; Device type (DT.SCF) |
33 IT.UPC == 0h19 ; Uppercase flag | |
34 IT.BSO == 0h1A ; Backspace behavior | |
35 IT.DLO == 0h1B ; Delete behavior | |
36 IT.EKO == 0h1C ; Echo flag | |
37 IT.ALF == 0h1D ; Auto linefeed flag | |
38 IT.NUL == 0h1E ; End-of-line null count | |
39 IT.PAU == 0h1F ; Page pause flag | |
40 IT.PAG == 0h20 ; Number of lines per page | |
41 IT.BSP == 0h21 ; Backspace character | |
42 IT.DEL == 0h22 ; Delete-line character | |
43 IT.EOR == 0h23 ; End-of-record character | |
44 IT.EOF == 0h24 ; End-of-file character | |
45 IT.RPR == 0h25 ; Reprint-line character | |
46 IT.DUP == 0h26 ; Duplicate-last-line character | |
47 IT.PSC == 0h27 ; Pause character | |
48 IT.INT == 0h28 ; Interrupt character | |
49 IT.QUT == 0h29 ; Quit character | |
50 IT.BSE == 0h2A ; Backspace echo character | |
51 IT.OVF == 0h2B ; Bell character | |
52 IT.PAR == 0h2C ; Parity | |
53 IT.BAU == 0h2D ; Baud rate | |
54 IT.D2P == 0h2E ; Attached device name string offset | |
55 IT.XON == 0h30 ; X-ON character | |
56 IT.XOFF == 0h31 ; X-OFF character | |
57 IT.COL == 0h32 ; Number of columns for display | |
58 IT.ROW == 0h33 ; Number of rows for display | |
59 IT.XTYP == 0h34 ; Extended type (added by BRI) | |
1629 | 60 |
61 .ifgt Level-1 | |
62 ; Window Descriptor Additions | |
63 ; For CoCo window, where IT.PAR = $80 | |
1785 | 64 IT.WND == 0h33 ; Window number (matches device name) ($2E) |
65 IT.VAL == 0h34 ; Use defaults on Init (0=no, 1=yes) | |
66 IT.STY == 0h35 ; Screen type default | |
67 IT.CPX == 0h36 ; Column start default | |
68 IT.CPY == 0h37 ; Row start default | |
69 IT.FGC == 0h38 ; Foreground color default | |
70 IT.BGC == 0h39 ; Background color default | |
71 IT.BDC == 0h3A ; Border color default | |
1629 | 72 .endif |
73 | |
74 | |
75 .page | |
76 ;;;;;;;;;;;;;;;;;;;; | |
77 ; SCF Static Storage | |
78 ; | |
79 ; SCF devices must reserve this space for SCF | |
80 ; | |
1785 | 81 V.TYPE == 0h06 ; Device type or parity |
82 V.LINE == 0h07 ; Lines left until end of page | |
83 V.PAUS == 0h08 ; Immediate Pause request | |
84 V.DEV2 == 0h09 ; Attached device's static | |
85 V.INTR == 0h0B ; Interrupt char | |
86 V.QUIT == 0h0C ; Quit char | |
87 V.PCHR == 0h0D ; Pause char | |
88 V.ERR == 0h0E ; Accumulated errors | |
89 V.XON == 0h0F ; X-On char | |
90 V.XOFF == 0h10 ; X-Off char | |
91 V.KANJI == 0h11 ; Kanji mode flag | |
92 V.KBUF == 0h12 ; Kana - Kanji convert routine work address | |
93 V.MODADR == 0h14 ; Kana - Kanji convert module address | |
94 V.PDLHd == 0h16 ; Open path descriptor list head pointer | |
95 V.RSV == 0h18 ; Reserve bytes for future expansion | |
96 V.SCF == 0h1D ; Total SCF manager static overhead | |
1629 | 97 |
98 .page | |
99 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
100 ; Sequential Character Path Descriptor Format | |
101 ; | |
102 ; A path descriptor is created for every new path that is open | |
103 ; via the I$Open system call (processed by IOMan). Process | |
104 ; descriptors track state information of a path. | |
105 ; | |
1785 | 106 PD.DV2 rmb 0h32 ; Output device table pointer |
107 PD.RAW rmb 0h34 ; Read/Write or ReadLn/WritLn mode | |
108 PD.MAX rmb 0h35 ; ReadLn high byte count | |
109 PD.MIN rmb 0h37 ; Devices are "mine" if clear | |
110 PD.STS rmb 0h38 ; Status routine module addr | |
111 PD.STM rmb 0h3A ; Reserved for status routine | |
1629 | 112 .org PD.OPT |
113 .rmb 1 ; Device type | |
1785 | 114 PD.UPC == 1 ; Case (0=both, 1=upper only) |
115 PD.BSO == 1 ; Backspace (0=BSE, 1=BSE,SP,BSE) | |
116 PD.DLO == 1 ; Delete (0=BSE over line, 1=CRLF) | |
117 PD.EKO == 1 ; Echo (0=No Echo) | |
118 PD.ALF == 1 ; Auto linefeed (0=No auto LF) | |
119 PD.NUL == 1 ; End of Line null count | |
120 PD.PAU == 1 ; Page pause (0=No end of page pause) | |
121 PD.PAG == 1 ; Lines per page | |
122 PD.BSP == 1 ; Backspace character | |
123 PD.DEL == 1 ; Delete Line character | |
124 PD.EOR == 1 ; End of Record character (read only) | |
125 PD.EOF == 1 ; End of File character | |
126 PD.RPR == 1 ; Reprint Line character | |
127 PD.DUP == 1 ; Dup Last Line character | |
128 PD.PSC == 1 ; Pause character | |
129 PD.INT == 1 ; Keyboard interrupt character (CTRL-C) | |
130 PD.QUT == 1 ; Keyboard quit character (CTRL-E) | |
131 PD.BSE == 1 ; Backspace echo character | |
132 PD.OVF == 1 ; Line overflow character (BELL) | |
133 PD.PAR == 1 ; Parity code | |
134 PD.BAU == 1 ; ACIA baud rate (Color Computer) | |
135 PD.D2P == 2 ; Offset of DEV2 name | |
136 PD.XON == 1 ; ACIA X-ON character | |
137 PD.XOFF == 1 ; ACIA X-OFF character | |
1629 | 138 OPTCNT == .-PD.OPT ; Total user settable options |
1785 | 139 PD.ERR .rmb 1 ; Most recent I/O error status |
140 PD.TBL .rmb 2 ; Device table addr (copy) | |
141 PD.PLP .rmb 2 ; Path Descriptor List Pointer | |
142 PD.PST .rmb 1 ; Current path status | |
1629 | 143 |
144 | |
145 ; PD.PST values Path Descriptor Status byte | |
146 ; | |
147 PST.DCD == 0b00000001 ; Set if DCD is lost on Serial port | |
148 | |
149 | |
150 ; PD.PAR definitions | |
151 ; | |
152 ; Parity | |
153 PARNONE == 0b00000000 | |
154 PARODD == 0b00100000 | |
155 PAREVEN == 0b01100000 | |
156 PARMARK == 0b10100000 | |
157 PARSPACE == 0b11100000 | |
158 | |
159 ; PD.BAU definitions | |
160 ; | |
161 ; Baud rate | |
162 B110 == 0b00000000 | |
163 B300 == 0b00000001 | |
164 B600 == 0b00000010 | |
165 B1200 == 0b00000011 | |
166 B2400 == 0b00000100 | |
167 B4800 == 0b00000101 | |
168 B9600 == 0b00000110 | |
169 B19200 == 0b00000111 | |
170 B38400 == 0b00001000 | |
171 B57600 == 0b00001001 | |
172 B115200 == 0b00001010 | |
173 ; Word size | |
174 WORD8 == 0b00000000 | |
175 WORD7 == 0b00100000 | |
176 ; Stop bits | |
177 STOP1 == 0b00000000 | |
178 STOP2 == 0b00010000 |