C64 Software  <  SCA: The C64 Software Collection / INTRO.OBJ

  Run
; Load: 12544 ($3100), len: 1632 bytes

3100  A9 00       LDA #$00
3102  8D 20 D0    STA $D020
3105  8D 86 02    STA $0286
3108  20 44 E5    JSR $E544
310B  20 38 32    JSR $3238
310E  78          SEI
310F  A9 9C       LDA #$9C
3111  8D 14 03    STA $0314
3114  A9 32       LDA #$32
3116  8D 15 03    STA $0315
3119  A9 7F       LDA #$7F
311B  8D 0D DC    STA $DC0D
311E  A9 1E       LDA #$1E
3120  8D 12 D0    STA $D012
3123  A9 5B       LDA #$5B
3125  8D 11 D0    STA $D011
3128  A9 81       LDA #$81
312A  8D 1A D0    STA $D01A
312D  8D 91 02    STA $0291
3130  8D 8A 02    STA $028A
3133  A9 01       LDA #$01
3135  85 02       STA $02
3137  A9 06       LDA #$06
3139  85 A7       STA $A7
313B  A9 01       LDA #$01
313D  85 A4       STA $A4
313F  85 AA       STA $AA
3141  85 A9       STA $A9
3143  20 5E 33    JSR $335E
3146  A2 06       LDX #$06
3148  A0 67       LDY #$67
314A  20 00 70    JSR $7000
314D  A9 01       LDA #$01
314F  8D 19 D0    STA $D019
3152  58          CLI
3153  20 E4 FF    JSR $FFE4
3156  F0 FB       BEQ $3153
3158  C9 31       CMP #$31
315A  D0 0C       BNE $3168
315C  78          SEI
315D  A2 06       LDX #$06
315F  A0 67       LDY #$67
3161  20 00 70    JSR $7000
3164  58          CLI
3165  4C 53 31    JMP $3153
3168  C9 32       CMP #$32
316A  D0 0C       BNE $3178
316C  78          SEI
316D  A2 06       LDX #$06
316F  A0 6E       LDY #$6E
3171  20 00 70    JSR $7000
3174  58          CLI
3175  4C 53 31    JMP $3153
3178  C9 33       CMP #$33
317A  D0 0C       BNE $3188
317C  78          SEI
317D  A2 D8       LDX #$D8
317F  A0 65       LDY #$65
3181  20 00 70    JSR $7000
3184  58          CLI
3185  4C 53 31    JMP $3153
3188  C9 2B       CMP #$2B
318A  D0 21       BNE $31AD
318C  AD C2 46    LDA $46C2
318F  C9 39       CMP #$39
3191  D0 07       BNE $319A
3193  AD C3 46    LDA $46C3
3196  C9 39       CMP #$39
3198  F0 B9       BEQ $3153
319A  AE C3 46    LDX $46C3
319D  E8          INX
319E  E0 3A       CPX #$3A
31A0  D0 05       BNE $31A7
31A2  A2 30       LDX #$30
31A4  EE C2 46    INC $46C2
31A7  8E C3 46    STX $46C3
31AA  4C 53 31    JMP $3153
31AD  C9 2D       CMP #$2D
31AF  D0 21       BNE $31D2
31B1  AD C2 46    LDA $46C2
31B4  C9 30       CMP #$30
31B6  D0 07       BNE $31BF
31B8  AD C3 46    LDA $46C3
31BB  C9 31       CMP #$31
31BD  F0 94       BEQ $3153
31BF  AE C3 46    LDX $46C3
31C2  CA          DEX
31C3  E0 2F       CPX #$2F
31C5  D0 05       BNE $31CC
31C7  A2 39       LDX #$39
31C9  CE C2 46    DEC $46C2
31CC  8E C3 46    STX $46C3
31CF  4C 53 31    JMP $3153
31D2  C9 20       CMP #$20
31D4  D0 03       BNE $31D9
31D6  4C 04 32    JMP $3204
31D9  C9 43       CMP #$43
31DB  D0 18       BNE $31F5
31DD  A2 00       LDX #$00
31DF  8A          TXA
31E0  9D 15 2B    STA $2B15,X
31E3  9D 00 2C    STA $2C00,X
31E6  9D 00 2D    STA $2D00,X
31E9  9D 00 2E    STA $2E00,X
31EC  9D 00 2F    STA $2F00,X
31EF  E8          INX
31F0  D0 EE       BNE $31E0
31F2  4C 04 32    JMP $3204
31F5  C9 54       CMP #$54
31F7  D0 08       BNE $3201
31F9  A9 2C       LDA #$2C
31FB  8D 71 19    STA $1971
31FE  4C 04 32    JMP $3204
3201  4C 53 31    JMP $3153
3204  AD C2 46    LDA $46C2
3207  38          SEC
3208  E9 30       SBC #$30
320A  8D C2 46    STA $46C2
320D  0A          ASL A
320E  0A          ASL A
320F  18          CLC
3210  6D C2 46    ADC $46C2
3213  0A          ASL A
3214  18          CLC
3215  6D C3 46    ADC $46C3
3218  38          SEC
3219  E9 30       SBC #$30
321B  8D E7 08    STA $08E7
321E  A2 00       LDX #$00
3220  BD 50 3A    LDA $3A50,X
3223  9D 50 45    STA $4550,X
3226  BD 00 3B    LDA $3B00,X
3229  9D 00 46    STA $4600,X
322C  BD 00 3C    LDA $3C00,X
322F  9D 00 47    STA $4700,X
3232  E8          INX
3233  D0 EB       BNE $3220
3235  4C 76 48    JMP $4876
3238  78          SEI
3239  A9 33       LDA #$33
323B  85 01       STA $01
323D  A2 00       LDX #$00
323F  BD 00 D0    LDA $D000,X
3242  49 FF       EOR #$FF
3244  9D 00 40    STA $4000,X
3247  BD 00 D1    LDA $D100,X
324A  49 FF       EOR #$FF
324C  9D 00 41    STA $4100,X
324F  E8          INX
3250  D0 ED       BNE $323F
3252  A2 07       LDX #$07
3254  A9 00       LDA #$00
3256  9D 00 40    STA $4000,X
3259  CA          DEX
325A  10 FA       BPL $3256
325C  A9 37       LDA #$37
325E  85 01       STA $01
3260  A9 10       LDA #$10
3262  8D 18 D0    STA $D018
3265  A9 96       LDA #$96
3267  8D 00 DD    STA $DD00
326A  58          CLI
326B  60          RTS
326C  02          ??
326D  0A          ASL A
326E  07          ??
326F  01 07       ORA ($07,X)
3271  0A          ASL A
3272  02          ??
3273  00          BRK
3274  06 0E       ASL $0E
3276  03          ??
3277  03          ??
3278  03          ??
3279  0E 06 00    ASL $0006
327C  09 05       ORA #$05
327E  0D 01 0D    ORA $0D01
3281  05 09       ORA $09
3283  00          BRK
3284  02          ??
3285  0A          ASL A
3286  07          ??
3287  01 07       ORA ($07,X)
3289  0A          ASL A
328A  02          ??
328B  00          BRK
328C  02          ??
328D  0A          ASL A
328E  07          ??
328F  01 07       ORA ($07,X)
3291  0A          ASL A
3292  02          ??
3293  00          BRK
3294  0B          ??
3295  0C          ??
3296  0F          ??
3297  01 0F       ORA ($0F,X)
3299  0C          ??
329A  0B          ??
329B  00          BRK
329C  A9 01       LDA #$01
329E  8D 19 D0    STA $D019
32A1  A2 31       LDX #$31
32A3  A0 31       LDY #$31
32A5  B9 3C 03    LDA $033C,Y
32A8  EC 12 D0    CPX $D012
32AB  B0 FB       BCS $32A8
32AD  8D 21 D0    STA $D021
32B0  E8          INX
32B1  88          DEY
32B2  10 F1       BPL $32A5
32B4  20 18 33    JSR $3318
32B7  20 7E 33    JSR $337E
32BA  20 C3 32    JSR $32C3
32BD  20 03 70    JSR $7003
32C0  4C 31 EA    JMP $EA31
32C3  C6 02       DEC $02
32C5  F0 01       BEQ $32C8
32C7  60          RTS
32C8  A9 02       LDA #$02
32CA  85 02       STA $02
32CC  A0 01       LDY #$01
32CE  AE A7 33    LDX $33A7
32D1  B9 A7 33    LDA $33A7,Y
32D4  99 A6 33    STA $33A6,Y
32D7  99 3C 03    STA $033C,Y
32DA  C8          INY
32DB  C0 3E       CPY #$3E
32DD  D0 F2       BNE $32D1
32DF  8E E4 33    STX $33E4
32E2  A5 A7       LDA $A7
32E4  A0 0D       LDY #$0D
32E6  20 FA 32    JSR $32FA
32E9  B9 E6 33    LDA $33E6,Y
32EC  48          PHA
32ED  98          TYA
32EE  18          CLC
32EF  65 A7       ADC $A7
32F1  AA          TAX
32F2  68          PLA
32F3  9D 33 03    STA $0333,X
32F6  88          DEY
32F7  10 F0       BPL $32E9
32F9  60          RTS
32FA  A5 A8       LDA $A8
32FC  29 01       AND #$01
32FE  F0 0E       BEQ $330E
3300  E6 A7       INC $A7
3302  E6 A7       INC $A7
3304  A5 A7       LDA $A7
3306  C9 3C       CMP #$3C
3308  F0 01       BEQ $330B
330A  60          RTS
330B  E6 A8       INC $A8
330D  60          RTS
330E  C6 A7       DEC $A7
3310  C6 A7       DEC $A7
3312  F0 01       BEQ $3315
3314  60          RTS
3315  C6 A8       DEC $A8
3317  60          RTS
3318  A9 70       LDA #$70
331A  A6 A3       LDX $A3
331C  CD 12 D0    CMP $D012
331F  B0 FB       BCS $331C
3321  8E 16 D0    STX $D016
3324  A9 01       LDA #$01
3326  8D 21 D0    STA $D021
3329  AD 12 D0    LDA $D012
332C  C9 7C       CMP #$7C
332E  90 F9       BCC $3329
3330  A9 C8       LDA #$C8
3332  8D 16 D0    STA $D016
3335  A5 A4       LDA $A4
3337  48          PHA
3338  20 42 33    JSR $3342
333B  68          PLA
333C  38          SEC
333D  E9 01       SBC #$01
333F  D0 F6       BNE $3337
3341  60          RTS
3342  C6 A3       DEC $A3
3344  30 01       BMI $3347
3346  60          RTS
3347  A9 07       LDA #$07
3349  85 A3       STA $A3
334B  A2 00       LDX #$00
334D  BD 41 45    LDA $4541,X
3350  9D 40 45    STA $4540,X
3353  E8          INX
3354  E0 27       CPX #$27
3356  D0 F5       BNE $334D
3358  A0 00       LDY #$00
335A  B1 A5       LDA ($A5),Y
335C  D0 0A       BNE $3368
335E  A9 F4       LDA #$F4
3360  85 A5       STA $A5
3362  A9 33       LDA #$33
3364  85 A6       STA $A6
3366  D0 F0       BNE $3358
3368  E6 A5       INC $A5
336A  D0 02       BNE $336E
336C  E6 A6       INC $A6
336E  C9 F5       CMP #$F5
3370  90 08       BCC $337A
3372  38          SEC
3373  E9 F4       SBC #$F4
3375  85 A4       STA $A4
3377  4C 58 33    JMP $3358
337A  8D 67 45    STA $4567
337D  60          RTS
337E  C6 A9       DEC $A9
3380  F0 01       BEQ $3383
3382  60          RTS
3383  A9 04       LDA #$04
3385  85 A9       STA $A9
3387  A6 AA       LDX $AA
3389  BD 6C 32    LDA $326C,X
338C  8D 22 D0    STA $D022
338F  BD 7C 32    LDA $327C,X
3392  8D 23 D0    STA $D023
3395  BD 8C 32    LDA $328C,X
3398  8D 24 D0    STA $D024
339B  CA          DEX
339C  86 AA       STX $AA
339E  30 01       BMI $33A1
33A0  60          RTS
33A1  A9 0F       LDA #$0F
33A3  85 AA       STA $AA
33A5  60          RTS
33A6  00          BRK
33A7  00          BRK
33A8  0B          ??
33A9  0B          ??
33AA  0C          ??
33AB  0C          ??
33AC  0F          ??
33AD  0F          ??
33AE  01 01       ORA ($01,X)
33B0  0F          ??
33B1  0F          ??
33B2  0C          ??
33B3  0C          ??
33B4  0B          ??
33B5  0B          ??
33B6  00          BRK
33B7  00          BRK
33B8  06 06       ASL $06
33BA  0E 0E 03    ASL $030E
33BD  03          ??
33BE  01 01       ORA ($01,X)
33C0  03          ??
33C1  03          ??
33C2  0E 0E 06    ASL $060E
33C5  06 00       ASL $00
33C7  00          BRK
33C8  02          ??
33C9  02          ??
33CA  0A          ASL A
33CB  0A          ASL A
33CC  07          ??
33CD  07          ??
33CE  01 01       ORA ($01,X)
33D0  07          ??
33D1  07          ??
33D2  0A          ASL A
33D3  0A          ASL A
33D4  02          ??
33D5  02          ??
33D6  00          BRK
33D7  00          BRK
33D8  09 09       ORA #$09
33DA  08          PHP
33DB  08          PHP
33DC  07          ??
33DD  07          ??
33DE  01 01       ORA ($01,X)
33E0  07          ??
33E1  07          ??
33E2  08          PHP
33E3  08          PHP
33E4  09 09       ORA #$09
33E6  05 05       ORA $05
33E8  03          ??
33E9  03          ??
33EA  0D 0D 01    ORA $010D
33ED  01 0D       ORA ($0D,X)
33EF  0D 03 03    ORA $0303
33F2  05 05       ORA $05
33F4  F5 20       SBC $20,X
33F6  20 20 20    JSR $2020
33F9  20 44 41    JSR $4144
33FC  53          ??
33FD  20 57 41    JSR $4157
3400  52          ??
3401  54          ??
3402  45 4E       EOR $4E
3404  20 48 41    JSR $4148
3407  54          ??
3408  20 53 49    JSR $4953
340B  43          ??
340C  48          PHA
340D  20 47 45    JSR $4547
3410  4C 4F 48    JMP $484F
3413  4E 54 2E    LSR $2E54
3416  2E 2E 20    ROL $202E
3419  20 20 20    JSR $2020
341C  20 F6 54    JSR $54F6
341F  48          PHA
3420  45 20       EOR $20
3422  4D 45 47    EOR $4745
3425  41 2D       EOR ($2D,X)
3427  4D 49 47    EOR $4749
342A  48          PHA
342B  54          ??
342C  59 20 D3    EOR $D320,Y
342F  D7          ??
3430  C9 D3       CMP #$D3
3432  D3          ??
3433  20 C3 D2    JSR $D2C3
3436  C1 C3       CMP ($C3,X)
3438  CB          ??
3439  C9 CE       CMP #$CE
343B  C7          ??
343C  20 C1 D3    JSR $D3C1
343F  D3          ??
3440  CF          ??
3441  C3          ??
3442  C9 C1       CMP #$C1
3444  D4          ??
3445  C9 CF       CMP #$CF
3447  CE 20 41    DEC $4120
344A  4E 44 20    LSR $2044
344D  54          ??
344E  48          PHA
344F  45 20       EOR $20
3451  4C 45 47    JMP $4745
3454  45 4E       EOR $4E
3456  44          ??
3457  41 52       EOR ($52,X)
3459  59 20 C2    EOR $C220,Y
345C  C9 C7       CMP #$C7
345E  20 C1 D0    JSR $D0C1
3461  D0 CC       BNE $342F
3463  C5 20       CMP $20
3465  48          PHA
3466  41 56       EOR ($56,X)
3468  45 20       EOR $20
346A  44          ??
346B  4F          ??
346C  4E 45 20    LSR $2045
346F  41 4E       EOR ($4E,X)
3471  4F          ??
3472  54          ??
3473  48          PHA
3474  45 52       EOR $52
3476  20 43 52    JSR $5243
3479  41 43       EOR ($43,X)
347B  4B          ??
347C  2E F7 20    ROL $20F7
347F  49 4D       EOR #$4D
3481  50 4F       BVC $34D2
3483  52          ??
3484  54          ??
3485  45 44       EOR $44
3487  2C 20 41    BIT $4120
348A  4E 41 4C    LSR $4C41
348D  59 53 45    EOR $4553,Y
3490  44          ??
3491  2C 20 43    BIT $4320
3494  52          ??
3495  41 43       EOR ($43,X)
3497  4B          ??
3498  45 44       EOR $44
349A  2C 20 54    BIT $5420
349D  52          ??
349E  41 49       EOR ($49,X)
34A0  4E 45 44    LSR $4445
34A3  2C 20 43    BIT $4320
34A6  48          PHA
34A7  45 41       EOR $41
34A9  54          ??
34AA  45 44       EOR $44
34AC  2C 20 4D    BIT $4D20
34AF  55 5A       EOR $5A,X
34B1  41 4B       EOR ($4B,X)
34B3  20 4F 55    JSR $554F
34B6  54          ??
34B7  53          ??
34B8  4E 41 54    LSR $5441
34BB  43          ??
34BC  48          PHA
34BD  45 44       EOR $44
34BF  2C 20 50    BIT $5020
34C2  41 43       EOR ($43,X)
34C4  4B          ??
34C5  45 44       EOR $44
34C7  20 41 4E    JSR $4E41
34CA  44          ??
34CB  20 53 50    JSR $5053
34CE  52          ??
34CF  45 41       EOR $41
34D1  44          ??
34D2  20 4F 4E    JSR $4E4F
34D5  20 32 38    JSR $3832
34D8  2F          ??
34D9  35 2F       AND $2F,X
34DB  38          SEC
34DC  37          ??
34DD  20 42 59    JSR $5942
34E0  20 D3 C3    JSR $C3D3
34E3  C1 20       CMP ($20,X)
34E5  26 20       ROL $20
34E7  C2          ??
34E8  C1 2E       CMP ($2E,X)
34EA  20 20 20    JSR $2020
34ED  20 20 20    JSR $2020
34F0  20 20 20    JSR $2020
34F3  20 20 20    JSR $2020
34F6  20 20 20    JSR $2020
34F9  20 20 20    JSR $2020
34FC  20 20 20    JSR $2020
34FF  20 20 20    JSR $2020
3502  20 20 20    JSR $2020
3505  20 20 20    JSR $2020
3508  F6 49       INC $49,X
350A  46 20       LSR $20
350C  54          ??
350D  48          PHA
350E  45 20       EOR $20
3510  47          ??
3511  41 49       EOR ($49,X)
3513  4D 20 44    EOR $4420
3516  4F          ??
3517  45 53       EOR $53
3519  4E 27 54    LSR $5427
351C  20 52 55    JSR $5552
351F  4E 20 41    LSR $4120
3522  54          ??
3523  20 54 48    JSR $4854
3526  45 20       EOR $20
3528  46 49       LSR $49
352A  52          ??
352B  53          ??
352C  54          ??
352D  20 54 49    JSR $4954
3530  4D 45 2C    EOR $2C45
3533  20 59 4F    JSR $4F59
3536  55 20       EOR $20,X
3538  53          ??
3539  48          PHA
353A  4F          ??
353B  55 4C       EOR $4C,X
353D  44          ??
353E  4E 27 54    LSR $5427
3541  20 4D 41    JSR $414D
3544  4B          ??
3545  45 20       EOR $20
3547  4A          LSR A
3548  4F          ??
3549  4B          ??
354A  45 53       EOR $53
354C  20 41 42    JSR $4241
354F  4F          ??
3550  55 54       EOR $54,X
3552  20 55 53    JSR $5355
3555  2C 20 49    BIT $4920
3558  54          ??
3559  27          ??
355A  53          ??
355B  20 54 48    JSR $4854
355E  45 20       EOR $20
3560  43          ??
3561  4F          ??
3562  44          ??
3563  45 52       EOR $52
3565  27          ??
3566  53          ??
3567  20 46 41    JSR $4146
356A  55 4C       EOR $4C,X
356C  54          ??
356D  20 21 21    JSR $2121
3570  21 20       AND ($20,X)
3572  20 20 20    JSR $2020
3575  20 20 F7    JSR $F720
3578  57          ??
3579  45 20       EOR $20
357B  4C 49 47    JMP $4749
357E  48          PHA
357F  20 53 4F    JSR $4F53
3582  4D 45 20    EOR $2045
3585  42          ??
3586  4F          ??
3587  4E 46 49    LSR $4946
358A  52          ??
358B  45 53       EOR $53
358D  20 46 4F    JSR $4F46
3590  52          ??
3591  3A          ??
3592  20 20 20    JSR $2020
3595  41 43       EOR ($43,X)
3597  53          ??
3598  20 28 41    JSR $4128
359B  55 53       EOR $53,X
359D  54          ??
359E  52          ??
359F  41 4C       EOR ($4C,X)
35A1  49 41       EOR #$41
35A3  2D C7 C5    AND $C5C7
35A6  D2          ??
35A7  CD C1 CE    CMP $CEC1
35AA  D9 2D 2C    CMP $2C2D,Y
35AD  88          DEY
35AE  8F          ??
35AF  8C 8C 81    STY $818C
35B2  8E 84 29    STX $2984
35B5  2C 20 42    BIT $4220
35B8  43          ??
35B9  41 2C       EOR ($2C,X)
35BB  20 C2 C6    JSR $C6C2
35BE  2C 20 82    BIT $8220
35C1  86 82       STX $82
35C3  93          ??
35C4  2C 20 43    BIT $4320
35C7  52          ??
35C8  41 43       EOR ($43,X)
35CA  4B          ??
35CB  48          PHA
35CC  41 57       EOR ($57,X)
35CE  4B          ??
35CF  2F          ??
35D0  4B          ??
35D1  47          ??
35D2  42          ??
35D3  2C 20 43    BIT $4320
35D6  46 47       LSR $47
35D8  2C 20 43    BIT $4320
35DB  4F          ??
35DC  4D 4D 41    EOR $414D
35DF  4E 44 4F    LSR $4F44
35E2  20 46 52    JSR $5246
35E5  4F          ??
35E6  4E 54 49    LSR $4954
35E9  45 52       EOR $52
35EB  2C 20 84    BIT $8420
35EE  81 8E       STA ($8E,X)
35F0  89          ??
35F1  93          ??
35F2  88          DEY
35F3  20 87 8F    JSR $8F87
35F6  8C 84 2C    STY $2C84
35F9  20 44 4F    JSR $4F44
35FC  4D 49 4E    EOR $4E49
35FF  41 54       EOR ($54,X)
3601  4F          ??
3602  52          ??
3603  53          ??
3604  2C 20 C4    BIT $C420
3607  D3          ??
3608  C8          INY
3609  2C 20 44    BIT $4420
360C  52          ??
360D  20 4D 41    JSR $414D
3610  42          ??
3611  55 53       EOR $53,X
3613  45 2C       EOR $2C
3615  20 C4 D5    JSR $D5C4
3618  C5 C3       CMP $C3
361A  CF          ??
361B  2C 20 44    BIT $4420
361E  53          ??
361F  20 43 4F    JSR $4F43
3622  4D 50 57    EOR $5750
3625  41 52       EOR ($52,X)
3627  45 2C       EOR $2C
3629  20 C4 D9    JSR $D9C4
362C  CE C1 CD    DEC $CDC1
362F  C9 C3       CMP #$C3
3631  20 C4 D5    JSR $D5C4
3634  CF          ??
3635  2C 20 85    BIT $8520
3638  8C 85 83    STY $8385
363B  94 92       STY $92,X
363D  8F          ??
363E  2C 20 45    BIT $4520
3641  58          CLI
3642  50 4C       BVC $3690
3644  4F          ??
3645  52          ??
3646  45 52       EOR $52
3648  2C 20 C6    BIT $C620
364B  C6 D3       DEC $D3
364D  2C 20 87    BIT $8720
3650  93          ??
3651  93          ??
3652  2C 20 48    BIT $4820
3655  43          ??
3656  41 2C       EOR ($2C,X)
3658  20 C8 D4    JSR $D4C8
365B  CC 2C 20    CPY $202C
365E  89          ??
365F  83          ??
3660  83          ??
3661  2C 20 49    BIT $4920
3664  52          ??
3665  41 54       EOR ($54,X)
3667  41 2C       EOR ($2C,X)
3669  20 CC C5    JSR $C5CC
366C  D6 C5       DEC $C5,X
366E  CC 20 39    CPY $3920
3671  39 2C 20    AND $202C,Y
3674  4D 53 53    EOR $5353
3677  2C 20 CE    BIT $CE20
367A  C5 D7       CMP $D7
367C  20 C5 C4    JSR $C4C5
367F  C9 D4       CMP #$D4
3681  C9 CF       CMP #$CF
3683  CE 2C 20    DEC $202C
3686  8F          ??
3687  87          ??
3688  CD 2C 20    CMP $202C
368B  4F          ??
368C  56 45       LSR $45,X
368E  52          ??
368F  53          ??
3690  45 41       EOR $41
3692  53          ??
3693  2C 20 D2    BIT $D220
3696  C1 C4       CMP ($C4,X)
3698  D7          ??
3699  C1 D2       CMP ($D2,X)
369B  2C 20 92    BIT $9220
369E  83          ??
369F  93          ??
36A0  2C 20 53    BIT $5320
36A3  41 56       EOR ($56,X)
36A5  2E 53 41    ROL $4153
36A8  4D 2C 20    EOR $202C
36AB  D3          ??
36AC  D0 CF       BNE $367D
36AE  D4          ??
36AF  2C 20 93    BIT $9320
36B2  90 2C       BCC $36E0
36B4  20 53 46    JSR $4653
36B7  2C 20 D3    BIT $D320
36BA  D3          ??
36BB  34          ??
36BC  37          ??
36BD  2C 20 94    BIT $9420
36C0  86 2C       STX $2C
36C2  20 54 48    JSR $4854
36C5  45 20       EOR $20
36C7  44          ??
36C8  41 4E       EOR ($4E,X)
36CA  49 53       EOR #$53
36CC  48          PHA
36CD  20 43 49    JSR $4943
36D0  52          ??
36D1  43          ??
36D2  4C 45 2C    JMP $2C45
36D5  20 D4 C8    JSR $C8D4
36D8  C5 20       CMP $20
36DA  C6 C1       DEC $C1
36DC  CE C1 D4    DEC $D4C1
36DF  C9 C3       CMP #$C3
36E1  20 C4 D5    JSR $D5C4
36E4  CF          ??
36E5  2C 20 94    BIT $9420
36E8  92          ??
36E9  81 8E       STA ($8E,X)
36EB  93          ??
36EC  2C 20 55    BIT $5520
36EF  53          ??
36F0  41 2C       EOR ($2C,X)
36F2  20 D7 C5    JSR $C5D7
36F5  C2          ??
36F6  2C 20 97    BIT $9720
36F9  8F          ??
36FA  97          ??
36FB  2C 20 58    BIT $5820
36FE  4C 43 2C    JMP $2C43
3701  20 30 30    JSR $3030
3704  37          ??
3705  20 20 20    JSR $2020
3708  20 20 20    JSR $2020
370B  20 20 20    JSR $2020
370E  20 20 20    JSR $2020
3711  20 20 20    JSR $2020
3714  20 20 20    JSR $2020
3717  20 F5 C5    JSR $C5F5
371A  4E CA 4F    LSR $4FCA
371D  D9 20 54    CMP $5420,Y
3720  C8          INY
3721  45 20       EOR $20
3723  C7          ??
3724  41 C9       EOR ($C9,X)
3726  4D 20 21    EOR $2120
3729  20 20 20    JSR $2020
372C  20 20 20    JSR $2020
372F  20 20 20    JSR $2020
3732  20 20 20    JSR $2020
3735  20 20 20    JSR $2020
3738  20 20 20    JSR $2020
373B  20 20 20    JSR $2020
373E  20 20 20    JSR $2020
3741  00          BRK
3742  00          BRK
3743  00          BRK
3744  00          BRK
3745  00          BRK
3746  00          BRK
3747  00          BRK
3748  00          BRK
3749  00          BRK
374A  00          BRK
374B  00          BRK
374C  00          BRK
374D  00          BRK
374E  00          BRK
374F  00          BRK
3750  00          BRK
3751  00          BRK
3752  00          BRK
3753  00          BRK
3754  00          BRK
3755  00          BRK
3756  00          BRK
3757  00          BRK
3758  00          BRK
3759  00          BRK
375A  00          BRK
375B  00          BRK
375C  00          BRK
375D  00          BRK
375E  00          BRK
375F  00          BRK
READY.