> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 64 00 9E 37 30 30 3A 2E 4F 50 54 20 |....d..700:.OPT |
00000010: 4F 4F 3A AC B2 24 31 30 30 30 00 2D 08 6E 00 43 |OO:..$1000.-.n.C|
00000020: 48 52 4F 4D 20 20 B2 20 24 44 30 30 30 00 40 08 |HROM . $D000.@.|
00000030: 82 00 4E 41 41 52 20 20 20 B2 20 24 32 30 30 30 |..NAAR . $2000|
00000040: 00 50 08 8C 00 4C 44 58 20 23 B3 43 48 52 4F 4D |.P...LDX #.CHROM|
00000050: 00 60 08 96 00 4C 44 59 20 23 B1 43 48 52 4F 4D |.`...LDY #.CHROM|
00000060: 00 6C 08 A0 00 53 54 58 20 24 46 42 00 78 08 AA |.l...STX $FB.x..|
00000070: 00 53 54 59 20 24 46 43 00 87 08 B4 00 4C 44 58 |.STY $FC.....LDX|
00000080: 20 23 B3 4E 41 41 52 00 96 08 BE 00 4C 44 59 20 | #.NAAR.....LDY |
00000090: 23 B1 4E 41 41 52 00 A2 08 C8 00 53 54 58 20 24 |#.NAAR.....STX $|
000000A0: 46 44 00 AE 08 D2 00 53 54 59 20 24 46 45 00 B6 |FD.....STY $FE..|
000000B0: 08 DC 00 53 45 49 00 C3 08 E6 00 4C 44 41 20 23 |...SEI.....LDA #|
000000C0: 24 33 33 00 CF 08 F0 00 53 54 41 20 24 30 31 00 |$33.....STA $01.|
000000D0: F0 08 FA 00 4C 44 58 20 23 38 20 20 20 20 20 20 |....LDX #8 |
000000E0: 20 20 20 3B 4E 52 20 4F 46 20 42 4C 4F 43 4B 53 | ;NR OF BLOCKS|
000000F0: 00 FB 08 04 01 4C 44 59 20 23 30 00 10 09 0E 01 |.....LDY #0.....|
00000100: 54 41 4B 45 20 4C 44 41 20 28 24 46 42 29 2C 59 |TAKE LDA ($FB),Y|
00000110: 00 20 09 18 01 53 54 41 20 28 24 46 44 29 2C 59 |. ...STA ($FD),Y|
00000120: 00 31 09 22 01 49 4E 59 3A 42 4E 45 20 54 41 4B |.1.".INY:BNE TAK|
00000130: 45 00 52 09 2C 01 49 4E 43 20 24 46 43 3A 49 4E |E.R.,.INC $FC:IN|
00000140: 43 20 24 46 45 3A 44 45 58 3A 42 4E 45 20 54 41 |C $FE:DEX:BNE TA|
00000150: 4B 45 00 5F 09 54 01 4C 44 41 20 23 24 33 37 00 |KE._.T.LDA #$37.|
00000160: 6B 09 68 01 53 54 41 20 24 30 31 00 77 09 72 01 |k.h.STA $01.w.r.|
00000170: 43 4C 49 3A 52 54 53 00 00 00 |CLI:RTS... |
....D..700:.OPT OO:..$1000.-.N.CHROM .
$D000.@...NAAR . $2000.P...LDX #.CHROM
.`...LDY #.CHROM.L. .STX $FB.X...STY $FC
.....LDX #.NAAR.....LDY #.NAAR...H.STX $
FD...R.STY $FE.....SEI.C...LDA #$33.O...
STA $01.....LDX #8 ;NR OF BLOCKS
.....LDY #0.....TAKE LDA ($FB),Y. ...STA
($FD),Y.1.".INY:BNE TAKE.R.,.INC $FC:IN
C $FE:DEX:BNE TAKE._.T.LDA #$37.K.H.STA
$01.W.R.CLI:RTS...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL