> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 0A 00 9E 39 39 39 00 13 08 14 00 2E |.......999......|
00000010: 4D 45 4D 00 20 08 19 00 4E 54 53 43 20 B2 20 30 |MEM. ...NTSC . 0|
00000020: 00 2C 08 1E 00 AC B2 24 43 30 30 30 00 59 08 28 |.,.....$C000.Y.(|
00000030: 00 4A 53 52 20 9F 3A 4C 44 41 20 23 22 49 22 3A |.JSR .:LDA #"I":|
00000040: 4A 53 52 20 24 46 46 41 38 3A 4A 53 52 20 24 46 |JSR $FFA8:JSR $F|
00000050: 46 41 45 3A 4A 53 52 20 9F 00 95 08 2D 00 4C 44 |FAE:JSR ....-.LD|
00000060: 58 20 23 24 46 42 3A AB 20 4C 44 41 20 54 58 54 |X #$FB:. LDA TXT|
00000070: 31 AB 24 46 42 2C 58 3A 4A 53 52 20 24 46 46 41 |1.$FB,X:JSR $FFA|
00000080: 38 3A 49 4E 58 3A 42 4E 45 20 AB 3A 4A 53 52 20 |8:INX:BNE .:JSR |
00000090: 24 46 33 46 36 00 D5 08 32 00 4C 44 41 20 24 44 |$F3F6...2.LDA $D|
000000A0: 30 31 31 3A AF 20 23 24 37 3A 41 44 43 20 23 24 |011:. #$7:ADC #$|
000000B0: 32 46 3A 53 54 41 20 52 42 32 AA 31 3A 4C 44 41 |2F:STA RB2.1:LDA|
000000C0: 20 24 44 44 30 30 3A AF 20 23 37 3A 53 54 41 20 | $DD00:. #7:STA |
000000D0: 24 44 44 30 30 00 07 09 37 00 B0 41 20 23 24 32 |$DD00...7..A #$2|
000000E0: 30 3A 53 54 41 20 24 41 33 3A 4C 53 52 3A 4C 53 |0:STA $A3:LSR:LS|
000000F0: 52 3A 45 B0 20 24 41 33 3A AF 20 23 37 3A 53 54 |R:E. $A3:. #7:ST|
00000100: 41 20 52 42 33 AA 31 00 15 09 3C 00 53 54 58 20 |A RB3.1...<.STX |
00000110: 24 44 30 31 35 00 2F 09 46 00 AB 20 42 49 54 20 |$D015./.F.. BIT |
00000120: 24 44 44 30 30 3A 42 56 53 20 AB 3A 53 45 49 00 |$DD00:BVS .:SEI.|
00000130: 5D 09 50 00 4D 41 49 4E 33 20 4C 44 58 20 23 35 |].P.MAIN3 LDX #5|
00000140: 3A AB 20 4A 53 52 20 52 42 3A 53 54 41 20 24 46 |:. JSR RB:STA $F|
00000150: 41 2C 58 3A 44 45 58 3A 42 4E 45 20 AB 00 69 09 |A,X:DEX:BNE ..i.|
00000160: 64 00 AA 20 53 54 58 20 31 00 AE 09 90 01 4D 41 |d.. STX 1.....MA|
00000170: 49 4E 34 20 54 58 41 3A 4C 44 58 20 23 34 3A AB |IN4 TXA:LDX #4:.|
00000180: 20 53 54 41 20 24 41 36 2C 58 3A 44 45 58 3A 42 | STA $A6,X:DEX:B|
00000190: 50 4C 20 AB 3A AB 20 4A 53 52 20 4D 31 3A 49 4E |PL .:. JSR M1:IN|
000001A0: 58 3A 42 43 43 20 4D 32 3A 42 45 51 20 AA 00 D1 |X:BCC M2:BEQ ...|
000001B0: 09 9A 01 4A 53 52 20 4D 31 3A AA 20 52 4F 4C 20 |...JSR M1:. ROL |
000001C0: 24 41 38 3A 52 4F 4C 20 24 41 39 3A 42 50 4C 20 |$A8:ROL $A9:BPL |
000001D0: AB 00 13 0A A4 01 4D 32 20 53 45 43 3A 4C 44 41 |......M2 SEC:LDA|
000001E0: 20 24 46 45 3A 53 42 43 20 24 41 38 3A 53 54 41 | $FE:SBC $A8:STA|
000001F0: 20 24 46 45 3A 4C 44 41 20 24 46 46 3A 53 42 43 | $FE:LDA $FF:SBC|
00000200: 20 24 41 39 3A 53 54 41 20 24 46 46 3A 4A 53 52 | $A9:STA $FF:JSR|
00000210: 20 4D 33 00 42 0A B8 01 4C 44 41 20 23 31 3A 4A | M3.B...LDA #1:J|
00000220: 53 52 20 4D 31 3A 42 43 53 20 4D 35 3A 41 44 43 |SR M1:BCS M5:ADC|
00000230: 20 23 31 3A 49 4E 43 20 24 41 41 3A 42 4E 45 20 | #1:INC $AA:BNE |
00000240: 4D 34 00 68 0A C2 01 4D 35 20 4A 53 52 20 4D 31 |M4.h...M5 JSR M1|
00000250: 3A 42 43 43 20 AA 3A 4A 53 52 20 4D 31 3A 52 4F |:BCC .:JSR M1:RO|
00000260: 4C 3A 42 50 4C 20 4D 35 00 9E 0A CC 01 AA 20 41 |L:BPL M5...... A|
00000270: 44 43 20 23 32 3A 4D 34 20 53 54 41 20 24 41 38 |DC #2:M4 STA $A8|
00000280: 3A 4A 53 52 20 4D 31 3A 52 4F 4C 20 24 41 41 3A |:JSR M1:ROL $AA:|
00000290: 4A 53 52 20 4D 31 3A 52 4F 4C 20 24 41 41 00 B7 |JSR M1:ROL $AA..|
000002A0: 0A D6 01 4D 37 20 4C 44 59 20 24 41 41 3A 4C 44 |...M7 LDY $AA:LD|
000002B0: 58 20 54 42 31 2C 59 00 DE 0A E0 01 AB 20 4A 53 |X TB1,Y...... JS|
000002C0: 52 20 4D 31 3A 52 4F 4C 20 24 41 36 3A 52 4F 4C |R M1:ROL $A6:ROL|
000002D0: 20 24 41 37 3A 44 45 58 3A 42 4E 45 20 AB 00 1D | $A7:DEX:BNE ...|
000002E0: 0B EA 01 4C 44 41 20 24 41 41 3A AF 20 23 33 3A |...LDA $AA:. #3:|
000002F0: 42 45 51 20 4D 36 3A 49 4E 43 20 24 41 36 3A 42 |BEQ M6:INC $A6:B|
00000300: 4E 45 20 AA 3A 49 4E 43 20 24 41 37 3A AA 20 44 |NE .:INC $A7:. D|
00000310: 45 43 20 24 41 41 3A 42 50 4C 20 4D 37 00 35 0B |EC $AA:BPL M7.5.|
00000320: 08 02 4D 36 20 4A 53 52 20 4D 39 3A 42 4D 49 20 |..M6 JSR M9:BMI |
00000330: 4D 41 49 4E 34 00 6F 0B 12 02 4D 31 30 20 4C 44 |MAIN4.o...M10 LD|
00000340: 59 20 24 46 45 3A 42 45 51 20 4D 32 30 3A AB 20 |Y $FE:BEQ M20:. |
00000350: 44 45 43 20 24 46 45 3A 50 48 41 3A 4A 53 52 20 |DEC $FE:PHA:JSR |
00000360: 4D 31 31 3A 53 54 41 20 24 46 42 3A 50 4C 41 00 |M11:STA $FB:PLA.|
00000370: 9B 0B 1C 02 53 45 43 3A 2E 42 59 54 20 24 32 34 |....SEC:.BYT $24|
00000380: 3A 4D 31 20 43 4C 43 3A 52 4F 4C 20 24 46 42 3A |:M1 CLC:ROL $FB:|
00000390: 42 45 51 20 4D 31 30 3A 52 54 53 00 B9 0B 26 02 |BEQ M10:RTS...&.|
000003A0: 4D 32 30 20 43 50 59 20 24 46 46 3A 44 45 43 20 |M20 CPY $FF:DEC |
000003B0: 24 46 46 3A 42 43 43 20 AB 00 D5 0B 30 02 50 4C |$FF:BCC ....0.PL|
000003C0: 41 3A 50 4C 41 3A 44 45 43 20 31 3A 4A 4D 50 20 |A:PLA:DEC 1:JMP |
000003D0: 4D 41 49 4E 33 00 0C 0C 3A 02 4D 39 20 4C 44 41 |MAIN3...:.M9 LDA|
000003E0: 20 24 46 43 3A 41 44 43 20 24 41 36 3A 53 54 41 | $FC:ADC $A6:STA|
000003F0: 20 24 46 37 3A 4C 44 41 20 24 46 44 3A 41 44 43 | $F7:LDA $FD:ADC|
00000400: 20 24 41 37 3A 53 54 41 20 24 46 38 00 51 0C 4E | $A7:STA $F8.Q.N|
00000410: 02 4D 33 20 4C 44 59 20 24 41 38 3A 42 45 51 20 |.M3 LDY $A8:BEQ |
00000420: 4D 31 32 3A 4C 44 41 20 24 46 43 3A 53 45 43 3A |M12:LDA $FC:SEC:|
00000430: 53 42 43 20 24 41 38 3A 53 54 41 20 24 46 43 3A |SBC $A8:STA $FC:|
00000440: 42 43 53 20 4D 31 35 3A AB 20 44 45 43 20 24 46 |BCS M15:. DEC $F|
00000450: 44 00 7F 0C 58 02 4D 31 35 20 44 45 59 3A 4A 53 |D...X.M15 DEY:JS|
00000460: 52 20 4D 38 3A 53 54 41 20 28 24 46 43 29 2C 59 |R M8:STA ($FC),Y|
00000470: 3A 43 50 59 20 23 30 3A 42 4E 45 20 4D 31 35 00 |:CPY #0:BNE M15.|
00000480: A1 0C 62 02 4D 31 32 20 44 45 43 20 24 46 38 3A |..b.M12 DEC $F8:|
00000490: 44 45 43 20 24 41 39 3A 42 50 4C 20 AB 3A 52 54 |DEC $A9:BPL .:RT|
000004A0: 53 00 C4 0C 76 02 4D 38 20 54 58 41 3A 42 4E 45 |S...v.M8 TXA:BNE|
000004B0: 20 4D 31 31 3A 4C 44 41 20 28 24 46 37 29 2C 59 | M11:LDA ($F7),Y|
000004C0: 3A 52 54 53 00 F7 0C 80 02 4D 31 31 20 44 45 43 |:RTS.....M11 DEC|
000004D0: 20 31 3A 4A 53 52 20 52 42 3A 44 45 43 20 24 44 | 1:JSR RB:DEC $D|
000004E0: 30 32 30 3A 49 4E 43 20 24 44 30 32 30 3A 49 4E |020:INC $D020:IN|
000004F0: 43 20 31 3A 52 54 53 00 14 0D 8A 02 54 42 31 20 |C 1:RTS.....TB1 |
00000500: 2E 42 59 54 20 35 2C 32 2C 32 2C 33 2C 34 2C 32 |.BYT 5,2,2,3,4,2|
00000510: 2C 32 2C 32 00 3E 0D BC 02 9F 20 4C 44 41 20 23 |,2,2.>.... LDA #|
00000520: 38 3A 4A 53 52 20 24 46 46 42 31 3A 4C 44 41 20 |8:JSR $FFB1:LDA |
00000530: 23 24 46 46 3A 4A 4D 50 20 24 46 46 39 33 00 5E |#$FF:JMP $FF93.^|
00000540: 0D C6 02 54 58 54 31 20 2E 42 59 54 20 22 4D 22 |...TXT1 .BYT "M"|
00000550: 2C 22 2D 22 2C 22 45 22 2C 24 43 30 2C 37 00 8F |,"-","E",$C0,7..|
00000560: 0D D0 02 52 42 20 53 54 58 20 24 41 34 3A 52 42 |...RB STX $A4:RB|
00000570: 34 20 4C 44 58 20 24 41 33 3A 53 45 43 3A 42 49 |4 LDX $A3:SEC:BI|
00000580: 54 20 24 44 44 30 30 3A 42 56 43 20 52 42 35 00 |T $DD00:BVC RB5.|
00000590: BB 0D DA 02 AB 20 4C 44 41 20 24 44 30 31 32 3A |..... LDA $D012:|
000005A0: 52 42 32 20 53 42 43 20 23 30 3A 42 43 43 20 AA |RB2 SBC #0:BCC .|
000005B0: 3A AF 20 23 37 3A 42 45 51 20 AB 00 CB 0D E4 02 |:. #7:BEQ ......|
000005C0: AA 20 53 54 58 20 24 44 44 30 30 00 E1 0D EE 02 |. STX $DD00.....|
000005D0: 2E 8B 20 4E 54 53 43 3A 20 2E 42 59 54 20 24 32 |.. NTSC: .BYT $2|
000005E0: 34 00 F5 0D F8 02 2E 45 4C 53 45 3A 20 2E 42 59 |4......ELSE: .BY|
000005F0: 54 20 24 41 39 00 FD 0D FD 02 2E 8B 45 00 08 0E |T $A9.......E...|
00000600: 02 03 2E 42 59 54 20 30 00 4B 0E 0C 03 54 58 41 |...BYT 0.K...TXA|
00000610: 3A AF 20 23 37 3A 53 54 41 20 24 44 44 30 30 3A |:. #7:STA $DD00:|
00000620: 4C 44 41 20 24 44 44 30 30 3A 4C 53 52 3A 4C 53 |LDA $DD00:LSR:LS|
00000630: 52 3A 45 B0 20 24 44 44 30 30 3A 4C 53 52 3A 4C |R:E. $DD00:LSR:L|
00000640: 53 52 3A 45 B0 20 24 44 44 30 30 00 7A 0E 16 03 |SR:E. $DD00.z...|
00000650: 4C 53 52 3A 4C 53 52 3A 52 42 33 20 45 B0 20 23 |LSR:LSR:RB3 E. #|
00000660: 30 3A 45 B0 20 24 44 44 30 30 3A 4C 44 58 20 24 |0:E. $DD00:LDX $|
00000670: 41 34 3A 52 42 36 20 52 54 53 00 A4 0E 20 03 52 |A4:RB6 RTS... .R|
00000680: 42 35 20 42 49 54 20 24 44 44 30 30 3A 42 56 43 |B5 BIT $DD00:BVC|
00000690: 20 52 42 35 3A 4A 53 52 20 52 42 36 3A 42 4D 49 | RB5:JSR RB6:BMI|
000006A0: 20 52 42 34 00 B8 0E 2A 03 50 4C 41 3A 50 4C 41 | RB4...*.PLA:PLA|
000006B0: 3A 43 4C 43 3A 52 54 53 00 00 00 |:CLC:RTS... |
.......999......MEM. ...NTSC . 0.,.....$
C000.Y.(.JSR .:LDA #"I":JSR $FFA8:JSR $F
FAE:JSR ....-.LDX #$FB:. LDA TXT1.$FB,X:
JSR $FFA8:INX:BNE .:JSR $F3F6.U.2.LDA $D
011:. #$7:ADC #$2F:STA RB2.1:LDA $DD00:.
#7:STA $DD00...7..A #$20:STA $A3:LSR:LS
R:E. $A3:. #7:STA RB3.1...<.STX $D015./.
F.. BIT $DD00:BVS .:SEI.].P.MAIN3 LDX #5
:. JSR RB:STA $FA,X:DEX:BNE ..I.D.. STX
1.....MAIN4 TXA:LDX #4:. STA $A6,X:DEX:B
PL .:. JSR M1:INX:BCC M2:BEQ ..Q...JSR M
1:. ROL $A8:ROL $A9:BPL ......M2 SEC:LDA
$FE:SBC $A8:STA $FE:LDA $FF:SBC $A9:STA
$FF:JSR M3.B...LDA #1:JSR M1:BCS M5:ADC
#1:INC $AA:BNE M4.H.B.M5 JSR M1:BCC .:J
SR M1:ROL:BPL M5...L.. ADC #2:M4 STA $A8
:JSR M1:ROL $AA:JSR M1:ROL $AA...V.M7 LD
Y $AA:LDX TB1,Y...... JSR M1:ROL $A6:ROL
$A7:DEX:BNE ......LDA $AA:. #3:BEQ M6:I
NC $A6:BNE .:INC $A7:. DEC $AA:BPL M7.5.
..M6 JSR M9:BMI MAIN4.O...M10 LDY $FE:BE
Q M20:. DEC $FE:PHA:JSR M11:STA $FB:PLA.
....SEC:.BYT $24:M1 CLC:ROL $FB:BEQ M10:
RTS...&.M20 CPY $FF:DEC $FF:BCC ..U.0.PL
A:PLA:DEC 1:JMP MAIN3...:.M9 LDA $FC:ADC
$A6:STA $F7:LDA $FD:ADC $A7:STA $F8.Q.N
.M3 LDY $A8:BEQ M12:LDA $FC:SEC:SBC $A8:
STA $FC:BCS M15:. DEC $FD..X.M15 DEY:JS
R M8:STA ($FC),Y:CPY #0:BNE M15...B.M12
DEC $F8:DEC $A9:BPL .:RTS.D.V.M8 TXA:BNE
M11:LDA ($F7),Y:RTS.....M11 DEC 1:JSR R
B:DEC $D020:INC $D020:INC 1:RTS.....TB1
.BYT 5,2,2,3,4,2,2,2.>.... LDA #8:JSR $F
FB1:LDA #$FF:JMP $FF93.^.F.TXT1 .BYT "M"
,"-","E",$C0,7...P.RB STX $A4:RB4 LDX $A
3:SEC:BIT $DD00:BVC RB5...Z.. LDA $D012:
RB2 SBC #0:BCC .:. #7:BEQ ..K.... STX $D
D00....... NTSC: .BYT $24......ELSE: .BY
T $A9.......E......BYT 0.K...TXA:. #7:ST
A $DD00:LDA $DD00:LSR:LSR:E. $DD00:LSR:L
SR:E. $DD00.Z...LSR:LSR:RB3 E. #0:E. $DD
00:LDX $A4:RB6 RTS... .RB5 BIT $DD00:BVC
RB5:JSR RB6:BMI RB4...*.PLA:PLA:CLC:RTS
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL