> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 8F 20 46 4F 52 49 3D 31 30 32 |..$.... FORI=102|
00000010: 34 54 4F 32 30 32 34 3A 50 4F 4B 45 49 2C 31 3A |4TO2024:POKEI,1:|
00000020: 4E 45 58 54 00 38 08 14 00 85 22 58 20 2C 59 20 |NEXT.8...."X ,Y |
00000030: 20 20 3A 22 3B 58 2C 59 00 41 08 1E 00 8D 39 30 | :";X,Y.A....90|
00000040: 30 00 47 08 78 03 80 00 6E 08 84 03 8F 20 2A 2A |0.G.x...n.... **|
00000050: 20 53 55 42 52 4F 55 54 49 4E 45 20 54 4F 20 50 | SUBROUTINE TO P|
00000060: 4C 4F 54 20 48 49 52 45 53 20 20 2A 2A 2A 00 9C |LOT HIRES ***..|
00000070: 08 85 03 52 4F 57 B2 B5 28 59 AD 38 29 3A 52 52 |...ROW..(Y.8):RR|
00000080: B2 59 AB 52 4F 57 AC 38 3A 99 22 52 59 22 3B 52 |.Y.ROW.8:."RY";R|
00000090: 4F 57 3B 22 52 45 53 54 22 3B 52 52 00 B6 08 8E |OW;"REST";RR....|
000000A0: 03 43 4F 4C B2 B5 28 58 AD 38 29 3A 58 52 B2 58 |.COL..(X.8):XR.X|
000000B0: AB 43 4F 4C AC 38 00 BC 08 DC 03 3A 00 D9 08 E8 |.COL.8.....:....|
000000C0: 03 57 50 B2 28 28 43 4F 4C AA 52 4F 57 AC 34 30 |.WP.((COL.ROW.40|
000000D0: 29 AC 38 29 AA 38 31 39 32 00 E6 08 E9 03 57 59 |).8).8192.....WY|
000000E0: B2 57 50 AA 52 52 00 EC 08 EA 03 3A 00 FD 08 1A |.WP.RR.....:....|
000000F0: 04 8B 58 52 B2 31 A7 58 4B B2 31 32 38 00 0D 09 |..XR.1.XK.128...|
00000100: 1B 04 8B 58 52 B2 32 A7 58 4B B2 36 34 00 1D 09 |...XR.2.XK.64...|
00000110: 1C 04 8B 58 52 B2 33 A7 58 4B B2 33 32 00 2D 09 |...XR.3.XK.32.-.|
00000120: 1D 04 8B 58 52 B2 34 A7 58 4B B2 31 36 00 3C 09 |...XR.4.XK.16.<.|
00000130: 1E 04 8B 58 52 B2 35 A7 58 4B B2 38 00 4B 09 1F |...XR.5.XK.8.K..|
00000140: 04 8B 58 52 B2 36 A7 58 4B B2 34 00 5A 09 20 04 |..XR.6.XK.4.Z. .|
00000150: 8B 58 52 B2 37 A7 58 4B B2 32 00 69 09 21 04 8B |.XR.7.XK.2.i.!..|
00000160: 58 52 B2 38 A7 58 4B B2 31 00 6F 09 23 04 3A 00 |XR.8.XK.1.o.#.:.|
00000170: 8F 09 24 04 97 57 59 2C C2 28 57 59 29 B0 58 4B |..$..WY,.(WY).XK|
00000180: 3A 99 22 57 59 2C 58 4B 22 3B 57 59 2C 58 4B 00 |:."WY,XK";WY,XK.|
00000190: 95 09 B0 04 8E 00 00 00 |........ |
..$.... FORI=1024TO2024:POKEI,1:NEXT.8..
.."X ,Y :";X,Y.A....900.G.X...N.... **
SUBROUTINE TO PLOT HIRES ***.....ROW..
(Y.8):RR.Y.ROW.8:."RY";ROW;"REST";RR....
.COL..(X.8):XR.X.COL.8.....:.Y...WP.((CO
L.ROW.40).8).8192.....WY.WP.RR.....:....
..XR.1.XK.128......XR.2.XK.64......XR.3.
XK.32.-....XR.4.XK.16.<....XR.5.XK.8.K..
..XR.6.XK.4.Z. ..XR.7.XK.2.I.!..XR.8.XK.
1.O.#.:...$..WY,B(WY).XK:."WY,XK";WY,XK.
........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL