335
|
1 ********************************************************************
|
1350
|
2 * config - Config utility
|
335
|
3 *
|
|
4 * $Id$
|
|
5 *
|
1350
|
6 * Edt/Rev YYYY/MM/DD Modified by
|
|
7 * Comment
|
335
|
8 * ------------------------------------------------------------------
|
1350
|
9 * ????/??/?? ???
|
|
10 * Original Tandy distribution version.
|
335
|
11
|
|
12 nam config
|
1350
|
13 ttl Config utility
|
335
|
14
|
|
15 * Disassembled 02/07/06 13:07:34 by Disasm v1.6 (C) 1988 by RML
|
|
16
|
|
17 ifp1
|
|
18 use defsfile
|
|
19 endc
|
1350
|
20
|
335
|
21 tylg set Prgrm+Objct
|
|
22 atrv set ReEnt+rev
|
|
23 rev set $01
|
1350
|
24
|
335
|
25 mod eom,name,tylg,atrv,start,size
|
1350
|
26
|
335
|
27 u0000 rmb 1
|
|
28 u0001 rmb 1
|
|
29 u0002 rmb 1
|
|
30 u0003 rmb 1
|
|
31 u0004 rmb 1
|
|
32 u0005 rmb 1
|
|
33 u0006 rmb 1
|
|
34 u0007 rmb 1
|
|
35 u0008 rmb 1
|
|
36 u0009 rmb 1
|
|
37 u000A rmb 1
|
|
38 u000B rmb 2
|
|
39 u000D rmb 2
|
|
40 u000F rmb 2
|
|
41 u0011 rmb 2
|
|
42 u0013 rmb 2
|
|
43 u0015 rmb 2
|
|
44 u0017 rmb 2
|
|
45 u0019 rmb 2
|
|
46 u001B rmb 2
|
|
47 u001D rmb 2
|
|
48 u001F rmb 1
|
|
49 u0020 rmb 1
|
|
50 u0021 rmb 1
|
|
51 u0022 rmb 1
|
|
52 u0023 rmb 2
|
|
53 u0025 rmb 2
|
|
54 u0027 rmb 2
|
|
55 u0029 rmb 2
|
|
56 u002B rmb 2
|
|
57 u002D rmb 1
|
|
58 u002E rmb 1
|
|
59 u002F rmb 2
|
|
60 u0031 rmb 1
|
|
61 u0032 rmb 1
|
|
62 u0033 rmb 1
|
|
63 u0034 rmb 1
|
|
64 u0035 rmb 1
|
|
65 u0036 rmb 1
|
|
66 u0037 rmb 10
|
|
67 u0041 rmb 1
|
|
68 u0042 rmb 1
|
|
69 u0043 rmb 1
|
|
70 u0044 rmb 3
|
|
71 u0047 rmb 1
|
|
72 u0048 rmb 5
|
|
73 u004D rmb 2
|
|
74 u004F rmb 1
|
|
75 u0050 rmb 3
|
|
76 u0053 rmb 1
|
|
77 u0054 rmb 1
|
|
78 u0055 rmb 1
|
|
79 u0056 rmb 1
|
|
80 u0057 rmb 4
|
|
81 u005B rmb 8
|
|
82 u0063 rmb 1
|
|
83 u0064 rmb 8
|
|
84 u006C rmb 3
|
|
85 u006F rmb 3
|
|
86 u0072 rmb 2
|
|
87 u0074 rmb 2
|
|
88 u0076 rmb 2
|
|
89 u0078 rmb 1
|
|
90 u0079 rmb 2
|
|
91 u007B rmb 2
|
|
92 u007D rmb 107
|
|
93 u00E8 rmb 21
|
|
94 u00FD rmb 688
|
|
95 u03AD rmb 3154
|
|
96 size equ .
|
|
97 name equ *
|
|
98 fcs /config/
|
|
99 fcb $04
|
|
100 L0014 fcb $A6 &
|
|
101 fcb $A0
|
|
102 fcb $A7 '
|
|
103 fcb $C0 @
|
|
104 fcb $30 0
|
|
105 fcb $1F
|
|
106 fcb $26 &
|
|
107 fcb $F8 x
|
|
108 fcb $39 9
|
|
109 start equ *
|
|
110 pshs y
|
|
111 pshs u
|
|
112 clra
|
|
113 clrb
|
|
114 L0023 sta ,u+
|
|
115 decb
|
|
116 bne L0023
|
|
117 ldx ,s
|
|
118 leau ,x
|
|
119 leax >$0C7F,x
|
|
120 pshs x
|
|
121 leay >L2E15,pcr
|
|
122 ldx ,y++
|
|
123 beq L003E
|
|
124 bsr L0014
|
|
125 ldu $02,s
|
|
126 L003E leau >u007D,u
|
|
127 ldx ,y++
|
|
128 beq L0049
|
|
129 bsr L0014
|
|
130 clra
|
|
131 L0049 cmpu ,s
|
|
132 beq L0052
|
|
133 sta ,u+
|
|
134 bra L0049
|
|
135 L0052 ldu $02,s
|
|
136 ldd ,y++
|
|
137 beq L005F
|
|
138 leax >L0000,pcr
|
|
139 lbsr L0151
|
|
140 L005F ldd ,y++
|
|
141 beq L0068
|
|
142 leax ,u
|
|
143 lbsr L0151
|
|
144 L0068 leas $04,s
|
|
145 puls x
|
|
146 stx >u03AD,u
|
|
147 pshs y
|
|
148 ldy #$0001
|
|
149 leax $02,s
|
|
150 L0078 lda ,x+
|
|
151 cmpa #$0D
|
|
152 beq L00BC
|
|
153 cmpa #$20
|
|
154 beq L0078
|
|
155 cmpa #$2C
|
|
156 beq L0078
|
|
157 cmpa #$22
|
|
158 beq L00A6
|
|
159 cmpa #$27
|
|
160 beq L00A6
|
|
161 leax -$01,x
|
|
162 pshs x
|
|
163 leay $01,y
|
|
164 L0094 lda ,x+
|
|
165 beq L00B6
|
|
166 cmpa #$0D
|
|
167 beq L00B6
|
|
168 cmpa #$20
|
|
169 beq L00B6
|
|
170 cmpa #$2C
|
|
171 beq L00B6
|
|
172 bra L0094
|
|
173 L00A6 pshs x,a
|
|
174 leay $01,y
|
|
175 L00AA lda ,x+
|
|
176 cmpa #$0D
|
|
177 beq L00B4
|
|
178 cmpa ,s
|
|
179 bne L00AA
|
|
180 L00B4 puls b
|
|
181 L00B6 clr -$01,x
|
|
182 cmpa #$0D
|
|
183 bne L0078
|
|
184 L00BC tfr y,d
|
|
185 leax ,s
|
|
186 pshs x,b,a
|
|
187 lslb
|
|
188 rola
|
|
189 leay d,x
|
|
190 pshs u
|
|
191 bra L00D2
|
|
192 L00CA ldd ,x
|
|
193 ldu ,y
|
|
194 std ,y
|
|
195 stu ,x++
|
|
196 L00D2 leay -$02,y
|
|
197 pshs y
|
|
198 cmpx ,s++
|
|
199 bcs L00CA
|
|
200 puls y
|
|
201 bsr L00E8
|
|
202 puls b,a
|
|
203 lbsr L018E
|
|
204 clra
|
|
205 clrb
|
|
206 lbsr L2CDA
|
|
207 L00E8 leax >$0C7F,y
|
|
208 stx >$03B7,y
|
|
209 sts >$03AB,y
|
|
210 sts >$03B9,y
|
|
211 ldd #$FF82
|
|
212 L00FD leax d,s
|
|
213 cmpx >$03B9,y
|
|
214 bcc L010F
|
|
215 cmpx >$03B7,y
|
|
216 bcs L0129
|
|
217 stx >$03B9,y
|
|
218 L010F rts
|
|
219 L0110 bpl L013C
|
|
220 bpl L013E
|
|
221 bra L0169
|
|
222 lsrb
|
|
223 fcb $41 A
|
|
224 coma
|
|
225 fcb $4B K
|
|
226 bra L016B
|
|
227 rorb
|
|
228 fcb $45 E
|
|
229 fcb $52 R
|
|
230 rora
|
|
231 inca
|
|
232 clra
|
|
233 asrb
|
|
234 bra L014F
|
|
235 bpl L0151
|
|
236 bpl L0136
|
|
237 L0129 leax <L0110,pcr
|
|
238 ldb #$CF
|
|
239 pshs b
|
|
240 lda #$02
|
|
241 ldy #$0064
|
|
242 L0136 os9 I$WritLn
|
|
243 clra
|
|
244 puls b
|
|
245 L013C lbsr L2CE4
|
|
246 ldd >$03AB,y
|
|
247 subd >$03B9,y
|
|
248 rts
|
|
249 ldd >$03B9,y
|
|
250 subd >$03B7,y
|
|
251 rts
|
|
252 L0151 pshs x
|
|
253 leax d,y
|
|
254 leax d,x
|
|
255 pshs x
|
|
256 L0159 ldd ,y++
|
|
257 leax d,u
|
|
258 ldd ,x
|
|
259 addd $02,s
|
|
260 std ,x
|
|
261 cmpy ,s
|
|
262 bne L0159
|
|
263 leas $04,s
|
|
264 rts
|
|
265 L016B pshs u,b,a
|
|
266 ldd #$FFBA
|
|
267 lbsr L00FD
|
|
268 ldd ,s
|
|
269 cmpd #$0002
|
|
270 lbne L03B9
|
|
271 lbsr L11B1
|
|
272 lbsr L0269
|
|
273 lbsr L19D4
|
|
274 ldd ,s
|
|
275 lbsr L2CDA
|
|
276 lbra L03B9
|
|
277 L018E pshs u
|
|
278 ldd #$FFBC
|
|
279 lbsr L00FD
|
|
280 bsr L01CC
|
|
281 leax >$007D,y
|
|
282 tfr x,d
|
|
283 lbsr L2B41
|
|
284 lbsr L0984
|
|
285 lbsr L08AA
|
|
286 lbsr L0409
|
|
287 lbsr L04B0
|
|
288 lbsr L17BD
|
|
289 lbsr L1AA1
|
|
290 leax >$00A2,y
|
|
291 tfr x,d
|
|
292 lbsr L2B41
|
|
293 lbsr L1BD9
|
|
294 lbsr L11B1
|
|
295 lbsr L0269
|
|
296 clra
|
|
297 clrb
|
|
298 lbsr L2CDA
|
|
299 puls pc,u
|
|
300 L01CC pshs u
|
|
301 ldd #$FFB4
|
|
302 lbsr L00FD
|
|
303 leas -$04,s
|
|
304 leax >$03DF,y
|
|
305 stx $02,s
|
|
306 leax >$03BD,y
|
|
307 pshs x
|
|
308 clra
|
|
309 clrb
|
|
310 pshs b,a
|
|
311 lbsr L2C6E
|
|
312 leas $04,s
|
|
313 ldd $02,s
|
|
314 pshs b,a
|
|
315 clra
|
|
316 clrb
|
|
317 pshs b,a
|
|
318 lbsr L2C6E
|
|
319 leas $04,s
|
|
320 clra
|
|
321 clrb
|
|
322 ldx $02,s
|
|
323 stb $05,x
|
|
324 stb $04,x
|
|
325 pshs x,b,a
|
|
326 lbsr L2CA8
|
|
327 leas $04,s
|
|
328 leax >L016B,pcr
|
|
329 tfr x,d
|
|
330 lbsr L2C46
|
|
331 bsr L0255
|
|
332 std ,s
|
|
333 ldx ,s
|
|
334 bra L022D
|
|
335 L0218 ldd #$0018
|
|
336 std <u002F
|
|
337 ldd #$0012
|
|
338 bra L0229
|
|
339 L0222 clra
|
|
340 clrb
|
|
341 std <u002F
|
|
342 ldd #$000A
|
|
343 L0229 std <u0031
|
|
344 bra L023A
|
|
345 L022D cmpx #$0050
|
|
346 beq L0218
|
|
347 cmpx #$0020
|
|
348 beq L0222
|
|
349 lbra L0222
|
|
350 L023A lbsr L11B1
|
|
351 clra
|
|
352 clrb
|
|
353 lbsr L118F
|
|
354 lbsr L0E40
|
|
355 bsr L027C
|
|
356 lbsr L11B1
|
|
357 ldd #$0005
|
|
358 std <u0027
|
|
359 lbsr L0EBF
|
|
360 lbra L0398
|
|
361 L0255 pshs y
|
|
362 lda #$01
|
|
363 ldb #$26
|
|
364 os9 I$GetStt
|
|
365 bcc L0265
|
|
366 ldd #$0020
|
|
367 bra L0267
|
|
368 L0265 tfr x,d
|
|
369 L0267 puls pc,y
|
|
370 L0269 pshs u
|
|
371 ldd #$FFBC
|
|
372 lbsr L00FD
|
|
373 lbsr L0375
|
|
374 ldd #$0001
|
|
375 lbsr L118F
|
|
376 puls pc,u
|
|
377 L027C pshs u
|
|
378 ldd #$FFB8
|
|
379 lbsr L00FD
|
|
380 lbsr L109A
|
|
381 L0287 lbsr L1437
|
|
382 sex
|
|
383 tfr d,x
|
|
384 bra L029F
|
|
385 L028F ldd #$0001
|
|
386 bra L0296
|
|
387 L0294 clra
|
|
388 clrb
|
|
389 L0296 std <u002D
|
|
390 bra L02AB
|
|
391 L029A lbsr L121F
|
|
392 bra L0287
|
|
393 L029F cmpx #$0031
|
|
394 beq L028F
|
|
395 cmpx #$0032
|
|
396 beq L0294
|
|
397 bra L029A
|
|
398 L02AB lbsr L0375
|
|
399 ldd #$000D
|
|
400 pshs b,a
|
|
401 clra
|
|
402 clrb
|
|
403 lbsr L1139
|
|
404 leas $02,s
|
|
405 ldd <u002D
|
|
406 beq L0303
|
|
407 leax >L03BD,pcr
|
|
408 tfr x,d
|
|
409 lbsr L140D
|
|
410 ldd #$000C
|
|
411 pshs b,a
|
|
412 leax >$0401,y
|
|
413 pshs x
|
|
414 clra
|
|
415 clrb
|
|
416 lbsr L2A9B
|
|
417 leas $04,s
|
|
418 leax >$0401,y
|
|
419 tfr x,d
|
|
420 lbsr L2889
|
|
421 addd #$FFFF
|
|
422 leax >$0401,y
|
|
423 leax d,x
|
|
424 clra
|
|
425 clrb
|
|
426 stb ,x
|
|
427 leax >$0401,y
|
|
428 pshs x
|
|
429 leax >$040D,y
|
|
430 tfr x,d
|
|
431 lbsr L1FE5
|
|
432 leas $02,s
|
|
433 lbra L0371
|
|
434 L0303 leax >L03D2,pcr
|
|
435 tfr x,d
|
|
436 lbsr L140D
|
|
437 ldd #$000C
|
|
438 pshs b,a
|
|
439 leax >$0401,y
|
|
440 pshs x
|
|
441 clra
|
|
442 clrb
|
|
443 lbsr L2A9B
|
|
444 leas $04,s
|
|
445 ldd #$000E
|
|
446 pshs b,a
|
|
447 clra
|
|
448 clrb
|
|
449 lbsr L1139
|
|
450 leas $02,s
|
|
451 leax >L03EE,pcr
|
|
452 tfr x,d
|
|
453 lbsr L140D
|
|
454 ldd #$000C
|
|
455 pshs b,a
|
|
456 leax >$040D,y
|
|
457 pshs x
|
|
458 clra
|
|
459 clrb
|
|
460 lbsr L2A9B
|
|
461 leas $04,s
|
|
462 leax >$0401,y
|
|
463 tfr x,d
|
|
464 lbsr L2889
|
|
465 addd #$FFFF
|
|
466 leax >$0401,y
|
|
467 leax d,x
|
|
468 clra
|
|
469 clrb
|
|
470 stb ,x
|
|
471 leax >$040D,y
|
|
472 tfr x,d
|
|
473 lbsr L2889
|
|
474 addd #$FFFF
|
|
475 leax >$040D,y
|
|
476 leax d,x
|
|
477 clra
|
|
478 clrb
|
|
479 stb ,x
|
|
480 L0371 bsr L0383
|
|
481 puls pc,u
|
|
482 L0375 pshs u
|
|
483 ldd #$FFB8
|
|
484 lbsr L00FD
|
|
485 leax >$03BD,y
|
|
486 bra L038F
|
|
487 L0383 pshs u
|
|
488 ldd #$FFB8
|
|
489 lbsr L00FD
|
|
490 leax >$03DF,y
|
|
491 L038F pshs x
|
|
492 clra
|
|
493 clrb
|
|
494 pshs b,a
|
|
495 lbsr L2CA8
|
|
496 L0398 leas $04,s
|
|
497 puls pc,u
|
|
498 L039C pshs u,b,a
|
|
499 ldd #$FFBA
|
|
500 lbsr L00FD
|
|
501 ldx ,s
|
|
502 ldb $01,x
|
|
503 sex
|
|
504 lbsr L277D
|
|
505 cmpd #$0048
|
|
506 bne L03B7
|
|
507 ldd #$0001
|
|
508 bra L03B9
|
|
509 L03B7 clra
|
|
510 clrb
|
|
511 L03B9 leas $02,s
|
|
512 puls pc,u
|
|
513 L03BD fcb $45 E
|
|
514 fcb $4E N
|
|
515 lsrb
|
|
516 fcb $45 E
|
|
517 fcb $52 R
|
|
518 bra L0412
|
|
519 fcb $41 A
|
|
520 tsta
|
|
521 fcb $45 E
|
|
522 bra L0418
|
|
523 rora
|
|
524 bra L0410
|
|
525 rola
|
|
526 comb
|
|
527 fcb $4B K
|
|
528 abx
|
|
529 bra L03D2
|
|
530 L03D2 fcb $45 E
|
|
531 fcb $4E N
|
|
532 lsrb
|
|
533 fcb $45 E
|
|
534 fcb $52 R
|
|
535 bra L0427
|
|
536 fcb $41 A
|
|
537 tsta
|
|
538 fcb $45 E
|
|
539 bra L042D
|
|
540 rora
|
|
541 bra L0434
|
|
542 clra
|
|
543 fcb $55 U
|
|
544 fcb $52 R
|
|
545 coma
|
|
546 fcb $45 E
|
|
547 bra L042C
|
|
548 rola
|
|
549 comb
|
|
550 fcb $4B K
|
|
551 abx
|
|
552 bra L03EE
|
|
553 L03EE fcb $45 E
|
|
554 fcb $4E N
|
|
555 lsrb
|
|
556 fcb $45 E
|
|
557 fcb $52 R
|
|
558 bra L0443
|
|
559 fcb $41 A
|
|
560 tsta
|
|
561 fcb $45 E
|
|
562 bra L0449
|
|
563 rora
|
|
564 bra L0441
|
|
565 fcb $45 E
|
|
566 comb
|
|
567 lsrb
|
|
568 bgt L0422
|
|
569 lsra
|
|
570 rola
|
|
571 comb
|
|
572 fcb $4B K
|
|
573 abx
|
|
574 bra L0409
|
|
575 L0409 pshs u
|
|
576 ldd #$FFBC
|
|
577 lbsr L00FD
|
|
578 lbsr L11B1
|
|
579 lbsr L0E92
|
|
580 clra
|
|
581 L0418 clrb
|
|
582 std <u0074
|
|
583 bra L0444
|
|
584 L041D lbsr L1437
|
|
585 sex
|
|
586 tfr d,x
|
|
587 bra L0450
|
|
588 L0425 lbsr L0781
|
|
589 bra L041D
|
|
590 L042A lbsr L083A
|
|
591 L042D lbra L041D
|
|
592 L0430 lbsr L07F8
|
|
593 lbra L041D
|
|
594 L0436 lbsr L0817
|
|
595 lbra L041D
|
|
596 L043C ldd #$FFFF
|
|
597 bra L0444
|
|
598 L0441 ldd #$0001
|
|
599 L0444 lbsr L066D
|
|
600 lbra L041D
|
|
601 L044A lbsr L121F
|
|
602 lbra L041D
|
|
603 L0450 cmpx #$000D
|
|
604 beq L0425
|
|
605 cmpx #$0073
|
|
606 lbeq L0425
|
|
607 cmpx #$0053
|
|
608 lbeq L0425
|
|
609 cmpx #$0068
|
|
610 beq L042A
|
|
611 cmpx #$0048
|
|
612 lbeq L042A
|
|
613 cmpx #$000C
|
|
614 beq L0430
|
|
615 cmpx #$000A
|
|
616 beq L0436
|
|
617 cmpx #$0064
|
|
618 beq L048F
|
|
619 cmpx #$0044
|
|
620 beq L048F
|
|
621 cmpx #$0008
|
|
622 beq L043C
|
|
623 cmpx #$0009
|
|
624 beq L0441
|
|
625 bra L044A
|
|
626 L048F lbsr L11E8
|
|
627 ldd <u0074
|
|
628 addd <u0031
|
|
629 cmpd <u001D
|
|
630 bge L049E
|
|
631 lbsr L05FE
|
|
632 L049E lbsr L061D
|
|
633 std -$02,s
|
|
634 bne L04AE
|
|
635 lbsr L11E8
|
|
636 lbsr L0E92
|
|
637 lbra L041D
|
|
638 L04AE puls pc,u
|
|
639 L04B0 pshs u
|
|
640 ldd #$FFB4
|
|
641 lbsr L00FD
|
|
642 leas -$04,s
|
|
643 L04BA lbsr L1065
|
|
644 lbsr L1437
|
|
645 sex
|
|
646 tfr d,x
|
|
647 bra L051C
|
|
648 L04C5 ldd #$0001
|
|
649 std <u0033
|
|
650 leax >L0915,pcr
|
|
651 stx ,s
|
|
652 tfr x,d
|
|
653 lbsr L05CC
|
|
654 std -$02,s
|
|
655 bne L0534
|
|
656 leax >L0919,pcr
|
|
657 bra L0503
|
|
658 L04DF clra
|
|
659 clrb
|
|
660 std <u0033
|
|
661 leax >L092A,pcr
|
|
662 stx ,s
|
|
663 tfr x,d
|
|
664 lbsr L05CC
|
|
665 std -$02,s
|
|
666 bne L0534
|
|
667 leax >L092E,pcr
|
|
668 tfr x,d
|
|
669 lbsr L05CC
|
|
670 std -$02,s
|
|
671 bne L0534
|
|
672 leax >L0932,pcr
|
|
673 L0503 tfr x,d
|
|
674 lbsr L1473
|
|
675 bra L04BA
|
|
676 L050A leax >L094F,pcr
|
|
677 tfr x,d
|
|
678 lbsr L1CFB
|
|
679 lbra L04BA
|
|
680 L0516 lbsr L121F
|
|
681 lbra L04BA
|
|
682 L051C cmpx #$0031
|
|
683 beq L04C5
|
|
684 cmpx #$0032
|
|
685 beq L04DF
|
|
686 cmpx #$0068
|
|
687 beq L050A
|
|
688 cmpx #$0048
|
|
689 lbeq L050A
|
|
690 bra L0516
|
|
691 L0534 leax >L0957,pcr
|
|
692 pshs x
|
|
693 ldd <u0015
|
|
694 lbsr L08BE
|
|
695 leas $02,s
|
|
696 leax >L0959,pcr
|
|
697 pshs x
|
|
698 ldd <u0015
|
|
699 lbsr L08BE
|
|
700 leas $02,s
|
|
701 ldd <u001D
|
|
702 std $02,s
|
|
703 ldd <u0021
|
|
704 std <u001D
|
|
705 ldd #$0001
|
|
706 std <u0025
|
|
707 lbsr L0409
|
|
708 ldd $02,s
|
|
709 std <u001D
|
|
710 clra
|
|
711 clrb
|
|
712 std <u0025
|
|
713 ldu <u0017
|
|
714 bra L058F
|
|
715 L056A ldd ,s
|
|
716 pshs b,a
|
|
717 pshs u
|
|
718 ldd #$0002
|
|
719 addd ,s++
|
|
720 lbsr L0D34
|
|
721 std ,s++
|
|
722 beq L058C
|
|
723 ldd #$0001
|
|
724 std ,u
|
|
725 pshs b,a
|
|
726 tfr u,d
|
|
727 lbsr L07C8
|
|
728 leas $02,s
|
|
729 bra L0593
|
|
730 L058C ldu <u0023,u
|
|
731 L058F stu -$02,s
|
|
732 bne L056A
|
|
733 L0593 ldd <u0033
|
|
734 beq L05C3
|
|
735 lbsr L08F5
|
|
736 std -$02,s
|
|
737 beq L05C3
|
|
738 leax >L095C,pcr
|
|
739 tfr x,d
|
|
740 bsr L05CC
|
|
741 std -$02,s
|
|
742 bne L05BF
|
|
743 leax >L0960,pcr
|
|
744 tfr x,d
|
|
745 bsr L05CC
|
|
746 std -$02,s
|
|
747 bne L05BF
|
|
748 leax >L0964,pcr
|
|
749 tfr x,d
|
|
750 lbsr L1473
|
|
751 L05BF clra
|
|
752 clrb
|
|
753 std <u0033
|
|
754 L05C3 lbsr L11B1
|
|
755 lbsr L0EDE
|
|
756 lbra L076C
|
|
757 L05CC pshs u,b,a
|
|
758 ldd #$FFB6
|
|
759 lbsr L00FD
|
|
760 ldu <u000F
|
|
761 bra L05F5
|
|
762 L05D8 ldd ,s
|
|
763 pshs b,a
|
|
764 pshs u
|
|
765 ldd #$0002
|
|
766 addd ,s++
|
|
767 lbsr L0D34
|
|
768 std ,s++
|
|
769 beq L05F2
|
|
770 ldd #$0001
|
|
771 std ,u
|
|
772 lbra L08E8
|
|
773 L05F2 ldu <u0023,u
|
|
774 L05F5 stu -$02,s
|
|
775 bne L05D8
|
|
776 clra
|
|
777 clrb
|
|
778 lbra L08E8
|
|
779 L05FE pshs u
|
|
780 ldd #$FFBA
|
|
781 lbsr L00FD
|
|
782 clra
|
|
783 clrb
|
|
784 pshs b,a
|
|
785 ldd #$0006
|
|
786 lbsr L1139
|
|
787 leas $02,s
|
|
788 leax >$00A5,y
|
|
789 tfr x,d
|
|
790 lbsr L140D
|
|
791 puls pc,u
|
|
792 L061D pshs u
|
|
793 ldd #$FFBA
|
|
794 lbsr L00FD
|
|
795 ldd #$0001
|
|
796 pshs b,a
|
|
797 ldd #$0006
|
|
798 lbsr L1139
|
|
799 leas $02,s
|
|
800 leax >$00BA,y
|
|
801 tfr x,d
|
|
802 lbsr L140D
|
|
803 L063B lbsr L1437
|
|
804 sex
|
|
805 tfr d,x
|
|
806 bra L0651
|
|
807 L0643 ldd #$0001
|
|
808 puls pc,u
|
|
809 L0648 clra
|
|
810 clrb
|
|
811 puls pc,u
|
|
812 L064C lbsr L121F
|
|
813 bra L063B
|
|
814 L0651 cmpx #$0059
|
|
815 beq L0643
|
|
816 cmpx #$0079
|
|
817 lbeq L0643
|
|
818 cmpx #$004E
|
|
819 beq L0648
|
|
820 cmpx #$006E
|
|
821 lbeq L0648
|
|
822 bra L064C
|
|
823 puls pc,u
|
|
824 L066D pshs u,b,a
|
|
825 ldd #$FFB8
|
|
826 lbsr L00FD
|
|
827 leas -$02,s
|
|
828 ldd $02,s
|
|
829 cmpd #$FFFF
|
|
830 bne L0689
|
|
831 ldd <u0074
|
|
832 beq L0698
|
|
833 ldd <u0074
|
|
834 subd <u0031
|
|
835 bra L06A2
|
|
836 L0689 cmpd #$0001
|
|
837 bne L06A4
|
|
838 ldd <u0074
|
|
839 addd <u0031
|
|
840 cmpd <u001D
|
|
841 blt L069E
|
|
842 L0698 lbsr L121F
|
|
843 lbra L076C
|
|
844 L069E ldd <u0074
|
|
845 addd <u0031
|
|
846 L06A2 std <u0074
|
|
847 L06A4 ldd <u0029
|
|
848 beq L06AC
|
|
849 ldu <u001B
|
|
850 bra L06B6
|
|
851 L06AC ldd <u0025
|
|
852 beq L06B4
|
|
853 ldu <u0015
|
|
854 bra L06B6
|
|
855 L06B4 ldu <u000D
|
|
856 L06B6 clra
|
|
857 clrb
|
|
858 bra L06C2
|
|
859 L06BA ldu <u0023,u
|
|
860 ldd ,s
|
|
861 addd #$0001
|
|
862 L06C2 std ,s
|
|
863 ldd ,s
|
|
864 cmpd <u0074
|
|
865 blt L06BA
|
|
866 stu <u0076
|
|
867 bsr L06D2
|
|
868 lbra L076C
|
|
869 L06D2 pshs u
|
|
870 ldd #$FFB8
|
|
871 lbsr L00FD
|
|
872 leas -$02,s
|
|
873 lbsr L11BE
|
|
874 ldu <u0076
|
|
875 ldd #$0005
|
|
876 std <u0027
|
|
877 ldd <u0027
|
|
878 addd <u0031
|
|
879 std ,s
|
|
880 bra L0728
|
|
881 L06EE ldd <u0027
|
|
882 pshs b,a
|
|
883 ldd #$0008
|
|
884 lbsr L1139
|
|
885 leas $02,s
|
|
886 ldd <u0029
|
|
887 beq L0707
|
|
888 pshs u
|
|
889 ldd #$0002
|
|
890 addd ,s++
|
|
891 bra L0711
|
|
892 L0707 tfr u,d
|
|
893 bsr L0745
|
|
894 leax >$0055,y
|
|
895 tfr x,d
|
|
896 L0711 lbsr L140D
|
|
897 ldd ,u
|
|
898 beq L071E
|
|
899 ldd #$0001
|
|
900 lbsr L115B
|
|
901 L071E ldu <u0023,u
|
|
902 ldd <u0027
|
|
903 addd #$0001
|
|
904 std <u0027
|
|
905 L0728 stu -$02,s
|
|
906 beq L0733
|
|
907 ldd <u0027
|
|
908 cmpd ,s
|
|
909 blt L06EE
|
|
910 L0733 ldd <u0027
|
|
911 addd #$FFFF
|
|
912 std <u0072
|
|
913 ldd #$0005
|
|
914 std <u0027
|
|
915 lbsr L1240
|
|
916 lbra L08E8
|
|
917 L0745 pshs u,b,a
|
|
918 ldd #$FFBC
|
|
919 lbsr L00FD
|
|
920 leas -$02,s
|
|
921 leau >$0055,y
|
|
922 ldd $02,s
|
|
923 addd #$0002
|
|
924 std ,s
|
|
925 L075A ldx ,s
|
|
926 leax $01,x
|
|
927 stx ,s
|
|
928 ldb -$01,x
|
|
929 stb ,u+
|
|
930 cmpb #$2E
|
|
931 bne L075A
|
|
932 clra
|
|
933 clrb
|
|
934 stb -u0001,u
|
|
935 L076C leas $04,s
|
|
936 puls pc,u
|
|
937 L0770 pshs u
|
|
938 ldd #$FFC0
|
|
939 lbsr L00FD
|
|
940 ldd <u0027
|
|
941 addd #$FFFC
|
|
942 addd <u0074
|
|
943 puls pc,u
|
|
944 L0781 pshs u
|
|
945 ldd #$FFB8
|
|
946 lbsr L00FD
|
|
947 leas -$02,s
|
|
948 bsr L0770
|
|
949 std ,s
|
|
950 ldu <u0076
|
|
951 bra L07C1
|
|
952 L0793 ldd ,s
|
|
953 cmpd <u001F,u
|
|
954 bne L07BE
|
|
955 ldd ,u
|
|
956 bne L07A4
|
|
957 ldd #$0001
|
|
958 bra L07A6
|
|
959 L07A4 clra
|
|
960 clrb
|
|
961 L07A6 std ,u
|
|
962 ldd <u0029
|
|
963 bne L07B6
|
|
964 ldd ,u
|
|
965 pshs b,a
|
|
966 tfr u,d
|
|
967 bsr L07C8
|
|
968 leas $02,s
|
|
969 L07B6 ldd ,u
|
|
970 lbsr L115B
|
|
971 lbra L08E8
|
|
972 L07BE ldu <u0023,u
|
|
973 L07C1 stu -$02,s
|
|
974 bne L0793
|
|
975 lbra L08A5
|
|
976 L07C8 pshs u
|
|
977 tfr d,u
|
|
978 ldd #$FFBE
|
|
979 lbsr L00FD
|
|
980 leas -$02,s
|
|
981 ldd $06,s
|
|
982 beq L07DD
|
|
983 ldd #$0001
|
|
984 bra L07E0
|
|
985 L07DD ldd #$FFFF
|
|
986 L07E0 std ,s
|
|
987 ldd [<u0021,u]
|
|
988 addd ,s
|
|
989 std [<u0021,u]
|
|
990 ldx <u0021,u
|
|
991 ldd [<$21,x]
|
|
992 addd ,s
|
|
993 std [<$21,x]
|
|
994 lbra L08E8
|
|
995 L07F8 pshs u
|
|
996 ldd #$FFBC
|
|
997 lbsr L00FD
|
|
998 ldd <u0027
|
|
999 cmpd #$0005
|
|
1000 ble L0835
|
|
1001 lbsr L125A
|
|
1002 ldd <u0027
|
|
1003 addd #$FFFF
|
|
1004 std <u0027
|
|
1005 lbsr L1240
|
|
1006 bra L0838
|
|
1007 L0817 pshs u
|
|
1008 ldd #$FFBC
|
|
1009 lbsr L00FD
|
|
1010 ldd <u0027
|
|
1011 cmpd <u0072
|
|
1012 bge L0835
|
|
1013 lbsr L125A
|
|
1014 ldd <u0027
|
|
1015 addd #$0001
|
|
1016 std <u0027
|
|
1017 lbsr L1240
|
|
1018 bra L0838
|
|
1019 L0835 lbsr L121F
|
|
1020 L0838 puls pc,u
|
|
1021 L083A pshs u
|
|
1022 ldd #$FFB6
|
|
1023 lbsr L00FD
|
|
1024 leas -$02,s
|
|
1025 lbsr L0770
|
|
1026 std ,s
|
|
1027 ldd <u0029
|
|
1028 beq L0851
|
|
1029 ldu <u001B
|
|
1030 bra L08A1
|
|
1031 L0851 ldu <u0076
|
|
1032 bra L08A1
|
|
1033 L0855 ldd ,s
|
|
1034 cmpd <u001F,u
|
|
1035 bne L089E
|
|
1036 tfr u,d
|
|
1037 lbsr L0745
|
|
1038 ldd <u0029
|
|
1039 beq L0882
|
|
1040 leax >$0055,y
|
|
1041 pshs x
|
|
1042 leax >$0085,y
|
|
1043 tfr x,d
|
|
1044 lbsr L1B65
|
|
1045 leas $02,s
|
|
1046 clra
|
|
1047 clrb
|
|
1048 lbsr L2BEC
|
|
1049 lbsr L1506
|
|
1050 lbra L08E8
|
|
1051 L0882 clra
|
|
1052 clrb
|
|
1053 pshs b,a
|
|
1054 leax >$009E,y
|
|
1055 pshs x
|
|
1056 leax >$0055,y
|
|
1057 tfr x,d
|
|
1058 lbsr L28B4
|
|
1059 leas $02,s
|
|
1060 lbsr L1279
|
|
1061 leas $02,s
|
|
1062 bra L08E8
|
|
1063 L089E ldu <u0023,u
|
|
1064 L08A1 stu -$02,s
|
|
1065 bne L0855
|
|
1066 L08A5 lbsr L121F
|
|
1067 bra L08E8
|
|
1068 L08AA pshs u
|
|
1069 ldd #$FFBA
|
|
1070 lbsr L00FD
|
|
1071 leax >L0981,pcr
|
|
1072 pshs x
|
|
1073 ldd <u000D
|
|
1074 bsr L08BE
|
|
1075 bra L08E8
|
|
1076 L08BE pshs u
|
|
1077 tfr d,u
|
|
1078 ldd #$FFB8
|
|
1079 lbsr L00FD
|
|
1080 bra L08EF
|
|
1081 L08CA ldd $04,s
|
|
1082 pshs b,a
|
|
1083 pshs u
|
|
1084 ldd #$0002
|
|
1085 addd ,s++
|
|
1086 lbsr L0D34
|
|
1087 std ,s++
|
|
1088 beq L08EC
|
|
1089 ldd #$0001
|
|
1090 std ,u
|
|
1091 pshs b,a
|
|
1092 tfr u,d
|
|
1093 lbsr L07C8
|
|
1094 L08E8 leas $02,s
|
|
1095 puls pc,u
|
|
1096 L08EC ldu <u0023,u
|
|
1097 L08EF stu -$02,s
|
|
1098 bne L08CA
|
|
1099 puls pc,u
|
|
1100 L08F5 pshs u
|
|
1101 ldd #$FFC0
|
|
1102 lbsr L00FD
|
|
1103 ldu <u0015
|
|
1104 bra L090D
|
|
1105 L0901 ldd ,u
|
|
1106 beq L090A
|
|
1107 ldd #$0001
|
|
1108 puls pc,u
|
|
1109 L090A ldu <u0023,u
|
|
1110 L090D stu -$02,s
|
|
1111 bne L0901
|
|
1112 clra
|
|
1113 clrb
|
|
1114 puls pc,u
|
|
1115 L0915 rorb
|
|
1116 lsra
|
|
1117 asra
|
|
1118 neg <u0056
|
|
1119 lsra
|
|
1120 asra
|
|
1121 rola
|
|
1122 fcb $4E N
|
|
1123 lsrb
|
|
1124 bra L096F
|
|
1125 clra
|
|
1126 lsrb
|
|
1127 bra L096B
|
|
1128 clra
|
|
1129 fcb $55 U
|
|
1130 fcb $4E N
|
|
1131 lsra
|
|
1132 neg <u0057
|
|
1133 rola
|
|
1134 fcb $4E N
|
|
1135 neg <u0047
|
|
1136 fcb $52 R
|
|
1137 rora
|
|
1138 neg <u0057
|
|
1139 rola
|
|
1140 fcb $4E N
|
|
1141 lsra
|
|
1142 rola
|
|
1143 fcb $4E N
|
|
1144 lsrb
|
|
1145 bra L097C
|
|
1146 fcb $4E N
|
|
1147 lsra
|
|
1148 bra L0986
|
|
1149 fcb $52 R
|
|
1150 rora
|
|
1151 rola
|
|
1152 fcb $4E N
|
|
1153 lsrb
|
|
1154 bra L0994
|
|
1155 clra
|
|
1156 lsrb
|
|
1157 bra L0990
|
|
1158 clra
|
|
1159 fcb $55 U
|
|
1160 fcb $4E N
|
|
1161 lsra
|
|
1162 neg <u0074
|
|
1163 eim #$72,$0D,s
|
|
1164 bgt L09BD
|
|
1165 neg >$0057
|
|
1166 neg <u0057
|
|
1167 leay $00,x
|
|
1168 L095C asrb
|
|
1169 rola
|
|
1170 fcb $4E N
|
|
1171 neg <u0047
|
|
1172 fcb $52 R
|
|
1173 rora
|
|
1174 neg <u0057
|
|
1175 rola
|
|
1176 fcb $4E N
|
|
1177 lsra
|
|
1178 rola
|
|
1179 fcb $4E N
|
|
1180 lsrb
|
|
1181 L096B bra L09AE
|
|
1182 fcb $4E N
|
|
1183 lsra
|
|
1184 L096F bra L09B8
|
|
1185 fcb $52 R
|
|
1186 rora
|
|
1187 rola
|
|
1188 fcb $4E N
|
|
1189 lsrb
|
|
1190 bra L09C6
|
|
1191 clra
|
|
1192 lsrb
|
|
1193 bra L09C2
|
|
1194 L097C clra
|
|
1195 fcb $55 U
|
|
1196 fcb $4E N
|
|
1197 lsra
|
|
1198 neg <u0044
|
|
1199 leax $00,x
|
|
1200 L0984 pshs u
|
|
1201 L0986 ldd #$FFA8
|
|
1202 lbsr L00FD
|
|
1203 leas -$0E,s
|
|
1204 ldd #$0081
|
|
1205 pshs b,a
|
|
1206 leax >L0DF1,pcr
|
|
1207 tfr x,d
|
|
1208 lbsr L29FE
|
|
1209 leas $02,s
|
|
1210 std ,s
|
|
1211 cmpd #$FFFF
|
|
1212 bne L09AF
|
|
1213 leax >L0DF3,pcr
|
|
1214 tfr x,d
|
|
1215 lbsr L14BD
|
|
1216 L09AF clra
|
|
1217 clrb
|
|
1218 pshs b,a
|
|
1219 ldd #$0040
|
|
1220 pshs b,a
|
|
1221 L09B8 clra
|
|
1222 clrb
|
|
1223 pshs b,a
|
|
1224 ldd $06,s
|
|
1225 lbsr L2AD6
|
|
1226 leas $06,s
|
|
1227 leax >$000D,y
|
|
1228 stx $0C,s
|
|
1229 leax >$000F,y
|
|
1230 stx $0A,s
|
|
1231 leax >$0015,y
|
|
1232 stx $08,s
|
|
1233 leax >$0017,y
|
|
1234 stx $06,s
|
|
1235 lbra L0AD0
|
|
1236 L09DE leax >$0461,y
|
|
1237 stx $04,s
|
|
1238 ldd $02,s
|
|
1239 pshs b,a
|
|
1240 ldd #$0005
|
|
1241 lbsr L2DD7
|
|
1242 std $02,s
|
|
1243 lbra L0AC5
|
|
1244 L09F3 ldb [<$04,s]
|
|
1245 lbeq L0ABE
|
|
1246 ldd $04,s
|
|
1247 pshs b,a
|
|
1248 leax >$0055,y
|
|
1249 tfr x,d
|
|
1250 lbsr L29D2
|
|
1251 leas $02,s
|
|
1252 leax >$0055,y
|
|
1253 tfr x,d
|
|
1254 lbsr L0DD5
|
|
1255 leax >$0055,y
|
|
1256 tfr x,d
|
|
1257 lbsr L0CC7
|
|
1258 std -$02,s
|
|
1259 beq L0A41
|
|
1260 leax >$0055,y
|
|
1261 tfr x,d
|
|
1262 lbsr L0AF1
|
|
1263 tfr d,u
|
|
1264 tfr u,d
|
|
1265 std [<$0C,s]
|
|
1266 ldd <u001D
|
|
1267 addd #$0001
|
|
1268 std <u001D
|
|
1269 std <u001F,u
|
|
1270 leax <u0023,u
|
|
1271 stx $0C,s
|
|
1272 lbra L0ABE
|
|
1273 L0A41 leax >$0055,y
|
|
1274 tfr x,d
|
|
1275 lbsr L0CD7
|
|
1276 std -$02,s
|
|
1277 beq L0A65
|
|
1278 leax >$0055,y
|
|
1279 tfr x,d
|
|
1280 lbsr L0B49
|
|
1281 tfr d,u
|
|
1282 tfr u,d
|
|
1283 std [<$0A,s]
|
|
1284 leax <u0023,u
|
|
1285 stx $0A,s
|
|
1286 bra L0ABE
|
|
1287 L0A65 leax >$0055,y
|
|
1288 tfr x,d
|
|
1289 lbsr L0CE7
|
|
1290 std -$02,s
|
|
1291 beq L0A93
|
|
1292 leax >$0055,y
|
|
1293 tfr x,d
|
|
1294 lbsr L0AF1
|
|
1295 tfr d,u
|
|
1296 tfr u,d
|
|
1297 std [<$08,s]
|
|
1298 ldd <u0021
|
|
1299 addd #$0001
|
|
1300 std <u0021
|
|
1301 std <u001F,u
|
|
1302 leax <u0023,u
|
|
1303 stx $08,s
|
|
1304 bra L0ABE
|
|
1305 L0A93 leax >$0055,y
|
|
1306 tfr x,d
|
|
1307 lbsr L0CF7
|
|
1308 std -$02,s
|
|
1309 beq L0ABE
|
|
1310 leax >$0055,y
|
|
1311 tfr x,d
|
|
1312 bsr L0AF1
|
|
1313 tfr d,u
|
|
1314 tfr u,d
|
|
1315 std [<$06,s]
|
|
1316 ldd <u0023
|
|
1317 addd #$0001
|
|
1318 std <u0023
|
|
1319 std <u001F,u
|
|
1320 leax <u0023,u
|
|
1321 stx $06,s
|
|
1322 L0ABE ldd $04,s
|
|
1323 addd #$0020
|
|
1324 std $04,s
|
|
1325 L0AC5 ldd $02,s
|
|
1326 addd #$FFFF
|
|
1327 std $02,s
|
|
1328 lbge L09F3
|
|
1329 L0AD0 ldd #$0800
|
|
1330 pshs b,a
|
|
1331 leax >$0461,y
|
|
1332 pshs x
|
|
1333 ldd $04,s
|
|
1334 lbsr L2A85
|
|
1335 leas $04,s
|
|
1336 std $02,s
|
|
1337 lbgt L09DE
|
|
1338 ldd ,s
|
|
1339 lbsr L2A0B
|
|
1340 leas $0E,s
|
|
1341 puls pc,u
|
|
1342 L0AF1 pshs u,b,a
|
|
1343 ldd #$FFB6
|
|
1344 lbsr L00FD
|
|
1345 leas -$02,s
|
|
1346 clra
|
|
1347 clrb
|
|
1348 pshs b,a
|
|
1349 ldd $04,s
|
|
1350 lbsr L0C90
|
|
1351 leas $02,s
|
|
1352 tfr d,u
|
|
1353 ldd #$0001
|
|
1354 pshs b,a
|
|
1355 ldd $04,s
|
|
1356 lbsr L29FE
|
|
1357 leas $02,s
|
|
1358 std ,s
|
|
1359 cmpd #$FFFF
|
|
1360 beq L0B35
|
|
1361 ldd ,s
|
|
1362 bsr L0B6B
|
|
1363 std <u0021,u
|
|
1364 ldd ,s
|
|
1365 lbsr L0BD2
|
|
1366 ldx <u0021,u
|
|
1367 std <$21,x
|
|
1368 ldd ,s
|
|
1369 lbsr L2A0B
|
|
1370 bra L0B44
|
|
1371 L0B35 leax >L0E0F,pcr
|
|
1372 tfr x,d
|
|
1373 lbsr L145D
|
|
1374 lbsr L11E8
|
|
1375 lbsr L0EBF
|
|
1376 L0B44 tfr u,d
|
|
1377 lbra L0D30
|
|
1378 L0B49 pshs u,b,a
|
|
1379 ldd #$FFB8
|
|
1380 lbsr L00FD
|
|
1381 clra
|
|
1382 clrb
|
|
1383 pshs b,a
|
|
1384 ldd $02,s
|
|
1385 lbsr L0C90
|
|
1386 leas $02,s
|
|
1387 tfr d,u
|
|
1388 ldd <u001F
|
|
1389 addd #$0001
|
|
1390 std <u001F
|
|
1391 std <u001F,u
|
|
1392 lbra L0DAA
|
|
1393 L0B6B pshs u,b,a
|
|
1394 ldd #$FFB4
|
|
1395 lbsr L00FD
|
|
1396 clra
|
|
1397 clrb
|
|
1398 pshs b,a
|
|
1399 ldd #$000B
|
|
1400 pshs b,a
|
|
1401 clra
|
|
1402 clrb
|
|
1403 pshs b,a
|
|
1404 ldd $06,s
|
|
1405 lbsr L2AD6
|
|
1406 leas $06,s
|
|
1407 ldd ,s
|
|
1408 lbsr L0C38
|
|
1409 leax >$0096,y
|
|
1410 pshs x
|
|
1411 leax >$0038,y
|
|
1412 tfr x,d
|
|
1413 lbsr L28B4
|
|
1414 leas $02,s
|
|
1415 ldu <u0013
|
|
1416 bra L0BBA
|
|
1417 L0BA1 leax >$0038,y
|
|
1418 pshs x
|
|
1419 pshs u
|
|
1420 ldd #$0002
|
|
1421 addd ,s++
|
|
1422 lbsr L28E1
|
|
1423 std ,s++
|
|
1424 lbeq L0DAA
|
|
1425 ldu <u0023,u
|
|
1426 L0BBA stu -$02,s
|
|
1427 bne L0BA1
|
|
1428 ldd <u0013
|
|
1429 pshs b,a
|
|
1430 leax >$0038,y
|
|
1431 tfr x,d
|
|
1432 lbsr L0C90
|
|
1433 leas $02,s
|
|
1434 std <u0013
|
|
1435 lbra L0DED
|
|
1436 L0BD2 pshs u,b,a
|
|
1437 ldd #$FFB4
|
|
1438 lbsr L00FD
|
|
1439 clra
|
|
1440 clrb
|
|
1441 pshs b,a
|
|
1442 ldd #$0009
|
|
1443 pshs b,a
|
|
1444 clra
|
|
1445 clrb
|
|
1446 pshs b,a
|
|
1447 ldd $06,s
|
|
1448 lbsr L2AD6
|
|
1449 leas $06,s
|
|
1450 ldd ,s
|
|
1451 bsr L0C38
|
|
1452 leax >$009A,y
|
|
1453 pshs x
|
|
1454 leax >$0038,y
|
|
1455 tfr x,d
|
|
1456 lbsr L28B4
|
|
1457 leas $02,s
|
|
1458 ldu <u0011
|
|
1459 bra L0C20
|
|
1460 L0C07 leax >$0038,y
|
|
1461 pshs x
|
|
1462 pshs u
|
|
1463 ldd #$0002
|
|
1464 addd ,s++
|
|
1465 lbsr L28E1
|
|
1466 std ,s++
|
|
1467 lbeq L0DAA
|
|
1468 ldu <u0023,u
|
|
1469 L0C20 stu -$02,s
|
|
1470 bne L0C07
|
|
1471 ldd <u0011
|
|
1472 pshs b,a
|
|
1473 leax >$0038,y
|
|
1474 tfr x,d
|
|
1475 lbsr L0C90
|
|
1476 leas $02,s
|
|
1477 std <u0011
|
|
1478 lbra L0DED
|
|
1479 L0C38 pshs u,b,a
|
|
1480 ldd #$FFB2
|
|
1481 lbsr L00FD
|
|
1482 leas -$02,s
|
|
1483 ldd #$0002
|
|
1484 pshs b,a
|
|
1485 leax $02,s
|
|
1486 pshs x
|
|
1487 ldd $06,s
|
|
1488 lbsr L2A85
|
|
1489 leas $04,s
|
|
1490 clra
|
|
1491 clrb
|
|
1492 pshs b,a
|
|
1493 ldd $02,s
|
|
1494 lbsr L2CE8
|
|
1495 ldd $02,x
|
|
1496 pshs b,a
|
|
1497 ldd ,x
|
|
1498 pshs b,a
|
|
1499 ldd $08,s
|
|
1500 lbsr L2AD6
|
|
1501 leas $06,s
|
|
1502 ldd #$001C
|
|
1503 pshs b,a
|
|
1504 leau >$0038,y
|
|
1505 pshs u
|
|
1506 ldd $06,s
|
|
1507 lbsr L2A85
|
|
1508 leas $04,s
|
|
1509 L0C7C ldb ,u+
|
|
1510 cmpb #$7F
|
|
1511 bls L0C7C
|
|
1512 ldb -u0001,u
|
|
1513 clra
|
|
1514 andb #$7F
|
|
1515 stb -u0001,u
|
|
1516 clra
|
|
1517 clrb
|
|
1518 stb ,u
|
|
1519 lbra L0D30
|
|
1520 L0C90 pshs u,b,a
|
|
1521 ldd #$FFB6
|
|
1522 lbsr L00FD
|
|
1523 ldu <u0019
|
|
1524 beq L0CA3
|
|
1525 ldd <u0023,u
|
|
1526 std <u0019
|
|
1527 bra L0CAB
|
|
1528 L0CA3 ldd #$0025
|
|
1529 lbsr L0D0E
|
|
1530 tfr d,u
|
|
1531 L0CAB ldd ,s
|
|
1532 pshs b,a
|
|
1533 pshs u
|
|
1534 ldd #$0002
|
|
1535 addd ,s++
|
|
1536 lbsr L1FE5
|
|
1537 leas $02,s
|
|
1538 clra
|
|
1539 clrb
|
|
1540 std ,u
|
|
1541 ldd $06,s
|
|
1542 std <u0023,u
|
|
1543 lbra L0DAA
|
|
1544 L0CC7 pshs u
|
|
1545 tfr d,u
|
|
1546 ldd #$FFBA
|
|
1547 lbsr L00FD
|
|
1548 leax >$008A,y
|
|
1549 bra L0D05
|
|
1550 L0CD7 pshs u
|
|
1551 tfr d,u
|
|
1552 ldd #$FFBA
|
|
1553 lbsr L00FD
|
|
1554 leax >$0092,y
|
|
1555 bra L0D05
|
|
1556 L0CE7 pshs u
|
|
1557 tfr d,u
|
|
1558 ldd #$FFBA
|
|
1559 lbsr L00FD
|
|
1560 leax >L0E2A,pcr
|
|
1561 bra L0D05
|
|
1562 L0CF7 pshs u
|
|
1563 tfr d,u
|
|
1564 ldd #$FFBA
|
|
1565 lbsr L00FD
|
|
1566 leax >L0E2E,pcr
|
|
1567 L0D05 pshs x
|
|
1568 tfr u,d
|
|
1569 bsr L0D34
|
|
1570 lbra L0DED
|
|
1571 L0D0E pshs u,b,a
|
|
1572 ldd #$FFB8
|
|
1573 lbsr L00FD
|
|
1574 leas -$02,s
|
|
1575 ldd $02,s
|
|
1576 lbsr L2B51
|
|
1577 std ,s
|
|
1578 cmpd #$FFFF
|
|
1579 bne L0D2E
|
|
1580 leax >L0E32,pcr
|
|
1581 tfr x,d
|
|
1582 lbsr L14BD
|
|
1583 L0D2E ldd ,s
|
|
1584 L0D30 leas $04,s
|
|
1585 puls pc,u
|
|
1586 L0D34 pshs u
|
|
1587 tfr d,u
|
|
1588 ldd #$FFBA
|
|
1589 lbsr L00FD
|
|
1590 bra L0D53
|
|
1591 L0D40 ldd $04,s
|
|
1592 pshs b,a
|
|
1593 tfr u,d
|
|
1594 leau u0001,u
|
|
1595 bsr L0D5B
|
|
1596 std ,s++
|
|
1597 beq L0D53
|
|
1598 ldd #$0001
|
|
1599 puls pc,u
|
|
1600 L0D53 ldb ,u
|
|
1601 bne L0D40
|
|
1602 clra
|
|
1603 clrb
|
|
1604 puls pc,u
|
|
1605 L0D5B pshs u,b,a
|
|
1606 ldd #$FFBC
|
|
1607 lbsr L00FD
|
|
1608 ldu $06,s
|
|
1609 bra L0D7F
|
|
1610 L0D67 ldx ,s
|
|
1611 leax $01,x
|
|
1612 stx ,s
|
|
1613 ldb -$01,x
|
|
1614 sex
|
|
1615 pshs b,a
|
|
1616 ldb ,u+
|
|
1617 sex
|
|
1618 cmpd ,s++
|
|
1619 beq L0D7F
|
|
1620 clra
|
|
1621 clrb
|
|
1622 lbra L0DED
|
|
1623 L0D7F ldb ,u
|
|
1624 bne L0D67
|
|
1625 ldd #$0001
|
|
1626 lbra L0DED
|
|
1627 L0D89 pshs u,b,a
|
|
1628 ldd #$FFBC
|
|
1629 lbsr L00FD
|
|
1630 ldu ,s
|
|
1631 bra L0D97
|
|
1632 L0D95 leau u0001,u
|
|
1633 L0D97 ldb ,u
|
|
1634 bne L0D95
|
|
1635 bra L0DAE
|
|
1636 L0D9D ldb ,u
|
|
1637 sex
|
|
1638 pshs b,a
|
|
1639 ldb $09,s
|
|
1640 sex
|
|
1641 cmpd ,s++
|
|
1642 bne L0DAE
|
|
1643 L0DAA tfr u,d
|
|
1644 bra L0DED
|
|
1645 L0DAE tfr u,d
|
|
1646 leau -u0001,u
|
|
1647 cmpd ,s
|
|
1648 bne L0D9D
|
|
1649 ldd ,s
|
|
1650 bra L0DED
|
|
1651 L0DBB pshs u,b,a
|
|
1652 ldd #$FFBA
|
|
1653 lbsr L00FD
|
|
1654 ldu ,s
|
|
1655 bra L0DC9
|
|
1656 L0DC7 leau u0001,u
|
|
1657 L0DC9 ldb ,u
|
|
1658 sex
|
|
1659 lbsr L2795
|
|
1660 stb ,u
|
|
1661 bne L0DC7
|
|
1662 bra L0DED
|
|
1663 L0DD5 pshs u,b,a
|
|
1664 ldd #$FFBA
|
|
1665 lbsr L00FD
|
|
1666 ldu ,s
|
|
1667 bra L0DE3
|
|
1668 L0DE1 leau u0001,u
|
|
1669 L0DE3 ldb ,u
|
|
1670 sex
|
|
1671 lbsr L277D
|
|
1672 stb ,u
|
|
1673 bne L0DE1
|
|
1674 L0DED leas $02,s
|
|
1675 puls pc,u
|
|
1676 L0DF1 bgt L0DF3
|
|
1677 L0DF3 coma
|
|
1678 oim #$6E,$07,y
|
|
1679 lsr >$206F
|
|
1680 neg >$656E
|
|
1681 bra L0E6C
|
|
1682 clr $04,s
|
|
1683 eim #$6C,>$6520
|
|
1684 lsr $09,s
|
|
1685 aim #$65,>$6374
|
|
1686 clr -$0E,s
|
|
1687 rol >$0043
|
|
1688 oim #$6E,$07,y
|
|
1689 lsr >$206F
|
|
1690 neg >$656E
|
|
1691 bra L0E7F
|
|
1692 eim #$73,$03,s
|
|
1693 aim #$69,>$7074
|
|
1694 clr -$0E,s
|
|
1695 bra L0E8C
|
|
1696 rol $0C,s
|
|
1697 eim #$00,$0E,y
|
|
1698 lsra
|
|
1699 asrb
|
|
1700 neg <u002E
|
|
1701 lsra
|
|
1702 lsrb
|
|
1703 neg <u004F
|
|
1704 eim #$74,>$206F
|
|
1705 ror $00,y
|
|
1706 tst $05,s
|
|
1707 tst $0F,s
|
|
1708 aim #$79,>$0034
|
|
1709 nega
|
|
1710 ldd #$FFB8
|
|
1711 lbsr L00FD
|
|
1712 bsr L0E5B
|
|
1713 leax >$01FB,y
|
|
1714 pshs x
|
|
1715 ldd #$0006
|
|
1716 pshs b,a
|
|
1717 ldd #$0001
|
|
1718 lbra L10B0
|
|
1719 L0E5B pshs u
|
|
1720 ldd #$FFBA
|
|
1721 lbsr L00FD
|
|
1722 clra
|
|
1723 clrb
|
|
1724 pshs b,a
|
|
1725 ldd #$000D
|
|
1726 lbsr L1139
|
|
1727 leas $02,s
|
|
1728 ldd >$01E5,y
|
|
1729 lbra L1274
|
|
1730 L0E76 pshs u
|
|
1731 ldd #$FFBA
|
|
1732 lbsr L00FD
|
|
1733 ldd #$0003
|
|
1734 pshs b,a
|
|
1735 ldd #$0008
|
|
1736 lbsr L1139
|
|
1737 leas $02,s
|
|
1738 leax >$013A,y
|
|
1739 lbra L1272
|
|
1740 L0E92 pshs u
|
|
1741 ldd #$FFB8
|
|
1742 lbsr L00FD
|
|
1743 leax >$01E5,y
|
|
1744 pshs x
|
|
1745 ldd #$0004
|
|
1746 pshs b,a
|
|
1747 clra
|
|
1748 clrb
|
|
1749 lbsr L13C0
|
|
1750 leas $04,s
|
|
1751 ldd #$0004
|
|
1752 pshs b,a
|
|
1753 clra
|
|
1754 clrb
|
|
1755 lbsr L1139
|
|
1756 leas $02,s
|
|
1757 leax >$00CF,y
|
|
1758 lbra L1272
|
|
1759 L0EBF pshs u
|
|
1760 ldd #$FFBA
|
|
1761 lbsr L00FD
|
|
1762 lbsr L0E5B
|
|
1763 ldd #$0002
|
|
1764 pshs b,a
|
|
1765 ldd #$0004
|
|
1766 lbsr L1139
|
|
1767 leas $02,s
|
|
1768 leax >$0121,y
|
|
1769 lbra L0FCF
|
|
1770 L0EDE pshs u
|
|
1771 ldd #$FFBA
|
|
1772 lbsr L00FD
|
|
1773 lbsr L0E5B
|
|
1774 ldd #$0002
|
|
1775 pshs b,a
|
|
1776 ldd #$0006
|
|
1777 lbsr L1139
|
|
1778 leas $02,s
|
|
1779 leax >$014B,y
|
|
1780 lbra L0FCF
|
|
1781 L0EFD pshs u
|
|
1782 ldd #$FFBA
|
|
1783 lbsr L00FD
|
|
1784 leax >$040D,y
|
|
1785 tfr x,d
|
|
1786 lbsr L039C
|
|
1787 std -$02,s
|
|
1788 lbne L10F2
|
|
1789 lbsr L0E5B
|
|
1790 ldd #$0002
|
|
1791 pshs b,a
|
|
1792 ldd #$0005
|
|
1793 lbsr L1139
|
|
1794 leas $02,s
|
|
1795 leax >L1753,pcr
|
|
1796 tfr x,d
|
|
1797 lbsr L140D
|
|
1798 ldd #$0003
|
|
1799 pshs b,a
|
|
1800 ldd #$0010
|
|
1801 lbsr L1139
|
|
1802 leas $02,s
|
|
1803 leax >$040D,y
|
|
1804 tfr x,d
|
|
1805 lbsr L140D
|
|
1806 ldd #$0004
|
|
1807 pshs b,a
|
|
1808 lbra L10EB
|
|
1809 L0F4B pshs u
|
|
1810 ldd #$FFBA
|
|
1811 lbsr L00FD
|
|
1812 ldd <u002D
|
|
1813 beq L0F65
|
|
1814 lbsr L10F4
|
|
1815 leax >$01B5,y
|
|
1816 tfr x,d
|
|
1817 lbsr L1115
|
|
1818 bra L0F84
|
|
1819 L0F65 lbsr L11B1
|
|
1820 lbsr L0E5B
|
|
1821 ldd #$0002
|
|
1822 pshs b,a
|
|
1823 ldd #$0006
|
|
1824 lbsr L1139
|
|
1825 leas $02,s
|
|
1826 leax >$015E,y
|
|
1827 tfr x,d
|
|
1828 lbsr L140D
|
|
1829 lbsr L0E76
|
|
1830 L0F84 ldd #$0007
|
|
1831 pshs b,a
|
|
1832 clra
|
|
1833 clrb
|
|
1834 lbsr L1139
|
|
1835 lbra L14B9
|
|
1836 L0F91 pshs u
|
|
1837 ldd #$FFB8
|
|
1838 lbsr L00FD
|
|
1839 lbsr L11B1
|
|
1840 lbsr L0E5B
|
|
1841 leax >$0207,y
|
|
1842 pshs x
|
|
1843 ldd #$0006
|
|
1844 pshs b,a
|
|
1845 ldd #$0002
|
|
1846 lbra L10B0
|
|
1847 L0FB0 pshs u
|
|
1848 ldd #$FFBA
|
|
1849 lbsr L00FD
|
|
1850 lbsr L11B1
|
|
1851 lbsr L0E5B
|
|
1852 ldd #$0002
|
|
1853 pshs b,a
|
|
1854 ldd #$0004
|
|
1855 lbsr L1139
|
|
1856 leas $02,s
|
|
1857 leax >$0185,y
|
|
1858 L0FCF tfr x,d
|
|
1859 lbsr L140D
|
|
1860 lbsr L0E76
|
|
1861 puls pc,u
|
|
1862 L0FD9 pshs u
|
|
1863 ldd #$FFBA
|
|
1864 lbsr L00FD
|
|
1865 leax >$0401,y
|
|
1866 tfr x,d
|
|
1867 lbsr L039C
|
|
1868 std -$02,s
|
|
1869 bne L103D
|
|
1870 lbsr L11B1
|
|
1871 lbsr L0E5B
|
|
1872 ldd #$0002
|
|
1873 pshs b,a
|
|
1874 ldd #$0004
|
|
1875 lbsr L1139
|
|
1876 leas $02,s
|
|
1877 leax >L176D,pcr
|
|
1878 tfr x,d
|
|
1879 lbsr L140D
|
|
1880 ldd #$0003
|
|
1881 pshs b,a
|
|
1882 ldd #$000D
|
|
1883 lbsr L1139
|
|
1884 leas $02,s
|
|
1885 leax >$0401,y
|
|
1886 tfr x,d
|
|
1887 lbsr L140D
|
|
1888 ldd #$0004
|
|
1889 pshs b,a
|
|
1890 lbsr L1139
|
|
1891 leas $02,s
|
|
1892 lbsr L1506
|
|
1893 ldd <u002D
|
|
1894 beq L103D
|
|
1895 lbsr L10F4
|
|
1896 leax >$01CC,y
|
|
1897 tfr x,d
|
|
1898 lbsr L1115
|
|
1899 L103D puls pc,u
|
|
1900 L103F pshs u
|
|
1901 ldd #$FFB8
|
|
1902 lbsr L00FD
|
|
1903 lbsr L11B1
|
|
1904 lbsr L0E5B
|
|
1905 leax >$01F5,y
|
|
1906 pshs x
|
|
1907 ldd #$0003
|
|
1908 pshs b,a
|
|
1909 ldd #$0002
|
|
1910 lbsr L13C0
|
|
1911 leas $04,s
|
|
1912 ldd #$0005
|
|
1913 bra L1089
|
|
1914 L1065 pshs u
|
|
1915 ldd #$FFB8
|
|
1916 lbsr L00FD
|
|
1917 lbsr L11B1
|
|
1918 lbsr L0E5B
|
|
1919 leax >$0213,y
|
|
1920 pshs x
|
|
1921 ldd #$0004
|
|
1922 pshs b,a
|
|
1923 ldd #$0002
|
|
1924 lbsr L13C0
|
|
1925 leas $04,s
|
|
1926 ldd #$0006
|
|
1927 L1089 pshs b,a
|
|
1928 ldd #$0008
|
|
1929 lbsr L1139
|
|
1930 leas $02,s
|
|
1931 ldd >$01F3,y
|
|
1932 lbra L1274
|
|
1933 L109A pshs u
|
|
1934 ldd #$FFB8
|
|
1935 lbsr L00FD
|
|
1936 leax >$01ED,y
|
|
1937 pshs x
|
|
1938 ldd #$0004
|
|
1939 pshs b,a
|
|
1940 ldd #$0008
|
|
1941 L10B0 lbsr L13C0
|
|
1942 lbra L1409
|
|
1943 L10B6 pshs u
|
|
1944 ldd #$FFBA
|
|
1945 lbsr L00FD
|
|
1946 lbsr L11B1
|
|
1947 lbsr L0E5B
|
|
1948 ldd #$0002
|
|
1949 pshs b,a
|
|
1950 ldd #$0006
|
|
1951 lbsr L1139
|
|
1952 leas $02,s
|
|
1953 leax >$0172,y
|
|
1954 tfr x,d
|
|
1955 lbsr L140D
|
|
1956 leax >$040D,y
|
|
1957 tfr x,d
|
|
1958 lbsr L140D
|
|
1959 ldd #$0003
|
|
1960 pshs b,a
|
|
1961 ldd #$0004
|
|
1962 L10EB bsr L1139
|
|
1963 leas $02,s
|
|
1964 lbsr L1506
|
|
1965 L10F2 puls pc,u
|
|
1966 L10F4 pshs u
|
|
1967 ldd #$FFBA
|
|
1968 lbsr L00FD
|
|
1969 lbsr L11B1
|
|
1970 lbsr L0E5B
|
|
1971 ldd #$0002
|
|
1972 pshs b,a
|
|
1973 ldd #$0005
|
|
1974 bsr L1139
|
|
1975 leas $02,s
|
|
1976 leax >$019E,y
|
|
1977 lbra L1272
|
|
1978 L1115 pshs u,b,a
|
|
1979 ldd #$FFB8
|
|
1980 lbsr L00FD
|
|
1981 ldd #$0003
|
|
1982 pshs b,a
|
|
1983 ldd #$0004
|
|
1984 bsr L1139
|
|
1985 leas $02,s
|
|
1986 ldd ,s
|
|
1987 lbsr L140D
|
|
1988 ldd #$0005
|
|
1989 pshs b,a
|
|
1990 clra
|
|
1991 clrb
|
|
1992 bsr L1139
|
|
1993 bra L118A
|
|
1994 L1139 pshs u,b,a
|
|
1995 ldd #$FFB8
|
|
1996 lbsr L00FD
|
|
1997 ldd #$0002
|
|
1998 stb <u0035
|
|
1999 ldd ,s
|
|
2000 addd #$0020
|
|
2001 addd <u002F
|
|
2002 stb <u0036
|
|
2003 ldd $06,s
|
|
2004 addd #$0020
|
|
2005 stb <u0037
|
|
2006 ldd #$0003
|
|
2007 bra L117F
|
|
2008 L115B pshs u,b,a
|
|
2009 ldd #$FFB8
|
|
2010 lbsr L00FD
|
|
2011 ldd <u0027
|
|
2012 pshs b,a
|
|
2013 ldd #$0018
|
|
2014 bsr L1139
|
|
2015 leas $02,s
|
|
2016 ldd ,s
|
|
2017 beq L1177
|
|
2018 ldd #$0058
|
|
2019 bra L117A
|
|
2020 L1177 ldd #$0020
|
|
2021 L117A stb <u0035
|
|
2022 ldd #$0001
|
|
2023 L117F pshs b,a
|
|
2024 leax >$0035,y
|
|
2025 tfr x,d
|
|
2026 lbsr L141C
|
|
2027 L118A leas $02,s
|
|
2028 lbra L14B9
|
|
2029 L118F pshs u
|
|
2030 tfr d,u
|
|
2031 ldd #$FFBA
|
|
2032 lbsr L00FD
|
|
2033 ldd #$0005
|
|
2034 stb <u0035
|
|
2035 stu -$02,s
|
|
2036 beq L11A7
|
|
2037 ldd #$0021
|
|
2038 bra L11AA
|
|
2039 L11A7 ldd #$0020
|
|
2040 L11AA stb <u0036
|
|
2041 ldd #$0002
|
|
2042 bra L11DA
|
|
2043 L11B1 pshs u
|
|
2044 ldd #$FFBA
|
|
2045 lbsr L00FD
|
|
2046 ldd #$000C
|
|
2047 bra L11D5
|
|
2048 L11BE pshs u
|
|
2049 ldd #$FFBA
|
|
2050 lbsr L00FD
|
|
2051 ldd #$0005
|
|
2052 pshs b,a
|
|
2053 clra
|
|
2054 clrb
|
|
2055 lbsr L1139
|
|
2056 leas $02,s
|
|
2057 ldd #$000B
|
|
2058 L11D5 stb <u0035
|
|
2059 ldd #$0001
|
|
2060 L11DA pshs b,a
|
|
2061 leax >$0035,y
|
|
2062 tfr x,d
|
|
2063 lbsr L141C
|
|
2064 lbra L14B9
|
|
2065 L11E8 pshs u
|
|
2066 ldd #$FFB9
|
|
2067 lbsr L00FD
|
|
2068 leas -$01,s
|
|
2069 ldd #$0004
|
|
2070 stb ,s
|
|
2071 ldu #$0000
|
|
2072 bra L1215
|
|
2073 L11FC pshs u
|
|
2074 clra
|
|
2075 clrb
|
|
2076 lbsr L1139
|
|
2077 leas $02,s
|
|
2078 ldd #$0001
|
|
2079 pshs b,a
|
|
2080 leax $02,s
|
|
2081 tfr x,d
|
|
2082 lbsr L141C
|
|
2083 leas $02,s
|
|
2084 leau u0001,u
|
|
2085 L1215 cmpu #$0003
|
|
2086 ble L11FC
|
|
2087 leas $01,s
|
|
2088 puls pc,u
|
|
2089 L121F pshs u
|
|
2090 ldd #$FFB8
|
|
2091 lbsr L00FD
|
|
2092 ldd #$0007
|
|
2093 stb <u0035
|
|
2094 ldd #$0001
|
|
2095 pshs b,a
|
|
2096 leax >$0035,y
|
|
2097 pshs x
|
|
2098 ldd #$0002
|
|
2099 lbsr L2AAD
|
|
2100 lbra L1409
|
|
2101 L1240 pshs u
|
|
2102 tfr d,u
|
|
2103 ldd #$FFBA
|
|
2104 lbsr L00FD
|
|
2105 pshs u
|
|
2106 ldd #$0003
|
|
2107 lbsr L1139
|
|
2108 leas $02,s
|
|
2109 leax >$0001,y
|
|
2110 bra L1272
|
|
2111 L125A pshs u
|
|
2112 tfr d,u
|
|
2113 ldd #$FFBA
|
|
2114 lbsr L00FD
|
|
2115 pshs u
|
|
2116 ldd #$0003
|
|
2117 lbsr L1139
|
|
2118 leas $02,s
|
|
2119 leax >$0004,y
|
|
2120 L1272 tfr x,d
|
|
2121 L1274 lbsr L140D
|
|
2122 puls pc,u
|
|
2123 L1279 pshs u,b,a
|
|
2124 ldd #$FF8F
|
|
2125 lbsr L00FD
|
|
2126 leas <-$27,s
|
|
2127 leax >$0085,y
|
|
2128 tfr x,d
|
|
2129 lbsr L2B41
|
|
2130 ldd #$0001
|
|
2131 pshs b,a
|
|
2132 ldd <$29,s
|
|
2133 lbsr L29FE
|
|
2134 leas $02,s
|
|
2135 std <$25,s
|
|
2136 cmpd #$FFFF
|
|
2137 bne L12AF
|
|
2138 leax >L1787,pcr
|
|
2139 tfr x,d
|
|
2140 lbsr L145D
|
|
2141 lbra L1326
|
|
2142 L12AF lbsr L11E8
|
|
2143 clra
|
|
2144 clrb
|
|
2145 std <$23,s
|
|
2146 pshs b,a
|
|
2147 bra L12F7
|
|
2148 L12BB ldd <$23,s
|
|
2149 cmpd #$0002
|
|
2150 ble L12D9
|
|
2151 lbsr L133D
|
|
2152 cmpd #$0002
|
|
2153 beq L1312
|
|
2154 clra
|
|
2155 clrb
|
|
2156 std <$23,s
|
|
2157 pshs b,a
|
|
2158 lbsr L1139
|
|
2159 leas $02,s
|
|
2160 L12D9 ldd <$21,s
|
|
2161 pshs b,a
|
|
2162 leax $02,s
|
|
2163 pshs x
|
|
2164 ldd #$0001
|
|
2165 lbsr L2AC2
|
|
2166 leas $04,s
|
|
2167 ldd <$23,s
|
|
2168 addd #$0001
|
|
2169 std <$23,s
|
|
2170 pshs b,a
|
|
2171 clra
|
|
2172 clrb
|
|
2173 L12F7 lbsr L1139
|
|
2174 leas $02,s
|
|
2175 ldd #$0020
|
|
2176 pshs b,a
|
|
2177 leax $02,s
|
|
2178 pshs x
|
|
2179 ldd <$29,s
|
|
2180 lbsr L2A9B
|
|
2181 leas $04,s
|
|
2182 std <$21,s
|
|
2183 bgt L12BB
|
|
2184 L1312 ldd <$21,s
|
|
2185 bge L1320
|
|
2186 leax >L179C,pcr
|
|
2187 tfr x,d
|
|
2188 lbsr L145D
|
|
2189 L1320 ldd <$25,s
|
|
2190 lbsr L2A0B
|
|
2191 L1326 lbsr L139D
|
|
2192 leax >$00A2,y
|
|
2193 tfr x,d
|
|
2194 lbsr L2B41
|
|
2195 lbsr L11E8
|
|
2196 lbsr L0E92
|
|
2197 leas <$29,s
|
|
2198 puls pc,u
|
|
2199 L133D pshs u
|
|
2200 ldd #$FFBA
|
|
2201 lbsr L00FD
|
|
2202 ldd <u002B
|
|
2203 beq L134E
|
|
2204 ldd #$000F
|
|
2205 bra L1351
|
|
2206 L134E ldd #$0003
|
|
2207 L1351 pshs b,a
|
|
2208 ldd #$0004
|
|
2209 lbsr L1139
|
|
2210 leas $02,s
|
|
2211 leax >$00EF,y
|
|
2212 tfr x,d
|
|
2213 lbsr L140D
|
|
2214 L1364 lbsr L1437
|
|
2215 sex
|
|
2216 tfr d,x
|
|
2217 bra L1381
|
|
2218 L136C lbsr L11E8
|
|
2219 ldd #$0001
|
|
2220 puls pc,u
|
|
2221 L1374 lbsr L11E8
|
|
2222 ldd #$0002
|
|
2223 puls pc,u
|
|
2224 L137C lbsr L121F
|
|
2225 bra L1364
|
|
2226 L1381 cmpx #$004D
|
|
2227 beq L136C
|
|
2228 cmpx #$006D
|
|
2229 lbeq L136C
|
|
2230 cmpx #$0043
|
|
2231 beq L1374
|
|
2232 cmpx #$0063
|
|
2233 lbeq L1374
|
|
2234 bra L137C
|
|
2235 puls pc,u
|
|
2236 L139D pshs u
|
|
2237 ldd #$FFBA
|
|
2238 lbsr L00FD
|
|
2239 ldd <u002B
|
|
2240 beq L13AE
|
|
2241 ldd #$000F
|
|
2242 bra L13B1
|
|
2243 L13AE ldd #$0003
|
|
2244 L13B1 pshs b,a
|
|
2245 ldd #$0004
|
|
2246 lbsr L1139
|
|
2247 leas $02,s
|
|
2248 lbsr L1506
|
|
2249 puls pc,u
|
|
2250 L13C0 pshs u,b,a
|
|
2251 ldd #$FFB6
|
|
2252 lbsr L00FD
|
|
2253 leas -$02,s
|
|
2254 bra L1400
|
|
2255 L13CC ldd [<$0A,s]
|
|
2256 lbsr L2889
|
|
2257 pshs b,a
|
|
2258 ldd #$0020
|
|
2259 subd ,s++
|
|
2260 pshs b,a
|
|
2261 ldd #$0002
|
|
2262 lbsr L2D6D
|
|
2263 std ,s
|
|
2264 ldd $02,s
|
|
2265 addd #$0001
|
|
2266 std $02,s
|
|
2267 subd #$0001
|
|
2268 pshs b,a
|
|
2269 ldd $02,s
|
|
2270 lbsr L1139
|
|
2271 leas $02,s
|
|
2272 ldx $0A,s
|
|
2273 leax $02,x
|
|
2274 stx $0A,s
|
|
2275 ldd -$02,x
|
|
2276 bsr L140D
|
|
2277 L1400 ldd $08,s
|
|
2278 addd #$FFFF
|
|
2279 std $08,s
|
|
2280 bge L13CC
|
|
2281 L1409 leas $04,s
|
|
2282 puls pc,u
|
|
2283 L140D pshs u,b,a
|
|
2284 ldd #$FFB6
|
|
2285 lbsr L00FD
|
|
2286 ldd ,s
|
|
2287 lbsr L2889
|
|
2288 bra L1426
|
|
2289 L141C pshs u,b,a
|
|
2290 ldd #$FFB6
|
|
2291 lbsr L00FD
|
|
2292 ldd $06,s
|
|
2293 L1426 pshs b,a
|
|
2294 ldd $02,s
|
|
2295 pshs b,a
|
|
2296 ldd #$0001
|
|
2297 lbsr L2AAD
|
|
2298 leas $04,s
|
|
2299 lbra L14B9
|
|
2300 L1437 pshs u
|
|
2301 ldd #$FFB8
|
|
2302 lbsr L00FD
|
|
2303 ldd #$0001
|
|
2304 pshs b,a
|
|
2305 leax >$0078,y
|
|
2306 pshs x
|
|
2307 clra
|
|
2308 clrb
|
|
2309 lbsr L2A85
|
|
2310 leas $04,s
|
|
2311 std -$02,s
|
|
2312 bgt L1459
|
|
2313 clra
|
|
2314 clrb
|
|
2315 stb <u0078
|
|
2316 L1459 ldb <u0078
|
|
2317 puls pc,u
|
|
2318 L145D pshs u
|
|
2319 tfr d,u
|
|
2320 ldd #$FFBC
|
|
2321 lbsr L00FD
|
|
2322 lbsr L121F
|
|
2323 lbsr L11E8
|
|
2324 tfr u,d
|
|
2325 bsr L1484
|
|
2326 puls pc,u
|
|
2327 L1473 pshs u,b,a
|
|
2328 ldd #$FFBA
|
|
2329 lbsr L00FD
|
|
2330 lbsr L11B1
|
|
2331 ldd ,s
|
|
2332 bsr L1484
|
|
2333 bra L14B9
|
|
2334 L1484 pshs u
|
|
2335 tfr d,u
|
|
2336 ldd #$FFB8
|
|
2337 lbsr L00FD
|
|
2338 leas -$02,s
|
|
2339 tfr u,d
|
|
2340 lbsr L2889
|
|
2341 pshs b,a
|
|
2342 ldd #$0020
|
|
2343 subd ,s++
|
|
2344 pshs b,a
|
|
2345 ldd #$0002
|
|
2346 lbsr L2D6D
|
|
2347 std ,s
|
|
2348 clra
|
|
2349 clrb
|
|
2350 pshs b,a
|
|
2351 ldd $02,s
|
|
2352 lbsr L1139
|
|
2353 leas $02,s
|
|
2354 tfr u,d
|
|
2355 lbsr L140D
|
|
2356 lbsr L139D
|
|
2357 L14B9 leas $02,s
|
|
2358 puls pc,u
|
|
2359 L14BD pshs u
|
|
2360 tfr d,u
|
|
2361 ldd #$FFB8
|
|
2362 lbsr L00FD
|
|
2363 lbsr L121F
|
|
2364 lbsr L11B1
|
|
2365 clra
|
|
2366 clrb
|
|
2367 pshs b,a
|
|
2368 lbsr L1139
|
|
2369 leas $02,s
|
|
2370 ldd #$0008
|
|
2371 pshs b,a
|
|
2372 leax >L17B4,pcr
|
|
2373 pshs x
|
|
2374 ldd #$0002
|
|
2375 lbsr L2AAD
|
|
2376 leas $04,s
|
|
2377 tfr u,d
|
|
2378 lbsr L2889
|
|
2379 pshs b,a
|
|
2380 pshs u
|
|
2381 ldd #$0002
|
|
2382 lbsr L2AAD
|
|
2383 leas $04,s
|
|
2384 lbsr L0269
|
|
2385 ldd >$03BB,y
|
|
2386 lbsr L2CDA
|
|
2387 puls pc,u
|
|
2388 L1506 pshs u
|
|
2389 ldd #$FFBC
|
|
2390 lbsr L00FD
|
|
2391 leax >$0108,y
|
|
2392 tfr x,d
|
|
2393 lbsr L140D
|
|
2394 lbsr L1437
|
|
2395 puls pc,u
|
|
2396 coma
|
|
2397 clra
|
|
2398 fcb $4E N
|
|
2399 rora
|
|
2400 rola
|
|
2401 asra
|
|
2402 neg <u0041
|
|
2403 fcb $52 R
|
|
2404 fcb $52 R
|
|
2405 clra
|
|
2406 asrb
|
|
2407 comb
|
|
2408 bra L1558
|
|
2409 bra L1582
|
|
2410 negb
|
|
2411 ble L1574
|
|
2412 clra
|
|
2413 asrb
|
|
2414 fcb $4E N
|
|
2415 ble L1582
|
|
2416 clra
|
|
2417 fcb $52 R
|
|
2418 fcb $45 E
|
|
2419 ble L157C
|
|
2420 fcb $41 A
|
|
2421 coma
|
|
2422 fcb $4B K
|
|
2423 neg <u0053
|
|
2424 bra L156E
|
|
2425 bra L1596
|
|
2426 fcb $45 E
|
|
2427 inca
|
|
2428 ble L159C
|
|
2429 fcb $4E N
|
|
2430 comb
|
|
2431 fcb $45 E
|
|
2432 inca
|
|
2433 bra L1595
|
|
2434 bra L157C
|
|
2435 bra L1599
|
|
2436 fcb $45 E
|
|
2437 inca
|
|
2438 negb
|
|
2439 bra L159A
|
|
2440 bra L1585
|
|
2441 L1558 bra L159E
|
|
2442 clra
|
|
2443 fcb $4E N
|
|
2444 fcb $45 E
|
|
2445 neg <u0020
|
|
2446 bra L1581
|
|
2447 rola
|
|
2448 lsrb
|
|
2449 fcb $45 E
|
|
2450 tsta
|
|
2451 bra L1587
|
|
2452 bra L1589
|
|
2453 bra L158B
|
|
2454 bra L158D
|
|
2455 bra L15C2
|
|
2456 fcb $45 E
|
|
2457 inca
|
|
2458 neg <u0048
|
|
2459 clra
|
|
2460 L1574 asrb
|
|
2461 bra L15C4
|
|
2462 fcb $41 A
|
|
2463 fcb $4E N
|
|
2464 rolb
|
|
2465 bra L15C0
|
|
2466 L157C fcb $52 R
|
|
2467 rola
|
|
2468 rorb
|
|
2469 fcb $45 E
|
|
2470 comb
|
|
2471 L1581 bra L15C7
|
|
2472 clra
|
|
2473 bra L15DF
|
|
2474 clra
|
|
2475 L1587 fcb $55 U
|
|
2476 bra L15D2
|
|
2477 fcb $41 A
|
|
2478 L158B rorb
|
|
2479 fcb $45 E
|
|
2480 L158D abx
|
|
2481 neg <u0031
|
|
2482 bra L15BF
|
|
2483 bra L15E3
|
|
2484 fcb $4E N
|
|
2485 L1595 fcb $45 E
|
|
2486 L1596 bra L15DC
|
|
2487 fcb $52 R
|
|
2488 L1599 rola
|
|
2489 L159A rorb
|
|
2490 fcb $45 E
|
|
2491 L159C bra L15ED
|
|
2492 L159E fcb $4E N
|
|
2493 inca
|
|
2494 rolb
|
|
2495 bra L15C3
|
|
2496 bra L15C5
|
|
2497 neg <u0032
|
|
2498 bra L15D6
|
|
2499 bra L15FF
|
|
2500 asrb
|
|
2501 clra
|
|
2502 bra L15FE
|
|
2503 fcb $52 R
|
|
2504 bra L15FF
|
|
2505 clra
|
|
2506 fcb $52 R
|
|
2507 fcb $45 E
|
|
2508 bra L15FB
|
|
2509 fcb $52 R
|
|
2510 rola
|
|
2511 rorb
|
|
2512 fcb $45 E
|
|
2513 comb
|
|
2514 neg <u0053
|
|
2515 fcb $45 E
|
|
2516 L15BF inca
|
|
2517 L15C0 fcb $45 E
|
|
2518 coma
|
|
2519 L15C2 lsrb
|
|
2520 L15C3 rola
|
|
2521 L15C4 clra
|
|
2522 L15C5 fcb $4E N
|
|
2523 bra L1623
|
|
2524 leay $0C,y
|
|
2525 leas -u0003,u
|
|
2526 bra L15CE
|
|
2527 L15CE comb
|
|
2528 fcb $45 E
|
|
2529 inca
|
|
2530 fcb $45 E
|
|
2531 L15D2 coma
|
|
2532 lsrb
|
|
2533 bra L1619
|
|
2534 L15D6 inca
|
|
2535 clra
|
|
2536 coma
|
|
2537 fcb $4B K
|
|
2538 bra L1629
|
|
2539 L15DC clra
|
|
2540 lsra
|
|
2541 fcb $55 U
|
|
2542 L15DF inca
|
|
2543 fcb $45 E
|
|
2544 abx
|
|
2545 neg <u0031
|
|
2546 bra L1613
|
|
2547 bra L161E
|
|
2548 leax $00,y
|
|
2549 lsla
|
|
2550 decb
|
|
2551 bra L1616
|
|
2552 fcb $41 A
|
|
2553 tsta
|
|
2554 fcb $45 E
|
|
2555 fcb $52 R
|
|
2556 rola
|
|
2557 coma
|
|
2558 fcb $41 A
|
|
2559 fcb $4E N
|
|
2560 bra L1648
|
|
2561 clra
|
|
2562 asrb
|
|
2563 fcb $45 E
|
|
2564 L15FB fcb $52 R
|
|
2565 bvs L15FE
|
|
2566 L15FE leas $00,y
|
|
2567 blt L1622
|
|
2568 puls y,x
|
|
2569 bra L164E
|
|
2570 decb
|
|
2571 bra L1631
|
|
2572 fcb $45 E
|
|
2573 fcb $55 U
|
|
2574 fcb $52 R
|
|
2575 clra
|
|
2576 negb
|
|
2577 fcb $45 E
|
|
2578 fcb $41 A
|
|
2579 fcb $4E N
|
|
2580 bra L1663
|
|
2581 L1613 clra
|
|
2582 asrb
|
|
2583 fcb $45 E
|
|
2584 L1616 fcb $52 R
|
|
2585 bvs L1619
|
|
2586 L1619 coma
|
|
2587 clra
|
|
2588 fcb $4E N
|
|
2589 rora
|
|
2590 rola
|
|
2591 L161E asra
|
|
2592 bra L1677
|
|
2593 fcb $45 E
|
|
2594 L1622 fcb $52 R
|
|
2595 L1623 comb
|
|
2596 rola
|
|
2597 clra
|
|
2598 fcb $4E N
|
|
2599 bra L165B
|
|
2600 L1629 bgt L165B
|
|
2601 neg <u0043
|
|
2602 clra
|
|
2603 negb
|
|
2604 rolb
|
|
2605 fcb $52 R
|
|
2606 L1631 rola
|
|
2607 asra
|
|
2608 lsla
|
|
2609 lsrb
|
|
2610 bra L1668
|
|
2611 rts
|
|
2612 fcb $38 8
|
|
2613 pshu y
|
|
2614 fcb $42 B
|
|
2615 rolb
|
|
2616 neg <u004D
|
|
2617 rola
|
|
2618 coma
|
|
2619 fcb $52 R
|
|
2620 clra
|
|
2621 asrb
|
|
2622 fcb $41 A
|
|
2623 fcb $52 R
|
|
2624 fcb $45 E
|
|
2625 bra L169C
|
|
2626 rolb
|
|
2627 comb
|
|
2628 lsrb
|
|
2629 fcb $45 E
|
|
2630 tsta
|
|
2631 L164E comb
|
|
2632 bra L1694
|
|
2633 clra
|
|
2634 fcb $52 R
|
|
2635 negb
|
|
2636 bgt L1656
|
|
2637 L1656 fcb $52 R
|
|
2638 fcb $45 E
|
|
2639 negb
|
|
2640 fcb $52 R
|
|
2641 clra
|
|
2642 L165B lsra
|
|
2643 fcb $55 U
|
|
2644 coma
|
|
2645 fcb $45 E
|
|
2646 lsra
|
|
2647 bra L16B7
|
|
2648 fcb $4E N
|
|
2649 L1663 lsra
|
|
2650 fcb $45 E
|
|
2651 fcb $52 R
|
|
2652 bra L16B4
|
|
2653 L1668 rola
|
|
2654 coma
|
|
2655 fcb $45 E
|
|
2656 fcb $4E N
|
|
2657 comb
|
|
2658 fcb $45 E
|
|
2659 neg <u0054
|
|
2660 clra
|
|
2661 bra L16C7
|
|
2662 fcb $41 A
|
|
2663 fcb $4E N
|
|
2664 lsra
|
|
2665 rolb
|
|
2666 L1677 bra L16BC
|
|
2667 clra
|
|
2668 fcb $52 R
|
|
2669 negb
|
|
2670 bgt L167E
|
|
2671 L167E fcb $41 A
|
|
2672 inca
|
|
2673 inca
|
|
2674 bra L16D5
|
|
2675 rola
|
|
2676 asra
|
|
2677 lsla
|
|
2678 lsrb
|
|
2679 comb
|
|
2680 bra L16DC
|
|
2681 fcb $45 E
|
|
2682 comb
|
|
2683 fcb $45 E
|
|
2684 fcb $52 R
|
|
2685 rorb
|
|
2686 fcb $45 E
|
|
2687 lsra
|
|
2688 neg <u0044
|
|
2689 clra
|
|
2690 L1694 bra L16EF
|
|
2691 clra
|
|
2692 fcb $55 U
|
|
2693 bra L16F1
|
|
2694 rola
|
|
2695 comb
|
|
2696 L169C lsla
|
|
2697 bra L16F3
|
|
2698 clra
|
|
2699 bra L16E3
|
|
2700 lsra
|
|
2701 lsra
|
|
2702 neg <u005B
|
|
2703 fcb $4E N
|
|
2704 tstb
|
|
2705 clra
|
|
2706 bra L16EE
|
|
2707 clra
|
|
2708 tsta
|
|
2709 tsta
|
|
2710 fcb $41 A
|
|
2711 fcb $4E N
|
|
2712 lsra
|
|
2713 comb
|
|
2714 bge L16D4
|
|
2715 L16B4 comb
|
|
2716 lsrb
|
|
2717 clra
|
|
2718 L16B7 negb
|
|
2719 bra L1708
|
|
2720 clra
|
|
2721 asrb
|
|
2722 L16BC neg <u005B
|
|
2723 rora
|
|
2724 tstb
|
|
2725 fcb $55 U
|
|
2726 inca
|
|
2727 inca
|
|
2728 bra L1708
|
|
2729 clra
|
|
2730 tsta
|
|
2731 L16C7 tsta
|
|
2732 fcb $41 A
|
|
2733 fcb $4E N
|
|
2734 lsra
|
|
2735 bra L1720
|
|
2736 fcb $45 E
|
|
2737 lsrb
|
|
2738 bra L16F1
|
|
2739 bra L16F3
|
|
2740 bra L16D5
|
|
2741 L16D5 fcb $5B [
|
|
2742 rola
|
|
2743 tstb
|
|
2744 fcb $4E N
|
|
2745 rola
|
|
2746 lsra
|
|
2747 rola
|
|
2748 L16DC rorb
|
|
2749 rola
|
|
2750 lsra
|
|
2751 fcb $55 U
|
|
2752 fcb $41 A
|
|
2753 inca
|
|
2754 inca
|
|
2755 L16E3 rolb
|
|
2756 bra L1739
|
|
2757 fcb $45 E
|
|
2758 inca
|
|
2759 fcb $45 E
|
|
2760 coma
|
|
2761 lsrb
|
|
2762 bra L16ED
|
|
2763 L16ED fcb $5B [
|
|
2764 L16EE lsla
|
|
2765 L16EF tstb
|
|
2766 bra L1744
|
|
2767 fcb $45 E
|
|
2768 L16F3 coma
|
|
2769 fcb $45 E
|
|
2770 rola
|
|
2771 rorb
|
|
2772 fcb $45 E
|
|
2773 bra L1742
|
|
2774 fcb $45 E
|
|
2775 inca
|
|
2776 negb
|
|
2777 bra L171F
|
|
2778 bra L1721
|
|
2779 bra L1723
|
|
2780 bra L1705
|
|
2781 L1705 comb
|
|
2782 fcb $45 E
|
|
2783 inca
|
|
2784 L1708 fcb $45 E
|
|
2785 coma
|
|
2786 lsrb
|
|
2787 rola
|
|
2788 clra
|
|
2789 fcb $4E N
|
|
2790 bra L176B
|
|
2791 fcb $4E N
|
|
2792 bge L1759
|
|
2793 bge L175E
|
|
2794 bge L175F
|
|
2795 tstb
|
|
2796 neg <u0053
|
|
2797 fcb $45 E
|
|
2798 inca
|
|
2799 fcb $45 E
|
|
2800 coma
|
|
2801 lsrb
|
|
2802 L171F bra L1775
|
|
2803 L1721 fcb $45 E
|
|
2804 fcb $52 R
|
|
2805 L1723 tsta
|
|
2806 bra L176A
|
|
2807 fcb $45 E
|
|
2808 comb
|
|
2809 coma
|
|
2810 fcb $52 R
|
|
2811 rola
|
|
2812 negb
|
|
2813 lsrb
|
|
2814 clra
|
|
2815 fcb $52 R
|
|
2816 neg <u0031
|
|
2817 bra L1760
|
|
2818 bra L1789
|
|
2819 fcb $45 E
|
|
2820 fcb $52 R
|
|
2821 tsta
|
|
2822 clrb
|
|
2823 L1739 rorb
|
|
2824 lsra
|
|
2825 asra
|
|
2826 neg <u0032
|
|
2827 bra L176D
|
|
2828 bra L1796
|
|
2829 L1742 fcb $45 E
|
|
2830 fcb $52 R
|
|
2831 L1744 tsta
|
|
2832 clrb
|
|
2833 asrb
|
|
2834 rola
|
|
2835 fcb $4E N
|
|
2836 neg <u0048
|
|
2837 bra L177A
|
|
2838 bra L1797
|
|
2839 fcb $45 E
|
|
2840 inca
|
|
2841 negb
|
|
2842 neg <u0050
|
|
2843 inca
|
|
2844 fcb $41 A
|
|
2845 coma
|
|
2846 fcb $45 E
|
|
2847 bra L179B
|
|
2848 bra L17A2
|
|
2849 clra
|
|
2850 fcb $52 R
|
|
2851 L175E tsta
|
|
2852 L175F fcb $41 A
|
|
2853 L1760 lsrb
|
|
2854 lsrb
|
|
2855 fcb $45 E
|
|
2856 lsra
|
|
2857 bra L17AA
|
|
2858 rola
|
|
2859 comb
|
|
2860 fcb $4B K
|
|
2861 bra L17B4
|
|
2862 L176B fcb $4E N
|
|
2863 neg <u0050
|
|
2864 inca
|
|
2865 fcb $41 A
|
|
2866 coma
|
|
2867 fcb $45 E
|
|
2868 bra L17CD
|
|
2869 clra
|
|
2870 L1775 fcb $55 U
|
|
2871 fcb $52 R
|
|
2872 bra L17CC
|
|
2873 rolb
|
|
2874 L177A comb
|
|
2875 lsrb
|
|
2876 fcb $45 E
|
|
2877 tsta
|
|
2878 bra L17C4
|
|
2879 rola
|
|
2880 comb
|
|
2881 fcb $4B K
|
|
2882 bra L17CE
|
|
2883 fcb $4E N
|
|
2884 neg <u0043
|
|
2885 oim #$6E,$07,y
|
|
2886 lsr >$206F
|
|
2887 neg >$656E
|
|
2888 bra L17FB
|
|
2889 eim #$6C,-$10,s
|
|
2890 L1796 bra L17FE
|
|
2891 rol $0C,s
|
|
2892 eim #u0000,$05,u
|
|
2893 aim #$72,>$6F72
|
|
2894 bra L1815
|
|
2895 eim #$61,$04,s
|
|
2896 rol $0E,s
|
|
2897 asr $00,y
|
|
2898 L17AA lsl $05,s
|
|
2899 inc -$10,s
|
|
2900 bra L1816
|
|
2901 rol $0C,s
|
|
2902 eim #u0000,$03,u
|
|
2903 clra
|
|
2904 fcb $4E N
|
|
2905 rora
|
|
2906 rola
|
|
2907 asra
|
|
2908 abx
|
|
2909 bra L17BD
|
|
2910 L17BD pshs u
|
|
2911 ldd #$FFBA
|
|
2912 lbsr L00FD
|
|
2913 ldd #$0003
|
|
2914 pshs b,a
|
|
2915 leax >$021B,y
|
|
2916 L17CE tfr x,d
|
|
2917 lbsr L2A1C
|
|
2918 leas $02,s
|
|
2919 std <u0079
|
|
2920 cmpd #$FFFF
|
|
2921 bne L17E6
|
|
2922 leax >L1A3D,pcr
|
|
2923 tfr x,d
|
|
2924 lbsr L14BD
|
|
2925 L17E6 lbsr L1909
|
|
2926 bsr L182B
|
|
2927 ldd <u0079
|
|
2928 lbsr L2A0B
|
|
2929 bsr L17F4
|
|
2930 puls pc,u
|
|
2931 L17F4 pshs u
|
|
2932 ldd #$FFBC
|
|
2933 lbsr L00FD
|
|
2934 leax >$000D,y
|
|
2935 tfr x,d
|
|
2936 lbsr L19AA
|
|
2937 leax >$0013,y
|
|
2938 tfr x,d
|
|
2939 lbsr L19AA
|
|
2940 leax >$0011,y
|
|
2941 tfr x,d
|
|
2942 lbsr L19AA
|
|
2943 leax >$0015,y
|
|
2944 tfr x,d
|
|
2945 lbsr L19AA
|
|
2946 leax >$000F,y
|
|
2947 tfr x,d
|
|
2948 lbsr L19AA
|
|
2949 puls pc,u
|
|
2950 L182B pshs u
|
|
2951 ldd #$FFB6
|
|
2952 lbsr L00FD
|
|
2953 leas -$02,s
|
|
2954 clra
|
|
2955 clrb
|
|
2956 bra L186F
|
|
2957 L1839 ldu <u0011
|
|
2958 bra L1866
|
|
2959 L183D ldd ,s
|
|
2960 lslb
|
|
2961 rola
|
|
2962 leax >$0007,y
|
|
2963 leax d,x
|
|
2964 ldd ,x
|
|
2965 pshs b,a
|
|
2966 pshs u
|
|
2967 ldd #$0002
|
|
2968 addd ,s++
|
|
2969 lbsr L0D34
|
|
2970 std ,s++
|
|
2971 beq L1863
|
|
2972 ldd ,u
|
|
2973 beq L186A
|
|
2974 tfr u,d
|
|
2975 bsr L188F
|
|
2976 bra L186A
|
|
2977 L1863 ldu <u0023,u
|
|
2978 L1866 stu -$02,s
|
|
2979 bne L183D
|
|
2980 L186A ldd ,s
|
|
2981 addd #$0001
|
|
2982 L186F std ,s
|
|
2983 ldd ,s
|
|
2984 cmpd #$0002
|
|
2985 blt L1839
|
|
2986 ldu <u0011
|
|
2987 bra L1888
|
|
2988 L187D ldd ,u
|
|
2989 beq L1885
|
|
2990 tfr u,d
|
|
2991 bsr L188F
|
|
2992 L1885 ldu <u0023,u
|
|
2993 L1888 stu -$02,s
|
|
2994 bne L187D
|
|
2995 lbra L1A39
|
|
2996 L188F pshs u,b,a
|
|
2997 ldd #$FFB6
|
|
2998 lbsr L00FD
|
|
2999 leas -$02,s
|
|
3000 ldd $02,s
|
|
3001 addd #$0002
|
|
3002 lbsr L197E
|
|
3003 clra
|
|
3004 clrb
|
|
3005 std [<$02,s]
|
|
3006 ldd <u0013
|
|
3007 lbra L18FE
|
|
3008 L18AB ldx ,s
|
|
3009 ldd <$21,x
|
|
3010 cmpd $02,s
|
|
3011 bne L18F9
|
|
3012 ldd ,x
|
|
3013 beq L18F9
|
|
3014 tfr x,d
|
|
3015 addd #$0002
|
|
3016 lbsr L197E
|
|
3017 ldd ,s
|
|
3018 addd #$0002
|
|
3019 lbsr L1924
|
|
3020 std -$02,s
|
|
3021 beq L18D0
|
|
3022 lbsr L19E7
|
|
3023 L18D0 clra
|
|
3024 clrb
|
|
3025 std [,s]
|
|
3026 ldu <u000D
|
|
3027 bra L18F5
|
|
3028 L18D8 ldd <u0021,u
|
|
3029 cmpd ,s
|
|
3030 bne L18F2
|
|
3031 ldd ,u
|
|
3032 beq L18F2
|
|
3033 pshs u
|
|
3034 ldd #$0002
|
|
3035 addd ,s++
|
|
3036 lbsr L197E
|
|
3037 clra
|
|
3038 clrb
|
|
3039 std ,u
|
|
3040 L18F2 ldu <u0023,u
|
|
3041 L18F5 stu -$02,s
|
|
3042 bne L18D8
|
|
3043 L18F9 ldx ,s
|
|
3044 ldd <$23,x
|
|
3045 L18FE std ,s
|
|
3046 ldd ,s
|
|
3047 lbne L18AB
|
|
3048 lbra L19D0
|
|
3049 L1909 pshs u
|
|
3050 ldd #$FFBC
|
|
3051 lbsr L00FD
|
|
3052 leau >$0224,y
|
|
3053 bra L191C
|
|
3054 L1917 ldd ,u++
|
|
3055 lbsr L197E
|
|
3056 L191C ldd ,u
|
|
3057 bne L1917
|
|
3058 bsr L1941
|
|
3059 puls pc,u
|
|
3060 L1924 pshs u,b,a
|
|
3061 ldd #$FFB8
|
|
3062 lbsr L00FD
|
|
3063 ldd ,s
|
|
3064 lbsr L0DD5
|
|
3065 leax >L1A83,pcr
|
|
3066 pshs x
|
|
3067 ldd $02,s
|
|
3068 lbsr L0D34
|
|
3069 leas $02,s
|
|
3070 lbra L1A39
|
|
3071 L1941 pshs u
|
|
3072 ldd #$FFBC
|
|
3073 lbsr L00FD
|
|
3074 lbsr L103F
|
|
3075 L194C lbsr L1437
|
|
3076 sex
|
|
3077 tfr d,x
|
|
3078 bra L1969
|
|
3079 L1954 leax >L1A89,pcr
|
|
3080 bra L195E
|
|
3081 L195A leax >L1A94,pcr
|
|
3082 L195E tfr x,d
|
|
3083 bsr L197E
|
|
3084 puls pc,u
|
|
3085 L1964 lbsr L121F
|
|
3086 bra L194C
|
|
3087 L1969 cmpx #$000D
|
|
3088 beq L1954
|
|
3089 cmpx #$0031
|
|
3090 lbeq L1954
|
|
3091 cmpx #$0032
|
|
3092 beq L195A
|
|
3093 bra L1964
|
|
3094 puls pc,u
|
|
3095 L197E pshs u
|
|
3096 tfr d,u
|
|
3097 ldd #$FFB8
|
|
3098 lbsr L00FD
|
|
3099 tfr u,d
|
|
3100 lbsr L2889
|
|
3101 pshs b,a
|
|
3102 pshs u
|
|
3103 ldd <u0079
|
|
3104 lbsr L2AAD
|
|
3105 leas $04,s
|
|
3106 ldd #$0001
|
|
3107 pshs b,a
|
|
3108 leax >L1A9F,pcr
|
|
3109 pshs x
|
|
3110 ldd <u0079
|
|
3111 lbsr L2AAD
|
|
3112 bra L19D0
|
|
3113 L19AA pshs u,b,a
|
|
3114 ldd #$FFBC
|
|
3115 lbsr L00FD
|
|
3116 leas -$02,s
|
|
3117 ldu [<$02,s]
|
|
3118 bra L19C7
|
|
3119 L19B9 ldd <u0023,u
|
|
3120 std ,s
|
|
3121 ldd <u0019
|
|
3122 std <u0023,u
|
|
3123 stu <u0019
|
|
3124 ldu ,s
|
|
3125 L19C7 stu -$02,s
|
|
3126 bne L19B9
|
|
3127 clra
|
|
3128 clrb
|
|
3129 std [<$02,s]
|
|
3130 L19D0 leas $04,s
|
|
3131 puls pc,u
|
|
3132 L19D4 pshs u
|
|
3133 ldd #$FFBC
|
|
3134 lbsr L00FD
|
|
3135 leax >$021B,y
|
|
3136 tfr x,d
|
|
3137 lbsr L2A73
|
|
3138 puls pc,u
|
|
3139 L19E7 pshs u
|
|
3140 ldd #$FFB8
|
|
3141 lbsr L00FD
|
|
3142 leas -$02,s
|
|
3143 clra
|
|
3144 clrb
|
|
3145 bra L1A2F
|
|
3146 L19F5 ldx ,s
|
|
3147 bra L1A05
|
|
3148 L19F9 ldu <u000F
|
|
3149 bra L1A26
|
|
3150 L19FD ldu <u0017
|
|
3151 bra L1A26
|
|
3152 L1A01 ldu <u0015
|
|
3153 bra L1A26
|
|
3154 L1A05 stx -$02,s
|
|
3155 beq L19F9
|
|
3156 cmpx #$0001
|
|
3157 beq L19FD
|
|
3158 cmpx #$0002
|
|
3159 beq L1A01
|
|
3160 bra L1A26
|
|
3161 L1A15 ldd ,u
|
|
3162 beq L1A23
|
|
3163 pshs u
|
|
3164 ldd #$0002
|
|
3165 addd ,s++
|
|
3166 lbsr L197E
|
|
3167 L1A23 ldu <u0023,u
|
|
3168 L1A26 stu -$02,s
|
|
3169 bne L1A15
|
|
3170 ldd ,s
|
|
3171 addd #$0001
|
|
3172 L1A2F std ,s
|
|
3173 ldd ,s
|
|
3174 cmpd #$0003
|
|
3175 blt L19F5
|
|
3176 L1A39 leas $02,s
|
|
3177 puls pc,u
|
|
3178 L1A3D coma
|
|
3179 oim #$6E,$07,y
|
|
3180 lsr >$2063
|
|
3181 aim #$65,>$6174
|
|
3182 eim #$20,$02,s
|
|
3183 clr $0F,s
|
|
3184 lsr >$6C69
|
|
3185 com >$7400
|
|
3186 fcb $52 R
|
|
3187 fcb $42 B
|
|
3188 rora
|
|
3189 bgt L1AC5
|
|
3190 jmp $00,x
|
|
3191 comb
|
|
3192 coma
|
|
3193 rora
|
|
3194 bgt L1ACC
|
|
3195 jmp $00,x
|
|
3196 negb
|
|
3197 rola
|
|
3198 negb
|
|
3199 fcb $45 E
|
|
3200 tsta
|
|
3201 fcb $41 A
|
|
3202 fcb $4E N
|
|
3203 bgt L1AD7
|
|
3204 jmp $00,x
|
|
3205 clra
|
|
3206 comb
|
|
3207 rts
|
|
3208 negb
|
|
3209 leas $00,x
|
|
3210 rola
|
|
3211 clra
|
|
3212 tsta
|
|
3213 oim #$6E,$00,x
|
|
3214 rola
|
|
3215 jmp $09,s
|
|
3216 lsr >$0043
|
|
3217 coma
|
|
3218 leau u0007,u
|
|
3219 clr $00,x
|
|
3220 L1A83 coma
|
|
3221 coma
|
|
3222 leau u0009,u
|
|
3223 clra
|
|
3224 neg <u0043
|
|
3225 inc $0F,s
|
|
3226 com $0B,s
|
|
3227 bgt L1AC6
|
|
3228 leax $08,s
|
|
3229 dec >$0043
|
|
3230 inc $0F,s
|
|
3231 com $0B,s
|
|
3232 bgt L1AD0
|
|
3233 leax $08,s
|
|
3234 dec >$000D
|
|
3235 neg <u0034
|
|
3236 nega
|
|
3237 ldd #$FFB8
|
|
3238 lbsr L00FD
|
|
3239 leas -$02,s
|
|
3240 lbsr L11B1
|
|
3241 leax >$040D,y
|
|
3242 pshs x
|
|
3243 leax >$0419,y
|
|
3244 tfr x,d
|
|
3245 lbsr L1FE5
|
|
3246 leas $02,s
|
|
3247 tfr d,u
|
|
3248 ldd <u002D
|
|
3249 beq L1AD9
|
|
3250 L1AC5 leax >L1BA6,pcr
|
|
3251 pshs x
|
|
3252 tfr u,d
|
|
3253 lbsr L1FE5
|
|
3254 L1AD0 leas $02,s
|
|
3255 tfr d,u
|
|
3256 lbsr L0375
|
|
3257 L1AD7 bra L1ADC
|
|
3258 L1AD9 lbsr L0EFD
|
|
3259 L1ADC leax >L1BAA,pcr
|
|
3260 pshs x
|
|
3261 tfr u,d
|
|
3262 lbsr L1FE5
|
|
3263 leas $02,s
|
|
3264 lbsr L0F4B
|
|
3265 leax >$0419,y
|
|
3266 tfr x,d
|
|
3267 bsr L1B13
|
|
3268 leax ,s
|
|
3269 tfr x,d
|
|
3270 lbsr L2BEC
|
|
3271 ldd ,s
|
|
3272 beq L1B07
|
|
3273 lbsr L0269
|
|
3274 ldd ,s
|
|
3275 lbsr L2CDA
|
|
3276 L1B07 ldd <u002D
|
|
3277 lbeq L1B89
|
|
3278 lbsr L0383
|
|
3279 lbra L1B89
|
|
3280 L1B13 pshs u
|
|
3281 tfr d,u
|
|
3282 ldd #$FFBA
|
|
3283 lbsr L00FD
|
|
3284 clra
|
|
3285 clrb
|
|
3286 lbsr L2A7A
|
|
3287 std <u007B
|
|
3288 clra
|
|
3289 clrb
|
|
3290 lbsr L2A0B
|
|
3291 ldd #$0001
|
|
3292 pshs b,a
|
|
3293 leax >$021B,y
|
|
3294 tfr x,d
|
|
3295 lbsr L29FE
|
|
3296 leas $02,s
|
|
3297 std <u0079
|
|
3298 bge L1B46
|
|
3299 leax >L1BAC,pcr
|
|
3300 tfr x,d
|
|
3301 lbsr L14BD
|
|
3302 L1B46 pshs u
|
|
3303 leax >L1BC0,pcr
|
|
3304 tfr x,d
|
|
3305 bsr L1B65
|
|
3306 leas $02,s
|
|
3307 cmpd #$FFFF
|
|
3308 bne L1B61
|
|
3309 leax >L1BC7,pcr
|
|
3310 tfr x,d
|
|
3311 lbsr L14BD
|
|
3312 L1B61 bsr L1B8D
|
|
3313 puls pc,u
|
|
3314 L1B65 pshs u,b,a
|
|
3315 ldd #$FFB0
|
|
3316 lbsr L00FD
|
|
3317 ldd #$0040
|
|
3318 pshs b,a
|
|
3319 ldd #$0001
|
|
3320 pshs b,a
|
|
3321 pshs b,a
|
|
3322 ldd $0C,s
|
|
3323 pshs b,a
|
|
3324 lbsr L2889
|
|
3325 pshs b,a
|
|
3326 ldd $0A,s
|
|
3327 lbsr L2C2A
|
|
3328 leas $0A,s
|
|
3329 L1B89 leas $02,s
|
|
3330 puls pc,u
|
|
3331 L1B8D pshs u
|
|
3332 ldd #$FFBC
|
|
3333 lbsr L00FD
|
|
3334 ldd <u0079
|
|
3335 lbsr L2A0B
|
|
3336 ldd <u007B
|
|
3337 lbsr L2A7A
|
|
3338 ldd <u007B
|
|
3339 lbsr L2A0B
|
|
3340 puls pc,u
|
|
3341 L1BA6 bra L1BD5
|
|
3342 com >$000D
|
|
3343 neg <u0063
|
|
3344 oim #$6E,$07,y
|
|
3345 lsr >$206F
|
|
3346 neg >$656E
|
|
3347 bra L1C1A
|
|
3348 clr $0F,s
|
|
3349 lsr >$6669
|
|
3350 inc $05,s
|
|
3351 neg <u006F
|
|
3352 com >$3967
|
|
3353 eim #$6E,$00,x
|
|
3354 L1BC7 coma
|
|
3355 oim #$6E,$07,y
|
|
3356 lsr >$2066
|
|
3357 clr -$0E,s
|
|
3358 tim #u0020,$0F,u
|
|
3359 comb
|
|
3360 rts
|
|
3361 L1BD5 asr $05,s
|
|
3362 jmp $00,x
|
|
3363 L1BD9 pshs u
|
|
3364 ldd #$FFBC
|
|
3365 lbsr L00FD
|
|
3366 L1BE1 lbsr L0F91
|
|
3367 lbsr L1437
|
|
3368 sex
|
|
3369 tfr d,x
|
|
3370 bra L1C17
|
|
3371 L1BEC ldd <u0033
|
|
3372 bne L1BF9
|
|
3373 leax >L2006,pcr
|
|
3374 tfr x,d
|
|
3375 lbsr L145D
|
|
3376 L1BF9 puls pc,u
|
|
3377 L1BFB bsr L1C4B
|
|
3378 puls pc,u
|
|
3379 L1BFF bsr L1C5B
|
|
3380 puls pc,u
|
|
3381 L1C03 leax >L2023,pcr
|
|
3382 tfr x,d
|
|
3383 lbsr L1CFB
|
|
3384 lbsr L0F91
|
|
3385 bra L1BE1
|
|
3386 L1C11 lbsr L121F
|
|
3387 lbra L1BE1
|
|
3388 L1C17 cmpx #$004E
|
|
3389 L1C1A beq L1BEC
|
|
3390 cmpx #$006E
|
|
3391 lbeq L1BEC
|
|
3392 cmpx #$0046
|
|
3393 beq L1BFB
|
|
3394 cmpx #$0066
|
|
3395 lbeq L1BFB
|
|
3396 cmpx #$0049
|
|
3397 beq L1BFF
|
|
3398 cmpx #$0069
|
|
3399 lbeq L1BFF
|
|
3400 cmpx #$0048
|
|
3401 beq L1C03
|
|
3402 cmpx #$0068
|
|
3403 lbeq L1C03
|
|
3404 bra L1C11
|
|
3405 puls pc,u
|
|
3406 L1C4B pshs u
|
|
3407 ldd #$FFBC
|
|
3408 lbsr L00FD
|
|
3409 ldd #$0001
|
|
3410 lbsr L1DA2
|
|
3411 bra L1C70
|
|
3412 L1C5B pshs u
|
|
3413 ldd #$FFBC
|
|
3414 lbsr L00FD
|
|
3415 ldd #$0001
|
|
3416 std <u0029
|
|
3417 clra
|
|
3418 clrb
|
|
3419 lbsr L1DA2
|
|
3420 lbsr L0409
|
|
3421 L1C70 bsr L1C74
|
|
3422 puls pc,u
|
|
3423 L1C74 pshs u
|
|
3424 ldd #$FFBC
|
|
3425 lbsr L00FD
|
|
3426 bsr L1C83
|
|
3427 lbsr L1E86
|
|
3428 puls pc,u
|
|
3429 L1C83 pshs u
|
|
3430 ldd #$FFBA
|
|
3431 lbsr L00FD
|
|
3432 ldd <u002D
|
|
3433 beq L1C94
|
|
3434 lbsr L10B6
|
|
3435 bra L1C97
|
|
3436 L1C94 lbsr L0FB0
|
|
3437 L1C97 leax >$040D,y
|
|
3438 tfr x,d
|
|
3439 lbsr L2B41
|
|
3440 ldd #$00BF
|
|
3441 pshs b,a
|
|
3442 leax >$022E,y
|
|
3443 tfr x,d
|
|
3444 lbsr L2A13
|
|
3445 std ,s++
|
|
3446 beq L1CBB
|
|
3447 leax >$0233,y
|
|
3448 tfr x,d
|
|
3449 lbsr L14BD
|
|
3450 L1CBB puls pc,u
|
|
3451 L1CBD pshs u,b,a
|
|
3452 ldd #$FFB6
|
|
3453 lbsr L00FD
|
|
3454 ldu <u001B
|
|
3455 bra L1CF2
|
|
3456 L1CC9 pshs u
|
|
3457 ldd #$0002
|
|
3458 addd ,s++
|
|
3459 lbsr L0DBB
|
|
3460 ldd ,s
|
|
3461 pshs b,a
|
|
3462 pshs u
|
|
3463 ldd #$0002
|
|
3464 addd ,s++
|
|
3465 lbsr L28E1
|
|
3466 std ,s++
|
|
3467 bne L1CEF
|
|
3468 ldd ,u
|
|
3469 beq L1CF6
|
|
3470 ldd #$0001
|
|
3471 lbra L2002
|
|
3472 L1CEF ldu <u0023,u
|
|
3473 L1CF2 stu -$02,s
|
|
3474 bne L1CC9
|
|
3475 L1CF6 clra
|
|
3476 clrb
|
|
3477 lbra L2002
|
|
3478 L1CFB pshs u,b,a
|
|
3479 ldd #$FFB2
|
|
3480 lbsr L00FD
|
|
3481 leas -$04,s
|
|
3482 leax >$0085,y
|
|
3483 tfr x,d
|
|
3484 lbsr L2B41
|
|
3485 ldd #$0001
|
|
3486 pshs b,a
|
|
3487 ldd $06,s
|
|
3488 lbsr L29FE
|
|
3489 leas $02,s
|
|
3490 std ,s
|
|
3491 cmpd #$FFFF
|
|
3492 bne L1D31
|
|
3493 leax >L202D,pcr
|
|
3494 tfr x,d
|
|
3495 lbsr L145D
|
|
3496 lbsr L11E8
|
|
3497 lbra L1D95
|
|
3498 L1D31 ldd #$0001
|
|
3499 std <u002B
|
|
3500 bra L1D38
|
|
3501 L1D38 lbsr L11B1
|
|
3502 ldu #$0000
|
|
3503 bra L1D74
|
|
3504 L1D40 ldd #$0020
|
|
3505 pshs b,a
|
|
3506 leax >$0441,y
|
|
3507 pshs x
|
|
3508 ldd $04,s
|
|
3509 lbsr L2A9B
|
|
3510 leas $04,s
|
|
3511 std $02,s
|
|
3512 ble L1D7A
|
|
3513 pshs u
|
|
3514 clra
|
|
3515 clrb
|
|
3516 lbsr L1139
|
|
3517 leas $02,s
|
|
3518 ldd #$0020
|
|
3519 pshs b,a
|
|
3520 leax >$0441,y
|
|
3521 pshs x
|
|
3522 ldd #$0001
|
|
3523 lbsr L2AC2
|
|
3524 leas $04,s
|
|
3525 leau u0001,u
|
|
3526 L1D74 cmpu #$000F
|
|
3527 blt L1D40
|
|
3528 L1D7A ldd $02,s
|
|
3529 bgt L1D83
|
|
3530 lbsr L139D
|
|
3531 bra L1D8C
|
|
3532 L1D83 lbsr L133D
|
|
3533 cmpd #$0002
|
|
3534 bne L1D38
|
|
3535 L1D8C ldd ,s
|
|
3536 lbsr L2A0B
|
|
3537 clra
|
|
3538 clrb
|
|
3539 std <u002B
|
|
3540 L1D95 leax >$00A2,y
|
|
3541 tfr x,d
|
|
3542 lbsr L2B41
|
|
3543 leas $06,s
|
|
3544 puls pc,u
|
|
3545 L1DA2 pshs u,b,a
|
|
3546 ldd #$FF8E
|
|
3547 lbsr L00FD
|
|
3548 leas <-$26,s
|
|
3549 lbsr L0FD9
|
|
3550 leax >$0401,y
|
|
3551 tfr x,d
|
|
3552 lbsr L2B41
|
|
3553 ldd #$0081
|
|
3554 pshs b,a
|
|
3555 leax >$022E,y
|
|
3556 tfr x,d
|
|
3557 lbsr L29FE
|
|
3558 leas $02,s
|
|
3559 std $02,s
|
|
3560 cmpd #$FFFF
|
|
3561 bne L1DDA
|
|
3562 leax >L2042,pcr
|
|
3563 tfr x,d
|
|
3564 lbsr L14BD
|
|
3565 L1DDA clra
|
|
3566 clrb
|
|
3567 pshs b,a
|
|
3568 ldd #$0040
|
|
3569 pshs b,a
|
|
3570 clra
|
|
3571 clrb
|
|
3572 pshs b,a
|
|
3573 ldd $08,s
|
|
3574 lbsr L2AD6
|
|
3575 leas $06,s
|
|
3576 clra
|
|
3577 clrb
|
|
3578 std <u001D
|
|
3579 leax >$001B,y
|
|
3580 stx $06,s
|
|
3581 lbra L1E64
|
|
3582 L1DFB ldd ,s
|
|
3583 pshs b,a
|
|
3584 ldd #$0005
|
|
3585 lbsr L2DD7
|
|
3586 std ,s
|
|
3587 leax >$0461,y
|
|
3588 stx $04,s
|
|
3589 bra L1E59
|
|
3590 L1E0F ldb [<$04,s]
|
|
3591 beq L1E52
|
|
3592 ldd $04,s
|
|
3593 pshs b,a
|
|
3594 leax $0A,s
|
|
3595 tfr x,d
|
|
3596 lbsr L29D2
|
|
3597 leas $02,s
|
|
3598 clra
|
|
3599 clrb
|
|
3600 pshs b,a
|
|
3601 leax $0A,s
|
|
3602 tfr x,d
|
|
3603 lbsr L0C90
|
|
3604 leas $02,s
|
|
3605 tfr d,u
|
|
3606 tfr u,d
|
|
3607 std [<$06,s]
|
|
3608 ldd <$26,s
|
|
3609 beq L1E3F
|
|
3610 ldd #$0001
|
|
3611 bra L1E41
|
|
3612 L1E3F clra
|
|
3613 clrb
|
|
3614 L1E41 std ,u
|
|
3615 ldd <u001D
|
|
3616 addd #$0001
|
|
3617 std <u001D
|
|
3618 std <u001F,u
|
|
3619 leax <u0023,u
|
|
3620 stx $06,s
|
|
3621 L1E52 ldd $04,s
|
|
3622 addd #$0020
|
|
3623 std $04,s
|
|
3624 L1E59 ldd ,s
|
|
3625 addd #$FFFF
|
|
3626 std ,s
|
|
3627 lbge L1E0F
|
|
3628 L1E64 ldd #$0800
|
|
3629 pshs b,a
|
|
3630 leax >$0461,y
|
|
3631 pshs x
|
|
3632 ldd $06,s
|
|
3633 lbsr L2A85
|
|
3634 leas $04,s
|
|
3635 std ,s
|
|
3636 lbgt L1DFB
|
|
3637 ldd $02,s
|
|
3638 lbsr L2A0B
|
|
3639 leas <$28,s
|
|
3640 puls pc,u
|
|
3641 L1E86 pshs u
|
|
3642 ldd #$FFB8
|
|
3643 lbsr L00FD
|
|
3644 leas -$02,s
|
|
3645 leax >$0401,y
|
|
3646 pshs x
|
|
3647 leax >$0441,y
|
|
3648 tfr x,d
|
|
3649 lbsr L1FE5
|
|
3650 leas $02,s
|
|
3651 std ,s
|
|
3652 leax >L2052,pcr
|
|
3653 pshs x
|
|
3654 ldd $02,s
|
|
3655 lbsr L1FE5
|
|
3656 leas $02,s
|
|
3657 leax >$0441,y
|
|
3658 tfr x,d
|
|
3659 lbsr L1F2A
|
|
3660 leax >$022E,y
|
|
3661 tfr x,d
|
|
3662 lbsr L2B41
|
|
3663 leax >L205B,pcr
|
|
3664 pshs x
|
|
3665 ldd $02,s
|
|
3666 lbsr L1FE5
|
|
3667 leas $02,s
|
|
3668 std ,s
|
|
3669 ldd <u0033
|
|
3670 bne L1EF7
|
|
3671 leax >L2062,pcr
|
|
3672 tfr x,d
|
|
3673 lbsr L1CBD
|
|
3674 std -$02,s
|
|
3675 bne L1EF7
|
|
3676 leax >L2069,pcr
|
|
3677 pshs x
|
|
3678 ldd $02,s
|
|
3679 lbsr L1FE5
|
|
3680 leas $02,s
|
|
3681 leax >$0441,y
|
|
3682 tfr x,d
|
|
3683 bsr L1F2A
|
|
3684 L1EF7 ldu <u001B
|
|
3685 bra L1F1A
|
|
3686 L1EFB ldd ,u
|
|
3687 beq L1F17
|
|
3688 pshs u
|
|
3689 ldd #$0002
|
|
3690 addd ,s++
|
|
3691 pshs b,a
|
|
3692 ldd $02,s
|
|
3693 lbsr L1FE5
|
|
3694 leas $02,s
|
|
3695 leax >$0441,y
|
|
3696 tfr x,d
|
|
3697 bsr L1F2A
|
|
3698 L1F17 ldu <u0023,u
|
|
3699 L1F1A stu -$02,s
|
|
3700 bne L1EFB
|
|
3701 leax >$00A2,y
|
|
3702 tfr x,d
|
|
3703 lbsr L2B41
|
|
3704 lbra L2002
|
|
3705 L1F2A pshs u
|
|
3706 tfr d,u
|
|
3707 ldd #$FF62
|
|
3708 lbsr L00FD
|
|
3709 leas <-$56,s
|
|
3710 ldd #$002F
|
|
3711 pshs b,a
|
|
3712 tfr u,d
|
|
3713 lbsr L0D89
|
|
3714 leas $02,s
|
|
3715 addd #$0001
|
|
3716 std $02,s
|
|
3717 pshs u
|
|
3718 leax $06,s
|
|
3719 tfr x,d
|
|
3720 lbsr L1FE5
|
|
3721 leas $02,s
|
|
3722 std ,s
|
|
3723 ldd #$0020
|
|
3724 ldx ,s
|
|
3725 leax $01,x
|
|
3726 stx ,s
|
|
3727 stb -$01,x
|
|
3728 ldd <u002D
|
|
3729 beq L1F84
|
|
3730 pshs u
|
|
3731 ldd $02,s
|
|
3732 lbsr L1FE5
|
|
3733 leas $02,s
|
|
3734 std ,s
|
|
3735 leax >L2070,pcr
|
|
3736 pshs x
|
|
3737 ldd $02,s
|
|
3738 lbsr L1FE5
|
|
3739 leas $02,s
|
|
3740 lbsr L0FD9
|
|
3741 lbsr L0375
|
|
3742 bra L1F98
|
|
3743 L1F84 leax >L2075,pcr
|
|
3744 pshs x
|
|
3745 ldd $04,s
|
|
3746 pshs b,a
|
|
3747 ldd $04,s
|
|
3748 bsr L1FE5
|
|
3749 leas $02,s
|
|
3750 bsr L1FE5
|
|
3751 leas $02,s
|
|
3752 L1F98 leax $04,s
|
|
3753 pshs x
|
|
3754 leax >L2077,pcr
|
|
3755 tfr x,d
|
|
3756 lbsr L1B65
|
|
3757 leas $02,s
|
|
3758 cmpd #$FFFF
|
|
3759 bne L1FB6
|
|
3760 leax >L207C,pcr
|
|
3761 tfr x,d
|
|
3762 lbsr L14BD
|
|
3763 L1FB6 leax <$54,s
|
|
3764 tfr x,d
|
|
3765 lbsr L2BEC
|
|
3766 ldd <$54,s
|
|
3767 beq L1FD9
|
|
3768 lbsr L121F
|
|
3769 ldd >$03BB,y
|
|
3770 pshs b,a
|
|
3771 pshs u
|
|
3772 leax >L208C,pcr
|
|
3773 tfr x,d
|
|
3774 lbsr L20A5
|
|
3775 leas $04,s
|
|
3776 L1FD9 ldd <u002D
|
|
3777 beq L1FE0
|
|
3778 lbsr L0383
|
|
3779 L1FE0 leas <$56,s
|
|
3780 puls pc,u
|
|
3781 L1FE5 pshs u,b,a
|
|
3782 ldd #$FFBE
|
|
3783 lbsr L00FD
|
|
3784 ldu $06,s
|
|
3785 L1FEF ldb ,u+
|
|
3786 ldx ,s
|
|
3787 leax $01,x
|
|
3788 stx ,s
|
|
3789 stb -$01,x
|
|
3790 bne L1FEF
|
|
3791 ldd ,s
|
|
3792 addd #$FFFF
|
|
3793 std ,s
|
|
3794 L2002 leas $02,s
|
|
3795 puls pc,u
|
|
3796 L2006 tsta
|
|
3797 fcb $55 U
|
|
3798 comb
|
|
3799 lsrb
|
|
3800 bra L2054
|
|
3801 fcb $41 A
|
|
3802 rorb
|
|
3803 fcb $45 E
|
|
3804 bra L2058
|
|
3805 fcb $52 R
|
|
3806 rora
|
|
3807 lsra
|
|
3808 fcb $52 R
|
|
3809 rorb
|
|
3810 bra L2061
|
|
3811 fcb $4E N
|
|
3812 bra L205E
|
|
3813 tsta
|
|
3814 lsra
|
|
3815 comb
|
|
3816 bra L2064
|
|
3817 rola
|
|
3818 fcb $52 R
|
|
3819 neg <u0063
|
|
3820 clr $0E,s
|
|
3821 ror $09,s
|
|
3822 asr $0E,y
|
|
3823 lsl -$10,s
|
|
3824 neg <u0043
|
|
3825 oim #$6E,$07,y
|
|
3826 lsr >$206F
|
|
3827 neg >$656E
|
|
3828 bra L20A1
|
|
3829 eim #$6C,-$10,s
|
|
3830 bra L20A4
|
|
3831 rol $0C,s
|
|
3832 eim #u0000,$03,u
|
|
3833 oim #$6E,$07,y
|
|
3834 lsr >$206F
|
|
3835 neg >$656E
|
|
3836 bra L2091
|
|
3837 tsta
|
|
3838 lsra
|
|
3839 comb
|
|
3840 neg <u002F
|
|
3841 com >$7461
|
|
3842 aim #$74,>$7570
|
|
3843 neg <u002F
|
|
3844 coma
|
|
3845 tsta
|
|
3846 L205E lsra
|
|
3847 comb
|
|
3848 ble L2062
|
|
3849 L2062 asr -$0E,s
|
|
3850 L2064 ror $04,s
|
|
3851 aim #$76,>$0067
|
|
3852 aim #$66,>$6472
|
|
3853 ror >$0020
|
|
3854 blt L20E6
|
|
3855 tst <u0000
|
|
3856 L2075 tst <u0000
|
|
3857 L2077 com $0F,s
|
|
3858 neg >$7900
|
|
3859 L207C coma
|
|
3860 oim #$6E,$07,y
|
|
3861 lsr >$2066
|
|
3862 clr -$0E,s
|
|
3863 tim #$20,$03,s
|
|
3864 clr -$10,s
|
|
3865 rol >$000D
|
|
3866 fcb $45 E
|
|
3867 aim #$72,>$6F72
|
|
3868 bra L20F7
|
|
3869 clr -$10,s
|
|
3870 rol >$696E
|
|
3871 asr -$06,y
|
|
3872 bra L20C2
|
|
3873 com >$202D
|
|
3874 bra L20C7
|
|
3875 lsr $0D,x
|
|
3876 L20A4 neg <u0034
|
|
3877 rora
|
|
3878 leax >$0267,y
|
|
3879 stx >$0C61,y
|
|
3880 leax $06,s
|
|
3881 pshs x
|
|
3882 ldd $02,s
|
|
3883 bra L20C5
|
|
3884 pshs u,b,a
|
|
3885 ldd ,s
|
|
3886 std >$0C61,y
|
|
3887 leax $08,s
|
|
3888 pshs x
|
|
3889 ldd $08,s
|
|
3890 L20C5 pshs b,a
|
|
3891 L20C7 leax >L254B,pcr
|
|
3892 tfr x,d
|
|
3893 bsr L20F9
|
|
3894 leas $04,s
|
|
3895 bra L20F5
|
|
3896 pshs u,b,a
|
|
3897 ldd ,s
|
|
3898 std >$0C61,y
|
|
3899 leax $08,s
|
|
3900 pshs x
|
|
3901 ldd $08,s
|
|
3902 pshs b,a
|
|
3903 leax >L255C,pcr
|
|
3904 tfr x,d
|
|
3905 bsr L20F9
|
|
3906 leas $04,s
|
|
3907 clra
|
|
3908 clrb
|
|
3909 stb [>$0C61,y]
|
|
3910 ldd ,s
|
|
3911 L20F5 leas $02,s
|
|
3912 L20F7 puls pc,u
|
|
3913 L20F9 pshs u,b,a
|
|
3914 ldu $06,s
|
|
3915 leas -$0B,s
|
|
3916 bra L210B
|
|
3917 L2101 ldb $08,s
|
|
3918 lbeq L2328
|
|
3919 sex
|
|
3920 jsr [<$0B,s]
|
|
3921 L210B ldb ,u+
|
|
3922 stb $08,s
|
|
3923 cmpb #$25
|
|
3924 bne L2101
|
|
3925 ldb ,u+
|
|
3926 stb $08,s
|
|
3927 clra
|
|
3928 clrb
|
|
3929 std $02,s
|
|
3930 std $06,s
|
|
3931 ldb $08,s
|
|
3932 cmpb #$2D
|
|
3933 bne L2130
|
|
3934 ldd #$0001
|
|
3935 std >$0C77,y
|
|
3936 ldb ,u+
|
|
3937 stb $08,s
|
|
3938 bra L2136
|
|
3939 L2130 clra
|
|
3940 clrb
|
|
3941 std >$0C77,y
|
|
3942 L2136 ldb $08,s
|
|
3943 cmpb #$30
|
|
3944 bne L2141
|
|
3945 ldd #$0030
|
|
3946 bra L2144
|
|
3947 L2141 ldd #$0020
|
|
3948 L2144 std >$0C79,y
|
|
3949 bra L2164
|
|
3950 L214A ldd $06,s
|
|
3951 pshs b,a
|
|
3952 ldd #$000A
|
|
3953 lbsr L2D01
|
|
3954 pshs b,a
|
|
3955 ldb $0A,s
|
|
3956 sex
|
|
3957 addd #$FFD0
|
|
3958 addd ,s++
|
|
3959 std $06,s
|
|
3960 ldb ,u+
|
|
3961 stb $08,s
|
|
3962 L2164 ldb $08,s
|
|
3963 sex
|
|
3964 leax >$032B,y
|
|
3965 leax d,x
|
|
3966 ldb ,x
|
|
3967 clra
|
|
3968 andb #$08
|
|
3969 bne L214A
|
|
3970 ldb $08,s
|
|
3971 cmpb #$2E
|
|
3972 bne L21AD
|
|
3973 ldd #$0001
|
|
3974 std $04,s
|
|
3975 bra L2197
|
|
3976 L2181 ldd $02,s
|
|
3977 pshs b,a
|
|
3978 ldd #$000A
|
|
3979 lbsr L2D01
|
|
3980 pshs b,a
|
|
3981 ldb $0A,s
|
|
3982 sex
|
|
3983 addd #$FFD0
|
|
3984 addd ,s++
|
|
3985 std $02,s
|
|
3986 L2197 ldb ,u+
|
|
3987 stb $08,s
|
|
3988 ldb $08,s
|
|
3989 sex
|
|
3990 leax >$032B,y
|
|
3991 leax d,x
|
|
3992 ldb ,x
|
|
3993 clra
|
|
3994 andb #$08
|
|
3995 bne L2181
|
|
3996 bra L21B1
|
|
3997 L21AD clra
|
|
3998 clrb
|
|
3999 std $04,s
|
|
4000 L21B1 ldb $08,s
|
|
4001 sex
|
|
4002 tfr d,x
|
|
4003 lbra L22CB
|
|
4004 L21B9 ldd $06,s
|
|
4005 pshs b,a
|
|
4006 ldx <$15,s
|
|
4007 leax $02,x
|
|
4008 stx <$15,s
|
|
4009 ldd -$02,x
|
|
4010 lbsr L232C
|
|
4011 lbra L229B
|
|
4012 L21CD ldd $06,s
|
|
4013 pshs b,a
|
|
4014 ldx <$15,s
|
|
4015 leax $02,x
|
|
4016 stx <$15,s
|
|
4017 ldd -$02,x
|
|
4018 lbsr L23E7
|
|
4019 lbra L229B
|
|
4020 L21E1 ldd $06,s
|
|
4021 pshs b,a
|
|
4022 ldb $0A,s
|
|
4023 sex
|
|
4024 leax >$032B,y
|
|
4025 leax d,x
|
|
4026 ldb ,x
|
|
4027 clra
|
|
4028 andb #$02
|
|
4029 pshs b,a
|
|
4030 ldx <$17,s
|
|
4031 leax $02,x
|
|
4032 stx <$17,s
|
|
4033 ldd -$02,x
|
|
4034 lbsr L2431
|
|
4035 lbra L22B6
|
|
4036 L2205 ldd $06,s
|
|
4037 pshs b,a
|
|
4038 ldx <$15,s
|
|
4039 leax $02,x
|
|
4040 stx <$15,s
|
|
4041 ldd -$02,x
|
|
4042 pshs b,a
|
|
4043 leax >$0C63,y
|
|
4044 tfr x,d
|
|
4045 lbsr L2370
|
|
4046 lbra L22B6
|
|
4047 L2221 ldd $04,s
|
|
4048 bne L222A
|
|
4049 ldd #$0006
|
|
4050 std $02,s
|
|
4051 L222A ldd $06,s
|
|
4052 pshs b,a
|
|
4053 leax <$15,s
|
|
4054 pshs x
|
|
4055 ldd $06,s
|
|
4056 pshs b,a
|
|
4057 ldb $0E,s
|
|
4058 sex
|
|
4059 lbsr L287E
|
|
4060 leas $04,s
|
|
4061 lbra L229B
|
|
4062 L2242 ldx <$13,s
|
|
4063 leax $02,x
|
|
4064 stx <$13,s
|
|
4065 ldd -$02,x
|
|
4066 lbra L22C5
|
|
4067 L224F ldx <$13,s
|
|
4068 leax $02,x
|
|
4069 stx <$13,s
|
|
4070 ldd -$02,x
|
|
4071 std $09,s
|
|
4072 ldd $04,s
|
|
4073 beq L2295
|
|
4074 ldd $09,s
|
|
4075 std $04,s
|
|
4076 bra L2271
|
|
4077 L2265 ldb [<$09,s]
|
|
4078 beq L227D
|
|
4079 ldd $09,s
|
|
4080 addd #$0001
|
|
4081 std $09,s
|
|
4082 L2271 ldd $02,s
|
|
4083 addd #$FFFF
|
|
4084 std $02,s
|
|
4085 subd #$FFFF
|
|
4086 bne L2265
|
|
4087 L227D ldd $06,s
|
|
4088 pshs b,a
|
|
4089 ldd $0B,s
|
|
4090 subd $06,s
|
|
4091 pshs b,a
|
|
4092 ldd $08,s
|
|
4093 pshs b,a
|
|
4094 ldd <$11,s
|
|
4095 lbsr L249F
|
|
4096 leas $06,s
|
|
4097 bra L22BF
|
|
4098 L2295 ldd $06,s
|
|
4099 pshs b,a
|
|
4100 ldd $0B,s
|
|
4101 L229B pshs b,a
|
|
4102 bra L22B8
|
|
4103 L229F ldb ,u+
|
|
4104 stb $08,s
|
|
4105 bra L22A7
|
|
4106 leas -$0D,x
|
|
4107 L22A7 ldd $06,s
|
|
4108 pshs b,a
|
|
4109 leax <$15,s
|
|
4110 pshs x
|
|
4111 ldb $0C,s
|
|
4112 sex
|
|
4113 lbsr L283E
|
|
4114 L22B6 std ,s
|
|
4115 L22B8 ldd $0F,s
|
|
4116 lbsr L24F5
|
|
4117 leas $04,s
|
|
4118 L22BF lbra L210B
|
|
4119 L22C2 ldb $08,s
|
|
4120 sex
|
|
4121 L22C5 jsr [<$0B,s]
|
|
4122 lbra L210B
|
|
4123 L22CB cmpx #$0064
|
|
4124 lbeq L21B9
|
|
4125 cmpx #$006F
|
|
4126 lbeq L21CD
|
|
4127 cmpx #$0078
|
|
4128 lbeq L21E1
|
|
4129 cmpx #$0058
|
|
4130 lbeq L21E1
|
|
4131 cmpx #$0075
|
|
4132 lbeq L2205
|
|
4133 cmpx #$0066
|
|
4134 lbeq L2221
|
|
4135 cmpx #$0065
|
|
4136 lbeq L2221
|
|
4137 cmpx #$0067
|
|
4138 lbeq L2221
|
|
4139 cmpx #$0045
|
|
4140 lbeq L2221
|
|
4141 cmpx #$0047
|
|
4142 lbeq L2221
|
|
4143 cmpx #$0063
|
|
4144 lbeq L2242
|
|
4145 cmpx #$0073
|
|
4146 lbeq L224F
|
|
4147 cmpx #$006C
|
|
4148 lbeq L229F
|
|
4149 bra L22C2
|
|
4150 L2328 leas $0D,s
|
|
4151 puls pc,u
|
|
4152 L232C pshs u,b,a
|
|
4153 leas -$02,s
|
|
4154 leax >$0C63,y
|
|
4155 stx ,s
|
|
4156 ldd $02,s
|
|
4157 bge L2363
|
|
4158 nega
|
|
4159 negb
|
|
4160 sbca #$00
|
|
4161 std $02,s
|
|
4162 std -$02,s
|
|
4163 bge L2358
|
|
4164 leax >L2570,pcr
|
|
4165 pshs x
|
|
4166 leax >$0C63,y
|
|
4167 tfr x,d
|
|
4168 lbsr L289C
|
|
4169 leas $02,s
|
|
4170 lbra L242D
|
|
4171 L2358 ldd #$002D
|
|
4172 ldx ,s
|
|
4173 leax $01,x
|
|
4174 stx ,s
|
|
4175 stb -$01,x
|
|
4176 L2363 ldd $02,s
|
|
4177 pshs b,a
|
|
4178 ldd $02,s
|
|
4179 bsr L2370
|
|
4180 leas $02,s
|
|
4181 lbra L2427
|
|
4182 L2370 pshs u,b,a
|
|
4183 leas -$06,s
|
|
4184 ldu $06,s
|
|
4185 clra
|
|
4186 clrb
|
|
4187 std $02,s
|
|
4188 std ,s
|
|
4189 bra L238D
|
|
4190 L237E ldd ,s
|
|
4191 addd #$0001
|
|
4192 std ,s
|
|
4193 ldd $0C,s
|
|
4194 subd >$024D,y
|
|
4195 std $0C,s
|
|
4196 L238D ldd $0C,s
|
|
4197 blt L237E
|
|
4198 leax >$024D,y
|
|
4199 stx $04,s
|
|
4200 bra L23CD
|
|
4201 L2399 ldd ,s
|
|
4202 addd #$0001
|
|
4203 std ,s
|
|
4204 L23A0 ldd $0C,s
|
|
4205 subd [<$04,s]
|
|
4206 std $0C,s
|
|
4207 bge L2399
|
|
4208 addd [<$04,s]
|
|
4209 std $0C,s
|
|
4210 ldd ,s
|
|
4211 beq L23B7
|
|
4212 ldd #$0001
|
|
4213 std $02,s
|
|
4214 L23B7 ldd $02,s
|
|
4215 beq L23C2
|
|
4216 ldd ,s
|
|
4217 addd #$0030
|
|
4218 stb ,u+
|
|
4219 L23C2 clra
|
|
4220 clrb
|
|
4221 std ,s
|
|
4222 ldd $04,s
|
|
4223 addd #$0002
|
|
4224 std $04,s
|
|
4225 L23CD ldd $04,s
|
|
4226 cmpd >$0255,y
|
|
4227 bne L23A0
|
|
4228 ldd $0C,s
|
|
4229 addd #$0030
|
|
4230 stb ,u+
|
|
4231 clra
|
|
4232 clrb
|
|
4233 stb ,u
|
|
4234 ldd $06,s
|
|
4235 leas $08,s
|
|
4236 puls pc,u
|
|
4237 L23E7 pshs u,b,a
|
|
4238 leas -$02,s
|
|
4239 leax >$0C63,y
|
|
4240 stx ,s
|
|
4241 leau >$0C6D,y
|
|
4242 L23F5 ldd $02,s
|
|
4243 clra
|
|
4244 andb #$07
|
|
4245 addd #$0030
|
|
4246 stb ,u+
|
|
4247 ldd $02,s
|
|
4248 lsra
|
|
4249 rorb
|
|
4250 lsra
|
|
4251 rorb
|
|
4252 lsra
|
|
4253 rorb
|
|
4254 std $02,s
|
|
4255 bne L23F5
|
|
4256 bra L2417
|
|
4257 L240D ldb ,u
|
|
4258 ldx ,s
|
|
4259 leax $01,x
|
|
4260 stx ,s
|
|
4261 stb -$01,x
|
|
4262 L2417 leau -u0001,u
|
|
4263 pshs u
|
|
4264 leax >$0C6D,y
|
|
4265 cmpx ,s++
|
|
4266 bls L240D
|
|
4267 clra
|
|
4268 clrb
|
|
4269 stb [,s]
|
|
4270 L2427 leax >$0C63,y
|
|
4271 tfr x,d
|
|
4272 L242D leas $04,s
|
|
4273 puls pc,u
|
|
4274 L2431 pshs u,b,a
|
|
4275 leas -$04,s
|
|
4276 leax >$0C63,y
|
|
4277 stx $02,s
|
|
4278 leau >$0C6D,y
|
|
4279 L243F ldd $04,s
|
|
4280 clra
|
|
4281 andb #$0F
|
|
4282 std ,s
|
|
4283 pshs b,a
|
|
4284 ldd $02,s
|
|
4285 cmpd #$0009
|
|
4286 ble L2461
|
|
4287 ldd $0C,s
|
|
4288 beq L2459
|
|
4289 ldd #$0041
|
|
4290 bra L245C
|
|
4291 L2459 ldd #$0061
|
|
4292 L245C addd #$FFF6
|
|
4293 bra L2464
|
|
4294 L2461 ldd #$0030
|
|
4295 L2464 addd ,s++
|
|
4296 stb ,u+
|
|
4297 ldd $04,s
|
|
4298 lsra
|
|
4299 rorb
|
|
4300 lsra
|
|
4301 rorb
|
|
4302 lsra
|
|
4303 rorb
|
|
4304 lsra
|
|
4305 rorb
|
|
4306 anda #$0F
|
|
4307 std $04,s
|
|
4308 bne L243F
|
|
4309 bra L2484
|
|
4310 L247A ldb ,u
|
|
4311 ldx $02,s
|
|
4312 leax $01,x
|
|
4313 stx $02,s
|
|
4314 stb -$01,x
|
|
4315 L2484 leau -u0001,u
|
|
4316 pshs u
|
|
4317 leax >$0C6D,y
|
|
4318 cmpx ,s++
|
|
4319 bls L247A
|
|
4320 clra
|
|
4321 clrb
|
|
4322 stb [<$02,s]
|
|
4323 leax >$0C63,y
|
|
4324 tfr x,d
|
|
4325 leas $06,s
|
|
4326 puls pc,u
|
|
4327 L249F pshs u,b,a
|
|
4328 ldu $06,s
|
|
4329 ldd $0A,s
|
|
4330 subd $08,s
|
|
4331 std $0A,s
|
|
4332 ldd >$0C77,y
|
|
4333 bne L24CA
|
|
4334 bra L24B7
|
|
4335 L24B1 ldd >$0C79,y
|
|
4336 jsr [,s]
|
|
4337 L24B7 ldd $0A,s
|
|
4338 addd #$FFFF
|
|
4339 std $0A,s
|
|
4340 subd #$FFFF
|
|
4341 bgt L24B1
|
|
4342 bra L24CA
|
|
4343 L24C5 ldb ,u+
|
|
4344 sex
|
|
4345 jsr [,s]
|
|
4346 L24CA ldd $08,s
|
|
4347 addd #$FFFF
|
|
4348 std $08,s
|
|
4349 subd #$FFFF
|
|
4350 bne L24C5
|
|
4351 ldd >$0C77,y
|
|
4352 lbeq L256C
|
|
4353 bra L24E6
|
|
4354 L24E0 ldd >$0C79,y
|
|
4355 jsr [,s]
|
|
4356 L24E6 ldd $0A,s
|
|
4357 addd #$FFFF
|
|
4358 std $0A,s
|
|
4359 subd #$FFFF
|
|
4360 bgt L24E0
|
|
4361 lbra L256C
|
|
4362 L24F5 pshs u,b,a
|
|
4363 ldu $06,s
|
|
4364 ldd $08,s
|
|
4365 pshs b,a
|
|
4366 tfr u,d
|
|
4367 lbsr L2889
|
|
4368 nega
|
|
4369 negb
|
|
4370 sbca #$00
|
|
4371 addd ,s++
|
|
4372 std $08,s
|
|
4373 ldd >$0C77,y
|
|
4374 bne L252B
|
|
4375 bra L2518
|
|
4376 L2512 ldd >$0C79,y
|
|
4377 jsr [,s]
|
|
4378 L2518 ldd $08,s
|
|
4379 addd #$FFFF
|
|
4380 std $08,s
|
|
4381 subd #$FFFF
|
|
4382 bgt L2512
|
|
4383 bra L252B
|
|
4384 L2526 ldb ,u+
|
|
4385 sex
|
|
4386 jsr [,s]
|
|
4387 L252B ldb ,u
|
|
4388 bne L2526
|
|
4389 ldd >$0C77,y
|
|
4390 beq L256C
|
|
4391 bra L253D
|
|
4392 L2537 ldd >$0C79,y
|
|
4393 jsr [,s]
|
|
4394 L253D ldd $08,s
|
|
4395 addd #$FFFF
|
|
4396 std $08,s
|
|
4397 subd #$FFFF
|
|
4398 bgt L2537
|
|
4399 bra L256C
|
|
4400 L254B pshs u,b,a
|
|
4401 ldd >$0C61,y
|
|
4402 pshs b,a
|
|
4403 ldd $02,s
|
|
4404 lbsr L2577
|
|
4405 leas $02,s
|
|
4406 bra L256C
|
|
4407 L255C pshs u,b,a
|
|
4408 ldd ,s
|
|
4409 ldx >$0C61,y
|
|
4410 leax $01,x
|
|
4411 stx >$0C61,y
|
|
4412 stb -$01,x
|
|
4413 L256C leas $02,s
|
|
4414 puls pc,u
|
|
4415 L2570 blt L25A5
|
|
4416 leas -$09,y
|
|
4417 pshu y,x,dp
|
|
4418 neg <u0034
|
|
4419 rora
|
|
4420 ldu $06,s
|
|
4421 ldd u0006,u
|
|
4422 anda #$80
|
|
4423 andb #$22
|
|
4424 cmpd #$8002
|
|
4425 beq L2599
|
|
4426 ldd u0006,u
|
|
4427 clra
|
|
4428 andb #$22
|
|
4429 cmpd #$0002
|
|
4430 lbne L2670
|
|
4431 tfr u,d
|
|
4432 lbsr L27B2
|
|
4433 L2599 ldd u0006,u
|
|
4434 clra
|
|
4435 andb #$04
|
|
4436 beq L25D5
|
|
4437 ldd #$0001
|
|
4438 pshs b,a
|
|
4439 L25A5 leax $03,s
|
|
4440 pshs x
|
|
4441 ldd u0006,u
|
|
4442 clra
|
|
4443 andb #$40
|
|
4444 beq L25B6
|
|
4445 leax >L2AC2,pcr
|
|
4446 bra L25BA
|
|
4447 L25B6 leax >L2AAD,pcr
|
|
4448 L25BA tfr x,d
|
|
4449 tfr d,x
|
|
4450 ldd u0008,u
|
|
4451 jsr ,x
|
|
4452 leas $04,s
|
|
4453 cmpd #$FFFF
|
|
4454 lbne L268F
|
|
4455 ldd u0006,u
|
|
4456 orb #$20
|
|
4457 std u0006,u
|
|
4458 lbra L2670
|
|
4459 L25D5 ldd u0006,u
|
|
4460 anda #$01
|
|
4461 clrb
|
|
4462 std -$02,s
|
|
4463 bne L25E3
|
|
4464 tfr u,d
|
|
4465 lbsr L26C3
|
|
4466 L25E3 ldd ,u
|
|
4467 addd #$0001
|
|
4468 std ,u
|
|
4469 subd #$0001
|
|
4470 tfr d,x
|
|
4471 ldd ,s
|
|
4472 stb ,x
|
|
4473 ldd ,u
|
|
4474 cmpd u0004,u
|
|
4475 bcc L260D
|
|
4476 ldd u0006,u
|
|
4477 clra
|
|
4478 andb #$40
|
|
4479 lbeq L268F
|
|
4480 ldd ,s
|
|
4481 cmpd #$000D
|
|
4482 lbne L268F
|
|
4483 L260D tfr u,d
|
|
4484 lbsr L26C3
|
|
4485 std -$02,s
|
|
4486 lbne L2670
|
|
4487 lbra L268F
|
|
4488 pshs u
|
|
4489 tfr d,u
|
|
4490 ldd $04,s
|
|
4491 pshs b,a
|
|
4492 pshs u
|
|
4493 ldd #$0008
|
|
4494 lbsr L2DE3
|
|
4495 lbsr L2577
|
|
4496 leas $02,s
|
|
4497 ldd $04,s
|
|
4498 pshs b,a
|
|
4499 tfr u,d
|
|
4500 lbsr L2577
|
|
4501 lbra L2691
|
|
4502 L263C pshs u,b,a
|
|
4503 leau >$025A,y
|
|
4504 clra
|
|
4505 clrb
|
|
4506 std ,s
|
|
4507 bra L264E
|
|
4508 L2648 tfr u,d
|
|
4509 leau u000D,u
|
|
4510 bsr L2660
|
|
4511 L264E ldd ,s
|
|
4512 addd #$0001
|
|
4513 std ,s
|
|
4514 subd #$0001
|
|
4515 cmpd #$0010
|
|
4516 blt L2648
|
|
4517 bra L2691
|
|
4518 L2660 pshs u
|
|
4519 tfr d,u
|
|
4520 leas -$02,s
|
|
4521 cmpu #$0000
|
|
4522 beq L2670
|
|
4523 ldd u0006,u
|
|
4524 bne L2675
|
|
4525 L2670 ldd #$FFFF
|
|
4526 bra L2691
|
|
4527 L2675 ldd u0006,u
|
|
4528 clra
|
|
4529 andb #$02
|
|
4530 beq L2682
|
|
4531 tfr u,d
|
|
4532 bsr L2695
|
|
4533 bra L2684
|
|
4534 L2682 clra
|
|
4535 clrb
|
|
4536 L2684 std ,s
|
|
4537 ldd u0008,u
|
|
4538 lbsr L2A0B
|
|
4539 clra
|
|
4540 clrb
|
|
4541 std u0006,u
|
|
4542 L268F ldd ,s
|
|
4543 L2691 leas $02,s
|
|
4544 puls pc,u
|
|
4545 L2695 pshs u
|
|
4546 tfr d,u
|
|
4547 cmpu #$0000
|
|
4548 beq L26AA
|
|
4549 ldd u0006,u
|
|
4550 clra
|
|
4551 andb #$22
|
|
4552 cmpd #$0002
|
|
4553 beq L26AF
|
|
4554 L26AA ldd #$FFFF
|
|
4555 puls pc,u
|
|
4556 L26AF ldd u0006,u
|
|
4557 anda #$80
|
|
4558 clrb
|
|
4559 std -$02,s
|
|
4560 bne L26BD
|
|
4561 tfr u,d
|
|
4562 lbsr L27B2
|
|
4563 L26BD tfr u,d
|
|
4564 bsr L26C3
|
|
4565 puls pc,u
|
|
4566 L26C3 pshs u
|
|
4567 tfr d,u
|
|
4568 leas -$04,s
|
|
4569 ldd u0006,u
|
|
4570 anda #$01
|
|
4571 clrb
|
|
4572 std -$02,s
|
|
4573 bne L26F1
|
|
4574 ldd ,u
|
|
4575 cmpd u0004,u
|
|
4576 beq L26F1
|
|
4577 clra
|
|
4578 clrb
|
|
4579 pshs b,a
|
|
4580 tfr u,d
|
|
4581 lbsr L2779
|
|
4582 ldd $02,x
|
|
4583 pshs b,a
|
|
4584 ldd ,x
|
|
4585 pshs b,a
|
|
4586 ldd u0008,u
|
|
4587 lbsr L2AD6
|
|
4588 leas $06,s
|
|
4589 L26F1 ldd ,u
|
|
4590 subd u0002,u
|
|
4591 std $02,s
|
|
4592 lbeq L2765
|
|
4593 ldd u0006,u
|
|
4594 anda #$01
|
|
4595 clrb
|
|
4596 std -$02,s
|
|
4597 lbeq L2765
|
|
4598 ldd u0006,u
|
|
4599 clra
|
|
4600 andb #$40
|
|
4601 beq L273E
|
|
4602 ldd u0002,u
|
|
4603 bra L2736
|
|
4604 L2711 ldd $02,s
|
|
4605 pshs b,a
|
|
4606 ldd ,u
|
|
4607 pshs b,a
|
|
4608 ldd u0008,u
|
|
4609 lbsr L2AC2
|
|
4610 leas $04,s
|
|
4611 std ,s
|
|
4612 cmpd #$FFFF
|
|
4613 bne L272C
|
|
4614 leax $04,s
|
|
4615 bra L2754
|
|
4616 L272C ldd $02,s
|
|
4617 subd ,s
|
|
4618 std $02,s
|
|
4619 ldd ,u
|
|
4620 addd ,s
|
|
4621 L2736 std ,u
|
|
4622 ldd $02,s
|
|
4623 bne L2711
|
|
4624 bra L2765
|
|
4625 L273E ldd $02,s
|
|
4626 pshs b,a
|
|
4627 ldd u0002,u
|
|
4628 pshs b,a
|
|
4629 ldd u0008,u
|
|
4630 lbsr L2AAD
|
|
4631 leas $04,s
|
|
4632 cmpd $02,s
|
|
4633 beq L2765
|
|
4634 bra L2756
|
|
4635 L2754 leas -$04,x
|
|
4636 L2756 ldd u0006,u
|
|
4637 orb #$20
|
|
4638 std u0006,u
|
|
4639 ldd u0004,u
|
|
4640 std ,u
|
|
4641 ldd #$FFFF
|
|
4642 bra L2775
|
|
4643 L2765 ldd u0006,u
|
|
4644 ora #$01
|
|
4645 std u0006,u
|
|
4646 ldd u0002,u
|
|
4647 std ,u
|
|
4648 addd u000B,u
|
|
4649 std u0004,u
|
|
4650 clra
|
|
4651 clrb
|
|
4652 L2775 leas $04,s
|
|
4653 puls pc,u
|
|
4654 L2779 pshs u
|
|
4655 puls pc,u
|
|
4656 L277D pshs u,b,a
|
|
4657 ldd ,s
|
|
4658 leax >$032B,y
|
|
4659 leax d,x
|
|
4660 ldb ,x
|
|
4661 clra
|
|
4662 andb #$04
|
|
4663 beq L27AC
|
|
4664 ldd ,s
|
|
4665 clra
|
|
4666 andb #$DF
|
|
4667 bra L27AE
|
|
4668 L2795 pshs u,b,a
|
|
4669 ldd ,s
|
|
4670 leax >$032B,y
|
|
4671 leax d,x
|
|
4672 ldb ,x
|
|
4673 clra
|
|
4674 andb #$02
|
|
4675 beq L27AC
|
|
4676 ldd ,s
|
|
4677 orb #$20
|
|
4678 bra L27AE
|
|
4679 L27AC ldd ,s
|
|
4680 L27AE leas $02,s
|
|
4681 puls pc,u
|
|
4682 L27B2 pshs u
|
|
4683 tfr d,u
|
|
4684 ldd #$FF98
|
|
4685 lbsr L00FD
|
|
4686 ldd u0006,u
|
|
4687 clra
|
|
4688 andb #$C0
|
|
4689 bne L27EA
|
|
4690 leas <-$22,s
|
|
4691 leax ,s
|
|
4692 pshs x
|
|
4693 ldd u0008,u
|
|
4694 lbsr L2C62
|
|
4695 leas $02,s
|
|
4696 ldd u0006,u
|
|
4697 pshs b,a
|
|
4698 ldb $02,s
|
|
4699 bne L27DE
|
|
4700 ldd #$0040
|
|
4701 bra L27E1
|
|
4702 L27DE ldd #$0080
|
|
4703 L27E1 ora ,s+
|
|
4704 orb ,s+
|
|
4705 std u0006,u
|
|
4706 leas <$22,s
|
|
4707 L27EA ldd u0006,u
|
|
4708 ora #$80
|
|
4709 std u0006,u
|
|
4710 clra
|
|
4711 andb #$0C
|
|
4712 beq L27F7
|
|
4713 puls pc,u
|
|
4714 L27F7 ldd u000B,u
|
|
4715 bne L280C
|
|
4716 ldd u0006,u
|
|
4717 clra
|
|
4718 andb #$40
|
|
4719 beq L2807
|
|
4720 ldd #$0080
|
|
4721 bra L280A
|
|
4722 L2807 ldd #$0100
|
|
4723 L280A std u000B,u
|
|
4724 L280C ldd u0002,u
|
|
4725 bne L281D
|
|
4726 ldd u000B,u
|
|
4727 lbsr L2BB7
|
|
4728 std u0002,u
|
|
4729 cmpd #$FFFF
|
|
4730 beq L2825
|
|
4731 L281D ldd u0006,u
|
|
4732 orb #$08
|
|
4733 std u0006,u
|
|
4734 bra L2834
|
|
4735 L2825 ldd u0006,u
|
|
4736 orb #$04
|
|
4737 std u0006,u
|
|
4738 leax u000A,u
|
|
4739 stx u0002,u
|
|
4740 ldd #$0001
|
|
4741 std u000B,u
|
|
4742 L2834 ldd u0002,u
|
|
4743 addd u000B,u
|
|
4744 std u0004,u
|
|
4745 std ,u
|
|
4746 puls pc,u
|
|
4747 L283E pshs u,b,a
|
|
4748 ldb $01,s
|
|
4749 sex
|
|
4750 tfr d,x
|
|
4751 bra L2864
|
|
4752 L2847 ldd [<$06,s]
|
|
4753 addd #$0004
|
|
4754 std [<$06,s]
|
|
4755 leax >L287D,pcr
|
|
4756 bra L2860
|
|
4757 L2856 ldb $01,s
|
|
4758 stb >$0258,y
|
|
4759 leax >$0257,y
|
|
4760 L2860 tfr x,d
|
|
4761 bra L2879
|
|
4762 L2864 cmpx #$0064
|
|
4763 beq L2847
|
|
4764 cmpx #$006F
|
|
4765 lbeq L2847
|
|
4766 cmpx #$0078
|
|
4767 lbeq L2847
|
|
4768 bra L2856
|
|
4769 L2879 leas $02,s
|
|
4770 puls pc,u
|
|
4771 L287D neg <u0034
|
|
4772 nega
|
|
4773 leax >L2888,pcr
|
|
4774 tfr x,d
|
|
4775 puls pc,u
|
|
4776 L2888 neg <u0034
|
|
4777 rora
|
|
4778 ldu ,s
|
|
4779 L288D ldb ,u+
|
|
4780 bne L288D
|
|
4781 tfr u,d
|
|
4782 subd ,s
|
|
4783 addd #$FFFF
|
|
4784 leas $02,s
|
|
4785 puls pc,u
|
|
4786 L289C pshs u,b,a
|
|
4787 ldu $06,s
|
|
4788 leas -$02,s
|
|
4789 ldd $02,s
|
|
4790 std ,s
|
|
4791 L28A6 ldb ,u+
|
|
4792 ldx ,s
|
|
4793 leax $01,x
|
|
4794 stx ,s
|
|
4795 stb -$01,x
|
|
4796 bne L28A6
|
|
4797 bra L28DB
|
|
4798 L28B4 pshs u,b,a
|
|
4799 ldu $06,s
|
|
4800 leas -$02,s
|
|
4801 ldd $02,s
|
|
4802 std ,s
|
|
4803 L28BE ldx ,s
|
|
4804 leax $01,x
|
|
4805 stx ,s
|
|
4806 ldb -$01,x
|
|
4807 bne L28BE
|
|
4808 ldd ,s
|
|
4809 addd #$FFFF
|
|
4810 std ,s
|
|
4811 L28CF ldb ,u+
|
|
4812 ldx ,s
|
|
4813 leax $01,x
|
|
4814 stx ,s
|
|
4815 stb -$01,x
|
|
4816 bne L28CF
|
|
4817 L28DB ldd $02,s
|
|
4818 leas $04,s
|
|
4819 puls pc,u
|
|
4820 L28E1 pshs u
|
|
4821 tfr d,u
|
|
4822 bra L28F7
|
|
4823 L28E7 ldx $04,s
|
|
4824 leax $01,x
|
|
4825 stx $04,s
|
|
4826 ldb -$01,x
|
|
4827 bne L28F5
|
|
4828 clra
|
|
4829 clrb
|
|
4830 puls pc,u
|
|
4831 L28F5 leau u0001,u
|
|
4832 L28F7 ldb ,u
|
|
4833 sex
|
|
4834 pshs b,a
|
|
4835 ldb [<$06,s]
|
|
4836 sex
|
|
4837 cmpd ,s++
|
|
4838 beq L28E7
|
|
4839 sex
|
|
4840 pshs b,a
|
|
4841 ldb ,u
|
|
4842 sex
|
|
4843 subd ,s++
|
|
4844 puls pc,u
|
|
4845 pshs u,b,a
|
|
4846 ldu $06,s
|
|
4847 leas -$02,s
|
|
4848 ldd $02,s
|
|
4849 std ,s
|
|
4850 L2919 ldd $0A,s
|
|
4851 addd #$FFFF
|
|
4852 std $0A,s
|
|
4853 subd #$FFFF
|
|
4854 ble L293D
|
|
4855 ldb ,u+
|
|
4856 ldx ,s
|
|
4857 leax $01,x
|
|
4858 stx ,s
|
|
4859 stb -$01,x
|
|
4860 bne L2919
|
|
4861 bra L293D
|
|
4862 L2933 clra
|
|
4863 clrb
|
|
4864 ldx ,s
|
|
4865 leax $01,x
|
|
4866 stx ,s
|
|
4867 stb -$01,x
|
|
4868 L293D ldd $0A,s
|
|
4869 addd #$FFFF
|
|
4870 std $0A,s
|
|
4871 subd #$FFFF
|
|
4872 bgt L2933
|
|
4873 lbra L29CC
|
|
4874 pshs u
|
|
4875 tfr d,u
|
|
4876 bra L2962
|
|
4877 L2952 ldx $04,s
|
|
4878 leax $01,x
|
|
4879 stx $04,s
|
|
4880 ldb -$01,x
|
|
4881 bne L2960
|
|
4882 clra
|
|
4883 clrb
|
|
4884 puls pc,u
|
|
4885 L2960 leau u0001,u
|
|
4886 L2962 ldd $06,s
|
|
4887 addd #$FFFF
|
|
4888 std $06,s
|
|
4889 subd #$FFFF
|
|
4890 ble L297C
|
|
4891 ldb ,u
|
|
4892 sex
|
|
4893 pshs b,a
|
|
4894 ldb [<$06,s]
|
|
4895 sex
|
|
4896 cmpd ,s++
|
|
4897 beq L2952
|
|
4898 L297C ldd $06,s
|
|
4899 bge L2984
|
|
4900 clra
|
|
4901 clrb
|
|
4902 bra L298F
|
|
4903 L2984 ldb [<$04,s]
|
|
4904 sex
|
|
4905 pshs b,a
|
|
4906 ldb ,u
|
|
4907 sex
|
|
4908 subd ,s++
|
|
4909 L298F puls pc,u
|
|
4910 pshs u,b,a
|
|
4911 ldu $06,s
|
|
4912 leas -$02,s
|
|
4913 ldd $02,s
|
|
4914 std ,s
|
|
4915 L299B ldx ,s
|
|
4916 leax $01,x
|
|
4917 stx ,s
|
|
4918 ldb -$01,x
|
|
4919 bne L299B
|
|
4920 ldd ,s
|
|
4921 addd #$FFFF
|
|
4922 std ,s
|
|
4923 L29AC ldd $0A,s
|
|
4924 addd #$FFFF
|
|
4925 std $0A,s
|
|
4926 subd #$FFFF
|
|
4927 ble L29C4
|
|
4928 ldb ,u+
|
|
4929 ldx ,s
|
|
4930 leax $01,x
|
|
4931 stx ,s
|
|
4932 stb -$01,x
|
|
4933 bne L29AC
|
|
4934 L29C4 ldd $0A,s
|
|
4935 bge L29CC
|
|
4936 clra
|
|
4937 clrb
|
|
4938 stb [,s]
|
|
4939 L29CC ldd $02,s
|
|
4940 leas $04,s
|
|
4941 puls pc,u
|
|
4942 L29D2 pshs u,b,a
|
|
4943 ldu ,s
|
|
4944 L29D6 ldx $06,s
|
|
4945 leax $01,x
|
|
4946 stx $06,s
|
|
4947 ldb -$01,x
|
|
4948 stb ,u+
|
|
4949 bgt L29D6
|
|
4950 ldb -u0001,u
|
|
4951 clra
|
|
4952 andb #$7F
|
|
4953 stb -u0001,u
|
|
4954 clra
|
|
4955 clrb
|
|
4956 stb ,u
|
|
4957 ldd ,s
|
|
4958 leas $02,s
|
|
4959 puls pc,u
|
|
4960 tfr d,x
|
|
4961 lda $03,s
|
|
4962 os9 I$Open
|
|
4963 bcc L2A0D
|
|
4964 bra L2A10
|
|
4965 L29FE tfr d,x
|
|
4966 lda $03,s
|
|
4967 os9 I$Open
|
|
4968 bcs L2A5F
|
|
4969 tfr a,b
|
|
4970 clra
|
|
4971 rts
|
|
4972 L2A0B tfr b,a
|
|
4973 L2A0D os9 I$Close
|
|
4974 L2A10 lbra L2CD5
|
|
4975 L2A13 tfr d,x
|
|
4976 ldb $03,s
|
|
4977 os9 I$MakDir
|
|
4978 bra L2A10
|
|
4979 L2A1C pshs b,a
|
|
4980 ldx ,s
|
|
4981 lda $05,s
|
|
4982 tfr a,b
|
|
4983 andb #$24
|
|
4984 orb #$0B
|
|
4985 os9 I$Create
|
|
4986 bcs L2A33
|
|
4987 L2A2D leas $02,s
|
|
4988 tfr a,b
|
|
4989 clra
|
|
4990 rts
|
|
4991 L2A33 cmpb #$DA
|
|
4992 bne L2A5D
|
|
4993 lda $05,s
|
|
4994 bita #$80
|
|
4995 bne L2A5D
|
|
4996 anda #$07
|
|
4997 ldx ,s
|
|
4998 os9 I$Open
|
|
4999 bcs L2A5D
|
|
5000 pshs u,a
|
|
5001 ldx #$0000
|
|
5002 leau ,x
|
|
5003 ldb #$02
|
|
5004 os9 I$SetStt
|
|
5005 puls u,a
|
|
5006 bcc L2A2D
|
|
5007 pshs b
|
|
5008 os9 I$Close
|
|
5009 puls b
|
|
5010 L2A5D leas $02,s
|
|
5011 L2A5F lbra L2CCC
|
|
5012 tfr d,x
|
|
5013 lda $03,s
|
|
5014 ldb $05,s
|
|
5015 os9 I$Create
|
|
5016 lbcs L2CCC
|
|
5017 tfr a,b
|
|
5018 clra
|
|
5019 rts
|
|
5020 L2A73 tfr d,x
|
|
5021 os9 I$Delete
|
|
5022 bra L2A10
|
|
5023 L2A7A tfr b,a
|
|
5024 os9 I$Dup
|
|
5025 bcs L2A5F
|
|
5026 tfr a,b
|
|
5027 clra
|
|
5028 rts
|
|
5029 L2A85 pshs y
|
|
5030 tfr b,a
|
|
5031 ldx $04,s
|
|
5032 ldy $06,s
|
|
5033 os9 I$Read
|
|
5034 bcc L2AA9
|
|
5035 L2A93 cmpb #$D3
|
|
5036 bne L2ABD
|
|
5037 clra
|
|
5038 clrb
|
|
5039 puls pc,y
|
|
5040 L2A9B pshs y
|
|
5041 tfr b,a
|
|
5042 ldx $04,s
|
|
5043 ldy $06,s
|
|
5044 os9 I$ReadLn
|
|
5045 bcs L2A93
|
|
5046 L2AA9 tfr y,d
|
|
5047 puls pc,y
|
|
5048 L2AAD pshs y
|
|
5049 ldy $06,s
|
|
5050 beq L2AD2
|
|
5051 tfr b,a
|
|
5052 ldx $04,s
|
|
5053 os9 I$Write
|
|
5054 bcc L2AD2
|
|
5055 L2ABD puls y
|
|
5056 lbra L2CCC
|
|
5057 L2AC2 pshs y
|
|
5058 ldy $06,s
|
|
5059 beq L2AD2
|
|
5060 tfr b,a
|
|
5061 ldx $04,s
|
|
5062 os9 I$WritLn
|
|
5063 bcs L2ABD
|
|
5064 L2AD2 tfr y,d
|
|
5065 puls pc,y
|
|
5066 L2AD6 pshs u,b,a
|
|
5067 ldd $0A,s
|
|
5068 bne L2AE4
|
|
5069 ldu #$0000
|
|
5070 ldx #$0000
|
|
5071 bra L2B1A
|
|
5072 L2AE4 cmpd #$0001
|
|
5073 beq L2B11
|
|
5074 cmpd #$0002
|
|
5075 beq L2B06
|
|
5076 ldb #$F7
|
|
5077 L2AF2 clra
|
|
5078 std >$03BB,y
|
|
5079 ldd #$FFFF
|
|
5080 leax >$03AF,y
|
|
5081 std ,x
|
|
5082 std $02,x
|
|
5083 leas $02,s
|
|
5084 puls pc,u
|
|
5085 L2B06 lda $01,s
|
|
5086 ldb #$02
|
|
5087 os9 I$GetStt
|
|
5088 bcs L2AF2
|
|
5089 bra L2B1A
|
|
5090 L2B11 lda $01,s
|
|
5091 ldb #$05
|
|
5092 os9 I$GetStt
|
|
5093 bcs L2AF2
|
|
5094 L2B1A tfr u,d
|
|
5095 addd $08,s
|
|
5096 tfr d,u
|
|
5097 tfr x,d
|
|
5098 adcb $07,s
|
|
5099 adca $06,s
|
|
5100 bmi L2AF2
|
|
5101 tfr d,x
|
|
5102 stx >$03AF,y
|
|
5103 stu >$03B1,y
|
|
5104 lda $01,s
|
|
5105 os9 I$Seek
|
|
5106 bcs L2AF2
|
|
5107 leax >$03AF,y
|
|
5108 leas $02,s
|
|
5109 puls pc,u
|
|
5110 L2B41 tfr d,x
|
|
5111 lda #$01
|
|
5112 L2B45 os9 I$ChgDir
|
|
5113 lbra L2CD5
|
|
5114 tfr d,x
|
|
5115 lda #$04
|
|
5116 bra L2B45
|
|
5117 L2B51 pshs y,b,a
|
|
5118 cmpd >$0C7B,y
|
|
5119 bls L2B88
|
|
5120 subd >$0C7B,y
|
|
5121 addd >$03AD,y
|
|
5122 subd $02,s
|
|
5123 os9 F$Mem
|
|
5124 tfr y,d
|
|
5125 ldy $02,s
|
|
5126 bcc L2B74
|
|
5127 ldd #$FFFF
|
|
5128 leas $04,s
|
|
5129 rts
|
|
5130 L2B74 ldx >$03AD,y
|
|
5131 std >$03AD,y
|
|
5132 pshs x
|
|
5133 subd ,s++
|
|
5134 addd >$0C7B,y
|
|
5135 std >$0C7B,y
|
|
5136 L2B88 ldd >$03AD,y
|
|
5137 subd >$0C7B,y
|
|
5138 tfr d,x
|
|
5139 ldd >$0C7B,y
|
|
5140 subd ,s
|
|
5141 std >$0C7B,y
|
|
5142 ldd ,s
|
|
5143 stx ,s
|
|
5144 bitb #$01
|
|
5145 beq L2BA7
|
|
5146 clr ,x+
|
|
5147 decb
|
|
5148 L2BA7 tfr d,y
|
|
5149 leay ,y
|
|
5150 beq L2BB5
|
|
5151 clra
|
|
5152 clrb
|
|
5153 L2BAF std ,x++
|
|
5154 leay -$02,y
|
|
5155 bne L2BAF
|
|
5156 L2BB5 puls pc,y,b,a
|
|
5157 L2BB7 addd >$03B7,y
|
|
5158 bcs L2BDE
|
|
5159 cmpd >$03B9,y
|
|
5160 bcc L2BDE
|
|
5161 pshs b,a
|
|
5162 ldx >$03B7,y
|
|
5163 clra
|
|
5164 bra L2BCF
|
|
5165 L2BCD sta ,x+
|
|
5166 L2BCF cmpx ,s
|
|
5167 bcs L2BCD
|
|
5168 ldd >$03B7,y
|
|
5169 puls x
|
|
5170 stx >$03B7,y
|
|
5171 rts
|
|
5172 L2BDE ldd #$FFFF
|
|
5173 rts
|
|
5174 tfr b,a
|
|
5175 ldb $03,s
|
|
5176 os9 F$Send
|
|
5177 lbra L2CD5
|
|
5178 L2BEC tfr d,x
|
|
5179 clra
|
|
5180 clrb
|
|
5181 os9 F$Wait
|
|
5182 lbcs L2CCC
|
|
5183 stx -$02,s
|
|
5184 beq L2BFF
|
|
5185 stb $01,x
|
|
5186 clr ,x
|
|
5187 L2BFF tfr a,b
|
|
5188 clra
|
|
5189 rts
|
|
5190 tfr b,a
|
|
5191 ldb $03,s
|
|
5192 os9 F$SPrior
|
|
5193 lbra L2CD5
|
|
5194 leau $02,s
|
|
5195 leas >$00FF,y
|
|
5196 tfr d,x
|
|
5197 ldy ,u
|
|
5198 lda u0005,u
|
|
5199 lsla
|
|
5200 lsla
|
|
5201 lsla
|
|
5202 lsla
|
|
5203 ora u0007,u
|
|
5204 ldb u0009,u
|
|
5205 ldu u0002,u
|
|
5206 os9 F$Chain
|
|
5207 os9 F$Exit
|
|
5208 L2C2A pshs u,y
|
|
5209 tfr d,x
|
|
5210 ldy $06,s
|
|
5211 ldu $08,s
|
|
5212 lda $0B,s
|
|
5213 ora $0D,s
|
|
5214 ldb $0F,s
|
|
5215 os9 F$Fork
|
|
5216 puls u,y
|
|
5217 lbcs L2CCC
|
|
5218 tfr a,b
|
|
5219 clra
|
|
5220 rts
|
|
5221 L2C46 pshs u
|
|
5222 tfr y,u
|
|
5223 std >$0C7D,y
|
|
5224 leax >L2C5A,pcr
|
|
5225 os9 F$Icpt
|
|
5226 puls u
|
|
5227 lbra L2CD5
|
|
5228 L2C5A tfr u,y
|
|
5229 clra
|
|
5230 jsr [>$0C7D,y]
|
|
5231 rti
|
|
5232 L2C62 tfr b,a
|
|
5233 ldb #$00
|
|
5234 ldx $02,s
|
|
5235 os9 I$GetStt
|
|
5236 lbra L2CD5
|
|
5237 L2C6E lda $03,s
|
|
5238 tstb
|
|
5239 beq L2CA0
|
|
5240 cmpb #$01
|
|
5241 beq L2CA2
|
|
5242 cmpb #$06
|
|
5243 beq L2CA2
|
|
5244 cmpb #$02
|
|
5245 beq L2C88
|
|
5246 cmpb #$05
|
|
5247 beq L2C88
|
|
5248 ldb #$D0
|
|
5249 lbra L2CCC
|
|
5250 L2C88 pshs u
|
|
5251 os9 I$GetStt
|
|
5252 bcc L2C94
|
|
5253 puls u
|
|
5254 lbra L2CCC
|
|
5255 L2C94 stx [<$06,s]
|
|
5256 ldx $06,s
|
|
5257 stu $02,x
|
|
5258 puls u
|
|
5259 clra
|
|
5260 clrb
|
|
5261 rts
|
|
5262 L2CA0 ldx $04,s
|
|
5263 L2CA2 os9 I$GetStt
|
|
5264 lbra L2CD5
|
|
5265 L2CA8 lda $03,s
|
|
5266 tstb
|
|
5267 beq L2CB6
|
|
5268 cmpb #$02
|
|
5269 beq L2CBE
|
|
5270 ldb #$D0
|
|
5271 lbra L2CCC
|
|
5272 L2CB6 ldx $04,s
|
|
5273 os9 I$SetStt
|
|
5274 lbra L2CD5
|
|
5275 L2CBE pshs u
|
|
5276 ldx $06,s
|
|
5277 ldu $08,s
|
|
5278 os9 I$SetStt
|
|
5279 puls u
|
|
5280 lbra L2CD5
|
|
5281 L2CCC clra
|
|
5282 std >$03BB,y
|
|
5283 ldd #$FFFF
|
|
5284 rts
|
|
5285 L2CD5 bcs L2CCC
|
|
5286 clra
|
|
5287 clrb
|
|
5288 rts
|
|
5289 L2CDA pshs b,a
|
|
5290 lbsr L2CE7
|
|
5291 lbsr L263C
|
|
5292 puls b,a
|
|
5293 L2CE4 os9 F$Exit
|
|
5294 L2CE7 rts
|
|
5295 L2CE8 leax >$03AF,y
|
|
5296 std $02,x
|
|
5297 tfr a,b
|
|
5298 sex
|
|
5299 tfr a,b
|
|
5300 std ,x
|
|
5301 rts
|
|
5302 leax >$03AF,y
|
|
5303 std $02,x
|
|
5304 clr ,x
|
|
5305 clr $01,x
|
|
5306 rts
|
|
5307 L2D01 tsta
|
|
5308 bne L2D16
|
|
5309 tst $02,s
|
|
5310 bne L2D16
|
|
5311 lda $03,s
|
|
5312 mul
|
|
5313 ldx ,s
|
|
5314 stx $02,s
|
|
5315 ldx #$0000
|
|
5316 std ,s
|
|
5317 puls pc,b,a
|
|
5318 L2D16 pshs b,a
|
|
5319 ldd #$0000
|
|
5320 pshs b,a
|
|
5321 pshs b,a
|
|
5322 lda $05,s
|
|
5323 ldb $09,s
|
|
5324 mul
|
|
5325 std $02,s
|
|
5326 lda $05,s
|
|
5327 ldb $08,s
|
|
5328 mul
|
|
5329 addd $01,s
|
|
5330 std $01,s
|
|
5331 bcc L2D33
|
|
5332 inc ,s
|
|
5333 L2D33 lda $04,s
|
|
5334 ldb $09,s
|
|
5335 mul
|
|
5336 addd $01,s
|
|
5337 std $01,s
|
|
5338 bcc L2D40
|
|
5339 inc ,s
|
|
5340 L2D40 lda $04,s
|
|
5341 ldb $08,s
|
|
5342 mul
|
|
5343 addd ,s
|
|
5344 std ,s
|
|
5345 ldx $06,s
|
|
5346 stx $08,s
|
|
5347 ldx ,s
|
|
5348 ldd $02,s
|
|
5349 leas $08,s
|
|
5350 rts
|
|
5351 subd #$0000
|
|
5352 beq L2D63
|
|
5353 pshs b,a
|
|
5354 leas -$02,s
|
|
5355 clr ,s
|
|
5356 clr $01,s
|
|
5357 bra L2D91
|
|
5358 L2D63 puls b,a
|
|
5359 std ,s
|
|
5360 ldd #$002D
|
|
5361 lbra L2E06
|
|
5362 L2D6D subd #$0000
|
|
5363 beq L2D63
|
|
5364 pshs b,a
|
|
5365 leas -$02,s
|
|
5366 clr ,s
|
|
5367 clr $01,s
|
|
5368 tsta
|
|
5369 bpl L2D85
|
|
5370 nega
|
|
5371 negb
|
|
5372 sbca #$00
|
|
5373 inc $01,s
|
|
5374 std $02,s
|
|
5375 L2D85 ldd $06,s
|
|
5376 bpl L2D91
|
|
5377 nega
|
|
5378 negb
|
|
5379 sbca #$00
|
|
5380 com $01,s
|
|
5381 std $06,s
|
|
5382 L2D91 lda #$01
|
|
5383 L2D93 inca
|
|
5384 lsl $03,s
|
|
5385 rol $02,s
|
|
5386 bpl L2D93
|
|
5387 sta ,s
|
|
5388 ldd $06,s
|
|
5389 clr $06,s
|
|
5390 clr $07,s
|
|
5391 L2DA2 subd $02,s
|
|
5392 bcc L2DAC
|
|
5393 addd $02,s
|
|
5394 andcc #$FE
|
|
5395 bra L2DAE
|
|
5396 L2DAC orcc #$01
|
|
5397 L2DAE rol $07,s
|
|
5398 rol $06,s
|
|
5399 lsr $02,s
|
|
5400 ror $03,s
|
|
5401 dec ,s
|
|
5402 bne L2DA2
|
|
5403 std $02,s
|
|
5404 tst $01,s
|
|
5405 beq L2DC8
|
|
5406 ldd $06,s
|
|
5407 nega
|
|
5408 negb
|
|
5409 sbca #$00
|
|
5410 std $06,s
|
|
5411 L2DC8 ldx $04,s
|
|
5412 ldd $06,s
|
|
5413 std $04,s
|
|
5414 stx $06,s
|
|
5415 ldx $02,s
|
|
5416 ldd $04,s
|
|
5417 leas $06,s
|
|
5418 rts
|
|
5419 L2DD7 tstb
|
|
5420 beq L2DED
|
|
5421 L2DDA asr $02,s
|
|
5422 ror $03,s
|
|
5423 decb
|
|
5424 bne L2DDA
|
|
5425 bra L2DED
|
|
5426 L2DE3 tstb
|
|
5427 beq L2DED
|
|
5428 L2DE6 lsr $02,s
|
|
5429 ror $03,s
|
|
5430 decb
|
|
5431 bne L2DE6
|
|
5432 L2DED ldd $02,s
|
|
5433 pshs b,a
|
|
5434 ldd $02,s
|
|
5435 std $04,s
|
|
5436 ldd ,s
|
|
5437 leas $04,s
|
|
5438 rts
|
|
5439 tstb
|
|
5440 beq L2DED
|
|
5441 L2DFD lsl $03,s
|
|
5442 rol $02,s
|
|
5443 decb
|
|
5444 bne L2DFD
|
|
5445 bra L2DED
|
|
5446 L2E06 std >$03BB,y
|
|
5447 pshs y,b
|
|
5448 os9 F$ID
|
|
5449 puls y,b
|
|
5450 os9 F$Send
|
|
5451 rts
|
|
5452 L2E15 neg <u000D
|
|
5453 neg <u002D
|
|
5454 fcb $3E >
|
|
5455 neg <u0020
|
|
5456 bra L2E1E
|
|
5457 L2E1E orcc #$53
|
|
5458 orcc #$5A
|
|
5459 orcc #$61
|
|
5460 com <u002E
|
|
5461 tsta
|
|
5462 clra
|
|
5463 lsra
|
|
5464 fcb $55 U
|
|
5465 inca
|
|
5466 fcb $45 E
|
|
5467 comb
|
|
5468 neg <u0048
|
|
5469 fcb $45 E
|
|
5470 inca
|
|
5471 negb
|
|
5472 neg <u002E
|
|
5473 lsra
|
|
5474 lsra
|
|
5475 neg <u002F
|
|
5476 lsra
|
|
5477 leax $00,x
|
|
5478 bgt L2E86
|
|
5479 clra
|
|
5480 neg <u002E
|
|
5481 lsr -$0E,s
|
|
5482 neg <u002E
|
|
5483 tst $0E,s
|
|
5484 neg <u002E
|
|
5485 lsl -$10,s
|
|
5486 neg <u002E
|
|
5487 bgt L2E4E
|
|
5488 L2E4E lsrb
|
|
5489 lsla
|
|
5490 fcb $45 E
|
|
5491 fcb $52 R
|
|
5492 fcb $45 E
|
|
5493 bra L2E96
|
|
5494 fcb $52 R
|
|
5495 fcb $45 E
|
|
5496 bra L2EAC
|
|
5497 lsrb
|
|
5498 rola
|
|
5499 inca
|
|
5500 inca
|
|
5501 bra L2EAC
|
|
5502 clra
|
|
5503 fcb $52 R
|
|
5504 fcb $45 E
|
|
5505 neg <u0041
|
|
5506 fcb $52 R
|
|
5507 fcb $45 E
|
|
5508 bra L2EC1
|
|
5509 clra
|
|
5510 fcb $55 U
|
|
5511 bra L2EBF
|
|
5512 fcb $55 U
|
|
5513 fcb $52 R
|
|
5514 fcb $45 E
|
|
5515 bra L2E99
|
|
5516 rolb
|
|
5517 ble L2EC2
|
|
5518 bvs L2E96
|
|
5519 swi
|
|
5520 fcb $00
|
|
5521 bra L2EA7
|
|
5522 blt L2EA9
|
|
5523 blt L2EAB
|
|
5524 blt L2EAD
|
|
5525 blt L2EAF
|
|
5526 blt L2EB1
|
|
5527 blt L2EB3
|
|
5528 L2E86 blt L2EB5
|
|
5529 blt L2EB7
|
|
5530 blt L2EB9
|
|
5531 blt L2EBB
|
|
5532 blt L2EBD
|
|
5533 blt L2EBF
|
|
5534 blt L2EC1
|
|
5535 blt L2EC3
|
|
5536 L2E96 blt L2E98
|
|
5537 L2E98 tsta
|
|
5538 L2E99 bra L2EC8
|
|
5539 bra L2EEA
|
|
5540 clra
|
|
5541 fcb $52 R
|
|
5542 fcb $45 E
|
|
5543 bra L2EC2
|
|
5544 bra L2EC4
|
|
5545 coma
|
|
5546 bra L2ED4
|
|
5547 L2EA7 bra L2EEC
|
|
5548 L2EA9 clra
|
|
5549 fcb $4E N
|
|
5550 L2EAB lsrb
|
|
5551 L2EAC rola
|
|
5552 L2EAD fcb $4E N
|
|
5553 fcb $55 U
|
|
5554 L2EAF fcb $45 E
|
|
5555 neg <u0020
|
|
5556 lsla
|
|
5557 L2EB3 rola
|
|
5558 lsrb
|
|
5559 L2EB5 bra L2EF8
|
|
5560 L2EB7 fcb $4E N
|
|
5561 rolb
|
|
5562 L2EB9 bra L2F06
|
|
5563 L2EBB fcb $45 E
|
|
5564 rolb
|
|
5565 L2EBD bra L2F13
|
|
5566 L2EBF clra
|
|
5567 bra L2F05
|
|
5568 L2EC2 clra
|
|
5569 L2EC3 fcb $4E N
|
|
5570 L2EC4 lsrb
|
|
5571 rola
|
|
5572 fcb $4E N
|
|
5573 fcb $55 U
|
|
5574 L2EC8 fcb $45 E
|
|
5575 neg <u0042
|
|
5576 fcb $55 U
|
|
5577 rola
|
|
5578 inca
|
|
5579 lsra
|
|
5580 rola
|
|
5581 fcb $4E N
|
|
5582 asra
|
|
5583 bra L2F18
|
|
5584 L2ED4 fcb $45 E
|
|
5585 comb
|
|
5586 coma
|
|
5587 fcb $52 R
|
|
5588 rola
|
|
5589 negb
|
|
5590 lsrb
|
|
5591 clra
|
|
5592 fcb $52 R
|
|
5593 bra L2F2B
|
|
5594 rola
|
|
5595 comb
|
|
5596 lsrb
|
|
5597 neg <u002E
|
|
5598 bgt L2F14
|
|
5599 bgt L2F08
|
|
5600 negb
|
|
5601 inca
|
|
5602 L2EEA fcb $45 E
|
|
5603 fcb $41 A
|
|
5604 L2EEC comb
|
|
5605 fcb $45 E
|
|
5606 bra L2F47
|
|
5607 fcb $41 A
|
|
5608 rola
|
|
5609 lsrb
|
|
5610 neg <u0042
|
|
5611 fcb $55 U
|
|
5612 rola
|
|
5613 inca
|
|
5614 L2EF8 lsra
|
|
5615 rola
|
|
5616 fcb $4E N
|
|
5617 asra
|
|
5618 bra L2F40
|
|
5619 clra
|
|
5620 clra
|
|
5621 lsrb
|
|
5622 bra L2F4F
|
|
5623 rola
|
|
5624 comb
|
|
5625 L2F05 lsrb
|
|
5626 L2F06 neg <u0047
|
|
5627 L2F08 fcb $45 E
|
|
5628 fcb $4E N
|
|
5629 fcb $45 E
|
|
5630 fcb $52 R
|
|
5631 fcb $41 A
|
|
5632 lsrb
|
|
5633 rola
|
|
5634 fcb $4E N
|
|
5635 asra
|
|
5636 bra L2F61
|
|
5637 L2F13 fcb $45 E
|
|
5638 L2F14 asrb
|
|
5639 bra L2F59
|
|
5640 clra
|
|
5641 L2F18 clra
|
|
5642 lsrb
|
|
5643 neg <u0050
|
|
5644 inca
|
|
5645 fcb $41 A
|
|
5646 coma
|
|
5647 fcb $45 E
|
|
5648 bra L2F70
|
|
5649 fcb $45 E
|
|
5650 asrb
|
|
5651 bra L2F6A
|
|
5652 rola
|
|
5653 comb
|
|
5654 fcb $4B K
|
|
5655 bra L2F74
|
|
5656 L2F2B fcb $4E N
|
|
5657 bra L2F2E
|
|
5658 L2F2E coma
|
|
5659 fcb $52 R
|
|
5660 fcb $45 E
|
|
5661 fcb $41 A
|
|
5662 lsrb
|
|
5663 rola
|
|
5664 fcb $4E N
|
|
5665 asra
|
|
5666 bra L2F86
|
|
5667 fcb $45 E
|
|
5668 asrb
|
|
5669 bra L2F8F
|
|
5670 rolb
|
|
5671 comb
|
|
5672 lsrb
|
|
5673 fcb $45 E
|
|
5674 L2F40 tsta
|
|
5675 bra L2F87
|
|
5676 rola
|
|
5677 comb
|
|
5678 fcb $4B K
|
|
5679 neg <u0044
|
|
5680 fcb $45 E
|
|
5681 comb
|
|
5682 lsrb
|
|
5683 rola
|
|
5684 fcb $4E N
|
|
5685 fcb $41 A
|
|
5686 lsrb
|
|
5687 L2F4F rola
|
|
5688 clra
|
|
5689 fcb $4E N
|
|
5690 bra L2F91
|
|
5691 bra L2FA4
|
|
5692 fcb $45 E
|
|
5693 asrb
|
|
5694 bra L2F9E
|
|
5695 rola
|
|
5696 comb
|
|
5697 fcb $4B K
|
|
5698 neg <u0020
|
|
5699 bra L2FB4
|
|
5700 L2F61 clra
|
|
5701 fcb $55 U
|
|
5702 fcb $52 R
|
|
5703 coma
|
|
5704 fcb $45 E
|
|
5705 bra L2FA5
|
|
5706 bra L2FAD
|
|
5707 L2F6A clra
|
|
5708 fcb $4E N
|
|
5709 rora
|
|
5710 rola
|
|
5711 asra
|
|
5712 bra L2FB5
|
|
5713 rola
|
|
5714 comb
|
|
5715 fcb $4B K
|
|
5716 L2F74 neg <u0053
|
|
5717 clra
|
|
5718 fcb $55 U
|
|
5719 fcb $52 R
|
|
5720 coma
|
|
5721 fcb $45 E
|
|
5722 bra L2FBA
|
|
5723 bra L2FCE
|
|
5724 comb
|
|
5725 rts
|
|
5726 bra L2FD6
|
|
5727 rolb
|
|
5728 comb
|
|
5729 lsrb
|
|
5730 L2F86 fcb $45 E
|
|
5731 L2F87 tsta
|
|
5732 bra L2FCE
|
|
5733 rola
|
|
5734 comb
|
|
5735 fcb $4B K
|
|
5736 neg <u0015
|
|
5737 L2F8F andcc #$15
|
|
5738 L2F91 bls L2FA8
|
|
5739 fcb $3E >
|
|
5740 fcb $15
|
|
5741 fcb $5E ^
|
|
5742 fcb $15
|
|
5743 aim #$15,>$8F15
|
|
5744 lda -$0B,x
|
|
5745 jsr >$15CE
|
|
5746 fcb $15
|
|
5747 addd -$0B,x
|
|
5748 ldu >$1619
|
|
5749 lbra L5BBF
|
|
5750 fcb $3E >
|
|
5751 lbra L85C3
|
|
5752 L2FAD clr -$0A,x
|
|
5753 jmp >$1692
|
|
5754 lbra LD4CB
|
|
5755 L2FB5 jsr >$16D5
|
|
5756 lbra L1CD2
|
|
5757 eim #$17,<u0019
|
|
5758 lbsr L5FD8
|
|
5759 mul
|
|
5760 lbsr L7A27
|
|
5761 clr $0F,s
|
|
5762 lsr >$6C69
|
|
5763 com >$7400
|
|
5764 orcc #$6C
|
|
5765 orcc #$72
|
|
5766 orcc #$78
|
|
5767 orcc #$7D
|
|
5768 neg <u0000
|
|
5769 coma
|
|
5770 tsta
|
|
5771 lsra
|
|
5772 comb
|
|
5773 neg <u0043
|
|
5774 oim #$6E,$07,y
|
|
5775 lsr >$206D
|
|
5776 oim #$6B,$05,s
|
|
5777 bra L302B
|
|
5778 tsta
|
|
5779 lsra
|
|
5780 comb
|
|
5781 bra L3051
|
|
5782 rol -$0E,s
|
|
5783 eim #$63,-$0C,s
|
|
5784 clr -$0E,s
|
|
5785 rol >$0027
|
|
5786 fcb $10
|
|
5787 com <u00E8
|
|
5788 neg <u0064
|
|
5789 neg <u000A
|
|
5790 aim #$55,<u006C
|
|
5791 lsl >$0000
|
|
5792 neg <u0000
|
|
5793 neg <u0000
|
|
5794 neg <u0000
|
|
5795 oim #$00,<u0000
|
|
5796 neg <u0000
|
|
5797 neg <u0000
|
|
5798 neg <u0000
|
|
5799 neg <u0000
|
|
5800 neg <u0000
|
|
5801 aim #$00,<u0001
|
|
5802 neg <u0000
|
|
5803 neg <u0000
|
|
5804 neg <u0000
|
|
5805 neg <u0000
|
|
5806 neg <u0000
|
|
5807 fcb $42 B
|
|
5808 neg <u0002
|
|
5809 neg <u0000
|
|
5810 neg <u0000
|
|
5811 L302B neg <u0000
|
|
5812 neg <u0000
|
|
5813 neg <u0000
|
|
5814 neg <u0000
|
|
5815 neg <u0000
|
|
5816 neg <u0000
|
|
5817 neg <u0000
|
|
5818 neg <u0000
|
|
5819 neg <u0000
|
|
5820 neg <u0000
|
|
5821 neg <u0000
|
|
5822 neg <u0000
|
|
5823 neg <u0000
|
|
5824 neg <u0000
|
|
5825 neg <u0000
|
|
5826 neg <u0000
|
|
5827 neg <u0000
|
|
5828 neg <u0000
|
|
5829 neg <u0000
|
|
5830 L3051 neg <u0000
|
|
5831 neg <u0000
|
|
5832 neg <u0000
|
|
5833 neg <u0000
|
|
5834 neg <u0000
|
|
5835 neg <u0000
|
|
5836 neg <u0000
|
|
5837 neg <u0000
|
|
5838 neg <u0000
|
|
5839 neg <u0000
|
|
5840 neg <u0000
|
|
5841 neg <u0000
|
|
5842 neg <u0000
|
|
5843 neg <u0000
|
|
5844 neg <u0000
|
|
5845 neg <u0000
|
|
5846 neg <u0000
|
|
5847 neg <u0000
|
|
5848 neg <u0000
|
|
5849 neg <u0000
|
|
5850 neg <u0000
|
|
5851 neg <u0000
|
|
5852 neg <u0000
|
|
5853 neg <u0000
|
|
5854 neg <u0000
|
|
5855 neg <u0000
|
|
5856 neg <u0000
|
|
5857 neg <u0000
|
|
5858 neg <u0000
|
|
5859 neg <u0000
|
|
5860 neg <u0000
|
|
5861 neg <u0000
|
|
5862 neg <u0000
|
|
5863 neg <u0000
|
|
5864 neg <u0000
|
|
5865 neg <u0000
|
|
5866 neg <u0000
|
|
5867 neg <u0000
|
|
5868 neg <u0000
|
|
5869 neg <u0000
|
|
5870 neg <u0000
|
|
5871 neg <u0000
|
|
5872 neg <u0000
|
|
5873 neg <u0000
|
|
5874 neg <u0000
|
|
5875 neg <u0000
|
|
5876 neg <u0000
|
|
5877 neg <u0000
|
|
5878 neg <u0000
|
|
5879 neg <u0000
|
|
5880 neg <u0000
|
|
5881 neg <u0000
|
|
5882 neg <u0000
|
|
5883 neg <u0000
|
|
5884 neg <u0000
|
|
5885 neg <u0000
|
|
5886 neg <u0000
|
|
5887 neg <u0000
|
|
5888 neg <u0000
|
|
5889 neg <u0000
|
|
5890 neg <u0000
|
|
5891 neg <u0000
|
|
5892 neg <u0000
|
|
5893 neg <u0000
|
|
5894 neg <u0000
|
|
5895 neg <u0001
|
|
5896 oim #$01,<u0001
|
|
5897 oim #$01,<u0001
|
|
5898 oim #$01,<u0011
|
|
5899 fcb $11
|
|
5900 oim #$11,<u0011
|
|
5901 oim #$01,<u0001
|
|
5902 oim #$01,<u0001
|
|
5903 oim #$01,<u0001
|
|
5904 oim #$01,<u0001
|
|
5905 oim #$01,<u0001
|
|
5906 oim #$01,<u0001
|
|
5907 leax $00,y
|
|
5908 bra L3118
|
|
5909 bra L311A
|
|
5910 bra L311C
|
|
5911 bra L311E
|
|
5912 bra L3120
|
|
5913 bra L3122
|
|
5914 bra L3124
|
|
5915 lsla
|
|
5916 lsla
|
|
5917 lsla
|
|
5918 lsla
|
|
5919 lsla
|
|
5920 lsla
|
|
5921 lsla
|
|
5922 lsla
|
|
5923 lsla
|
|
5924 lsla
|
|
5925 bra L3130
|
|
5926 bra L3132
|
|
5927 bra L3134
|
|
5928 bra L3158
|
|
5929 fcb $42 B
|
|
5930 fcb $42 B
|
|
5931 L3118 fcb $42 B
|
|
5932 fcb $42 B
|
|
5933 L311A fcb $42 B
|
|
5934 aim #$02,<u0002
|
|
5935 L311E aim #$02,<u0002
|
|
5936 aim #$02,<u0002
|
|
5937 L3124 aim #$02,<u0002
|
|
5938 aim #$02,<u0002
|
|
5939 aim #$02,<u0002
|
|
5940 aim #$02,<u0020
|
|
5941 L3130 bra L3152
|
|
5942 L3132 bra L3154
|
|
5943 L3134 bra L317A
|
|
5944 lsra
|
|
5945 lsra
|
|
5946 lsra
|
|
5947 lsra
|
|
5948 lsra
|
|
5949 lsr <u0004
|
|
5950 lsr <u0004
|
|
5951 lsr <u0004
|
|
5952 lsr <u0004
|
|
5953 lsr <u0004
|
|
5954 lsr <u0004
|
|
5955 lsr <u0004
|
|
5956 lsr <u0004
|
|
5957 lsr <u0004
|
|
5958 lsr <u0004
|
|
5959 bra L3171
|
|
5960 bra L3173
|
|
5961 oim #$00,<u0022
|
|
5962 neg <u0009
|
|
5963 L3158 neg <u0007
|
|
5964 aim #$2A,<u0002
|
|
5965 bvc L3161
|
|
5966 bne L3163
|
|
5967 L3161 bcc L3164
|
|
5968 L3163 stu $01,x
|
|
5969 std $01,x
|
|
5970 addb $01,x
|
|
5971 adcb $01,x
|
|
5972 stb $01,x
|
|
5973 bitb $00,x
|
|
5974 tim #$01,<u00FD
|
|
5975 oim #$FB,<u0001
|
|
5976 adcb >$01F7
|
|
5977 oim #$F5,<u0001
|
|
5978 addd >$01F1
|
|
5979 aim #$0B,<u0002
|
|
5980 rol <u0002
|
|
5981 asr <u0002
|
|
5982 eim #$02,<u0003
|
|
5983 aim #$01,<u0001
|
|
5984 stu >$0219
|
|
5985 aim #$17,<u0002
|
|
5986 fcb $15
|
|
5987 aim #$13,<u0002
|
|
5988 fcb $11
|
|
5989 aim #$0F,<u0002
|
|
5990 tst <u0000
|
|
5991 oim #$02,<u0055
|
|
5992 com $0F,s
|
|
5993 jmp $06,s
|
|
5994 rol $07,s
|
|
5995 fcb $00
|
1350
|
5996
|
335
|
5997 emod
|
|
5998 eom equ *
|
1350
|
5999 end
|