_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

PLOT1

FILE INFORMATION

FILENAME(S): PLOT1

FILE TYPE(S): PRG

FILE SIZE: 408b

FIRST SEEN: 2025-11-30 21:12:52

APPEARS ON: 1 disk(s)

FILE HASH

e0484b867d7ecbb2be1a44e3f28957472e54d10afcb7fb9f6ba1786c165c8f0d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CBM 64 2 PLOT1 PRG DuncanTwain 13 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> 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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL