Mercurial > hg > Members > kono > os9 > sbc09

comparison game09/game09.asm @ 69:b6aabbe1a027

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 05 Aug 2018 15:15:12 +0900
parents ec9ef70bf6e4
children a200fa7d5b70
comparison
equal deleted inserted replaced
68:ec9ef70bf6e4 69:b6aabbe1a027
1 *
2 * GAME09 interpreter
3 *
4
5
6 L3D09 equ $3D09
7 L758E equ $758E
8 LA602 equ $A602
9
10 LC1FA equ $C1FA
11 LC1FE equ $C1FE
12 LC889 equ $C889
13 LC891 equ $C891
14 LC893 equ $C893
15 LC895 equ $C895
16 LC8AF equ $C8AF
17 LC8B1 equ $C8B1
18 LC8DA equ $C8DA
19 LC8FE equ $C8FE
20 LC912 equ $C912
21 LC93A equ $C93A
22 LC962 equ $C962
23 LC983 equ $C983
24 LC9F2 equ $C9F2
25 LCAE5 equ $CAE5
26 LCAF8 equ $CAF8
27 LCD00 equ $CD00
28 LCD01 equ $CD01
29 LCD09 equ $CD09
30 LCD0C equ $CD0C
31 LCD14 equ $CD14
32
33 LC814 equ $C814
34 LC813 equ $C813
35
36
37 LD7FC equ $D7FC
38 LD7FD equ $D7FD
39 LD7FE equ $D7FE
40 LD7FF equ $D7FF
41 LDF80 equ $DF80
42 LDF82 equ $DF82
43
44 LE000 equ $E000
45 LEFFF equ $EFFF
46 LFB04 equ $FB04
47 LFB8F equ $FB8F
48 LFB94 equ $FB94
49 LFB95 equ $FB95
50 LFB9A equ $FB9A
51 LFB9B equ $FB9B
52 LFBDF equ $FBDF
53 LFC8D equ $FC8D
54 LFD80 equ $FD80
55 LFE00 equ $FE00
56 LFF00 equ $FF00
57 LFF38 equ $FF38
58 LFF3A equ $FF3A
59 LFF3C equ $FF3C
60 LFF40 equ $FF40
61 LFF48 equ $FF48
62 LFF49 equ $FF49
63 LFF4A equ $FF4A
64 LFF4B equ $FF4B
65 LFFFF equ $FFFF
66
67
1 LC000 BRA LC005 68 LC000 BRA LC005
2 LC002 NOP 69 LC002 NOP
3 LC003 BRA LC014 70 LC003 BRA LC014
4 LC005 LDA #$FB 71 LC005 LDA #$FB
5 TFR A,DP 72 TFR A,DP
6 LDX #LE000 73 LDX #LE000
7 STX <$7E 74 STX <$7E
8 STX <$50 75 STX <$50
9 LDA #$FF 76 LDA #$FF
10 STA ,X 77 STA ,X
11 LC014 LBSR LCD00 78 LC014 LBSR LCD00
12 LDA #$FB 79 LDA #$FB
13 TFR A,DP 80 TFR A,DP
14 LDX #LEFFF 81 LDX #LEFFF
15 STX <$58 82 STX <$58
16 LC020 LDA #$FF 83 LC020 LDA #$FF
17 STA <$8C 84 STA <$8C
18 LC024 LDS #LFE00 85 LC024 LDS #LFE00
19 LDU #LFD80 86 LDU #LFD80
20 LEAX >LC63F,PCR 87 LEAX >LC63F,PCR
21 LBSR LC165 88 LBSR LC165
22 LC032 LBSR LC370 89 LC032 LBSR LC370
23 BCS LC06D 90 BCS LC06D
24 STX <$42 91 STX <$42
25 LBSR LC1D3 92 LBSR LC1D3
26 BEQ LC024 93 BEQ LC024
27 LC03E BSR LC09C 94 LC03E BSR LC09C
28 LC040 BMI LC024 95 LC040 BMI LC024
29 STX <$42 96 STX <$42
30 LC044 LEAX +$02,X 97 LC044 LEAX +$02,X
31 LDA ,X+ 98 LDA ,X+
32 CMPA #$20 99 CMPA #$20
33 BNE LC05B 100 BNE LC05B
34 LBSR LC1D3 101 LBSR LC1D3
35 BNE LC05F 102 BNE LC05F
36 LEAX +$01,X 103 LEAX +$01,X
37 TST ,X 104 TST ,X
38 BRA LC040 105 BRA LC040
39 LC057 LDS #LFE00 106 LC057 LDS #LFE00
40 LC05B BSR LC0A8 107 LC05B BSR LC0A8
41 BRA LC040 108 BRA LC040
42 LC05F LDX <$42 109 LC05F LDX <$42
43 STX <$84 110 STX <$84
44 BSR LC0A0 111 BSR LC0A0
45 BMI LC024 112 BMI LC024
46 CMPX <$84 113 CMPX <$84
47 BEQ LC03E 114 BEQ LC03E
48 BRA LC044 115 BRA LC044
49 LC06D STX <$86 116 LC06D STX <$86
50 STD <$4A 117 STD <$4A
51 LDB ,X 118 LDB ,X
52 CMPB #$2F 119 CMPB #$2F
53 BNE LC0B1 120 BNE LC0B1
54 LC077 BSR LC09C 121 LC077 BSR LC09C
55 LC079 LBSR LC397 122 LC079 LBSR LC397
56 TST ,X 123 TST ,X
57 BMI LC024 124 BMI LC024
58 BSR LC087 125 BSR LC087
59 LBSR LC173 126 LBSR LC173
60 BRA LC079 127 BRA LC079
61 LC087 LDD ,X++ 128 LC087 LDD ,X++
62 PSHS X 129 PSHS X
63 LBSR LC443 130 LBSR LC443
64 PULS X 131 PULS X
65 LBRA LC165 132 LBRA LC165
66 LC093 LDX <$42 133 LC093 LDX <$42
67 LEAX +$02,X 134 LEAX +$02,X
68 LC097 TST ,X+ 135 LC097 TST ,X+
69 BNE LC097 136 BNE LC097
70 RTS 137 RTS
71 LC09C LDX <$7E 138 LC09C LDX <$7E
72 LC09E STX <$42 139 LC09E STX <$42
73 LC0A0 LDD ,X 140 LC0A0 LDD ,X
74 BMI LC0B0 141 BMI LC0B0
75 SUBD <$4A 142 SUBD <$4A
76 BCC LC0AF 143 BCC LC0AF
77 LC0A8 LBSR LC173 144 LC0A8 LBSR LC173
78 BSR LC093 145 BSR LC093
79 BRA LC09E 146 BRA LC09E
80 LC0AF CLRA 147 LC0AF CLRA
81 LC0B0 RTS 148 LC0B0 RTS
82 LC0B1 LDX <$4A 149 LC0B1 LDX <$4A
83 BEQ LC077 150 BEQ LC077
84 BMI LC117 151 BMI LC117
85 LDX <$50 152 LDX <$50
86 LDA ,X 153 LDA ,X
87 INCA 154 INCA
88 BNE LC117 155 BNE LC117
89 BSR LC09C 156 BSR LC09C
90 BMI LC0DE 157 BMI LC0DE
91 LDX ,X 158 LDX ,X
92 CMPX <$4A 159 CMPX <$4A
93 BNE LC0DE 160 BNE LC0DE
94 BSR LC093 161 BSR LC093
95 LDY <$42 162 LDY <$42
96 LC0CD LDA ,X 163 LC0CD LDA ,X
97 STA ,Y 164 STA ,Y
98 CMPX <$50 165 CMPX <$50
99 BEQ LC0DB 166 BEQ LC0DB
100 LEAX +$01,X 167 LEAX +$01,X
101 LEAY +$01,Y 168 LEAY +$01,Y
102 BRA LC0CD 169 BRA LC0CD
103 LC0DB STY <$50 170 LC0DB STY <$50
104 LC0DE LDX <$86 171 LC0DE LDX <$86
105 LDB #$03 172 LDB #$03
106 TST ,X+ 173 TST ,X+
107 BEQ LC114 174 BEQ LC114
108 LC0E6 INCB 175 LC0E6 INCB
109 TST ,X+ 176 TST ,X+
110 BNE LC0E6 177 BNE LC0E6
111 CLRA 178 CLRA
112 ADDD <$50 179 ADDD <$50
113 TFR D,Y 180 TFR D,Y
114 SUBD <$58 181 SUBD <$58
115 BCC LC117 182 BCC LC117
116 LDX <$50 183 LDX <$50
117 STY <$50 184 STY <$50
118 LEAX +$01,X 185 LEAX +$01,X
119 LEAY +$01,Y 186 LEAY +$01,Y
120 LC0FD LDB ,-X 187 LC0FD LDB ,-X
121 STB ,-Y 188 STB ,-Y
122 CMPX <$42 189 CMPX <$42
123 BNE LC0FD 190 BNE LC0FD
124 LDY <$4A 191 LDY <$4A
125 STY ,X++ 192 STY ,X++
126 LDY <$86 193 LDY <$86
127 LC10E LDB ,Y+ 194 LC10E LDB ,Y+
128 STB ,X+ 195 STB ,X+
129 BNE LC10E 196 BNE LC10E
130 LC114 LBRA LC032 197 LC114 LBRA LC032
131 LC117 LBRA LC024 198 LC117 LBRA LC024
132 LC11A LDX #LFB8F 199 LC11A LDX #LFB8F
133 TST <$8C 200 TST <$8C
134 BNE LC124 201 BNE LC124
135 LDX #LFB95 202 LDX #LFB95
136 LC124 LEAY <LC159,PCR 203 LC124 LEAY <LC159,PCR
137 LC127 PSHS X 204 LC127 PSHS X
138 LDX ,Y++ 205 LDX ,Y++
139 PSHU X 206 PSHU X
140 LBSR LC335 207 LBSR LC335
141 PULU X 208 PULU X
142 PULS X 209 PULS X
143 PSHS A 210 PSHS A
144 LDA <$83 211 LDA <$83
145 ADDA #$30 212 ADDA #$30
146 STA ,X+ 213 STA ,X+
147 PULS A 214 PULS A
148 TST +$01,Y 215 TST +$01,Y
149 BNE LC127 216 BNE LC127
150 CLR ,X 217 CLR ,X
151 COM ,-X 218 COM ,-X
152 PSHS X 219 PSHS X
153 LEAX -$05,X 220 LEAX -$05,X
154 CLRA 221 CLRA
155 LC14B LEAX +$01,X 222 LC14B LEAX +$01,X
156 INCA 223 INCA
157 LDB ,X 224 LDB ,X
158 CMPB #$30 225 CMPB #$30
159 BEQ LC14B 226 BEQ LC14B
160 COM [,S++] 227 COM [,S++]
161 SUBA #$06 228 SUBA #$06
162 LC158 RTS 229 LC158 RTS
163 LC159 BEQ LC16B 230 LC159 FDB 10000
164 COM <$E8 231 FDB 1000
165 NEG <$64 232 FDB 100
166 NEG <$0A 233 FDB 10
167 NEG <$01 234 FDB 1
168 NEG <$00 235 FDB 0
169 LC165 CLRA 236 LC165 CLRA
170 LC166 STA <$94 237 LC166 STA <$94
171 LC168 LDB ,X+ 238 LC168 LDB ,X+
172 CMPB <$94 239 CMPB <$94
173 BEQ LC158 240 BEQ LC158
174 LBSR LC412 241 LBSR LC412
175 BRA LC168 242 BRA LC168
176 LC173 LBSR LC650 243 LC173 LBSR LC650
177 LBCS LC024 244 LBCS LC024
178 RTS 245 RTS
179 LC17B CMPA #$20 246 LC17B CMPA #$20
180 BEQ LC1D1 247 BEQ LC1D1
181 CLR <$4A 248 CLR <$4A
182 CLR <$4B 249 CLR <$4B
183 LDB +$01,X 250 LDB +$01,X
184 BITB #$DF 251 BITB #$DF
185 BNE LC1A6 252 BNE LC1A6
186 CMPA #$5D 253 CMPA #$5D
187 BNE LC195 254 BNE LC195
188 PULU X,B,A 255 PULU X,B,A
189 STD <$46 256 STD <$46
190 STX <$42 257 STX <$42
191 BRA LC1C6 258 BRA LC1C6
192 LC195 CMPA #$40 259 LC195 CMPA #$40
193 BNE LC1A6 260 BNE LC1A6
194 LEAX +$01,X 261 LEAX +$01,X
195 STX <$46 262 STX <$46
196 CLRA 263 CLRA
197 CLRB 264 CLRB
198 LDY <$42 265 LDY <$42
199 PSHU Y,X,B,A 266 PSHU Y,X,B,A
200 BRA LC1D3 267 BRA LC1D3
201 LC1A6 CMPA #$22 268 LC1A6 CMPA #$22
202 BNE LC1CA 269 BNE LC1CA
203 LEAX +$01,X 270 LEAX +$01,X
204 BSR LC166 271 BSR LC166
205 BRA LC1D3 272 BRA LC1D3
206 LC1B0 CMPA #$5C 273 LC1B0 CMPA #$5C
207 BNE LC1B9 274 BNE LC1B9
208 LBSR LC676 275 LBSR LC676
209 BRA LC1D3 276 BRA LC1D3
210 LC1B9 STX <$84 277 LC1B9 STX <$84
211 BSR LC1EC 278 BSR LC1EC
212 LBSR LC39F 279 LBSR LC39F
213 BSR LC173 280 BSR LC173
214 LDX <$4A 281 LDX <$4A
215 BNE LC1D7 282 BNE LC1D7
216 LC1C6 LDX <$46 283 LC1C6 LDX <$46
217 BRA LC1D3 284 BRA LC1D3
218 LC1CA CMPA #$2F 285 LC1CA CMPA #$2F
219 BNE LC1B0 286 BNE LC1B0
220 LBSR LC397 287 LBSR LC397
221 LC1D1 LEAX +$01,X 288 LC1D1 LEAX +$01,X
222 LC1D3 LDA ,X 289 LC1D3 LDA ,X
223 BNE LC17B 290 BNE LC17B
224 LC1D7 RTS 291 LC1D7 RTS
225 LC1D8 PSHS A 292 LC1D8 PSHS A
226 LEAX +$01,X 293 LEAX +$01,X
227 BSR LC1F6 294 BSR LC1F6
228 LDX <$46 295 LDX <$46
229 LC1E0 LDY <$42 296 LC1E0 LDY <$42
230 PSHU Y,X,B,A 297 PSHU Y,X,B,A
231 PULS PC,B,A 298 PULS PC,B,A
232 LC1E7 LDA #$3D 299 LC1E7 LDA #$3D
233 LBRA LC4F9 300 LBRA LC4F9
234 LC1EC LDA ,X+ 301 LC1EC LDA ,X+
235 BITA #$DF 302 BITA #$DF
236 BEQ LC1E7 303 BEQ LC1E7
237 CMPA #$3D 304 CMPA #$3D
238 BNE LC1EC 305 BNE LC1EC
239 LC1F6 LBSR LC521 306 LC1F6 LBSR LC521
240 LC1F9 PSHS B 307 LC1F9 PSHS B
241 LDB ,X 308 LDB ,X
242 BITB #$DF 309 BITB #$DF
243 BEQ LC210 310 BEQ LC210
244 CMPB #$29 311 CMPB #$29
245 BEQ LC214 312 BEQ LC214
246 CMPB #$2C 313 CMPB #$2C
247 BEQ LC1D8 314 BEQ LC1D8
248 PULS B 315 PULS B
249 LBSR LC29C 316 LBSR LC29C
250 BRA LC1F9 317 BRA LC1F9
251 LC210 STX <$46 318 LC210 STX <$46
252 PULS PC,B 319 PULS PC,B
253 LC214 LEAX +$01,X 320 LC214 LEAX +$01,X
254 PULS PC,B 321 PULS PC,B
255 LC218 CMPB #$3F 322 LC218 CMPB #$3F
256 BNE LC22E 323 BNE LC22E
257 PSHS X 324 PSHS X
258 STB <$8C 325 STB <$8C
259 LBSR LC5D8 326 LBSR LC5D8
260 BSR LC1F6 327 BSR LC1F6
261 PULS X 328 PULS X
262 LEAX +$01,X 329 LEAX +$01,X
263 RTS 330 RTS
264 LEAX +$01,X 331 LEAX +$01,X
265 BRA LC1F6 332 BRA LC1F6
266 LC22E BSR LC287 333 LC22E BSR LC287
267 CMPA #$3A 334 CMPA #$3A
268 BEQ LC239 335 BEQ LC239
269 BSR LC26E 336 BSR LC26E
270 LC236 LDD ,Y 337 LC236 LDD ,Y
271 RTS 338 RTS
272 LC239 BSR LC269 339 LC239 BSR LC269
273 CLRA 340 CLRA
274 LC23C LDB ,Y 341 LC23C LDB ,Y
275 LC23E RTS 342 LC23E RTS
276 LC23F CMPB #$22 343 LC23F CMPB #$22
277 BCS LC218 344 BCS LC218
278 CMPB #$2D 345 CMPB #$2D
279 BHI LC218 346 BHI LC218
280 SUBB #$22 347 SUBB #$22
281 LSLB 348 LSLB
282 LEAY <LC251,PCR 349 LEAY <LC251,PCR
283 LDD B,Y 350 LDD B,Y
284 JMP D,Y 351 JMP D,Y
285 352
286 LC251 fdb LC6EC-* 049b 353 LC251 fdb LC6EC-* 049b
287 fdb LC535-* 02e2 354 fdb LC535-* 02e2
288 fdb LC5A1-* 034c 355 fdb LC5A1-* 034c
289 fdb LC545-* 02ee 356 fdb LC545-* 02ee
290 fdb LC236-* ffdd 357 fdb LC236-* ffdd
291 fdb LC54E-* 02f3 358 fdb LC54E-* 02f3
292 fdb LC236-* ffd9 359 fdb LC236-* ffd9
293 fdb LC23C-* ffdd 360 fdb LC23C-* ffdd
294 fdb LC23E-* ffdd 361 fdb LC23E-* ffdd
295 fdb LC53F-* 02dc 362 fdb LC53F-* 02dc
296 fdb LC242-* ffdd 363 fdb LC23F-* ffdd
297 fdb LC53F-* 02d8 364 fdb LC53F-* 02d8
298 365
299 LC269 BSR LC279 366 LC269 BSR LC279
300 LEAY D,Y 367 LEAY D,Y
301 RTS 368 RTS
302 LC26E CMPA #$28 369 LC26E CMPA #$28
303 BNE LC292 370 BNE LC292
304 BSR LC279 371 BSR LC279
305 LSLB 372 LSLB
306 ROLA 373 ROLA
307 LEAY D,Y 374 LEAY D,Y
308 RTS 375 RTS
309 LC279 BSR LC292 376 LC279 BSR LC292
310 LDY ,Y 377 LDY ,Y
311 PSHS Y 378 PSHS Y
312 LEAX +$01,X 379 LEAX +$01,X
313 LBSR LC1F6 380 LBSR LC1F6
314 PULS PC,Y 381 PULS PC,Y
315 LC287 LDB ,X+ 382 LC287 LDB ,X+
316 LC289 LDA ,X+ 383 LC289 LDA ,X+
317 CMPA #$41 384 CMPA #$41
318 BPL LC289 385 BPL LC289
319 LEAX -$01,X 386 LEAX -$01,X
320 RTS 387 RTS
321 388
322 LC292 ANDB #$3F 389 LC292 ANDB #$3F
323 CLRA 390 CLRA
324 LSLB 391 LSLB
325 ADDD #LFB04 392 ADDD #LFB04
326 TFR D,Y 393 TFR D,Y
327 RTS 394 RTS
328 LC29C PSHU B,A 395 LC29C PSHU B,A
329 LDD ,X+ 396 LDD ,X+
330 PSHS B,A 397 PSHS B,A
331 SUBB #$3D 398 SUBB #$3D
332 BEQ LC2A9 399 BEQ LC2A9
333 DECB 400 DECB
334 BNE LC2AB 401 BNE LC2AB
335 LC2A9 LEAX +$01,X 402 LC2A9 LEAX +$01,X
336 LC2AB LBSR LC521 403 LC2AB LBSR LC521
337 PULU Y 404 PULU Y
338 EXG D,Y 405 EXG D,Y
339 PSHU Y,B,A 406 PSHU Y,B,A
340 PULS B,A 407 PULS B,A
341 CMPA #$3D 408 CMPA #$3D
342 BNE LC2C4 409 BNE LC2C4
343 PULU B,A 410 PULU B,A
344 SUBD ,U++ 411 SUBD ,U++
345 BNE LC2E4 412 BNE LC2E4
346 LC2C0 CLRA 413 LC2C0 CLRA
347 LDB #$01 414 LDB #$01
348 RTS 415 RTS
349 LC2C4 CMPA #$3C 416 LC2C4 CMPA #$3C
350 BNE LC2E7 417 BNE LC2E7
351 CMPB #$3D 418 CMPB #$3D
352 BEQ LC2D7 419 BEQ LC2D7
353 CMPB #$3E 420 CMPB #$3E
354 PULU B,A 421 PULU B,A
355 BNE LC2E0 422 BNE LC2E0
356 SUBD ,U++ 423 SUBD ,U++
357 BNE LC2C0 424 BNE LC2C0
358 RTS 425 RTS
359 LC2D7 PULU B,A 426 LC2D7 PULU B,A
360 SUBD ,U++ 427 SUBD ,U++
361 BLE LC2C0 428 BLE LC2C0
362 CLRA 429 CLRA
363 CLRB 430 CLRB
364 RTS 431 RTS
365 LC2E0 SUBD ,U++ 432 LC2E0 SUBD ,U++
366 BLT LC2C0 433 BLT LC2C0
367 LC2E4 CLRA 434 LC2E4 CLRA
368 CLRB 435 CLRB
369 RTS 436 RTS
370 LC2E7 CMPA #$3E 437 LC2E7 CMPA #$3E
371 BNE LC2FF 438 BNE LC2FF
372 CMPB #$3D 439 CMPB #$3D
373 PULU B,A 440 PULU B,A
374 BNE LC2F8 441 BNE LC2F8
375 SUBD ,U++ 442 SUBD ,U++
376 BGE LC2C0 443 BGE LC2C0
377 CLRA 444 CLRA
378 CLRB 445 CLRB
379 RTS 446 RTS
380 LC2F8 SUBD ,U++ 447 LC2F8 SUBD ,U++
381 BGT LC2C0 448 BGT LC2C0
382 CLRA 449 CLRA
383 CLRB 450 CLRB
384 RTS 451 RTS
385 LC2FF CMPA #$2B 452 LC2FF CMPA #$2B
386 BNE LC308 453 BNE LC308
387 PULU B,A 454 PULU B,A
388 ADDD ,U++ 455 ADDD ,U++
389 RTS 456 RTS
390 LC308 CMPA #$2D 457 LC308 CMPA #$2D
391 BNE LC311 458 BNE LC311
392 PULU B,A 459 PULU B,A
393 SUBD ,U++ 460 SUBD ,U++
394 RTS 461 RTS
395 LC311 CMPA #$2A 462 LC311 CMPA #$2A
396 LBNE LC653 463 LBNE LC653
397 PULU B,A 464 PULU B,A
398 LC319 EXG A,B 465 LC319 EXG A,B
399 PSHU B,A 466 PSHU B,A
400 LDB +$03,U 467 LDB +$03,U
401 MUL 468 MUL
402 STD <$82 469 STD <$82
403 BSR LC32B 470 BSR LC32B
404 BSR LC32B 471 BSR LC32B
405 LDD <$82 472 LDD <$82
406 LEAU +$02,U 473 LEAU +$02,U
407 RTS 474 RTS
408 LC32B PULU A 475 LC32B PULU A
409 LDB +$01,U 476 LDB +$01,U
410 MUL 477 MUL
411 ADDB <$82 478 ADDB <$82
412 STB <$82 479 STB <$82
413 RTS 480 RTS
414 LC335 CLR ,-S 481 LC335 CLR ,-S
415 LC337 INC ,S 482 LC337 INC ,S
416 LSL +$01,U 483 LSL +$01,U
417 ROL ,U 484 ROL ,U
418 BCC LC337 485 BCC LC337
419 ROR ,U 486 ROR ,U
420 ROR +$01,U 487 ROR +$01,U
421 CLR <$82 488 CLR <$82
422 CLR <$83 489 CLR <$83
423 LC347 SUBD ,U 490 LC347 SUBD ,U
424 BCC LC351 491 BCC LC351
425 ADDD ,U 492 ADDD ,U
426 ANDCC #$FE 493 ANDCC #$FE
427 BRA LC353 494 BRA LC353
428 LC351 ORCC #$01 495 LC351 ORCC #$01
429 LC353 ROR <$83 496 LC353 ROR <$83
430 ROR <$82 497 ROR <$82
431 DEC ,S 498 DEC ,S
432 BEQ LC361 499 BEQ LC361
433 LSR ,U 500 LSR ,U
434 ROR +$01,U 501 ROR +$01,U
435 BRA LC347 502 BRA LC347
436 LC361 LEAS +$01,S 503 LC361 LEAS +$01,S
437 RTS 504 RTS
438 LC364 LDB ,X 505 LC364 LDB ,X
439 CMPB #$30 506 CMPB #$30
440 BCS LC36D 507 BCS LC36D
441 CMPB #$3A 508 CMPB #$3A
442 RTS 509 RTS
443 LC36D ANDCC #$FE 510 LC36D ANDCC #$FE
444 RTS 511 RTS
445 LC370 LBSR LC5D8 512 LC370 LBSR LC5D8
446 LC373 BSR LC364 513 LC373 BSR LC364
447 BCC LC396 514 BCC LC396
448 CLRA 515 CLRA
449 CLRB 516 CLRB
450 LC379 ADDB ,X+ 517 LC379 ADDB ,X+
451 ADCA #$00 518 ADCA #$00
452 SUBD #LC030 519 SUBD #$030
453 PSHU B,A 520 PSHU B,A
454 BSR LC364 521 BSR LC364
455 LDD ,U 522 LDD ,U
456 BCC LC392 523 BCC LC392
457 LSLB 524 LSLB
458 ROLA 525 ROLA
459 LSLB 526 LSLB
460 ROLA 527 ROLA
461 ADDD ,U++ 528 ADDD ,U++
462 LSLB 529 LSLB
463 ROLA 530 ROLA
464 BRA LC379 531 BRA LC379
465 LC392 PULU B,A 532 LC392 PULU B,A
466 ORCC #$01 533 ORCC #$01
467 LC396 RTS 534 LC396 RTS
468 LC397 LDB #$0D 535 LC397 LDB #$0D
469 BSR LC39D 536 BSR LC39D
470 LC39B LDB #$0A 537 LC39B LDB #$0A
471 LC39D BRA LC412 538 LC39D BRA LC412
472 LC39F PSHS B,A 539 LC39F PSHS B,A
473 LDA #$01 540 LDA #$01
474 STA <$8C 541 STA <$8C
475 LDX <$84 542 LDX <$84
476 LDB ,X 543 LDB ,X
477 CMPB #$2E 544 CMPB #$2E
478 BNE LC3BA 545 BNE LC3BA
479 PULS A 546 PULS A
480 LDA ,S+ 547 LDA ,S+
481 LC3B1 BEQ LC3C4 548 LC3B1 BEQ LC3C4
482 LDB #$20 549 LDB #$20
483 BSR LC412 550 BSR LC412
484 DECA 551 DECA
485 BRA LC3B1 552 BRA LC3B1
486 LC3BA CMPB #$3B 553 LC3BA CMPB #$3B
487 BNE LC3C5 554 BNE LC3C5
488 LDD ,S++ 555 LDD ,S++
489 LBEQ LC057 556 LBEQ LC057
490 LC3C4 RTS 557 LC3C4 RTS
491 LC3C5 CMPB #$40 558 LC3C5 CMPB #$40
492 BNE LC3E4 559 BNE LC3E4
493 LDB +$02,X 560 LDB +$02,X
494 LBSR LC292 561 LBSR LC292
495 PULS B,A 562 PULS B,A
496 STD ,Y 563 STD ,Y
497 PULU B,A 564 PULU B,A
498 SUBD ,Y 565 SUBD ,Y
499 BLT LC3E1 566 BLT LC3E1
500 PULU X,B,A 567 PULU X,B,A
501 STD <$46 568 STD <$46
502 STX <$42 569 STX <$42
503 LEAU -$06,U 570 LEAU -$06,U
504 RTS 571 RTS
505 LC3E1 LEAU +$04,U 572 LC3E1 LEAU +$04,U
506 RTS 573 RTS
507 LC3E4 CMPB #$26 574 LC3E4 CMPB #$26
508 BNE LC3FA 575 BNE LC3FA
509 LC3E8 LDB +$01,X 576 LC3E8 LDB +$01,X
510 CMPB #$3D 577 CMPB #$3D
511 BNE LC3FA 578 BNE LC3FA
512 LDD ,S++ 579 LDD ,S++
513 BNE LC3F9 580 BNE LC3F9
514 LDX <$7E 581 LDX <$7E
515 STX <$50 582 STX <$50
516 DECA 583 DECA
517 STA ,X 584 STA ,X
518 LC3F9 RTS 585 LC3F9 RTS
519 LC3FA CMPB #$21 586 LC3FA CMPB #$21
520 BNE LC40C 587 BNE LC40C
521 PULS B,A 588 PULS B,A
522 STD <$4A 589 STD <$4A
523 BEQ LC40B 590 BEQ LC40B
524 LDY <$42 591 LDY <$42
525 LDX <$46 592 LDX <$46
526 PSHU Y,X 593 PSHU Y,X
527 LC40B RTS 594 LC40B RTS
528 LC40C CMPB #$24 595 LC40C CMPB #$24
529 BNE LC415 596 BNE LC415
530 PULS B,A 597 PULS B,A
531 LC412 LBRA LC64A 598 LC412 LBRA LC64A
532 LC415 CMPB #$3F 599 LC415 CMPB #$3F
533 BNE LC449 600 BNE LC449
534 LDB +$01,X 601 LDB +$01,X
535 CMPB #$28 602 CMPB #$28
536 LBNE LC56E 603 LBNE LC56E
537 LBSR LC51F 604 LBSR LC51F
538 LC424 STB <$8E 605 LC424 STB <$8E
539 PULS B,A 606 PULS B,A
540 BSR LC433 607 BSR LC433
541 ADDA <$8E 608 ADDA <$8E
542 BMI LC430 609 BMI LC430
543 BSR LC3B1 610 BSR LC3B1
544 LC430 LBRA LC165 611 LC430 LBRA LC165
545 LC433 TSTA 612 LC433 TSTA
546 LBPL LC11A 613 LBPL LC11A
547 LBSR LC4F3 614 LBSR LC4F3
548 LBSR LC11A 615 LBSR LC11A
549 LDB #$2D 616 LDB #$2D
550 STB ,-X 617 STB ,-X
551 RTS 618 RTS
552 LC443 PSHS B,A 619 LC443 PSHS B,A
553 LDB #$05 620 LDB #$05
554 BRA LC424 621 BRA LC424
555 LC449 CMPB #$3D 622 LC449 CMPB #$3D
556 BNE LC460 623 BNE LC460
557 PULS B,A 624 PULS B,A
558 STD <$7E 625 STD <$7E
559 LDX #LFFFF 626 LDX #LFFFF
560 STX <$4A 627 STX <$4A
561 LBSR LC09C 628 LBSR LC09C
562 STX <$50 629 STX <$50
563 LBRA LC024 630 LBRA LC024
564 LC45E PULS PC,B,A 631 LC45E PULS PC,B,A
565 LC460 CMPB #$3E 632 LC460 CMPB #$3E
566 BNE LC46C 633 BNE LC46C
567 LDD ,S 634 LDD ,S
568 BEQ LC45E 635 BEQ LC45E
569 JSR [,S++] 636 JSR [,S++]
570 PSHS B,A 637 PSHS B,A
571 LC46C LDX <$84 638 LC46C LDX <$84
572 LBSR LC287 639 LBSR LC287
573 CMPA #$3A 640 CMPA #$3A
574 BNE LC47D 641 BNE LC47D
575 LBSR LC269 642 LBSR LC269
576 PULS B,A 643 PULS B,A
577 STB ,Y 644 STB ,Y
578 RTS 645 RTS
579 LC47D LBSR LC26E 646 LC47D LBSR LC26E
580 PULS B,A 647 PULS B,A
581 STD ,Y 648 STD ,Y
582 RTS 649 RTS
583 LDA +$01,X 650 LDA +$01,X
584 CMPA #$4E 651 CMPA #$4E
585 BEQ LC48E 652 BEQ LC48E
586 LBRA LC7D7 653 LBRA LC7D7
587 LC48E TST +$02,X 654 LC48E TST +$02,X
588 BNE LC494 655 BNE LC494
589 CLR +$03,X 656 CLR +$03,X
590 LC494 LEAX +$03,X 657 LC494 LEAX +$03,X
591 CLR <$8C 658 CLR <$8C
592 LBSR LC373 659 LBSR LC373
593 BCS LC4A0 660 BCS LC4A0
594 LDD #LC3E8 661 LDD #LC3E8
595 LC4A0 STD <$88 662 LC4A0 STD <$88
596 LDB ,X 663 LDB ,X
597 CMPB #$2C 664 CMPB #$2C
598 BNE LC4AF 665 BNE LC4AF
599 LEAX +$01,X 666 LEAX +$01,X
600 LBSR LC373 667 LBSR LC373
601 BCS LC4B2 668 BCS LC4B2
602 LC4AF LDD #LC00A 669 LC4AF LDD #$00A
603 LC4B2 STD <$8A 670 LC4B2 STD <$8A
604 RTS 671 RTS
605 LC4B5 CMPA #$2F 672 LC4B5 CMPA #$2F
606 BNE LC4F9 673 BNE LC4F9
607 CLR <$8D 674 CLR <$8D
608 LDD +$02,U 675 LDD +$02,U
609 BEQ LC4F9 676 BEQ LC4F9
610 BMI LC4D4 677 BMI LC4D4
611 CMPD #LC002 678 CMPD #LC002
612 BNE LC4DE 679 BNE LC4DE
613 PULU B,A 680 PULU B,A
614 CLR <$4E 681 CLR <$4E
615 CLR <$4F 682 CLR <$4F
616 ASRA 683 ASRA
617 RORB 684 RORB
618 ROR <$4F 685 ROR <$4F
619 LEAU +$02,U 686 LEAU +$02,U
620 RTS 687 RTS
621 LC4D4 INC <$8D 688 LC4D4 INC <$8D
622 NEG +$03,U 689 NEG +$03,U
623 BNE LC4DC 690 BNE LC4DC
624 DEC +$02,U 691 DEC +$02,U
625 LC4DC COM +$02,U 692 LC4DC COM +$02,U
626 LC4DE LDD ,U++ 693 LC4DE LDD ,U++
627 BPL LC4E6 694 BPL LC4E6
628 DEC <$8D 695 DEC <$8D
629 BSR LC4F3 696 BSR LC4F3
630 LC4E6 LBSR LC335 697 LC4E6 LBSR LC335
631 LEAU +$02,U 698 LEAU +$02,U
632 STD <$4E 699 STD <$4E
633 LDD <$82 700 LDD <$82
634 TST <$8D 701 TST <$8D
635 BEQ LC4F8 702 BEQ LC4F8
636 LC4F3 NEGB 703 LC4F3 NEGB
637 BNE LC4F7 704 BNE LC4F7
638 DECA 705 DECA
639 LC4F7 COMA 706 LC4F7 COMA
640 LC4F8 RTS 707 LC4F8 RTS
641 LC4F9 LBSR LC397 708 LC4F9 LBSR LC397
642 LDB #$3F 709 LDB #$3F
643 STB <$8C 710 STB <$8C
644 LBSR LC412 711 LBSR LC412
645 TFR A,B 712 TFR A,B
646 LBSR LC412 713 LBSR LC412
647 LDB #$20 714 LDB #$20
648 LBSR LC412 715 LBSR LC412
649 LDX <$42 716 LDX <$42
650 CMPX #LFB95 717 CMPX #LFB95
651 BNE LC519 718 BNE LC519
652 LBSR LC165 719 LBSR LC165
653 BRA LC51C 720 BRA LC51C
654 LC519 LBSR LC087 721 LC519 LBSR LC087
655 LC51C LBRA LC024 722 LC51C LBRA LC024
656 LC51F LEAX +$01,X 723 LC51F LEAX +$01,X
657 LC521 LBSR LC373 724 LC521 LBSR LC373
658 BCS LC532 725 BCS LC532
659 LBRA LC23F 726 LBRA LC23F
660 BSR LC51F 727 BSR LC51F
661 BRA LC4F3 728 BRA LC4F3
662 BSR LC51F 729 BSR LC51F
663 TSTA 730 TSTA
664 BMI LC4F3 731 BMI LC4F3
665 LC532 RTS 732 LC532 RTS
666 BSR LC51F 733 BSR LC51F
667 LC535 PSHS B,A 734 LC535 PSHS B,A
668 LDD ,S++ 735 LDD ,S++
669 LBNE LC2E4 736 LBNE LC2E4
670 INCB 737 INCB
671 RTS 738 RTS
672 LC53F BSR LC51F 739 LC53F BSR LC51F
673 LDD <$4E 740 LDD <$4E
674 RTS 741 RTS
675 BSR LC51F 742 LC545
676 PSHU B,A 743 BSR LC51F
677 LDD <$52 744 PSHU B,A
678 PSHU B,A 745 LDD <$52
679 LDD #L3D09 746 PSHU B,A
680 LBSR LC319 747 LC54E
681 ADDD #LC001 748 LDD #L3D09
682 STD <$52 749 LBSR LC319
683 TFR A,B 750 ADDD #1
684 CLRA 751 STD <$52
685 LBSR LC319 752 TFR A,B
686 TFR A,B 753 CLRA
687 CLRA 754 LBSR LC319
688 ADDD #LC001 755 TFR A,B
689 RTS 756 CLRA
690 NEG <$00 757 ADDD #1
691 NEG <$00 758 RTS
692 CLRA 759 LC564
693 LDB +$01,X 760 NEG <$00
694 LEAX +$03,X 761 NEG <$00
695 RTS 762 LC568
763 CLRA
764 LDB +$01,X
765 LEAX +$03,X
766 RTS
696 LC56E CMPB #$3F 767 LC56E CMPB #$3F
697 BEQ LC57E 768 BEQ LC57E
698 CMPB #$24 769 CMPB #$24
699 BEQ LC582 770 BEQ LC582
700 PULS B,A 771 PULS B,A
701 LBSR LC433 772 LBSR LC433
702 LBRA LC165 773 LBRA LC165
703 LC57E LDB ,S 774 LC57E LDB ,S
704 BSR LC584 775 BSR LC584
705 LC582 PULS B,A 776 LC582 PULS B,A
706 LC584 TFR B,A 777 LC584 TFR B,A
707 BSR LC58E 778 BSR LC58E
708 TFR A,B 779 TFR A,B
709 ANDB #$0F 780 ANDB #$0F
710 BRA LC592 781 BRA LC592
711 LC58E LSRB 782 LC58E LSRB
712 LSRB 783 LSRB
713 LSRB 784 LSRB
714 LSRB 785 LSRB
715 LC592 CMPB #$0A 786 LC592 CMPB #$0A
716 BMI LC598 787 BMI LC598
717 ADDB #$07 788 ADDB #$07
718 LC598 ADDB #$30 789 LC598 ADDB #$30
719 LBRA LC412 790 LBRA LC412
720 CLRA 791 CLRA
721 BSR LC5BD 792 BSR LC5BD
722 LBCC LC64D 793 LC5A1
794 LBCC LC64D
723 LC5A4 PSHS B 795 LC5A4 PSHS B
724 BSR LC5BD 796 BSR LC5BD
725 PSHU B 797 PSHU B
726 PULS B 798 PULS B
727 BCC LC5BA 799 BCC LC5BA
728 LSLB 800 LSLB
729 ROLA 801 ROLA
730 LSLB 802 LSLB
731 ROLA 803 ROLA
732 LSLB 804 LSLB
733 ROLA 805 ROLA
734 LSLB 806 LSLB
735 ROLA 807 ROLA
736 ADDB ,U+ 808 ADDB ,U+
737 BRA LC5A4 809 BRA LC5A4
738 LC5BA LEAU +$01,U 810 LC5BA LEAU +$01,U
739 RTS 811 RTS
740 LC5BD LEAX +$01,X 812 LC5BD LEAX +$01,X
741 LDB ,X 813 LDB ,X
742 SUBB #$30 814 SUBB #$30
743 BCS LC5D2 815 BCS LC5D2
744 CMPB #$0A 816 CMPB #$0A
745 BCS LC5D1 817 BCS LC5D1
746 SUBB #$07 818 SUBB #$07
747 CMPB #$0A 819 CMPB #$0A
748 BCS LC5D2 820 BCS LC5D2
749 CMPB #$10 821 CMPB #$10
750 LC5D1 RTS 822 LC5D1 RTS
751 LC5D2 ANDCC #$FE 823 LC5D2 ANDCC #$FE
752 RTS 824 RTS
753 LC5D5 LBSR LC397 825 LC5D5 LBSR LC397
754 LC5D8 LDB #$3A 826 LC5D8 LDB #$3A
755 BSR LC64A 827 BSR LC64A
756 LDX #LFB95 828 LDX #LFB95
757 TST <$8C 829 TST <$8C
758 BNE LC5F2 830 BNE LC5F2
759 LDD <$88 831 LDD <$88
760 LBMI LC020 832 LBMI LC020
761 LBSR LC443 833 LBSR LC443
762 LDB #$20 834 LDB #$20
763 STB -$01,X 835 STB -$01,X
764 BSR LC64A 836 BSR LC64A
765 LC5F2 BSR LC64D 837 LC5F2 BSR LC64D
766 CMPB #$08 838 CMPB #$08
767 BEQ LC634 839 BEQ LC634
768 CMPB #$0D 840 CMPB #$0D
769 BCS LC5F2 841 BCS LC5F2
770 BEQ LC611 842 BEQ LC611
771 CMPB #$18 843 CMPB #$18
772 BEQ LC5D5 844 BEQ LC5D5
773 STB ,X+ 845 STB ,X+
774 CMPX #LFBDF 846 CMPX #LFBDF
775 BNE LC5F2 847 BNE LC5F2
776 LEAX -$01,X 848 LEAX -$01,X
777 LDB #$08 849 LDB #$08
778 BSR LC64A 850 BSR LC64A
779 BRA LC5F2 851 BRA LC5F2
780 LC611 TST <$8C 852 LC611 TST <$8C
781 BNE LC626 853 BNE LC626
782 CMPX #LFB9B 854 CMPX #LFB9B
783 BEQ LC61F 855 BEQ LC61F
784 CMPX #LFB9A 856 CMPX #LFB9A
785 BCC LC626 857 BCC LC626
786 LC61F COM <$8C 858 LC61F COM <$8C
787 LBSR LC39B 859 LBSR LC39B
788 BRA LC5D8 860 BRA LC5D8
789 LC626 LDD <$88 861 LC626 LDD <$88
790 ADDD <$8A 862 ADDD <$8A
791 STD <$88 863 STD <$88
792 CLR ,X 864 CLR ,X
793 LDX #LFB95 865 LDX #LFB95
794 LBRA LC39B 866 LBRA LC39B
795 LC634 LEAX -$01,X 867 LC634 LEAX -$01,X
796 CMPX #LFB94 868 CMPX #LFB94
797 BNE LC5F2 869 BNE LC5F2
798 STB <$8C 870 STB <$8C
799 BRA LC5D8 871 BRA LC5D8
800 872 LC63F
801 FCB $D,$A 873 FCB $D,$A
802 FCS "*READY" 874 FCS "*READY"
803 FCB $D,$A,0 875 FCB $D,$A,0
804 876
805 LC64A LBRA LC6FE OUTCH 877 LC64A LBRA OUTCH
806 LC64D LBRA LC6FC GETCH 878 LC64D LBRA LC6FC GETCH
807 LC650 LBRA LC720 SENSE 879 LC650 LBRA LC720 SENSE
808 LC653 CMPA #$2E EXBOP 880 LC653 CMPA #$2E EXBOP
809 BNE LC65E 881 BNE LC65E
810 PULU B,A 882 PULU B,A
811 ORA ,U+ 883 ORA ,U+
812 ORB ,U+ 884 ORB ,U+
813 RTS 885 RTS
814 LC65E CMPA #$26 886 LC65E CMPA #$26
815 BNE LC669 887 BNE LC669
816 PULU B,A 888 PULU B,A
817 ANDA ,U+ 889 ANDA ,U+
818 ANDB ,U+ 890 ANDB ,U+
819 RTS 891 RTS
820 LC669 CMPA #$21 892 LC669 CMPA #$21
821 LBNE LC4B5 893 LBNE LC4B5
822 PULU B,A 894 PULU B,A
823 EORA ,U+ 895 EORA ,U+
824 EORB ,U+ 896 EORB ,U+
825 RTS 897 RTS
826 LC676 LDD +$01,X EXTEND 898 LC676 LDD +$01,X EXTEND
827 LEAX +$03,X 899 LEAX +$03,X
828 PSHS U,X,B,A 900 PSHS U,X,B,A
829 LEAY >LC737,PCR 901 LEAY >OPCMD,PCR
830 LC680 LDX ,Y 902 LC680 LDX ,Y
831 BMI LC6E7 903 BMI LC6E7
832 CMPX ,S 904 CMPX ,S
833 BEQ LC68C 905 BEQ LC68C
834 LEAY +$05,Y 906 LEAY +$05,Y
835 BRA LC680 907 BRA LC680
836 LC68C LEAY +$03,Y 908 LC68C LEAY +$03,Y
837 LEAS +$02,S 909 LEAS +$02,S
838 LDX ,S 910 LDX ,S
839 LDA -$01,Y 911 LDA -$01,Y
840 BEQ LC6C3 912 BEQ LC6C3
841 PSHS Y,A 913 PSHS Y,A
842 LDA #$20 914 LDA #$20
843 LC69A CMPA ,X+ 915 LC69A CMPA ,X+
844 BEQ LC69A 916 BEQ LC69A
845 LDA ,-X 917 LDA ,-X
846 STX +$03,S 918 STX +$03,S
847 LC6A2 BITA #$DF 919 LC6A2 BITA #$DF
848 BEQ LC6B0 920 BEQ LC6B0
849 CMPA #$2C 921 CMPA #$2C
850 BEQ LC6AE 922 BEQ LC6AE
851 BSR LC6C9 923 BSR LC6C9
852 BRA LC6B3 924 BRA LC6B3
853 LC6AE LEAX +$01,X 925 LC6AE LEAX +$01,X
854 LC6B0 LDD #LFFFF 926 LC6B0 LDD #LFFFF
855 LC6B3 PSHU B,A 927 LC6B3 PSHU B,A
856 LDA ,X 928 LDA ,X
857 DEC ,S 929 DEC ,S
858 BNE LC6A2 930 BNE LC6A2
859 LDD +$03,S 931 LDD +$03,S
860 STX +$03,S 932 STX +$03,S
861 TFR D,X 933 TFR D,X
862 PULS Y,A 934 PULS Y,A
863 LC6C3 LDD ,Y 935 LC6C3 LDD ,Y
864 JSR D,Y 936 JSR D,Y
865 PULS PC,U,X 937 PULS PC,U,X
866 LC6C9 LBSR LC521 938 LC6C9 LBSR LC521
867 LC6CC PSHS B 939 LC6CC PSHS B
868 LDB ,X 940 LDB ,X
869 BITB #$DF 941 BITB #$DF
870 BEQ LC6E5 942 BEQ LC6E5
871 CMPB #$2C 943 CMPB #$2C
872 BEQ LC6E3 944 BEQ LC6E3
873 CMPB #$29 945 CMPB #$29
874 BEQ LC6E3 946 BEQ LC6E3
875 PULS B 947 PULS B
876 LBSR LC29C 948 LBSR LC29C
877 BRA LC6CC 949 BRA LC6CC
878 LC6E3 LEAX +$01,X 950 LC6E3 LEAX +$01,X
879 LC6E5 PULS PC,B 951 LC6E5 PULS PC,B
880 LC6E7 PULS U,X,B,A 952 LC6E7 PULS U,X,B,A
881 LBRA LC4F9 953 LBRA LC4F9
882 LC6EC LEAX +$01,X 954 LC6EC LEAX +$01,X
883 LDB ,X+ 955 LDB ,X+
884 LC6F0 LDA ,X+ 956 LC6F0 LDA ,X+
885 BEQ LC6F8 957 BEQ LC6F8
886 CMPA #$22 958 CMPA #$22
887 BNE LC6F0 959 BNE LC6F0
888 LC6F8 CLRA 960 LC6F8 CLRA
889 RTS 961 RTS
890 LC6FA STB LFC8D 962 LC6FA FDB $FCFD
891 CLR <$34 963
892 LBRA L758E 964 GETCH
893 STB LA602 965 LC6FC BSR LC70D
894 STB +$02,X 966 OUTCH
967 PSHS X,B,A
968 LDX <LC6FA,PCR
969 LDA +$02,X
970 STB +$02,X
895 LC707 LDA +$03,X 971 LC707 LDA +$03,X
896 BPL LC707 972 BPL LC707
897 PULS PC,X,B,A 973 PULS PC,X,B,A
898 PSHS X 974 LC70D
899 LDX <LC6FA,PCR 975 PSHS X
976 LDX <LC6FA,PCR
900 LC712 LDB +$01,X 977 LC712 LDB +$01,X
901 BPL LC712 978 BPL LC712
902 LDB ,X 979 LDB ,X
903 CMPB #$18 980 CMPB #$18
904 LBEQ LC003 981 LBEQ LC003
905 PULS PC,X 982 PULS PC,X
983 SENSE
906 LC720 PSHS X,A 984 LC720 PSHS X,A
907 LDX <LC6FA,PCR 985 LDX <LC6FA,PCR
908 LDA +$01,X 986 LDA +$01,X
909 BPL LC731 987 BPL LC731
910 BSR LC6FC 988 BSR LC6FC
911 CMPB #$18 989 CMPB #$18
912 BEQ LC734 990 BEQ LC734
913 BSR LC6FC 991 BSR LC6FC
914 LC731 CLRA 992 LC731 CLRA
915 PULS PC,X,A 993 PULS PC,X,A
916 994 LC734 COMA
917 * COMMAND TABLE CONSIST.... 995 PULS PC,X,A
918 * COMMAND NAME (2 BYTE) 996
919 * PARAMETER COUNT (1 BYTE) 997
920 * OFSET TO SUBROUTIE FROM HERE (1 WORD) 998 * COMMAND TABLE CONSIST....
921 ************************** 999 * COMMAND NAME (2 BYTE)
922 OPCMD FCC "AT",2 START LINE,STEP 1000 * PARAMETER COUNT (1 BYTE)
923 FDB CAUTO-* 1001 * OFSET TO SUBROUTIE FROM HERE (1 WORD)
924 FCC "RN",3 RENUM first line no,inc,renum start 1002 **************************
925 FDB RENUM-* 1003 OPCMD FCB 'A','T',2 START LINE,STEP
926 FCC "RD",3 DISK READ address,track,sector 1004 FDB CAUTO-*
927 FDB GETDK-* 1005 FCB 'R','N',3 RENUM first line no,inc,renum start
928 FCC "WR",3 DISK WRITE 1006 FDB RENUM-*
929 FDB PUTDK-* 1007 * FCB 'R','D',3 DISK READ address,track,sector
930 FCC "SY",0 TO SYSTEM 1008 * FDB GETDK-*
931 FDB SYSTEM-* 1009 * FCB 'W','R',3 DISK WRITE
932 FDB -1,-1,-1,-1,-1,-1 1010 * FDB PUTDK-*
933 ************************* 1011 FCB 'S','Y',0 TO SYSTEM
934 1012 FDB SYSTEM-*
935 LDD ,U++ 1013 FDB -1,-1,-1,-1,-1,-1
936 BPL LC762 1014 *************************
937 CLRA 1015 RENUM
938 CLRB 1016 LDD ,U++
1017 BPL LC762
1018 CLRA
1019 CLRB
939 LC762 STD <$4A 1020 LC762 STD <$4A
940 LBSR LC09C 1021 LBSR LC09C
941 BMI LC789 1022 BMI LC789
942 LDD ,U++ 1023 LDD ,U++
943 BPL LC770 1024 BPL LC770
944 LDD #LC00A 1025 LDD #$00A
945 LC770 LDY ,U++ 1026 LC770 LDY ,U++
946 BPL LC779 1027 BPL LC779
947 LDY #LC3E8 1028 LDY #LC3E8
948 LC779 STY ,X++ 1029 LC779 STY ,X++
949 LBSR LC173 1030 LBSR LC173
950 LEAY D,Y 1031 LEAY D,Y
951 LC781 TST ,X+ 1032 LC781 TST ,X+
952 BNE LC781 1033 BNE LC781
953 TST ,X 1034 TST ,X
954 BPL LC779 1035 BPL LC779
955 LC789 RTS 1036 LC789 RTS
956 LDD ,U++ 1037 CAUTO
957 BPL LC791 1038 LDD ,U++
958 LDD #LC00A 1039 BPL LC791
1040 LDD #$00A
959 LC791 STD <$8A 1041 LC791 STD <$8A
960 LDD ,U 1042 LDD ,U
961 BEQ LC79E 1043 BEQ LC79E
962 BPL LC79C 1044 BPL LC79C
963 LDD #LC3E8 1045 LDD #LC3E8
964 LC79C STD <$88 1046 LC79C STD <$88
965 LC79E CLR <$8C 1047 LC79E CLR <$8C
966 RTS 1048 RTS
967 BSR LC7B6 1049 BSR LC7B6
968 LBSR LCD09 1050 LBSR LCD09
969 BNE LC7B1 1051 BNE LC7B1
970 RTS 1052 RTS
971 BSR LC7B6 1053 BSR LC7B6
972 LBSR LCD0C 1054 LBSR LCD0C
973 BNE LC7B1 1055 BNE LC7B1
974 RTS 1056 RTS
975 LC7B1 LDA #$44 1057 LC7B1 LDA #$44
976 LBRA LC4F9 1058 LBRA LC4F9
977 LC7B6 LDX +$04,U 1059 LC7B6 LDX +$04,U
978 LDA +$03,U 1060 LDA +$03,U
979 LDB +$01,U 1061 LDB +$01,U
980 RTS 1062 RTS
981 SWI 1063 SYSTEM
982 DEC <$02 1064 SWI
983 LDA LD7FC 1065 DEC <$02
984 CMPA #$18 1066 LDA LD7FC
985 BEQ LC7D3 1067 CMPA #$18
1068 BEQ LC7D3
986 LC7C7 TST LD7FD 1069 LC7C7 TST LD7FD
987 BPL LC7C7 1070 BPL LC7C7
988 LDA LD7FC 1071 LDA LD7FC
989 ANDCC #$FE 1072 ANDCC #$FE
990 PULS PC,A 1073 PULS PC,A
991 LC7D3 ORCC #$01 1074 LC7D3 ORCC #$01
992 PULS PC,A 1075 PULS PC,A
993 1076 LC7D7 LBRA LCA96
994 org $c800 1077
995 LBRA LCA96 1078 org $c800
996 LBRA LC8CA 1079 LBRA LCA96
997 LBRA LC9F2 1080 LBRA LC8CA
998 LC809 STB <$FC 1081 LBRA LC9F2
999 LC80B STB <$FD 1082
1000 LC80D STB <$FE 1083 LC809 FDB $D7FC
1001 LC80F STB <$FF 1084 LC80B FDB $D7FD
1002 SUBB +$00,X 1085 LC80D FDB $D7FE
1003 LC813 SUBA #$0E 1086 LC80F FDB $D7FF
1087 FDB $E000
1088 FDB $800E
1089
1090
1004 LC815 LDA [<LC80B,PCR] 1091 LC815 LDA [<LC80B,PCR]
1005 BPL LC815 1092 BPL LC815
1006 LDA [<LC809,PCR] 1093 LDA [<LC809,PCR]
1007 BRA LC831 1094 BRA LC831
1008 LC81F LSRA 1095 LC81F LSRA
1009 LSRA 1096 LSRA
1010 LSRA 1097 LSRA
1011 LSRA 1098 LSRA
1012 LC823 ANDA #$0F 1099 LC823 ANDA #$0F
1013 CMPA #$0A 1100 CMPA #$0A
1014 BCS LC82B 1101 BCS LC82B
1015 ADDA #$07 1102 ADDA #$07
1016 LC82B ADDA #$30 1103 LC82B ADDA #$30
1017 BRA LC831 1104 BRA LC831
1018 LC82F LDA #$20 1105 LC82F LDA #$20
1019 LC831 LDB [<LC80D,PCR] 1106 LC831 LDB [<LC80D,PCR]
1020 STA [<LC80D,PCR] 1107 STA [<LC80D,PCR]
1021 LC837 LDB [<LC80F,PCR] 1108 LC837 LDB [<LC80F,PCR]
1022 BPL LC837 1109 BPL LC837
1023 JMP ,U 1110 JMP ,U
1024 LC83E CMPA #$30 1111 LC83E CMPA #$30
1025 BCS LC856 1112 BCS LC856
1026 CMPA #$3A 1113 CMPA #$3A
1027 BCC LC84A 1114 BCC LC84A
1028 SUBA #$30 1115 SUBA #$30
1029 BRA LC858 1116 BRA LC858
1030 LC84A CMPA #$41 1117 LC84A CMPA #$41
1031 BCS LC856 1118 BCS LC856
1032 CMPA #$47 1119 CMPA #$47
1033 BCC LC856 1120 BCC LC856
1034 SUBA #$37 1121 SUBA #$37
1035 BRA LC858 1122 BRA LC858
1036 LC856 ORCC #$01 1123 LC856 ORCC #$01
1037 LC858 JMP ,U 1124 LC858 JMP ,U
1038 LC85A EXG D,X 1125 LC85A EXG D,X
1039 LSLB 1126 LSLB
1040 ROLA 1127 ROLA
1041 LSLB 1128 LSLB
1042 ROLA 1129 ROLA
1043 LSLB 1130 LSLB
1044 ROLA 1131 ROLA
1045 LSLB 1132 LSLB
1046 ROLA 1133 ROLA
1047 EXG D,X 1134 EXG D,X
1048 LEAX A,X 1135 LEAX A,X
1049 JMP ,U 1136 JMP ,U
1050 LC86A TFR U,Y 1137 LC86A TFR U,Y
1051 LDA #$0D 1138 LDA #$0D
1052 LEAU <LC874,PCR 1139 LEAU <LC874,PCR
1053 LBRA LC831 1140 LBRA LC831
1054 LC874 LDA #$0A 1141 LC874 LDA #$0A
1055 LEAU <LC87C,PCR 1142 LEAU <LC87C,PCR
1056 LBRA LC831 1143 LBRA LC831
1057 LC87C JMP ,Y 1144 LC87C JMP ,Y
1058 LC87E TFR U,Y 1145 LC87E TFR U,Y
1059 LDA ,X 1146 LDA ,X
1060 LEAU <LC888,PCR 1147 LEAU <LC888,PCR
1061 LBRA LC81F 1148 LBRA LC81F
1062 LC888 LDA ,X 1149 LC888 LDA ,X
1063 LEAU <LC890,PCR 1150 LEAU <LC890,PCR
1064 LBRA LC823 1151 LBRA LC823
1065 LC890 JMP ,Y 1152 LC890 JMP ,Y
1066 LC892 TFR U,Y 1153 LC892 TFR U,Y
1067 LC894 TFR X,D 1154 LC894 TFR X,D
1068 LEAU <LC89C,PCR 1155 LEAU <LC89C,PCR
1069 LBRA LC81F 1156 LBRA LC81F
1070 LC89C TFR X,D 1157 LC89C TFR X,D
1071 LEAU <LC8A4,PCR 1158 LEAU <LC8A4,PCR
1072 LBRA LC823 1159 LBRA LC823
1073 LC8A4 TFR X,D 1160 LC8A4 TFR X,D
1074 TFR B,A 1161 TFR B,A
1075 LEAU <LC8AE,PCR 1162 LEAU <LC8AE,PCR
1076 LBRA LC81F 1163 LBRA LC81F
1077 LC8AE TFR X,D 1164 LC8AE TFR X,D
1078 TFR B,A 1165 TFR B,A
1079 LEAU <LC8B8,PCR 1166 LEAU <LC8B8,PCR
1080 LBRA LC823 1167 LBRA LC823
1081 LC8B8 JMP ,Y 1168 LC8B8 JMP ,Y
1082 TFR U,Y 1169 TFR U,Y
1083 LC8BC LDA ,X+ 1170 LC8BC LDA ,X+
1084 LC8BE BEQ LC8C8 1171 LC8BE BEQ LC8C8
1085 LEAU <LC8C6,PCR 1172 LEAU <LC8C6,PCR
1086 LBRA LC831 1173 LBRA LC831
1087 LC8C6 BRA LC8BC 1174 LC8C6 BRA LC8BC
1088 LC8C8 JMP ,Y 1175 LC8C8 JMP ,Y
1089 LC8CA LEAU <LC8D0,PCR 1176 LC8CA LEAU <LC8D0,PCR
1090 LBRA LC86A 1177 LBRA LC86A
1091 LC8D0 LEAU <LC8D6,PCR 1178 LC8D0 LEAU <LC8D6,PCR
1092 LBRA LC86A 1179 LBRA LC86A
1093 LC8D6 LDA #$2A 1180 LC8D6 LDA #$2A
1094 LEAU <LC8DE,PCR 1181 LEAU <LC8DE,PCR
1095 LBRA LC831 1182 LBRA LC831
1096 LC8DE LDY #LC000 1183 LC8DE LDY #0
1097 LC8E2 LEAU <LC8E8,PCR 1184 LC8E2 LEAU <LC8E8,PCR
1098 LBRA LC815 1185 LBRA LC815
1099 LC8E8 CMPA #$47 1186 LC8E8 CMPA #$47
1100 LC8EA LBEQ LC915 1187 LC8EA LBEQ LC915
1101 CMPA #$4D 1188 CMPA #$4D
1102 LBEQ LC931 1189 LBEQ LC931
1103 CMPA #$53 1190 CMPA #$53
1104 LBEQ LC96B 1191 LBEQ LC96B
1105 LEAU <LC900,PCR 1192 LEAU <LC900,PCR
1106 LBRA LC83E 1193 LBRA LC83E
1107 LC900 BCS LC8CA 1194 LC900 BCS LC8CA
1108 LEAY ,Y 1195 LEAY ,Y
1109 BNE LC90D 1196 BNE LC90D
1110 LDY #LC001 1197 LDY #1
1111 LDX #LC000 1198 LDX #0
1112 LC90D LEAU <LC913,PCR 1199 LC90D LEAU <LC913,PCR
1113 LBRA LC85A 1200 LBRA LC85A
1114 LC913 BRA LC8E2 1201 LC913 BRA LC8E2
1115 LC915 LEAU <LC91B,PCR 1202 LC915 LEAU <LC91B,PCR
1116 LBRA LC86A 1203 LBRA LC86A
1117 LC91B LEAU <LC921,PCR 1204 LC91B LEAU <LC921,PCR
1118 LBRA LC892 1205 LBRA LC892
1119 LC921 LEAU <LC927,PCR 1206 LC921 LEAU <LC927,PCR
1120 LBRA LC82F 1207 LBRA LC82F
1121 LC927 LDA #$47 1208 LC927 LDA #$47
1122 LEAU <LC92F,PCR 1209 LEAU <LC92F,PCR
1123 LBRA LC831 1210 LBRA LC831
1124 LC92F JMP ,X 1211 LC92F JMP ,X
1125 LC931 LDB >LC814,PCR 1212 LC931 LDB >LC814,PCR
1126 LC935 ORB >LC813,PCR 1213 LC935 ORB >LC813,PCR
1127 TFR B,DP 1214 TFR B,DP
1128 LEAU <LC941,PCR 1215 LEAU <LC941,PCR
1129 LBRA LC86A 1216 LBRA LC86A
1130 LC941 LEAU <LC947,PCR 1217 LC941 LEAU <LC947,PCR
1131 LBRA LC892 1218 LBRA LC892
1132 LC947 LEAU <LC94D,PCR 1219 LC947 LEAU <LC94D,PCR
1133 LC94A LBRA LC82F 1220 LC94A LBRA LC82F
1134 LC94D LEAU <LC953,PCR 1221 LC94D LEAU <LC953,PCR
1135 LBRA LC82F 1222 LBRA LC82F
1136 LC953 LEAU <LC959,PCR 1223 LC953 LEAU <LC959,PCR
1137 LBRA LC87E 1224 LBRA LC87E
1138 LC959 LEAX +$01,X 1225 LC959 LEAX +$01,X
1139 TFR DP,B 1226 TFR DP,B
1140 SUBB #$10 1227 SUBB #$10
1141 TFR B,DP 1228 TFR B,DP
1142 BITB #$F0 1229 BITB #$F0
1143 BNE LC94D 1230 BNE LC94D
1144 DECB 1231 DECB
1145 BNE LC935 1232 BNE LC935
1146 LBRA LC8CA 1233 LBRA LC8CA
1147 LC96B LEAU <LC971,PCR 1234 LC96B LEAU <LC971,PCR
1148 LBRA LC86A 1235 LBRA LC86A
1149 LC971 LEAU <LC977,PCR 1236 LC971 LEAU <LC977,PCR
1150 LBRA LC892 1237 LBRA LC892
1151 LC977 LEAU <LC97D,PCR 1238 LC977 LEAU <LC97D,PCR
1152 LBRA LC82F 1239 LBRA LC82F
1153 LC97D LEAU <LC983,PCR 1240 LC97D LEAU <LC983,PCR
1154 BCS LC94A 1241 BCS LC94A
1155 LEAY ,Y 1242 LEAY ,Y
1156 BNE LC98D 1243 BNE LC98D
1157 LDY #LC001 1244 LDY #1
1158 LDX #LC000 1245 LDX #0
1159 LC98D LEAU <LC993,PCR 1246 LC98D LEAU <LC993,PCR
1160 LBRA LC8DA 1247 LBRA LC8DA
1161 LC993 BRA LC962 1248 LC993 BRA LC962
1162 LEAU <LC99B,PCR 1249 LEAU <LC99B,PCR
1163 LBRA LC8EA 1250 LBRA LC8EA
1164 LC99B LEAU <LC9A1,PCR 1251 LC99B LEAU <LC9A1,PCR
1165 LBRA LC912 1252 LBRA LC912
1166 LC9A1 LEAU <LC9A7,PCR 1253 LC9A1 LEAU <LC9A7,PCR
1167 LBRA LC8AF 1254 LBRA LC8AF
1168 LC9A7 LDA #$47 1255 LC9A7 LDA #$47
1169 LEAU <LC9AF,PCR 1256 LEAU <LC9AF,PCR
1170 LBRA LC8B1 1257 LBRA LC8B1
1171 LC9AF JMP ,X 1258 LC9AF JMP ,X
1172 LDB >LC894,PCR 1259 LDB >LC894,PCR
1173 LC9B5 ORB >LC893,PCR 1260 LC9B5 ORB >LC893,PCR
1174 TFR B,DP 1261 TFR B,DP
1175 LEAU <LC9C1,PCR 1262 LEAU <LC9C1,PCR
1176 LBRA LC8EA 1263 LBRA LC8EA
1177 LC9C1 LEAU <LC9C7,PCR 1264 LC9C1 LEAU <LC9C7,PCR
1178 LBRA LC912 1265 LBRA LC912
1179 LC9C7 LEAU <LC9CD,PCR 1266 LC9C7 LEAU <LC9CD,PCR
1180 LBRA LC8AF 1267 LBRA LC8AF
1181 LC9CD LEAU <LC9D3,PCR 1268 LC9CD LEAU <LC9D3,PCR
1182 LBRA LC8AF 1269 LBRA LC8AF
1183 LC9D3 LEAU <LC9D9,PCR 1270 LC9D3 LEAU <LC9D9,PCR
1184 LBRA LC8FE 1271 LBRA LC8FE
1185 LC9D9 LEAX +$01,X 1272 LC9D9 LEAX +$01,X
1186 TFR DP,B 1273 TFR DP,B
1187 SUBB #$10 1274 SUBB #$10
1188 TFR B,DP 1275 TFR B,DP
1189 BITB #$F0 1276 BITB #$F0
1190 BNE LC9CD 1277 BNE LC9CD
1191 DECB 1278 DECB
1192 BNE LC9B5 1279 BNE LC9B5
1193 LBRA LC94A 1280 LBRA LC94A
1194 LC9EB LEAU <LC9F1,PCR 1281 LC9EB LEAU <LC9F1,PCR
1195 LBRA LC8EA 1282 LBRA LC8EA
1196 LC9F1 LEAU <LC9F7,PCR 1283 LC9F1 LEAU <LC9F7,PCR
1197 LBRA LC912 1284 LBRA LC912
1198 LC9F7 LEAU <LC9FD,PCR 1285 LC9F7 LEAU <LC9FD,PCR
1199 LBRA LC8AF 1286 LBRA LC8AF
1200 LC9FD LEAU <LCA03,PCR 1287 LC9FD LEAU <LCA03,PCR
1201 LBRA LC8FE 1288 LBRA LC8FE
1202 LCA03 LDA #$2D 1289 LCA03 LDA #$2D
1203 LEAU <LCA0B,PCR 1290 LEAU <LCA0B,PCR
1204 LBRA LC8B1 1291 LBRA LC8B1
1205 LCA0B LDY #LC000 1292 LCA0B LDY #0
1206 CLRB 1293 CLRB
1207 TFR B,DP 1294 TFR B,DP
1208 LCA12 LEAU <LCA18,PCR 1295 LCA12 LEAU <LCA18,PCR
1209 LBRA LC895 1296 LBRA LC895
1210 LCA18 LEAU <LCA1E,PCR 1297 LCA18 LEAU <LCA1E,PCR
1211 LBRA LC8BE 1298 LBRA LC8BE
1212 LCA1E BCS LCA39 1299 LCA1E BCS LCA39
1213 LDY #LC001 1300 LDY #1
1214 TFR DP,B 1301 TFR DP,B
1215 LSLB 1302 LSLB
1216 LSLB 1303 LSLB
1217 LSLB 1304 LSLB
1218 LSLB 1305 LSLB
1219 TFR A,DP 1306 TFR A,DP
1220 EXG D,X 1307 EXG D,X
1221 EXG DP,B 1308 EXG DP,B
1222 ABX 1309 ABX
1223 EXG B,DP 1310 EXG B,DP
1224 EXG X,D 1311 EXG X,D
1225 TFR B,DP 1312 TFR B,DP
1226 BRA LCA12 1313 BRA LCA12
1227 LCA39 CMPA #$0D 1314 LCA39 CMPA #$0D
1228 BNE LCA47 1315 BNE LCA47
1229 LDA #$0A 1316 LDA #$0A
1230 LEAU <LCA45,PCR 1317 LEAU <LCA45,PCR
1231 LBRA LC8B1 1318 LBRA LC8B1
1232 LCA45 LDA #$0D 1319 LCA45 LDA #$0D
1233 LCA47 EXG A,DP 1320 LCA47 EXG A,DP
1234 LEAY ,Y 1321 LEAY ,Y
1235 BEQ LCA4F 1322 BEQ LCA4F
1236 STA ,X 1323 STA ,X
1237 LCA4F LDA #$2D 1324 LCA4F LDA #$2D
1238 LEAU <LCA57,PCR 1325 LEAU <LCA57,PCR
1239 LBRA LC8B1 1326 LBRA LC8B1
1240 LCA57 LEAU <LCA5D,PCR 1327 LCA57 LEAU <LCA5D,PCR
1241 LBRA LC8FE 1328 LBRA LC8FE
1242 LCA5D TFR DP,A 1329 LCA5D TFR DP,A
1243 CMPA #$0D 1330 CMPA #$0D
1244 LBEQ LC94A 1331 LBEQ LC94A
1245 LEAX -$01,X 1332 LEAX -$01,X
1246 CMPA #$5E 1333 CMPA #$5E
1247 LBEQ LC9EB 1334 LBEQ LC9EB
1248 LEAX +$02,X 1335 LEAX +$02,X
1249 LBRA LC9EB 1336 LBRA LC9EB
1250 LEAX <LCAE5,PCR 1337 LEAX <LCAE5,PCR
1251 LEAU <LCA7B,PCR 1338 LEAU <LCA7B,PCR
1252 LBRA LC93A 1339 LBRA LC93A
1253 LCA7B LDA #$04 1340 LCA7B LDA #$04
1254 LCA7D TFR A,DP 1341 LCA7D TFR A,DP
1255 LEAX ,S+ 1342 LEAX ,S+
1256 LEAU <LCA87,PCR 1343 LEAU <LCA87,PCR
1257 LBRA LC8FE 1344 LBRA LC8FE
1258 LCA87 LEAU <LCA8D,PCR 1345 LCA87 LEAU <LCA8D,PCR
1259 LBRA LC8AF 1346 LBRA LC8AF
1260 LCA8D LEAU <LCA93,PCR 1347 LCA8D LEAU <LCA93,PCR
1261 LBRA LC8AF 1348 LBRA LC8AF
1262 LCA93 LEAU <LCA99,PCR 1349 LCA93 LEAU <LCA99,PCR
1263 LCA96 TFR DP,A 1350 LCA96 TFR DP,A
1264 DECA 1351 DECA
1265 LCA99 BNE LCA7D 1352 LCA99 BNE LCA7D
1266 LEAX <LCAF8,PCR 1353 LEAX <LCAF8,PCR
1267 LEAU <LCAA4,PCR 1354 LEAU <LCAA4,PCR
1268 LBRA LC93A 1355 LBRA LC93A
1269 LCAA4 LDA #$04 1356 LCAA4 LDA #$04
1270 LCAA6 TFR A,DP 1357 LCAA6 TFR A,DP
1271 LDX ,S++ 1358 LDX ,S++
1272 LEAU <LCAB0,PCR 1359 LEAU <LCAB0,PCR
1273 LBRA LC912 1360 LBRA LC912
1274 LCAB0 LEAU <LCAB6,PCR 1361 LCAB0 LEAU <LCAB6,PCR
1275 LBRA LC8AF 1362 LBRA LC8AF
1276 LCAB6 LEAU <LCABC,PCR 1363 LCAB6 LEAU <LCABC,PCR
1277 LBRA LC8AF 1364 LBRA LC8AF
1278 LCABC TFR DP,A 1365 LCABC TFR DP,A
1279 DECA 1366 DECA
1280 BNE LCAA6 1367 BNE LCAA6
1281 LEAX ,S 1368 LEAX ,S
1282 LEAU <LCAC9,PCR 1369 LEAU <LCAC9,PCR
1283 LBRA LC912 1370 LBRA LC912
1284 LCAC9 LBRA LC94A 1371 LCAC9 LBRA LC94A
1285 LCACC INC <$09 1372 LCACC INC <$09
1286 1373
1287 fcs "RALPH09 DEBUGGER 2.0" 1374 fcs "RALPH09 DEBUGGER 2.0"
1288 fcb $d,$a,0 1375 fcb $d,$a,0
1289 fcb $d,$a 1376 fcb $d,$a
1290 fcs "CC A B DP" 1377 fcs "CC A B DP"
1291 fcb $d,$a,0 1378 fcb $d,$a,0
1292 fcb $d,$a 1379 fcb $d,$a
1293 fcs "X Y U PC S" 1380 fcs "X Y U PC S"
1294 fcb $d,$a,0 1381 fcb $d,$a,0
1295 1382
1296 LDX #LFF48 1383 LDX #LFF48
1297 LDA #$07 1384 LDA #$07
1298 LCB1B STA ,-X 1385 LCB1B STA ,-X
1299 DECA 1386 DECA
1300 BNE LCB1B 1387 BNE LCB1B
1301 CLR LFF4A 1388 CLR LFF4A
1302 LDX #LFF00 1389 LDX #LFF00
1303 LDD #LC1E0 1390 LDD #LC1E0
1304 LCB29 STD ,X++ 1391 LCB29 STD ,X++
1305 INCB 1392 INCB
1306 BNE LCB29 1393 BNE LCB29
1307 CLR LFF40 1394 CLR LFF40
1308 LDU >LC889,PCR 1395 LDU >LC889,PCR ???
1309 CLRA 1396 CLRA
1310 STA +$01,U 1397 STA +$01,U
1311 STA +$03,U 1398 STA +$03,U
1312 DECA 1399 DECA
1313 STA +$02,U 1400 STA +$02,U
1314 LDA #$24 1401 LDA #$24
1315 STA +$01,U 1402 STA +$01,U
1316 STA +$03,U 1403 STA +$03,U
1317 LDA ,U 1404 LDA ,U
1318 LDA +$02,U 1405 LDA +$02,U
1319 LDS >LC891,PCR 1406 LDS >LC891,PCR
1320 LEAX >LCACC,PCR 1407 LEAX >LCACC,PCR
1321 LEAU <LCB56,PCR 1408 LEAU <LCB56,PCR
1322 LBRA LC93A 1409 LBRA LC93A
1323 LCB56 LBRA LC94A 1410 LCB56 LBRA LC94A
1324 1411
1325 org $cb80 1412 org $cb80
1326 LDA #$01 1413 LDA #$01
1327 STA LFF4A 1414 STA LFF4A
1328 STA LFF4B 1415 STA LFF4B
1329 LDX #LFF40 1416 LDX #LFF40
1330 LDD #LC01F 1417 LDD #$01F
1331 LCB8E STD ,--X 1418 LCB8E STD ,--X
1332 DECB 1419 DECB
1333 BNE LCB8E 1420 BNE LCB8E
1334 STD ,--X 1421 STD ,--X
1335 LDD #LC1FE 1422 LDD #$1FE
1336 STD LFF38 1423 STD LFF38
1337 INCB 1424 INCB
1338 STD LFF3A 1425 STD LFF3A
1339 LDD #LC1FA 1426 LDD #LC1FA
1340 STD LFF3C 1427 STD LFF3C
1341 LDA #$04 1428 LDA #$04
1342 STA LFF49 1429 STA LFF49
1343 JMP LE000 1430 JMP LE000
1344 1431
1345 org $cc80 1432 org $cc80
1346 LDB #$00 1433 LDB #$00
1347 BRA LCCC0 1434 BRA LCCC0
1348 LDB #$01 1435 LDB #$01
1349 BRA LCCC0 1436 BRA LCCC0
1350 LDB #$02 1437 LDB #$02
1351 BRA LCCC0 1438 BRA LCCC0
1352 LDB #$03 1439 LDB #$03
1353 BRA LCCC0 1440 BRA LCCC0
1354 LDB #$04 1441 LDB #$04
1355 BRA LCCC0 1442 BRA LCCC0
1356 LDB #$05 1443 LDB #$05
1357 BRA LCCC0 1444 BRA LCCC0
1358 LDB #$06 1445 LDB #$06
1359 BRA LCCC0 1446 BRA LCCC0
1360 LDB #$07 1447 LDB #$07
1361 BRA LCCC0 1448 BRA LCCC0
1362 LDB #$08 1449 LDB #$08
1363 BRA LCCC0 1450 BRA LCCC0
1364 LDB #$09 1451 LDB #$09
1365 BRA LCCC0 1452 BRA LCCC0
1366 LDB #$0A 1453 LDB #$0A
1367 BRA LCCC0 1454 BRA LCCC0
1368 LDB #$0B 1455 LDB #$0B
1369 BRA LCCC0 1456 BRA LCCC0
1370 LDB #$0C 1457 LDB #$0C
1371 BRA LCCC0 1458 BRA LCCC0
1372 LDB #$0D 1459 LDB #$0D
1373 BRA LCCC0 1460 BRA LCCC0
1374 LDB #$0E 1461 LDB #$0E
1375 BRA LCCC0 1462 BRA LCCC0
1376 LDB #$0F 1463 LDB #$0F
1377 BRA LCCC0 1464 BRA LCCC0
1378 LCCC0 STS LDF82 1465 LCCC0 STS LDF82
1379 LDS #LDF80 1466 LDS #LDF80
1380 CMPB #$09 1467 CMPB #$09
1381 BLE LCCDB 1468 BLE LCCDB
1382 BSR LCD01 1469 BSR LCD01
1383 PSHS B 1470 PSHS B
1384 LDB #$01 1471 LDB #$01
1385 BSR LCCF7 1472 BSR LCCF7
1386 PULS B 1473 PULS B
1387 BSR LCCF7 1474 BSR LCCF7
1388 BRA LCCDF 1475 BRA LCCDF
1389 RTI 1476 RTI
1390 1477
1391 LCCDB BSR LCD01 1478 LCCDB BSR LCD01
1392 BSR LCCF7 1479 BSR LCCF7
1393 LCCDF BSR LCD14 1480 LCCDF BSR LCD14
1394 LDS LDF82 1481 LDS LDF82
1395 LDA #$01 1482 LDA #$01
1396 STA LFF49 1483 STA LFF49
1397 RTI 1484 RTI
1398 1485
1399 LDA LD7FE 1486 LDA LD7FE
1400 STB LD7FE 1487 STB LD7FE
1401 LCCF1 LDA LD7FF 1488 LCCF1 LDA LD7FF
1402 BPL LCCF1 1489 BPL LCCF1
1403 RTS 1490 RTS
1404 1491
1405 LCCF7 CMPB #$0A 1492 LCCF7 CMPB #$0A
1406 BCS LCCFD 1493 BCS LCCFD
1407 SUBB #$0A 1494 SUBB #$0A
1408 LCCFD ADDB #$30 1495 LCCFD ADDB #$30
1409 BRA LCD01 1496 BRA LCD01