> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 0A 00 8F 20 53 49 4D 50 4C 45 20 4C |....... SIMPLE L|
00000010: 49 47 48 54 2D 50 45 4E 20 44 45 4D 4F 20 46 4F |IGHT-PEN DEMO FO|
00000020: 52 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 00 4B |R COMMODORE 64.K|
00000030: 08 14 00 8F 20 46 49 4C 4C 20 53 43 52 45 45 4E |.... FILL SCREEN|
00000040: 20 57 49 54 48 20 57 48 49 54 45 00 76 08 1E 00 | WITH WHITE.v...|
00000050: 53 43 B2 31 30 32 34 3A 43 4F B2 35 35 32 39 36 |SC.1024:CO.55296|
00000060: 3A 8F 20 53 43 52 45 45 4E 20 53 54 41 52 54 2C |:. SCREEN START,|
00000070: 43 4F 4C 4F 55 52 00 8D 08 28 00 81 49 B2 30 A4 |COLOUR...(..I.0.|
00000080: 39 39 39 3A 97 49 AA 53 43 2C 31 36 30 00 AA 08 |999:.I.SC,160...|
00000090: 32 00 97 49 AA 43 4F 2C 31 3A 82 3A 8F 20 43 4F |2..I.CO,1:.:. CO|
000000A0: 4C 4F 55 52 20 57 48 49 54 45 00 BD 08 3C 00 41 |LOUR WHITE...<.A|
000000B0: 4F B2 30 3A 8F 20 4F 4C 44 20 48 49 54 00 F0 08 |O.0:. OLD HIT...|
000000C0: 46 00 50 58 B2 35 33 32 36 37 3A 50 59 B2 35 33 |F.PX.53267:PY.53|
000000D0: 32 36 38 3A 8F 20 41 44 44 52 45 53 53 45 53 20 |268:. ADDRESSES |
000000E0: 4F 46 20 48 49 54 20 52 45 47 49 53 54 45 52 53 |OF HIT REGISTERS|
000000F0: 00 1B 09 64 00 58 B2 C2 28 50 58 29 AB 34 36 3A |...d.X..(PX).46:|
00000100: 59 B2 C2 28 50 59 29 AB 34 36 3A 8F 20 52 45 41 |Y..(PY).46:. REA|
00000110: 44 20 52 45 47 49 53 54 45 52 53 00 45 09 6E 00 |D REGISTERS.E.n.|
00000120: 41 B2 B5 28 58 AD 34 29 AA 34 30 AC B5 28 59 AD |A..(X.4).40..(Y.|
00000130: 38 29 3A 8F 20 57 48 49 43 48 20 43 48 41 52 41 |8):. WHICH CHARA|
00000140: 43 54 45 52 3F 00 6D 09 78 00 8B 41 B3 30 B0 41 |CTER?.m.x..A.0.A|
00000150: B1 39 39 39 A7 31 30 30 3A 8F 20 4D 49 53 53 45 |.999.100:. MISSE|
00000160: 44 20 54 48 45 20 53 43 52 45 45 4E 21 00 98 09 |D THE SCREEN!...|
00000170: 8C 00 97 43 4F AA 41 4F 2C 31 3A 8F 20 52 55 42 |...CO.AO,1:. RUB|
00000180: 20 4F 55 54 20 4F 4C 44 20 42 4C 4F 42 2D 4D 41 | OUT OLD BLOB-MA|
00000190: 4B 45 20 57 48 49 54 45 00 B9 09 96 00 97 43 4F |KE WHITE......CO|
000001A0: AA 41 2C 32 3A 8F 20 50 4C 41 4E 54 20 4E 45 57 |.A,2:. PLANT NEW|
000001B0: 20 52 45 44 20 42 4C 4F 42 00 D9 09 A0 00 41 4F | RED BLOB.....AO|
000001C0: B2 41 3A 8F 20 52 45 4D 45 4D 42 45 52 20 57 48 |.A:. REMEMBER WH|
000001D0: 45 52 45 20 49 54 20 49 53 00 F4 09 AA 00 89 31 |ERE IT IS......1|
000001E0: 30 30 3A 8F 20 41 4E 44 20 44 4F 20 49 54 20 41 |00:. AND DO IT A|
000001F0: 47 41 49 4E 00 00 00 |GAIN... |
....... SIMPLE LIGHT-PEN DEMO FOR COMMOD
ORE 64.K.... FILL SCREEN WITH WHITE.V...
SC.1024:CO.55296:. SCREEN START,COLOUR..
.(..I.0.999:.I.SC,160...2..I.CO,1:.:. CO
LOUR WHITE...<.AO.0:. OLD HIT...F.PX.532
67:PY.53268:. ADDRESSES OF HIT REGISTERS
...D.X.B(PX).46:Y.B(PY).46:. READ REGIST
ERS.E.N.A..(X.4).40..(Y.8):. WHICH CHARA
CTER?.M.X..A.0.A.999.100:. MISSED THE SC
REEN!......CO.AO,1:. RUB OUT OLD BLOB-MA
KE WHITE......CO.A,2:. PLANT NEW RED BLO
B.Y. .AO.A:. REMEMBER WHERE IT IS......1
00:. AND DO IT AGAIN...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL