Mercurial > hg > Members > kono > nitros9-code

annotate level1/cmds/tmode.asm @ 937:9f5945771770

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rewritten in assembler for size -- thanks Bob
author boisy
date Tue, 21 Jan 2003 04:31:22 +0000
parents c155aac72190
children bb618bed0bdc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
1 ********************************************************************
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
2 * Tmode - Change terminal parameters
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
3 *
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
4 * $Id$
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
5 *
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
6 * Ed. Comments Who YY/MM/DD
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
7 * ------------------------------------------------------------------
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
8 * 12 From Tandy OS-9 Level Two VR 02.00.01
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
9
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
10 nam Tmode
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
11 ttl Change terminal parameters
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
13 * Disassembled 98/09/11 18:35:13 by Disasm v1.6 (C) 1988 by RML
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15 ifp1
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
16 use defsfile
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 endc
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
18
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 tylg set Prgrm+Objct
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20 atrv set ReEnt+rev
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21 rev set $01
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
22 edition set 12
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
23
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
24 mod eom,name,tylg,atrv,start,size
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
25
924
c155aac72190 Made cosmetic changes
boisy
parents: 200
diff changeset
26 org 0
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27 u0000 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
28 u0001 rmb 1
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
29 u0002 rmb 1
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
30 u0003 rmb 2
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
31 u0005 rmb 1
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
32 u0006 rmb 1
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
33 u0007 rmb 32
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
34 u0027 rmb 10
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
35 u0031 rmb 526
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
36 size equ .
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
37
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
38 name fcs /Tmode/
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
39 fcb edition
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
40
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
41 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
42 fcb $17
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
43 L0015 fcb $FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
44 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
45 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
46 fcb $01
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
47 fcs "upc"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
48 fcb $FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
49 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
50 fcb $02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
51 fcb $01
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
52 fcs "bsb"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
53 fcb $FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
54 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
55 fcb $03
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
56 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
57 fcs "bsl"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
58 fcb $FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
59 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
60 fcb $04
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
61 fcb $01
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
62 fcs "echo"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
63 fcb $FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
64 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
65 fcb $05
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
66 fcb $01
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
67 fcs "lf"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
68 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
69 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
70 fcb $06
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
71 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
72 fcs "null"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
73 fcb $FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
74 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
75 fcb $07
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
76 fcb $01
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
77 fcs "pause"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
78 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
79 fcb $18
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
80 fcb $08
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
81 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
82 fcs "pag"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
83 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
84 fcb $08
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
85 fcb $09
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
86 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
87 fcs "bsp"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
88 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
89 fcb $18
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
90 fcb $0A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
91 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
92 fcs "del"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
93 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
94 fcb $0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
95 fcb $0B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
96 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
97 fcs "eor"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
98 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
99 fcb $1B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
100 fcb $0C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
101 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
102 fcs "eof"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
103 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
104 fcb $04
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
105 fcb $0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
106 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
107 fcs "reprint"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
108 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
109 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
110 fcb $0E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
111 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
112 fcs "dup"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
113 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
114 fcb $17
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
115 fcb $0F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
116 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
117 fcs "psc"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
118 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
119 fcb $03
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
120 fcb $10
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
121 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
122 fcs "abort"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
123 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
124 fcb $05
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
125 fcb $11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
126 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
127 fcs "quit"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
128 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
129 fcb $08
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
130 fcb $12
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
131 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
132 fcs "bse"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
133 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
134 fcb $07
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
135 fcb $13
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
136 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
137 fcs "bell"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
138 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
139 fcb $15
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
140 fcb $14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
141 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
142 fcs "type"
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
143 fcb $01
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
144 fcb $02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
145 fcb $15
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
146 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
147 fcs "baud"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
148 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
149 fcb $11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
150 fcb $18
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
151 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
152 fcs "xon"
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
153 fcb $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
154 fcb $13
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
155 fcb $19
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
156 fcb $00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
157 fcs "xoff"
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
158
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
159 start lda #$32
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
160 sta <u0002
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
161 pshs y,x,b,a
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
162 lda #$01
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
163 ldb #SS.ScSiz
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
164 os9 I$GetStt
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
165 bcc L00DB
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
166 cmpb #E$UnkSvc
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
167 beq L00E4
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
168 puls y,x,b,a
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
169 bra L0120
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
170 L00DB cmpx #55
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
171 bge L00E4
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
172 lda #$16
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
173 sta <u0002
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
174 L00E4 puls y,x,b,a
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
175 leay ,x
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
176 bsr L0123
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
177 clra
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
178 cmpb #C$PERD
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
179 bne L00FB
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
180 leay 1,y
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
181 lda ,y+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
182 suba #$30
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
183 cmpa #$10
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
184 lbcc L0181
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
185 L00FB sta <u0000
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
186 ldb #SS.Opt
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
187 leax u0007,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
188 os9 I$GetStt
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
189 bcs L0120
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
190 bsr L0123
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
191 cmpb #C$CR
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
192 lbeq L01F0
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
193 L010E bsr L0134
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
194 bcs L0181
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
195 cmpb #C$CR
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
196 bne L010E
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
197 lda <u0000
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
198 ldb #SS.Opt
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
199 os9 I$SetStt
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
200 bcs L0120
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
201 clrb
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
202 L0120 os9 F$Exit
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
203 L0123 ldb ,y+
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
204 cmpb #C$COMA
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
205 bne L012B
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
206 L0129 ldb ,y+
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
207 L012B cmpb #C$SPAC
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
208 beq L0129
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
209 leay -$01,y
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 190
diff changeset
210 andcc #^Carry
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
211 rts
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
212 L0134 clr <u0001
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
213 lda ,y
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
214 cmpa #'-
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
215 bne L0140
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
216 inc <u0001
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
217 leay $01,y
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
218 L0140 sty <u0003
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
219 leax >L0015,pcr
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
220 lbsr L02D1
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
221 bcs L0181
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
222 lda ,x
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
223 bpl L015C
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
224 L0150 ldb $01,x
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
225 L0152 lda $02,x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
226 eorb <u0001
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
227 leax u0007,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
228 stb a,x
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
229 bra L0123
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
230 L015C tst <u0001
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
231 bne L0181
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
232 ldb ,y
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
233 cmpb #'=
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
234 bne L0150
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
235 leay $01,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
236 tsta
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
237 bne L01AA
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
238 clrb
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
239 L016C lda ,y
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
240 suba #$30
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
241 cmpa #$09
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
242 bhi L01C1
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
243 pshs a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
244 leay $01,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
245 lda #$0A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
246 mul
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
247 addb ,s+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
248 adca #$00
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
249 beq L016C
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
250 L0181 leax <L0192,pcr
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
251 ldy #$000E
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
252 bsr L01A4
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
253 ldx <u0003
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
254 bsr L01A0
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
255 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
256 os9 F$Exit
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
257
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
258 L0192 fcc "SYNTAX Error: "
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
259
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
260 L01A0 ldy #80
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
261 L01A4 lda #$01
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
262 os9 I$WritLn
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
263 rts
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
264 L01AA bsr L01D1
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
265 bcs L0181
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
266 pshs b
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
267 bsr L01D1
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
268 puls a
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
269 bcc L01B9
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
270 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
271 exg a,b
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
272 L01B9 lsla
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
273 lsla
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
274 lsla
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
275 lsla
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
276 pshs a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
277 addb ,s+
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
278 L01C1 lda ,y
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
279 cmpa #C$SPAC
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
280 beq L0152
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
281 cmpa #C$CR
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
282 beq L0152
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
283 cmpa #C$COMA
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
284 beq L0152
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
285 bra L0181
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
286 L01D1 ldb ,y
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
287 subb #$30
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
288 cmpb #$09
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
289 bls L01E9
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
290 cmpb #$31
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
291 bcs L01DF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
292 subb #$20
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
293 L01DF subb #$07
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
294 cmpb #$0F
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
295 bhi L01EE
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
296 cmpb #$0A
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
297 bcs L01EE
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
298 L01E9 andcc #^Carry
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
299 leay $01,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
300 rts
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
301 L01EE comb
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
302 rts
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
303 L01F0 clr <u0005
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
304 lda #'/
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
305 lbsr L02AF
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
306 leax <u0031,u
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
307 lda <u0000
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
308 ldb #SS.DevNm
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
309 os9 I$GetStt
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
310 bsr L024A
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
311 lda #C$CR
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
312 lbsr L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
313 leax >L0015,pcr
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
314 leay u0007,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
315 clrb
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
316 L020F lda b,y
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
317 bsr L0221
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
318 incb
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
319 cmpb #C$SPAC
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
320 bcs L020F
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
321 lda #C$CR
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
322 lbsr L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
323 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
324 os9 F$Exit
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
325 L0221 pshs u,y,x,b,a
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
326 ldy -$02,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
327 L0226 cmpb $02,x
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
328 beq L0236
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
329 leax $04,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
330 L022C lda ,x+
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
331 bpl L022C
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
332 leay -$01,y
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
333 bne L0226
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
334 puls pc,u,y,x,b,a
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
335 L0236 bsr L02AD
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
336 tst ,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
337 bpl L025E
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
338 lda ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
339 cmpa $03,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
340 beq L0246
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
341 lda #'-
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
342 bsr L02AF
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
343 L0246 bsr L024E
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
344 puls pc,u,y,x,b,a
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
345 L024A pshs x
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
346 bra L0252
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
347 L024E pshs x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
348 leax $04,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
349 L0252 lda ,x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
350 anda #$7F
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
351 bsr L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
352 lda ,x+
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
353 bpl L0252
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
354 puls pc,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
355 L025E bsr L024E
111
592143a102ee Added more labels
boisy
parents: 110
diff changeset
356 lda #'=
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
357 bsr L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
358 tst ,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
359 bne L0291
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
360 ldb ,s
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
361 lda #'/
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
362 clr <u0006
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
363 L026E inca
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
364 subb #$64
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
365 bcc L026E
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
366 bsr L0286
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
367 lda #$3A
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
368 L0277 deca
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
369 addb #$0A
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
370 bcc L0277
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
371 bsr L0286
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
372 tfr b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
373 adda #$30
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
374 bsr L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
375 puls pc,u,y,x,b,a
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
376 L0286 inc <u0006
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
377 cmpa #$30
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
378 bne L02AF
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
379 dec <u0006
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
380 bne L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
381 rts
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
382 L0291 lda ,s
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
383 anda #$F0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
384 lsra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
385 lsra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
386 lsra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
387 lsra
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
388 bsr L02A3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
389 lda ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
390 anda #$0F
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
391 bsr L02A3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
392 puls pc,u,y,x,b,a
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
393 L02A3 adda #$30
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
394 cmpa #$39
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
395 bls L02AF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
396 adda #$07
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
397 bra L02AF
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
398 L02AD lda #C$SPAC
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
399 L02AF pshs y,x,b,a
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
400 leax <u0027,u
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
401 ldb <u0005
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
402 sta b,x
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
403 cmpa #C$CR
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
404 beq L02C9
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
405 incb
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
406 cmpb <u0002
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
407 bcs L02CD
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
408 cmpa #C$SPAC
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
409 bne L02CD
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
410 lda #C$CR
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
411 sta b,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
412 L02C9 lbsr L01A0
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
413 clrb
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
414 L02CD stb <u0005
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
415 puls pc,y,x,b,a
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
416 L02D1 pshs u,y,x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
417 ldu -$02,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
418 L02D5 ldy $02,s
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
419 stx ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
420 leax $04,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
421 L02DC lda ,x+
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
422 eora ,y+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
423 anda #$DF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
424 lsla
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
425 bne L02ED
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
426 bcc L02DC
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
427 sty $02,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
428 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
429 puls pc,u,y,x
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
430 L02ED leax -$01,x
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
431 L02EF lda ,x+
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
432 bpl L02EF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
433 leau -u0001,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
434 cmpu #$0000
190
d54ad501558d Migrated over OS_9 Level Two version
boisy
parents: 111
diff changeset
435 bne L02D5
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
436 coma
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
437 puls pc,u,y,x
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
438
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
439 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
440 eom equ *
110
4e2459c8bf98 Updated sources to edition 11, original Tandy version
boisy
parents: 109
diff changeset
441 end