> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 0A 00 8F 20 2A 2A 2A 20 4C 49 47 48 |..#.... *** LIGH|
00000010: 54 20 50 45 4E 20 50 52 4F 47 52 41 4D 4D 41 20 |T PEN PROGRAMMA |
00000020: 2A 2A 2A 00 2E 08 14 00 64 01 20 30 2C 31 00 60 |***.....d. 0,1.`|
00000030: 08 1E 00 64 6F 31 30 2C 31 30 2C 22 41 46 54 45 |...do10,10,"AFTE|
00000040: 52 20 59 4F 55 20 48 41 56 45 20 54 59 50 45 44 |R YOU HAVE TYPED|
00000050: 20 49 4E 20 27 52 55 4E 27 22 2C 31 2C 31 2C 38 | IN 'RUN'",1,1,8|
00000060: 00 92 08 28 00 64 6F 31 30 2C 32 35 2C 22 59 4F |...(.do10,25,"YO|
00000070: 55 20 48 41 56 45 20 31 35 20 53 45 43 4F 4E 44 |U HAVE 15 SECOND|
00000080: 53 20 54 4F 20 49 4E 53 45 52 54 22 2C 31 2C 31 |S TO INSERT",1,1|
00000090: 2C 38 00 C7 08 32 00 64 6F 31 30 2C 34 30 2C 22 |,8...2.do10,40,"|
000000A0: 54 48 45 20 4C 49 47 48 54 50 45 4E 20 49 4E 20 |THE LIGHTPEN IN |
000000B0: 27 43 4F 4E 54 52 4F 4C 20 50 4F 52 54 20 31 27 |'CONTROL PORT 1'|
000000C0: 22 2C 31 2C 31 2C 38 00 F9 08 3C 00 64 6F 31 30 |",1,1,8...<.do10|
000000D0: 2C 35 35 2C 22 57 48 45 4E 20 59 4F 55 52 20 44 |,55,"WHEN YOUR D|
000000E0: 52 41 57 49 4E 47 20 49 53 20 43 4F 4D 50 4C 45 |RAWING IS COMPLE|
000000F0: 54 45 22 2C 31 2C 31 2C 38 00 2B 09 46 00 64 6F |TE",1,1,8.+.F.do|
00000100: 31 30 2C 37 30 2C 22 52 45 4D 4F 56 45 20 4C 49 |10,70,"REMOVE LI|
00000110: 47 48 54 50 45 4E 20 46 52 4F 4D 20 55 53 45 52 |GHTPEN FROM USER|
00000120: 50 4F 52 54 22 2C 31 2C 31 2C 38 00 61 09 50 00 |PORT",1,1,8.a.P.|
00000130: 64 6F 31 30 2C 38 35 2C 22 41 4E 44 20 50 52 45 |do10,85,"AND PRE|
00000140: 53 53 20 53 50 41 43 45 20 42 41 52 20 46 4F 52 |SS SPACE BAR FOR|
00000150: 20 50 52 49 4E 54 20 4F 55 54 22 2C 31 2C 31 2C | PRINT OUT",1,1,|
00000160: 38 00 6B 09 5A 00 64 66 20 31 35 00 76 09 64 00 |8.k.Z.df 15.v.d.|
00000170: 64 01 20 30 2C 31 00 9E 09 6E 00 64 03 31 30 2C |d. 0,1...n.d.10,|
00000180: 31 30 2C 33 30 30 2C 31 30 2C 31 3A 64 03 33 30 |10,300,10,1:d.30|
00000190: 30 2C 31 30 2C 33 30 30 2C 31 38 30 2C 31 00 C6 |0,10,300,180,1..|
000001A0: 09 78 00 64 03 33 30 30 2C 31 38 30 2C 31 30 2C |.x.d.300,180,10,|
000001B0: 31 38 30 2C 31 3A 64 03 31 30 2C 31 38 30 2C 31 |180,1:d.10,180,1|
000001C0: 30 2C 31 30 2C 31 00 D9 09 82 00 A1 41 24 3A 8B |0,10,1......A$:.|
000001D0: 41 24 B2 22 22 A7 31 33 30 00 EA 09 8C 00 8B 20 |A$."".130...... |
000001E0: 41 24 B2 22 A0 22 A7 31 36 30 00 10 0A 96 00 64 |A$.".".160.....d|
000001F0: 02 20 28 64 5D AA 35 31 29 AF 32 35 35 2C 28 64 |. (d].51).255,(d|
00000200: 5F AB 35 30 29 AF 32 35 35 2C 31 3A 89 31 35 30 |_.50).255,1:.150|
00000210: 00 19 0A A0 00 64 77 3A 80 00 00 00 |.....dw:.... |
..#.... *** LIGHT PEN PROGRAMMA ***.....
D. 0,1.`...DO10,10,"AFTER YOU HAVE TYPED
IN 'RUN'",1,1,8...(.DO10,25,"YOU HAVE 1
5 SECONDS TO INSERT",1,1,8.G.2.DO10,40,"
THE LIGHTPEN IN 'CONTROL PORT 1'",1,1,8.
..<.DO10,55,"WHEN YOUR DRAWING IS COMPLE
TE",1,1,8.+.F.DO10,70,"REMOVE LIGHTPEN F
ROM USERPORT",1,1,8.A.P.DO10,85,"AND PRE
SS SPACE BAR FOR PRINT OUT",1,1,8.K.Z.DF
15.V.D.D. 0,1...N.D.10,10,300,10,1:D.30
0,10,300,180,1.F.X.D.300,180,10,180,1:D.
10,180,10,10,1.Y....A$:.A$."".130......
A$." ".160.....D. (D].51).255,(D_.50).25
5,1:.150... .DW:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL