> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 64 00 9F 32 2C 38 2C 31 2C 22 30 3A |....d..2,8,1,"0:|
00000010: 43 4F 4C 4F 52 49 5A 45 52 2E 31 30 32 34 22 00 |COLORIZER.1024".|
00000020: 28 08 6E 00 9E 37 30 30 00 2E 08 78 00 3B 00 3A |(.n..700...x.;.:|
00000030: 08 82 00 AC B2 24 30 33 33 43 00 46 08 8C 00 2E |.....$033C.F....|
00000040: 4F 50 54 20 4F 32 00 4C 08 96 00 3B 00 5E 08 A0 |OPT O2.L...;.^..|
00000050: 00 43 48 41 52 31 20 2E 42 59 54 45 20 31 00 70 |.CHAR1 .BYTE 1.p|
00000060: 08 AA 00 43 48 41 52 32 20 2E 42 59 54 45 20 32 |...CHAR2 .BYTE 2|
00000070: 00 82 08 B4 00 43 48 41 52 33 20 2E 42 59 54 45 |.....CHAR3 .BYTE|
00000080: 20 33 00 88 08 BE 00 3B 00 9A 08 C8 00 43 4F 4C | 3.....;.....COL|
00000090: B0 31 20 2E 42 59 54 45 20 31 00 AC 08 D2 00 43 |.1 .BYTE 1.....C|
000000A0: 4F 4C B0 32 20 2E 42 59 54 45 20 32 00 BE 08 DC |OL.2 .BYTE 2....|
000000B0: 00 43 4F 4C B0 33 20 2E 42 59 54 45 20 36 00 C4 |.COL.3 .BYTE 6..|
000000C0: 08 E6 00 3B 00 D2 08 F0 00 53 52 43 20 B2 20 24 |...;.....SRC . $|
000000D0: 46 42 00 E1 08 FA 00 44 45 53 54 20 B2 20 24 46 |FB.....DEST . $F|
000000E0: 44 00 E7 08 04 01 3B 00 FA 08 0E 01 53 43 52 45 |D.....;.....SCRE|
000000F0: 45 4E 20 B2 20 24 30 34 30 30 00 0E 09 18 01 43 |EN . $0400.....C|
00000100: 4F 4C B0 4D 45 4D 20 B2 20 24 44 38 30 30 00 14 |OL.MEM . $D800..|
00000110: 09 22 01 3B 00 23 09 2C 01 4C 44 41 20 23 24 46 |.".;.#.,.LDA #$F|
00000120: 46 20 3B 00 31 09 36 01 53 54 41 20 53 52 43 20 |F ;.1.6.STA SRC |
00000130: 3B 00 40 09 40 01 53 54 41 20 44 45 53 54 20 3B |;.@.@.STA DEST ;|
00000140: 00 57 09 4A 01 4C 44 41 20 23 B1 28 53 43 52 45 |.W.J.LDA #.(SCRE|
00000150: 45 4E AB 31 29 20 3B 00 67 09 54 01 53 54 41 20 |EN.1) ;.g.T.STA |
00000160: 53 52 43 AA 31 20 3B 00 7F 09 5E 01 4C 44 41 20 |SRC.1 ;...^.LDA |
00000170: 23 B1 28 43 4F 4C B0 4D 45 4D AB 31 29 20 3B 00 |#.(COL.MEM.1) ;.|
00000180: 90 09 68 01 53 54 41 20 44 45 53 54 AA 31 20 3B |..h.STA DEST.1 ;|
00000190: 00 9D 09 72 01 4C 44 58 20 23 34 20 3B 00 A3 09 |...r.LDX #4 ;...|
000001A0: 7C 01 3B 00 BB 09 86 01 4D 41 49 4E 4C 4F 4F 50 ||.;.....MAINLOOP|
000001B0: 20 4C 44 59 20 23 32 35 30 20 3B 00 C1 09 90 01 | LDY #250 ;.....|
000001C0: 3B 00 D7 09 9A 01 4D 4C 32 20 4C 44 41 20 28 53 |;.....ML2 LDA (S|
000001D0: 52 43 29 2C 59 20 3B 00 E7 09 A4 01 43 4D 50 20 |RC),Y ;.....CMP |
000001E0: 43 48 41 52 31 20 3B 00 F5 09 AE 01 42 4E 45 20 |CHAR1 ;.....BNE |
000001F0: 4D 4C 33 20 3B 00 05 0A B8 01 4C 44 41 20 43 4F |ML3 ;.....LDA CO|
00000200: 4C B0 31 20 3B 00 17 0A C2 01 42 50 4C 20 53 41 |L.1 ;.....BPL SA|
00000210: 56 43 4F 4C B0 20 3B 00 1D 0A CC 01 3B 00 31 0A |VCOL. ;.....;.1.|
00000220: D6 01 4D 4C 33 20 43 4D 50 20 43 48 41 52 32 20 |..ML3 CMP CHAR2 |
00000230: 3B 00 3F 0A E0 01 42 4E 45 20 4D 4C 34 20 3B 00 |;.?...BNE ML4 ;.|
00000240: 4F 0A EA 01 4C 44 41 20 43 4F 4C B0 32 20 3B 00 |O...LDA COL.2 ;.|
00000250: 61 0A F4 01 42 50 4C 20 53 41 56 43 4F 4C B0 20 |a...BPL SAVCOL. |
00000260: 3B 00 67 0A FE 01 3B 00 7B 0A 08 02 4D 4C 34 20 |;.g...;.{...ML4 |
00000270: 43 4D 50 20 43 48 41 52 33 20 3B 00 89 0A 12 02 |CMP CHAR3 ;.....|
00000280: 42 4E 45 20 4D 4C 35 20 3B 00 99 0A 1C 02 4C 44 |BNE ML5 ;.....LD|
00000290: 41 20 43 4F 4C B0 33 20 3B 00 9F 0A 26 02 3B 00 |A COL.3 ;...&.;.|
000002A0: BA 0A 30 02 53 41 56 43 4F 4C B0 20 53 54 41 20 |..0.SAVCOL. STA |
000002B0: 28 44 45 53 54 29 2C 59 20 3B 00 C0 0A 3A 02 3B |(DEST),Y ;...:.;|
000002C0: 00 CE 0A 44 02 4D 4C 35 20 44 45 59 20 3B 00 DC |...D.ML5 DEY ;..|
000002D0: 0A 4E 02 42 4E 45 20 4D 4C 32 20 3B 00 E2 0A 58 |.N.BNE ML2 ;...X|
000002E0: 02 3B 00 EC 0A 62 02 43 4C 43 20 3B 00 FB 0A 6C |.;...b.CLC ;...l|
000002F0: 02 4C 44 41 20 23 32 35 30 20 3B 00 09 0B 76 02 |.LDA #250 ;...v.|
00000300: 41 44 43 20 53 52 43 20 3B 00 17 0B 80 02 53 54 |ADC SRC ;.....ST|
00000310: 41 20 53 52 43 20 3B 00 25 0B 8A 02 42 43 43 20 |A SRC ;.%...BCC |
00000320: 4E 43 31 20 3B 00 35 0B 94 02 49 4E 43 20 53 52 |NC1 ;.5...INC SR|
00000330: 43 AA 31 20 3B 00 3F 0B 9E 02 43 4C 43 20 3B 00 |C.1 ;.?...CLC ;.|
00000340: 45 0B A8 02 3B 00 58 0B B2 02 4E 43 31 20 4C 44 |E...;.X...NC1 LD|
00000350: 41 20 23 32 35 30 20 3B 00 67 0B BC 02 41 44 43 |A #250 ;.g...ADC|
00000360: 20 44 45 53 54 20 3B 00 76 0B C6 02 53 54 41 20 | DEST ;.v...STA |
00000370: 44 45 53 54 20 3B 00 84 0B D0 02 42 43 43 20 4E |DEST ;.....BCC N|
00000380: 43 32 20 3B 00 95 0B DA 02 49 4E 43 20 44 45 53 |C2 ;.....INC DES|
00000390: 54 AA 31 20 3B 00 9B 0B E4 02 3B 00 A9 0B EE 02 |T.1 ;.....;.....|
000003A0: 4E 43 32 20 44 45 58 20 3B 00 BA 0B F8 02 42 45 |NC2 DEX ;.....BE|
000003B0: 51 20 46 49 4E 49 53 48 20 3B 00 CD 0B 02 03 4A |Q FINISH ;.....J|
000003C0: 4D 50 20 4D 41 49 4E 4C 4F 4F 50 20 3B 00 D3 0B |MP MAINLOOP ;...|
000003D0: 0C 03 3B 00 E4 0B 16 03 46 49 4E 49 53 48 20 52 |..;.....FINISH R|
000003E0: 54 53 20 3B 00 00 00 |TS ;... |
....D..2,8,1,"0:COLORIZER.1024".(.N..700
...X.;.:.....$033C.F....OPT O2.L...;.^.
.CHAR1 .BYTE 1.P...CHAR2 .BYTE 2.....CHA
R3 .BYTE 3.....;...H.COL.1 .BYTE 1...R.C
OL.2 .BYTE 2.....COL.3 .BYTE 6.D...;.R..
.SRC . $FB.....DEST . $FD.....;.....SCRE
EN . $0400.....COL.MEM . $D800...".;.#.,
.LDA #$FF ;.1.6.STA SRC ;.@.@.STA DEST ;
.W.J.LDA #.(SCREEN.1) ;.G.T.STA SRC.1 ;.
.^.LDA #.(COL.MEM.1) ;...H.STA DEST.1 ;
...R.LDX #4 ;...|.;.....MAINLOOP LDY #25
0 ;.A...;.W...ML2 LDA (SRC),Y ;.....CMP
CHAR1 ;.....BNE ML3 ;.....LDA COL.1 ;...
B.BPL SAVCOL. ;...L.;.1.V.ML3 CMP CHAR2
;.?...BNE ML4 ;.O...LDA COL.2 ;.A...BPL
SAVCOL. ;.G...;.{...ML4 CMP CHAR3 ;.....
BNE ML5 ;.....LDA COL.3 ;...&.;...0.SAVC
OL. STA (DEST),Y ;...:.;.N.D.ML5 DEY ;..
.N.BNE ML2 ;...X.;...B.CLC ;...L.LDA #25
0 ;...V.ADC SRC ;.....STA SRC ;.%...BCC
NC1 ;.5...INC SRC.1 ;.?...CLC ;.E...;.X.
..NC1 LDA #250 ;.G...ADC DEST ;.V.F.STA
DEST ;...P.BCC NC2 ;...Z.INC DEST.1 ;...
..;.....NC2 DEX ;.....BEQ FINISH ;.M...J
MP MAINLOOP ;.S...;.....FINISH RTS ;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL