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