> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 58 00 8F 20 46 52 4F 4D 20 4D 41 47 |..#.X.. FROM MAG|
00000010: 41 5A 49 4E 45 20 27 59 4F 55 52 20 36 34 27 20 |AZINE 'YOUR 64' |
00000020: 4E 4F 32 00 4F 08 59 00 8F 20 4C 4F 41 44 20 54 |NO2.O.Y.. LOAD T|
00000030: 48 45 20 50 52 4F 47 52 41 4D 20 59 4F 55 20 57 |HE PROGRAM YOU W|
00000040: 49 53 48 20 54 4F 20 45 58 41 4D 49 4E 45 2E 00 |ISH TO EXAMINE..|
00000050: 7B 08 5A 00 8F 20 49 46 20 42 41 53 49 43 20 50 |{.Z.. IF BASIC P|
00000060: 52 4F 47 52 41 4D 20 2D 20 4D 55 53 54 20 42 45 |ROGRAM - MUST BE|
00000070: 20 52 55 4E 20 46 49 52 53 54 2E 00 B3 08 5B 00 | RUN FIRST....[.|
00000080: 8F 20 49 46 20 4D 41 43 48 49 4E 45 20 43 4F 44 |. IF MACHINE COD|
00000090: 45 20 50 52 4F 47 52 41 4D 20 2D 20 4D 41 59 20 |E PROGRAM - MAY |
000000A0: 4E 4F 54 20 48 41 56 45 20 54 4F 20 52 55 4E 20 |NOT HAVE TO RUN |
000000B0: 49 54 2E 00 D6 08 5C 00 8F 20 4C 4F 41 44 20 54 |IT....\.. LOAD T|
000000C0: 48 49 53 20 43 4F 50 49 45 52 20 41 4E 44 20 52 |HIS COPIER AND R|
000000D0: 55 4E 20 49 54 2E 00 EC 08 64 00 97 35 33 32 38 |UN IT....d..5328|
000000E0: 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 0E 09 6E |0,0:.53281,0...n|
000000F0: 00 99 22 93 9E 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00000100: 53 50 52 49 54 45 20 43 4F 50 49 45 52 22 00 31 |SPRITE COPIER".1|
00000110: 09 78 00 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 42 |.x.."..........B|
00000120: 59 20 4D 2E 50 45 41 43 4F 43 4B 20 31 39 38 34 |Y M.PEACOCK 1984|
00000130: 22 00 65 09 82 00 51 B2 35 33 32 34 38 3A 99 22 |".e...Q.53248:."|
00000140: 11 C3 C3 C3 4D 55 4C 54 49 C3 C3 48 49 52 45 53 |....MULTI..HIRES|
00000150: C3 C3 C3 C3 4D 55 4C 54 49 C3 C3 48 49 52 45 53 |....MULTI..HIRES|
00000160: C3 C3 C3 C3 22 00 99 09 8C 00 97 51 2C 31 38 35 |...."......Q,185|
00000170: 3A 97 51 AA 31 2C 39 39 3A 97 51 AA 32 33 2C 33 |:.Q.1,99:.Q.23,3|
00000180: 3A 97 51 AA 32 39 2C 33 3A 97 51 AA 32 2C 31 31 |:.Q.29,3:.Q.2,11|
00000190: 30 3A 97 51 AA 33 2C 39 39 00 B6 09 96 00 97 51 |0:.Q.3,99......Q|
000001A0: AA 33 39 2C 31 35 3A 97 51 AA 33 37 2C 32 3A 97 |.39,15:.Q.37,2:.|
000001B0: 51 AA 33 38 2C 37 00 EC 09 A0 00 97 51 AA 34 2C |Q.38,7......Q.4,|
000001C0: 36 35 3A 97 51 AA 35 2C 39 39 3A 97 51 AA 36 2C |65:.Q.5,99:.Q.6,|
000001D0: 32 35 35 3A 97 51 AA 37 2C 39 39 3A 97 51 AA 32 |255:.Q.7,99:.Q.2|
000001E0: 31 2C 31 35 3A 97 51 AA 32 38 2C 35 00 01 0A AA |1,15:.Q.28,5....|
000001F0: 00 99 22 1E 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000200: 22 00 0C 0A B4 00 97 31 39 38 2C 30 00 3C 0A C8 |"......198,0.<..|
00000210: 00 85 22 53 50 52 49 54 45 20 4E 55 4D 42 45 52 |.."SPRITE NUMBER|
00000220: 20 28 30 2D 32 35 35 29 20 22 3B 53 50 3A 8B 53 | (0-255) ";SP:.S|
00000230: 50 B1 32 35 35 B0 53 50 B3 30 A7 8A 00 55 0A D2 |P.255.SP.0...U..|
00000240: 00 81 59 B2 32 30 34 30 A4 32 30 34 33 3A 97 59 |..Y.2040.2043:.Y|
00000250: 2C 53 50 3A 82 00 75 0A FA 00 99 22 43 4F 50 59 |,SP:..u...."COPY|
00000260: 20 53 50 52 49 54 45 20 54 4F 20 44 41 54 41 20 | SPRITE TO DATA |
00000270: 3D 20 46 31 22 00 B2 0A 22 01 99 22 54 4F 20 51 |= F1"...".."TO Q|
00000280: 55 49 54 20 50 52 4F 47 52 41 4D 20 20 20 20 20 |UIT PROGRAM |
00000290: 20 3D 46 33 22 3A 99 22 54 4F 20 43 4F 4E 54 49 | =F3":."TO CONTI|
000002A0: 4E 55 45 20 41 4E 59 20 4F 54 48 45 52 20 4B 45 |NUE ANY OTHER KE|
000002B0: 59 22 00 C5 0A 2C 01 A1 41 24 3A 8B 41 24 B2 22 |Y"...,..A$:.A$."|
000002C0: 22 A7 33 30 30 00 D6 0A 36 01 8B 41 24 B2 22 85 |".300...6..A$.".|
000002D0: 22 A7 31 30 30 30 00 EC 0A 40 01 8B 41 24 B2 22 |".1000...@..A$."|
000002E0: 86 22 A7 97 51 AA 32 31 2C 30 3A 80 00 F2 0A 5E |."..Q.21,0:....^|
000002F0: 01 8A 00 1C 0B E8 03 99 22 93 9E 1D 1D 1D 1D 1D |........".......|
00000300: 53 50 52 49 54 45 22 3B 53 50 3B 22 54 4F 20 44 |SPRITE";SP;"TO D|
00000310: 41 54 41 22 3A 97 51 AA 32 31 2C 30 00 56 0B F2 |ATA":.Q.21,0.V..|
00000320: 03 99 22 1E 11 46 49 52 53 54 20 4C 49 4E 45 20 |.."..FIRST LINE |
00000330: 4E 55 4D 42 45 52 20 46 4F 52 20 44 41 54 41 22 |NUMBER FOR DATA"|
00000340: 3A 85 22 11 9E 28 32 30 30 30 2D 36 33 30 30 30 |:."..(2000-63000|
00000350: 29 1E 22 3B 4C 49 00 71 0B FC 03 8B 4C 49 B3 32 |).";LI.q....LI.2|
00000360: 30 30 30 B0 4C 49 B1 36 33 30 30 30 A7 31 30 30 |000.LI.63000.100|
00000370: 30 00 88 0B 06 04 53 B2 53 50 AC 36 34 3A 46 B2 |0.....S.SP.64:F.|
00000380: 53 50 AC 36 34 AA 36 32 00 92 0B 10 04 99 22 93 |SP.64.62......".|
00000390: 11 22 00 A2 0B 1A 04 99 4C 49 3B 22 44 41 54 41 |."......LI;"DATA|
000003A0: 22 3B 00 AE 0B 24 04 44 4E B2 44 4E AA 31 00 BD |";...$.DN.DN.1..|
000003B0: 0B 2E 04 81 44 49 B2 53 A4 53 AA 31 36 00 D3 0B |....DI.S.S.16...|
000003C0: 38 04 8B 44 49 B1 46 A7 99 22 9D 20 22 3A 89 31 |8..DI.F..". ":.1|
000003D0: 31 37 30 00 DF 0B 42 04 44 B2 C2 28 44 49 29 00 |170...B.D..(DI).|
000003E0: EB 0B 4C 04 44 24 B2 C4 28 44 29 00 02 0C 56 04 |..L.D$..(D)...V.|
000003F0: 44 24 B2 C9 28 44 24 2C 28 C3 28 44 24 29 AB 31 |D$..(D$,(.(D$).1|
00000400: 29 29 00 1A 0C 60 04 8B 44 49 B3 B1 53 AA 31 36 |))...`..DI..S.16|
00000410: A7 44 24 B2 44 24 AA 22 2C 22 00 27 0C 6A 04 99 |.D$.D$.",".'.j..|
00000420: 44 24 3B 3A 82 44 49 00 3A 0C 74 04 4C 49 B2 4C |D$;:.DI.:.t.LI.L|
00000430: 49 AA 31 3A 53 B2 53 AA 31 37 00 4E 0C 7E 04 8B |I.1:S.S.17.N.~..|
00000440: 53 B1 46 20 B0 44 4E B2 39 A7 31 31 37 30 00 5A |S.F .DN.9.1170.Z|
00000450: 0C 88 04 99 3A 89 31 30 35 30 00 6A 0C 92 04 99 |....:.1050.j....|
00000460: 22 47 4F 54 4F 31 33 30 30 22 00 84 0C B0 04 81 |"GOTO1300"......|
00000470: 49 B2 31 A4 44 4E AA 31 3A 97 36 33 30 AA 49 2C |I.1.DN.1:.630.I,|
00000480: 31 33 3A 82 00 9A 0C BA 04 97 31 39 38 2C 44 4E |13:.......198,DN|
00000490: AA 31 3A 99 22 13 22 3B 3A 80 00 D4 0C 14 05 99 |.1:.".";:.......|
000004A0: 22 9E 11 11 11 11 11 11 11 11 20 3E 3E 3E 3E 3E |"......... >>>>>|
000004B0: 3E 20 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |> PRESS ANY KEY |
000004C0: 54 4F 20 43 4F 4E 54 49 4E 55 45 20 3E 3E 3E 3E |TO CONTINUE >>>>|
000004D0: 3E 3E 20 22 00 E8 0C 1E 05 A1 41 24 3A 8B 41 24 |>> "......A$:.A$|
000004E0: B2 22 22 A7 31 33 31 30 00 EE 0C 28 05 8A 00 00 |."".1310...(....|
000004F0: 00 |. |
..#.X.. FROM MAGAZINE 'YOUR 64' NO2.O.Y.
. LOAD THE PROGRAM YOU WISH TO EXAMINE..
{.Z.. IF BASIC PROGRAM - MUST BE RUN FIR
ST....[.. IF MACHINE CODE PROGRAM - MAY
NOT HAVE TO RUN IT..V.\.. LOAD THIS COPI
ER AND RUN IT....D..53280,0:.53281,0...N
..".............SPRITE COPIER".1.X.."...
.......BY M.PEACOCK 1984".E...Q.53248:."
.CCCMULTICCHIRESCCCCMULTICCHIRESCCCC"...
...Q,185:.Q.1,99:.Q.23,3:.Q.29,3:.Q.2,11
0:.Q.3,99......Q.39,15:.Q.37,2:.Q.38,7..
. ..Q.4,65:.Q.5,99:.Q.6,255:.Q.7,99:.Q.2
1,15:.Q.28,5......"............."......1
98,0.<.H.."SPRITE NUMBER (0-255) ";SP:.S
P.255.SP.0...U.R..Y.2040.2043:.Y,SP:..U.
..."COPY SPRITE TO DATA = F1"...".."TO Q
UIT PROGRAM =F3":."TO CONTINUE ANY
OTHER KEY".E.,..A$:.A$."".300.V.6..A$.".
".1000...@..A$."."..Q.21,0:....^........
".......SPRITE";SP;"TO DATA":.Q.21,0.V..
.."..FIRST LINE NUMBER FOR DATA":."..(20
00-63000).";LI.Q....LI.2000.LI.63000.100
0.....S.SP.64:F.SP.64.62......".."......
LI;"DATA";...$.DN.DN.1......DI.S.S.16.S.
8..DI.F..". ":.1170...B.D.B(DI)...L.D$.D
(D)...V.D$.I(D$,(C(D$).1))...`..DI..S.16
.D$.D$.",".'.J..D$;:.DI.:.T.LI.LI.1:S.S.
17.N.~..S.F .DN.9.1170.Z....:.1050.J....
"GOTO1300"......I.1.DN.1:.630.I,13:.....
..198,DN.1:.".";:..T...."......... >>>>>
> PRESS ANY KEY TO CONTINUE >>>>>> "....
..A$:.A$."".1310...(.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL