C64 Software  <  SCA: The C64 Software Collection / TEST1.L

  Run
; Load: 2 ($0002), len: 2550 ($09f6) bytes

0002  E0 02       CPX #$02
0004  00          BRK
0005  D8          CLD
0006  02          ??
0007  00          BRK
0008  D0 02       BNE $000C
000A  00          BRK
000B  D8          CLD
000C  0C          ??
000D  A9 03       LDA #$03
000F  A2 00       LDX #$00
0011  20 D6 11    JSR $11D6
0014  20 66 11    JSR $1166
0017  18          CLC
0018  A9 05       LDA #$05
001A  00          BRK
001B  65 64       ADC $64
001D  AA          TAX
001E  A9 0B       LDA #$0B
0020  00          BRK
0021  65 65       ADC $65
0023  18          CLC
0024  20 B1 0C    JSR $0CB1
0027  20 DD 10    JSR $10DD
002A  A2 41       LDX #$41
002C  47          ??
002D  45 54       EOR $54
002F  43          ??
0030  20 20 20    JSR $2020
0033  20 01 A9    JSR $A901
0036  91 09       STA ($09),Y
0038  38          SEC
0039  20 11 10    JSR $1011
003C  20 7E 11    JSR $117E
003F  18          CLC
0040  A9 05       LDA #$05
0042  02          ??
0043  65 64       ADC $64
0045  AA          TAX
0046  A9 0F       LDA #$0F
0048  00          BRK
0049  65 65       ADC $65
004B  38          SEC
004C  20 22 10    JSR $1022
004F  20 5E 09    JSR $095E
0052  20 BE 0D    JSR $0DBE
0055  20 62 03    JSR $0362
0058  0F          ??
0059  18          CLC
005A  A2 02       LDX #$02
005C  00          BRK
005D  A9 0D       LDA #$0D
005F  00          BRK
0060  20 22 10    JSR $1022
0063  20 55 0E    JSR $0E55
0066  20 C0 0F    JSR $0FC0
0069  D0 03       BNE $006E
006B  4C 22 02    JMP $0222
006E  00          BRK
006F  01 4C       ORA ($4C,X)
0071  62          ??
0072  0F          ??
0073  00          BRK
0074  20 02 00    JSR $0002
0077  02          ??
0078  18          CLC
0079  A9 05       LDA #$05
007B  02          ??
007C  65 64       ADC $64
007E  AA          TAX
007F  A9 0A       LDA #$0A
0081  00          BRK
0082  65 65       ADC $65
0084  20 8F 0C    JSR $0C8F
0087  20 C1 0D    JSR $0DC1
008A  4C 22 01    JMP $0122
008D  00          BRK
008E  20 01 00    JSR $0001
0091  03          ??
0092  4C AB 11    JMP $11AB
0095  05 A9       ORA $A9
0097  01 D0       ORA ($D0,X)
0099  03          ??
009A  4C 22 04    JMP $0422
009D  00          BRK
009E  0C          ??
009F  A9 03       LDA #$03
00A1  A2 00       LDX #$00
00A3  20 D6 11    JSR $11D6
00A6  20 66 11    JSR $1166
00A9  18          CLC
00AA  A2 02       LDX #$02
00AC  0D A9 09    ORA $09A9
00AF  00          BRK
00B0  20 11 10    JSR $1011
00B3  20 DD 10    JSR $10DD
00B6  18          CLC
00B7  A2 02       LDX #$02
00B9  00          BRK
00BA  A9 08       LDA #$08
00BC  00          BRK
00BD  20 11 10    JSR $1011
00C0  20 DD 10    JSR $10DD
00C3  A2 41       LDX #$41
00C5  50 55       BVC $011C
00C7  54          ??
00C8  43          ??
00C9  20 20 20    JSR $2020
00CC  20 01 A9    JSR $A901
00CF  91 0B       STA ($0B),Y
00D1  38          SEC
00D2  20 11 10    JSR $1011
00D5  20 7E 11    JSR $117E
00D8  20 66 11    JSR $1166
00DB  A2 21       LDX #$21
00DD  05 00       ORA $00
00DF  01 A9       ORA ($A9,X)
00E1  91 08       STA ($08),Y
00E3  38          SEC
00E4  20 11 10    JSR $1011
00E7  20 DD 10    JSR $10DD
00EA  A2 41       LDX #$41
00EC  50 52       BVC $0140
00EE  49 4E       EOR #$4E
00F0  54          ??
00F1  46 20       LSR $20
00F3  20 01 A9    JSR $A901
00F6  91 0B       STA ($0B),Y
00F8  38          SEC
00F9  20 11 10    JSR $1011
00FC  20 7E 11    JSR $117E
00FF  20 66 11    JSR $1166
0102  A2 21       LDX #$21
0104  06 00       ASL $00
0106  01 A9       ORA ($A9,X)
0108  91 09       STA ($09),Y
010A  38          SEC
010B  20 11 10    JSR $1011
010E  20 DD 10    JSR $10DD
0111  18          CLC
0112  A9 05       LDA #$05
0114  02          ??
0115  65 64       ADC $64
0117  AA          TAX
0118  A9 0B       LDA #$0B
011A  00          BRK
011B  65 65       ADC $65
011D  38          SEC
011E  20 11 10    JSR $1011
0121  20 DD 10    JSR $10DD
0124  A2 41       LDX #$41
0126  53          ??
0127  43          ??
0128  41 4E       EOR ($4E,X)
012A  46 20       LSR $20
012C  20 20 01    JSR $0120
012F  A9 91       LDA #$91
0131  0B          ??
0132  38          SEC
0133  20 11 10    JSR $1011
0136  20 7E 11    JSR $117E
0139  20 66 11    JSR $1166
013C  A2 21       LDX #$21
013E  07          ??
013F  00          BRK
0140  01 A9       ORA ($A9,X)
0142  91 08       STA ($08),Y
0144  38          SEC
0145  20 11 10    JSR $1011
0148  20 DD 10    JSR $10DD
014B  A2 41       LDX #$41
014D  50 52       BVC $01A1
014F  49 4E       EOR #$4E
0151  54          ??
0152  46 20       LSR $20
0154  20 01 A9    JSR $A901
0157  91 0B       STA ($0B),Y
0159  38          SEC
015A  20 11 10    JSR $1011
015D  20 7E 11    JSR $117E
0160  20 66 11    JSR $1166
0163  A2 21       LDX #$21
0165  08          PHP
0166  00          BRK
0167  01 A9       ORA ($A9,X)
0169  91 09       STA ($09),Y
016B  38          SEC
016C  20 11 10    JSR $1011
016F  20 DD 10    JSR $10DD
0172  18          CLC
0173  A9 05       LDA #$05
0175  00          BRK
0176  65 64       ADC $64
0178  AA          TAX
0179  A9 0B       LDA #$0B
017B  00          BRK
017C  65 65       ADC $65
017E  38          SEC
017F  20 11 10    JSR $1011
0182  20 DD 10    JSR $10DD
0185  A2 41       LDX #$41
0187  53          ??
0188  43          ??
0189  41 4E       EOR ($4E,X)
018B  46 20       LSR $20
018D  20 20 01    JSR $0120
0190  A9 91       LDA #$91
0192  09 38       ORA #$38
0194  20 11 10    JSR $1011
0197  20 7E 11    JSR $117E
019A  18          CLC
019B  A9 05       LDA #$05
019D  02          ??
019E  65 64       ADC $64
01A0  AA          TAX
01A1  A9 08       LDA #$08
01A3  00          BRK
01A4  65 65       ADC $65
01A6  20 8F 0C    JSR $0C8F
01A9  18          CLC
01AA  A2 02       LDX #$02
01AC  42          ??
01AD  A9 0D       LDA #$0D
01AF  00          BRK
01B0  20 22 10    JSR $1022
01B3  20 55 0E    JSR $0E55
01B6  20 C0 0F    JSR $0FC0
01B9  D0 03       BNE $01BE
01BB  4C 22 09    JMP $0922
01BE  00          BRK
01BF  04          ??
01C0  20 66 11    JSR $1166
01C3  A2 21       LDX #$21
01C5  0A          ASL A
01C6  00          BRK
01C7  01 A9       ORA ($A9,X)
01C9  91 09       STA ($09),Y
01CB  38          SEC
01CC  20 11 10    JSR $1011
01CF  20 DD 10    JSR $10DD
01D2  18          CLC
01D3  A9 05       LDA #$05
01D5  00          BRK
01D6  65 64       ADC $64
01D8  AA          TAX
01D9  A9 0B       LDA #$0B
01DB  00          BRK
01DC  65 65       ADC $65
01DE  18          CLC
01DF  20 B1 0C    JSR $0CB1
01E2  20 DD 10    JSR $10DD
01E5  A2 41       LDX #$41
01E7  50 52       BVC $023B
01E9  49 4E       EOR #$4E
01EB  54          ??
01EC  46 20       LSR $20
01EE  20 01 A9    JSR $A901
01F1  91 07       STA ($07),Y
01F3  38          SEC
01F4  20 11 10    JSR $1011
01F7  20 7E 11    JSR $117E
01FA  20 09 00    JSR $0009
01FD  02          ??
01FE  18          CLC
01FF  A9 05       LDA #$05
0201  02          ??
0202  65 64       ADC $64
0204  AA          TAX
0205  A9 08       LDA #$08
0207  00          BRK
0208  65 65       ADC $65
020A  20 8F 0C    JSR $0C8F
020D  18          CLC
020E  A2 02       LDX #$02
0210  43          ??
0211  A9 0D       LDA #$0D
0213  00          BRK
0214  20 22 10    JSR $1022
0217  20 55 0E    JSR $0E55
021A  20 C0 0F    JSR $0FC0
021D  D0 03       BNE $0222
021F  4C 22 0B    JMP $0B22
0222  00          BRK
0223  04          ??
0224  20 66 11    JSR $1166
0227  A2 21       LDX #$21
0229  0C          ??
022A  00          BRK
022B  01 A9       ORA ($A9,X)
022D  91 09       STA ($09),Y
022F  38          SEC
0230  20 11 10    JSR $1011
0233  20 DD 10    JSR $10DD
0236  18          CLC
0237  A9 05       LDA #$05
0239  00          BRK
023A  65 64       ADC $64
023C  AA          TAX
023D  A9 0B       LDA #$0B
023F  00          BRK
0240  65 65       ADC $65
0242  18          CLC
0243  20 B1 0C    JSR $0CB1
0246  20 DD 10    JSR $10DD
0249  A2 41       LDX #$41
024B  50 52       BVC $029F
024D  49 4E       EOR #$4E
024F  54          ??
0250  46 20       LSR $20
0252  20 01 A9    JSR $A901
0255  91 07       STA ($07),Y
0257  38          SEC
0258  20 11 10    JSR $1011
025B  20 7E 11    JSR $117E
025E  20 0B 00    JSR $000B
0261  02          ??
0262  18          CLC
0263  A9 05       LDA #$05
0265  02          ??
0266  65 64       ADC $64
0268  AA          TAX
0269  A9 08       LDA #$08
026B  00          BRK
026C  65 65       ADC $65
026E  20 8F 0C    JSR $0C8F
0271  18          CLC
0272  A2 02       LDX #$02
0274  44          ??
0275  A9 0D       LDA #$0D
0277  00          BRK
0278  20 22 10    JSR $1022
027B  20 55 0E    JSR $0E55
027E  20 C0 0F    JSR $0FC0
0281  D0 03       BNE $0286
0283  4C 22 0D    JMP $0D22
0286  00          BRK
0287  04          ??
0288  20 66 11    JSR $1166
028B  A2 21       LDX #$21
028D  0E 00 01    ASL $0100
0290  A9 91       LDA #$91
0292  09 38       ORA #$38
0294  20 11 10    JSR $1011
0297  20 DD 10    JSR $10DD
029A  18          CLC
029B  A9 05       LDA #$05
029D  00          BRK
029E  65 64       ADC $64
02A0  AA          TAX
02A1  A9 0B       LDA #$0B
02A3  00          BRK
02A4  65 65       ADC $65
02A6  18          CLC
02A7  20 B1 0C    JSR $0CB1
02AA  20 DD 10    JSR $10DD
02AD  A2 41       LDX #$41
02AF  50 52       BVC $0303
02B1  49 4E       EOR #$4E
02B3  54          ??
02B4  46 20       LSR $20
02B6  20 01 A9    JSR $A901
02B9  91 07       STA ($07),Y
02BB  38          SEC
02BC  20 11 10    JSR $1011
02BF  20 7E 11    JSR $117E
02C2  20 0D 00    JSR $000D
02C5  02          ??
02C6  18          CLC
02C7  A9 05       LDA #$05
02C9  02          ??
02CA  65 64       ADC $64
02CC  AA          TAX
02CD  A9 08       LDA #$08
02CF  00          BRK
02D0  65 65       ADC $65
02D2  20 8F 0C    JSR $0C8F
02D5  18          CLC
02D6  A2 02       LDX #$02
02D8  45 A9       EOR $A9
02DA  0D 00 20    ORA $2000
02DD  22          ??
02DE  10 20       BPL $0300
02E0  55 0E       EOR $0E,X
02E2  20 C0 0F    JSR $0FC0
02E5  D0 03       BNE $02EA
02E7  4C 22 0F    JMP $0F22
02EA  00          BRK
02EB  04          ??
02EC  20 66 11    JSR $1166
02EF  A2 21       LDX #$21
02F1  10 00       BPL $02F3
02F3  01 A9       ORA ($A9,X)
02F5  91 09       STA ($09),Y
02F7  38          SEC
02F8  20 11 10    JSR $1011
02FB  20 DD 10    JSR $10DD
02FE  18          CLC
02FF  A9 05       LDA #$05
0301  00          BRK
0302  65 64       ADC $64
0304  AA          TAX
0305  A9 0B       LDA #$0B
0307  00          BRK
0308  65 65       ADC $65
030A  18          CLC
030B  20 B1 0C    JSR $0CB1
030E  20 DD 10    JSR $10DD
0311  A2 41       LDX #$41
0313  50 52       BVC $0367
0315  49 4E       EOR #$4E
0317  54          ??
0318  46 20       LSR $20
031A  20 01 A9    JSR $A901
031D  91 07       STA ($07),Y
031F  38          SEC
0320  20 11 10    JSR $1011
0323  20 7E 11    JSR $117E
0326  20 0F 00    JSR $000F
0329  02          ??
032A  18          CLC
032B  A9 05       LDA #$05
032D  02          ??
032E  65 64       ADC $64
0330  AA          TAX
0331  A9 08       LDA #$08
0333  00          BRK
0334  65 65       ADC $65
0336  20 8F 0C    JSR $0C8F
0339  18          CLC
033A  A2 02       LDX #$02
033C  46 A9       LSR $A9
033E  0D 00 20    ORA $2000
0341  22          ??
0342  10 20       BPL $0364
0344  55 0E       EOR $0E,X
0346  20 C0 0F    JSR $0FC0
0349  D0 03       BNE $034E
034B  4C 22 11    JMP $1122
034E  00          BRK
034F  04          ??
0350  20 66 11    JSR $1166
0353  A2 21       LDX #$21
0355  12          ??
0356  00          BRK
0357  01 A9       ORA ($A9,X)
0359  91 09       STA ($09),Y
035B  38          SEC
035C  20 11 10    JSR $1011
035F  20 DD 10    JSR $10DD
0362  18          CLC
0363  A9 05       LDA #$05
0365  00          BRK
0366  65 64       ADC $64
0368  AA          TAX
0369  A9 0B       LDA #$0B
036B  00          BRK
036C  65 65       ADC $65
036E  18          CLC
036F  20 B1 0C    JSR $0CB1
0372  20 DD 10    JSR $10DD
0375  A2 41       LDX #$41
0377  50 52       BVC $03CB
0379  49 4E       EOR #$4E
037B  54          ??
037C  46 20       LSR $20
037E  20 01 A9    JSR $A901
0381  91 07       STA ($07),Y
0383  38          SEC
0384  20 11 10    JSR $1011
0387  20 7E 11    JSR $117E
038A  20 11 00    JSR $0011
038D  02          ??
038E  18          CLC
038F  A9 05       LDA #$05
0391  02          ??
0392  65 64       ADC $64
0394  AA          TAX
0395  A9 08       LDA #$08
0397  00          BRK
0398  65 65       ADC $65
039A  20 8F 0C    JSR $0C8F
039D  18          CLC
039E  A2 02       LDX #$02
03A0  47          ??
03A1  A9 0D       LDA #$0D
03A3  00          BRK
03A4  20 22 10    JSR $1022
03A7  20 55 0E    JSR $0E55
03AA  20 C0 0F    JSR $0FC0
03AD  D0 03       BNE $03B2
03AF  4C 22 13    JMP $1322
03B2  00          BRK
03B3  04          ??
03B4  20 66 11    JSR $1166
03B7  A2 21       LDX #$21
03B9  14          ??
03BA  00          BRK
03BB  01 A9       ORA ($A9,X)
03BD  91 09       STA ($09),Y
03BF  38          SEC
03C0  20 11 10    JSR $1011
03C3  20 DD 10    JSR $10DD
03C6  18          CLC
03C7  A9 05       LDA #$05
03C9  00          BRK
03CA  65 64       ADC $64
03CC  AA          TAX
03CD  A9 0B       LDA #$0B
03CF  00          BRK
03D0  65 65       ADC $65
03D2  18          CLC
03D3  20 B1 0C    JSR $0CB1
03D6  20 DD 10    JSR $10DD
03D9  A2 41       LDX #$41
03DB  50 52       BVC $042F
03DD  49 4E       EOR #$4E
03DF  54          ??
03E0  46 20       LSR $20
03E2  20 01 A9    JSR $A901
03E5  91 07       STA ($07),Y
03E7  38          SEC
03E8  20 11 10    JSR $1011
03EB  20 7E 11    JSR $117E
03EE  20 13 00    JSR $0013
03F1  02          ??
03F2  18          CLC
03F3  A9 05       LDA #$05
03F5  02          ??
03F6  65 64       ADC $64
03F8  AA          TAX
03F9  A9 08       LDA #$08
03FB  00          BRK
03FC  65 65       ADC $65
03FE  20 8F 0C    JSR $0C8F
0401  18          CLC
0402  A2 02       LDX #$02
0404  48          PHA
0405  A9 0D       LDA #$0D
0407  00          BRK
0408  20 22 10    JSR $1022
040B  20 55 0E    JSR $0E55
040E  20 C0 0F    JSR $0FC0
0411  D0 03       BNE $0416
0413  4C 22 15    JMP $1522
0416  00          BRK
0417  04          ??
0418  20 66 11    JSR $1166
041B  A2 21       LDX #$21
041D  16 00       ASL $00,X
041F  01 A9       ORA ($A9,X)
0421  91 09       STA ($09),Y
0423  38          SEC
0424  20 11 10    JSR $1011
0427  20 DD 10    JSR $10DD
042A  18          CLC
042B  A9 05       LDA #$05
042D  00          BRK
042E  65 64       ADC $64
0430  AA          TAX
0431  A9 0B       LDA #$0B
0433  00          BRK
0434  65 65       ADC $65
0436  18          CLC
0437  20 B1 0C    JSR $0CB1
043A  20 DD 10    JSR $10DD
043D  A2 41       LDX #$41
043F  50 52       BVC $0493
0441  49 4E       EOR #$4E
0443  54          ??
0444  46 20       LSR $20
0446  20 01 A9    JSR $A901
0449  91 07       STA ($07),Y
044B  38          SEC
044C  20 11 10    JSR $1011
044F  20 7E 11    JSR $117E
0452  20 15 00    JSR $0015
0455  02          ??
0456  18          CLC
0457  A9 05       LDA #$05
0459  02          ??
045A  65 64       ADC $64
045C  AA          TAX
045D  A9 08       LDA #$08
045F  00          BRK
0460  65 65       ADC $65
0462  20 8F 0C    JSR $0C8F
0465  18          CLC
0466  A2 02       LDX #$02
0468  31 A9       AND ($A9),Y
046A  0D 00 20    ORA $2000
046D  22          ??
046E  10 20       BPL $0490
0470  55 0E       EOR $0E,X
0472  20 C0 0F    JSR $0FC0
0475  D0 03       BNE $047A
0477  4C 22 17    JMP $1722
047A  00          BRK
047B  04          ??
047C  20 66 11    JSR $1166
047F  A2 21       LDX #$21
0481  18          CLC
0482  00          BRK
0483  01 A9       ORA ($A9,X)
0485  91 09       STA ($09),Y
0487  38          SEC
0488  20 11 10    JSR $1011
048B  20 DD 10    JSR $10DD
048E  18          CLC
048F  A9 05       LDA #$05
0491  00          BRK
0492  65 64       ADC $64
0494  AA          TAX
0495  A9 0B       LDA #$0B
0497  00          BRK
0498  65 65       ADC $65
049A  18          CLC
049B  20 B1 0C    JSR $0CB1
049E  20 DD 10    JSR $10DD
04A1  A2 41       LDX #$41
04A3  50 52       BVC $04F7
04A5  49 4E       EOR #$4E
04A7  54          ??
04A8  46 20       LSR $20
04AA  20 01 A9    JSR $A901
04AD  91 07       STA ($07),Y
04AF  38          SEC
04B0  20 11 10    JSR $1011
04B3  20 7E 11    JSR $117E
04B6  20 17 00    JSR $0017
04B9  02          ??
04BA  18          CLC
04BB  A9 05       LDA #$05
04BD  02          ??
04BE  65 64       ADC $64
04C0  AA          TAX
04C1  A9 08       LDA #$08
04C3  00          BRK
04C4  65 65       ADC $65
04C6  20 8F 0C    JSR $0C8F
04C9  18          CLC
04CA  A2 02       LDX #$02
04CC  32          ??
04CD  A9 0D       LDA #$0D
04CF  00          BRK
04D0  20 22 10    JSR $1022
04D3  20 55 0E    JSR $0E55
04D6  20 C0 0F    JSR $0FC0
04D9  D0 03       BNE $04DE
04DB  4C 22 19    JMP $1922
04DE  00          BRK
04DF  04          ??
04E0  20 66 11    JSR $1166
04E3  A2 21       LDX #$21
04E5  1A          ??
04E6  00          BRK
04E7  01 A9       ORA ($A9,X)
04E9  91 09       STA ($09),Y
04EB  38          SEC
04EC  20 11 10    JSR $1011
04EF  20 DD 10    JSR $10DD
04F2  18          CLC
04F3  A9 05       LDA #$05
04F5  00          BRK
04F6  65 64       ADC $64
04F8  AA          TAX
04F9  A9 0B       LDA #$0B
04FB  00          BRK
04FC  65 65       ADC $65
04FE  18          CLC
04FF  20 B1 0C    JSR $0CB1
0502  20 DD 10    JSR $10DD
0505  A2 41       LDX #$41
0507  50 52       BVC $055B
0509  49 4E       EOR #$4E
050B  54          ??
050C  46 20       LSR $20
050E  20 01 A9    JSR $A901
0511  91 07       STA ($07),Y
0513  38          SEC
0514  20 11 10    JSR $1011
0517  20 7E 11    JSR $117E
051A  20 19 00    JSR $0019
051D  02          ??
051E  18          CLC
051F  A9 05       LDA #$05
0521  02          ??
0522  65 64       ADC $64
0524  AA          TAX
0525  A9 08       LDA #$08
0527  00          BRK
0528  65 65       ADC $65
052A  20 8F 0C    JSR $0C8F
052D  18          CLC
052E  A2 02       LDX #$02
0530  33          ??
0531  A9 0D       LDA #$0D
0533  00          BRK
0534  20 22 10    JSR $1022
0537  20 55 0E    JSR $0E55
053A  20 C0 0F    JSR $0FC0
053D  D0 03       BNE $0542
053F  4C 22 1B    JMP $1B22
0542  00          BRK
0543  04          ??
0544  20 66 11    JSR $1166
0547  A2 21       LDX #$21
0549  1C          ??
054A  00          BRK
054B  01 A9       ORA ($A9,X)
054D  91 09       STA ($09),Y
054F  38          SEC
0550  20 11 10    JSR $1011
0553  20 DD 10    JSR $10DD
0556  18          CLC
0557  A9 05       LDA #$05
0559  00          BRK
055A  65 64       ADC $64
055C  AA          TAX
055D  A9 0B       LDA #$0B
055F  00          BRK
0560  65 65       ADC $65
0562  18          CLC
0563  20 B1 0C    JSR $0CB1
0566  20 DD 10    JSR $10DD
0569  A2 41       LDX #$41
056B  50 52       BVC $05BF
056D  49 4E       EOR #$4E
056F  54          ??
0570  46 20       LSR $20
0572  20 01 A9    JSR $A901
0575  91 07       STA ($07),Y
0577  38          SEC
0578  20 11 10    JSR $1011
057B  20 7E 11    JSR $117E
057E  20 1B 00    JSR $001B
0581  02          ??
0582  18          CLC
0583  A9 05       LDA #$05
0585  02          ??
0586  65 64       ADC $64
0588  AA          TAX
0589  A9 08       LDA #$08
058B  00          BRK
058C  65 65       ADC $65
058E  20 8F 0C    JSR $0C8F
0591  18          CLC
0592  A2 02       LDX #$02
0594  4F          ??
0595  A9 0D       LDA #$0D
0597  00          BRK
0598  20 22 10    JSR $1022
059B  20 55 0E    JSR $0E55
059E  20 C0 0F    JSR $0FC0
05A1  D0 03       BNE $05A6
05A3  4C 22 1D    JMP $1D22
05A6  00          BRK
05A7  04          ??
05A8  20 66 11    JSR $1166
05AB  A2 21       LDX #$21
05AD  1E 00 01    ASL $0100,X
05B0  A9 91       LDA #$91
05B2  09 38       ORA #$38
05B4  20 11 10    JSR $1011
05B7  20 DD 10    JSR $10DD
05BA  18          CLC
05BB  A9 05       LDA #$05
05BD  00          BRK
05BE  65 64       ADC $64
05C0  AA          TAX
05C1  A9 0B       LDA #$0B
05C3  00          BRK
05C4  65 65       ADC $65
05C6  18          CLC
05C7  20 B1 0C    JSR $0CB1
05CA  20 DD 10    JSR $10DD
05CD  A2 41       LDX #$41
05CF  50 52       BVC $0623
05D1  49 4E       EOR #$4E
05D3  54          ??
05D4  46 20       LSR $20
05D6  20 01 A9    JSR $A901
05D9  91 07       STA ($07),Y
05DB  38          SEC
05DC  20 11 10    JSR $1011
05DF  20 7E 11    JSR $117E
05E2  20 1D 00    JSR $001D
05E5  02          ??
05E6  18          CLC
05E7  A9 05       LDA #$05
05E9  02          ??
05EA  65 64       ADC $64
05EC  AA          TAX
05ED  A9 08       LDA #$08
05EF  00          BRK
05F0  65 65       ADC $65
05F2  20 8F 0C    JSR $0C8F
05F5  18          CLC
05F6  A2 02       LDX #$02
05F8  53          ??
05F9  A9 0D       LDA #$0D
05FB  00          BRK
05FC  20 22 10    JSR $1022
05FF  20 55 0E    JSR $0E55
0602  20 C0 0F    JSR $0FC0
0605  D0 03       BNE $060A
0607  4C 22 1F    JMP $1F22
060A  00          BRK
060B  04          ??
060C  20 66 11    JSR $1166
060F  A2 21       LDX #$21
0611  20 00 01    JSR $0100
0614  A9 91       LDA #$91
0616  09 38       ORA #$38
0618  20 11 10    JSR $1011
061B  20 DD 10    JSR $10DD
061E  18          CLC
061F  A9 05       LDA #$05
0621  00          BRK
0622  65 64       ADC $64
0624  AA          TAX
0625  A9 0B       LDA #$0B
0627  00          BRK
0628  65 65       ADC $65
062A  18          CLC
062B  20 B1 0C    JSR $0CB1
062E  20 DD 10    JSR $10DD
0631  A2 41       LDX #$41
0633  50 52       BVC $0687
0635  49 4E       EOR #$4E
0637  54          ??
0638  46 20       LSR $20
063A  20 01 A9    JSR $A901
063D  91 07       STA ($07),Y
063F  38          SEC
0640  20 11 10    JSR $1011
0643  20 7E 11    JSR $117E
0646  20 1F 00    JSR $001F
0649  02          ??
064A  18          CLC
064B  A9 05       LDA #$05
064D  02          ??
064E  65 64       ADC $64
0650  AA          TAX
0651  A9 08       LDA #$08
0653  00          BRK
0654  65 65       ADC $65
0656  20 8F 0C    JSR $0C8F
0659  18          CLC
065A  A2 02       LDX #$02
065C  55 A9       EOR $A9,X
065E  0D 00 20    ORA $2000
0661  22          ??
0662  10 20       BPL $0684
0664  55 0E       EOR $0E,X
0666  20 C0 0F    JSR $0FC0
0669  D0 03       BNE $066E
066B  4C 22 21    JMP $2122
066E  00          BRK
066F  04          ??
0670  20 66 11    JSR $1166
0673  A2 21       LDX #$21
0675  22          ??
0676  00          BRK
0677  01 A9       ORA ($A9,X)
0679  91 09       STA ($09),Y
067B  38          SEC
067C  20 11 10    JSR $1011
067F  20 DD 10    JSR $10DD
0682  18          CLC
0683  A9 05       LDA #$05
0685  00          BRK
0686  65 64       ADC $64
0688  AA          TAX
0689  A9 0B       LDA #$0B
068B  00          BRK
068C  65 65       ADC $65
068E  18          CLC
068F  20 B1 0C    JSR $0CB1
0692  20 DD 10    JSR $10DD
0695  A2 41       LDX #$41
0697  50 52       BVC $06EB
0699  49 4E       EOR #$4E
069B  54          ??
069C  46 20       LSR $20
069E  20 01 A9    JSR $A901
06A1  91 07       STA ($07),Y
06A3  38          SEC
06A4  20 11 10    JSR $1011
06A7  20 7E 11    JSR $117E
06AA  20 21 00    JSR $0021
06AD  02          ??
06AE  18          CLC
06AF  A9 05       LDA #$05
06B1  02          ??
06B2  65 64       ADC $64
06B4  AA          TAX
06B5  A9 08       LDA #$08
06B7  00          BRK
06B8  65 65       ADC $65
06BA  20 8F 0C    JSR $0C8F
06BD  18          CLC
06BE  A2 02       LDX #$02
06C0  58          CLI
06C1  A9 0D       LDA #$0D
06C3  00          BRK
06C4  20 22 10    JSR $1022
06C7  20 55 0E    JSR $0E55
06CA  20 C0 0F    JSR $0FC0
06CD  D0 03       BNE $06D2
06CF  4C 22 23    JMP $2322
06D2  00          BRK
06D3  04          ??
06D4  20 66 11    JSR $1166
06D7  A2 21       LDX #$21
06D9  24 00       BIT $00
06DB  01 A9       ORA ($A9,X)
06DD  91 09       STA ($09),Y
06DF  38          SEC
06E0  20 11 10    JSR $1011
06E3  20 DD 10    JSR $10DD
06E6  18          CLC
06E7  A9 05       LDA #$05
06E9  00          BRK
06EA  65 64       ADC $64
06EC  AA          TAX
06ED  A9 0B       LDA #$0B
06EF  00          BRK
06F0  65 65       ADC $65
06F2  18          CLC
06F3  20 B1 0C    JSR $0CB1
06F6  20 DD 10    JSR $10DD
06F9  A2 41       LDX #$41
06FB  50 52       BVC $074F
06FD  49 4E       EOR #$4E
06FF  54          ??
0700  46 20       LSR $20
0702  20 01 A9    JSR $A901
0705  91 0B       STA ($0B),Y
0707  38          SEC
0708  20 11 10    JSR $1011
070B  20 7E 11    JSR $117E
070E  20 66 11    JSR $1166
0711  A2 21       LDX #$21
0713  25 00       AND $00
0715  01 A9       ORA ($A9,X)
0717  91 09       STA ($09),Y
0719  38          SEC
071A  20 11 10    JSR $1011
071D  20 DD 10    JSR $10DD
0720  18          CLC
0721  A9 05       LDA #$05
0723  02          ??
0724  65 64       ADC $64
0726  AA          TAX
0727  A9 0A       LDA #$0A
0729  00          BRK
072A  65 65       ADC $65
072C  20 8F 0C    JSR $0C8F
072F  20 DD 10    JSR $10DD
0732  A2 41       LDX #$41
0734  50 52       BVC $0788
0736  49 4E       EOR #$4E
0738  54          ??
0739  46 20       LSR $20
073B  20 01 A9    JSR $A901
073E  91 07       STA ($07),Y
0740  38          SEC
0741  20 11 10    JSR $1011
0744  20 7E 11    JSR $117E
0747  20 23 00    JSR $0023
074A  01 4C       ORA ($4C,X)
074C  62          ??
074D  71 00       ADC ($00),Y
074F  20 04 00    JSR $0004
0752  07          ??
0753  A9 FD       LDA #$FD
0755  A2 FF       LDX #$FF
0757  20 D6 11    JSR $11D6
075A  20 03 00    JSR $0003
075D  03          ??
075E  4C AB 11    JMP $11AB
0761  20 05 00    JSR $0005
0764  0F          ??
0765  C1 55       CMP ($55,X)
0767  53          ??
0768  47          ??
0769  41 42       EOR ($42,X)
076B  45 3A       EOR $3A
076D  42          ??
076E  2C 43 2C    BIT $2C43
0771  44          ??
0772  2C 45 0F    BIT $0F45
0775  2C 46 2C    BIT $2C46
0778  47          ??
0779  2C 48 2C    BIT $2C48
077C  31 2C       AND ($2C),Y
077E  32          ??
077F  2C 33 2C    BIT $2C33
0782  4F          ??
0783  2C 08 53    BIT $5308
0786  2C 55 2C    BIT $2C55
0789  58          CLI
078A  3F          ??
078B  0D 00 20    ORA $2000
078E  06 00       ASL $00
0790  04          ??
0791  25 31       AND $31
0793  43          ??
0794  00          BRK
0795  20 07 00    JSR $0007
0798  0F          ??
0799  0D C9 4E    ORA $4EC9
079C  54          ??
079D  45 47       EOR $47
079F  45 52       EOR $52
07A1  20 45 49    JSR $4945
07A4  4E 47 45    LSR $4547
07A7  42          ??
07A8  04          ??
07A9  45 4E       EOR $4E
07AB  20 00 20    JSR $2000
07AE  08          PHP
07AF  00          BRK
07B0  04          ??
07B1  25 35       AND $35
07B3  44          ??
07B4  00          BRK
07B5  20 0A 00    JSR $000A
07B8  06 0D       ASL $0D
07BA  25 31       AND $31
07BC  30 42       BMI $0800
07BE  00          BRK
07BF  20 0C 00    JSR $000C
07C2  06 0D       ASL $0D
07C4  25 31       AND $31
07C6  30 43       BMI $080B
07C8  00          BRK
07C9  20 0E 00    JSR $000E
07CC  06 0D       ASL $0D
07CE  25 31       AND $31
07D0  30 44       BMI $0816
07D2  00          BRK
07D3  20 10 00    JSR $0010
07D6  06 0D       ASL $0D
07D8  25 31       AND $31
07DA  30 45       BMI $0821
07DC  00          BRK
07DD  20 12 00    JSR $0012
07E0  06 0D       ASL $0D
07E2  25 31       AND $31
07E4  30 46       BMI $082C
07E6  00          BRK
07E7  20 14 00    JSR $0014
07EA  06 0D       ASL $0D
07EC  25 31       AND $31
07EE  30 47       BMI $0837
07F0  00          BRK
07F1  20 16 00    JSR $0016
07F4  06 0D       ASL $0D
07F6  25 31       AND $31
07F8  30 48       BMI $0842
07FA  00          BRK
07FB  20 18 00    JSR $0018
07FE  07          ??
07FF  0D 25 31    ORA $3125
0802  30 4C       BMI $0850
0804  44          ??
0805  00          BRK
0806  20 1A 00    JSR $001A
0809  07          ??
080A  0D 25 31    ORA $3125
080D  30 4C       BMI $085B
080F  4F          ??
0810  00          BRK
0811  20 1C 00    JSR $001C
0814  07          ??
0815  0D 25 31    ORA $3125
0818  30 4C       BMI $0866
081A  58          CLI
081B  00          BRK
081C  20 1E 00    JSR $001E
081F  06 0D       ASL $0D
0821  25 31       AND $31
0823  30 4F       BMI $0874
0825  00          BRK
0826  20 20 00    JSR $0020
0829  06 0D       ASL $0D
082B  25 31       AND $31
082D  30 53       BMI $0882
082F  00          BRK
0830  20 22 00    JSR $0022
0833  06 0D       ASL $0D
0835  25 31       AND $31
0837  30 55       BMI $088E
0839  00          BRK
083A  20 24 00    JSR $0024
083D  06 0D       ASL $0D
083F  25 31       AND $31
0841  30 58       BMI $089B
0843  00          BRK
0844  20 25 00    JSR $0025
0847  0A          ASL A
0848  C1 55       CMP ($55,X)
084A  53          ??
084B  3A          ??
084C  20 25 31    JSR $3125
084F  43          ??
0850  0D 00 00    ORA $0000
0853  0C          ??
0854  80          ??
0855  45 52       EOR $52
0857  52          ??
0858  4F          ??
0859  4E 20 20    LSR $2020
085C  20 02 00    JSR $0002
085F  0C          ??
0860  80          ??
0861  45 52       EOR $52
0863  52          ??
0864  4F          ??
0865  46 46       LSR $46
0867  20 20 02    JSR $0220
086A  00          BRK
086B  0C          ??
086C  80          ??
086D  4E 4D 49    LSR $494D
0870  4F          ??
0871  4E 20 20    LSR $2020
0874  20 02 00    JSR $0002
0877  0C          ??
0878  80          ??
0879  4E 4D 49    LSR $494D
087C  4F          ??
087D  46 46       LSR $46
087F  20 20 02    JSR $0220
0882  00          BRK
0883  0C          ??
0884  80          ??
0885  45 52       EOR $52
0887  52          ??
0888  4F          ??
0889  52          ??
088A  20 20 20    JSR $2020
088D  02          ??
088E  00          BRK
088F  0C          ??
0890  80          ??
0891  45 58       EOR $58
0893  49 54       EOR #$54
0895  20 20 20    JSR $2020
0898  20 02 00    JSR $0002
089B  0C          ??
089C  80          ??
089D  4D 4F 56    EOR $564F
08A0  45 20       EOR $20
08A2  20 20 20    JSR $2020
08A5  02          ??
08A6  00          BRK
08A7  0C          ??
08A8  80          ??
08A9  43          ??
08AA  55 52       EOR $52,X
08AC  53          ??
08AD  4F          ??
08AE  52          ??
08AF  20 20 02    JSR $0220
08B2  00          BRK
08B3  0C          ??
08B4  80          ??
08B5  53          ??
08B6  54          ??
08B7  52          ??
08B8  43          ??
08B9  50 59       BVC $0914
08BB  20 20 02    JSR $0220
08BE  00          BRK
08BF  0C          ??
08C0  80          ??
08C1  53          ??
08C2  54          ??
08C3  52          ??
08C4  43          ??
08C5  41 54       EOR ($54,X)
08C7  20 20 02    JSR $0220
08CA  00          BRK
08CB  0C          ??
08CC  80          ??
08CD  46 52       LSR $52
08CF  45 45       EOR $45
08D1  20 20 20    JSR $2020
08D4  20 02 00    JSR $0002
08D7  0C          ??
08D8  80          ??
08D9  51 45       EOR ($45),Y
08DB  52          ??
08DC  52          ??
08DD  4F          ??
08DE  52          ??
08DF  20 20 02    JSR $0220
08E2  00          BRK
08E3  0C          ??
08E4  80          ??
08E5  50 55       BVC $093C
08E7  54          ??
08E8  43          ??
08E9  20 20 20    JSR $2020
08EC  20 02 00    JSR $0002
08EF  0C          ??
08F0  80          ??
08F1  50 55       BVC $0948
08F3  54          ??
08F4  53          ??
08F5  20 20 20    JSR $2020
08F8  20 02 00    JSR $0002
08FB  0C          ??
08FC  80          ??
08FD  47          ??
08FE  45 54       EOR $54
0900  53          ??
0901  20 20 20    JSR $2020
0904  20 02 00    JSR $0002
0907  0C          ??
0908  80          ??
0909  50 55       BVC $0960
090B  54          ??
090C  46 20       LSR $20
090E  20 20 20    JSR $2020
0911  02          ??
0912  00          BRK
0913  0C          ??
0914  80          ??
0915  47          ??
0916  45 54       EOR $54
0918  46 20       LSR $20
091A  20 20 20    JSR $2020
091D  02          ??
091E  00          BRK
091F  0C          ??
0920  80          ??
0921  53          ??
0922  54          ??
0923  52          ??
0924  4C 45 4E    JMP $4E45
0927  20 20 02    JSR $0220
092A  00          BRK
092B  0C          ??
092C  80          ??
092D  53          ??
092E  54          ??
092F  52          ??
0930  43          ??
0931  4D 50 20    EOR $2050
0934  20 02 00    JSR $0002
0937  0C          ??
0938  80          ??
0939  47          ??
093A  45 54       EOR $54
093C  43          ??
093D  20 20 20    JSR $2020
0940  20 02 00    JSR $0002
0943  0C          ??
0944  80          ??
0945  41 4C       EOR ($4C,X)
0947  4C 4F 43    JMP $434F
094A  20 20 20    JSR $2020
094D  02          ??
094E  00          BRK
094F  0C          ??
0950  80          ??
0951  4F          ??
0952  50 45       BVC $0999
0954  4E 20 20    LSR $2020
0957  20 20 02    JSR $0220
095A  00          BRK
095B  0C          ??
095C  80          ??
095D  43          ??
095E  4C 4F 53    JMP $534F
0961  45 20       EOR $20
0963  20 20 02    JSR $0220
0966  00          BRK
0967  0C          ??
0968  80          ??
0969  50 52       BVC $09BD
096B  49 4E       EOR #$4E
096D  54          ??
096E  46 20       LSR $20
0970  20 02 00    JSR $0002
0973  0C          ??
0974  80          ??
0975  53          ??
0976  50 52       BVC $09CA
0978  49 4E       EOR #$4E
097A  54          ??
097B  46 20       LSR $20
097D  02          ??
097E  00          BRK
097F  0C          ??
0980  80          ??
0981  46 50       LSR $50
0983  52          ??
0984  49 4E       EOR #$4E
0986  54          ??
0987  46 20       LSR $20
0989  02          ??
098A  00          BRK
098B  0C          ??
098C  80          ??
098D  53          ??
098E  43          ??
098F  41 4E       EOR ($4E,X)
0991  46 20       LSR $20
0993  20 20 02    JSR $0220
0996  00          BRK
0997  0C          ??
0998  80          ??
0999  53          ??
099A  53          ??
099B  43          ??
099C  41 4E       EOR ($4E,X)
099E  46 20       LSR $20
09A0  20 02 00    JSR $0002
09A3  0C          ??
09A4  80          ??
09A5  46 53       LSR $53
09A7  43          ??
09A8  41 4E       EOR ($4E,X)
09AA  46 20       LSR $20
09AC  20 02 00    JSR $0002
09AF  0C          ??
09B0  00          BRK
09B1  53          ??
09B2  43          ??
09B3  52          ??
09B4  45 45       EOR $45
09B6  4E 20 20    LSR $2020
09B9  00          BRK
09BA  00          BRK
09BB  0C          ??
09BC  00          BRK
09BD  43          ??
09BE  4F          ??
09BF  4C 4F 52    JMP $524F
09C2  20 20 20    JSR $2020
09C5  02          ??
09C6  00          BRK
09C7  0C          ??
09C8  00          BRK
09C9  43          ??
09CA  48          PHA
09CB  41 52       EOR ($52,X)
09CD  52          ??
09CE  41 4D       EOR ($4D,X)
09D0  31 04       AND ($04),Y
09D2  00          BRK
09D3  0C          ??
09D4  00          BRK
09D5  43          ??
09D6  48          PHA
09D7  41 52       EOR ($52,X)
09D9  52          ??
09DA  41 4D       EOR ($4D,X)
09DC  32          ??
09DD  06 00       ASL $00
09DF  0C          ??
09E0  00          BRK
09E1  49 4E       EOR #$4E
09E3  4B          ??
09E4  45 59       EOR $59
09E6  20 20 20    JSR $2020
09E9  08          PHP
09EA  00          BRK
09EB  0C          ??
09EC  00          BRK
09ED  4D 41 49    EOR $4941
09F0  4E 20 20    LSR $2020
09F3  20 20 71    JSR $7120
09F6  00          BRK
09F7  00          BRK
READY.