> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2C 08 01 00 8F 20 4E 4F 54 45 3B 44 45 4D |..,.... NOTE;DEM|
00000010: 4F 4E 53 54 52 41 54 49 4F 4E 20 52 4F 55 54 49 |ONSTRATION ROUTI|
00000020: 4E 45 20 27 4D 4F 53 41 49 43 27 3A 00 43 08 05 |NE 'MOSAIC':.C..|
00000030: 00 8F 20 4F 52 47 3B 31 35 35 30 30 2C 32 30 30 |.. ORG;15500,200|
00000040: 30 30 3A 00 4F 08 06 00 8F 20 57 49 50 45 3B 00 |00:.O.... WIPE;.|
00000050: 5F 08 0A 00 8F 20 4C 41 42 45 4C 3B 24 42 3A 00 |_.... LABEL;$B:.|
00000060: 6E 08 0C 00 8F 20 56 41 52 3B 41 2C 30 3A 00 7B |n.... VAR;A,0:.{|
00000070: 08 0D 00 8F 20 42 44 52 3B 44 3A 00 89 08 0E 00 |.... BDR;D:.....|
00000080: 8F 20 42 41 43 4B 2C 30 3A 00 99 08 0F 00 8F 20 |. BACK,0:...... |
00000090: 4C 41 42 45 4C 3B 25 41 3A 00 AC 08 14 00 8F 20 |LABEL;%A:...... |
000000A0: 52 41 4E 44 3B 42 2C 34 30 2C 30 3A 00 BF 08 19 |RAND;B,40,0:....|
000000B0: 00 8F 20 52 41 4E 44 3B 43 2C 32 34 2C 30 3A 00 |.. RAND;C,24,0:.|
000000C0: D2 08 1B 00 8F 20 52 41 4E 44 3B 44 2C 31 35 2C |..... RAND;D,15,|
000000D0: 31 3A 00 E7 08 1E 00 8F 20 50 55 54 3B 43 2C 42 |1:...... PUT;C,B|
000000E0: 2C 44 2C 22 D3 22 3A 00 F6 08 20 00 8F 20 49 4E |,D,".":... .. IN|
000000F0: 43 3B 41 2C 31 3A 00 0F 09 23 00 8F 20 54 45 53 |C;A,1:...#.. TES|
00000100: 54 3B 41 2C 32 35 35 2C 32 34 30 2C 25 41 3A 00 |T;A,255,240,%A:.|
00000110: 1C 09 28 00 8F 20 47 45 54 3B 4B 3A 00 34 09 2D |..(.. GET;K:.4.-|
00000120: 00 8F 20 54 45 53 54 3B 4B 2C 36 35 2C 32 34 30 |.. TEST;K,65,240|
00000130: 2C 24 42 3A 00 40 09 C8 00 8F 20 45 58 49 54 3B |,$B:.@.... EXIT;|
00000140: 00 00 00 |... |
..,.... NOTE;DEMONSTRATION ROUTINE 'MOSA
IC':.C.... ORG;15500,20000:.O.... WIPE;.
_.... LABEL;$B:.N.... VAR;A,0:.{.... BDR
;D:...... BACK,0:...... LABEL;%A:......
RAND;B,40,0:...... RAND;C,24,0:.R.... RA
ND;D,15,1:...... PUT;C,B,D,"S":... .. IN
C;A,1:...#.. TEST;A,255,240,%A:...(.. GE
T;K:.4.-.. TEST;K,65,240,$B:.@.H.. EXIT;
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL