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

DEMO

FILE INFORMATION

FILENAME(S): DEMO

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-11-30 20:22:43

APPEARS ON: 2 disk(s)

FILE HASH

13341b4438f2011884c084188ee0acf905bf3e081a6ec9d293cbf7a115071c65

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
OKIMATE 30 DEMO PRG Curtcool, Misc 20 8 DOWNLOAD FILE
OKIMATE 30 DEMO PRG DuncanTwain 20 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 30 08 02 00 8B 58  B2 30 A7 99 C7 28 31 34  |..0....X.0...(14|
00000010: 37 29 3B C7 28 31 34 29  3A 99 22 CF CB C9 CD C1  |7);.(14):.".....|
00000020: D4 C5 A0 C3 CF CC CF D2  A0 C4 C5 CD CF 22 3A 99  |.............":.|
00000030: 00 51 08 03 00 8B 58 B2  30 A7 99 22 D0 4C 45 41  |.Q....X.0..".LEA|
00000040: 53 45 20 57 41 49 54 20  41 20 4D 4F 4D 45 4E 54  |SE WAIT A MOMENT|
00000050: 22 00 7E 08 04 00 8B 58  B2 30 A7 99 22 46 4F 52  |".~....X.0.."FOR|
00000060: 20 54 48 45 20 50 52 4F  47 52 41 4D 20 4D 4F 44  | THE PROGRAM MOD|
00000070: 55 4C 45 53 20 54 4F 20  4C 4F 41 44 2E 22 00 95  |ULES TO LOAD."..|
00000080: 08 06 00 8B 58 B2 30 A7  58 B2 31 3A 93 22 43 31  |....X.0.X.1:."C1|
00000090: 22 2C 38 2C 31 00 AC 08  08 00 8B 58 B2 31 A7 58  |",8,1......X.1.X|
000000A0: B2 32 3A 93 22 43 32 22  2C 38 2C 31 00 C3 08 0A  |.2:."C2",8,1....|
000000B0: 00 8B 58 B2 32 A7 58 B2  33 3A 93 22 43 33 22 2C  |..X.2.X.3:."C3",|
000000C0: 38 2C 31 00 DA 08 0C 00  8B 58 B2 33 A7 58 B2 34  |8,1......X.3.X.4|
000000D0: 3A 93 22 43 34 22 2C 38  2C 31 00 F1 08 0E 00 8B  |:."C4",8,1......|
000000E0: 58 B2 34 A7 58 B2 35 3A  93 22 43 35 22 2C 38 2C  |X.4.X.5:."C5",8,|
000000F0: 31 00 08 09 12 00 8B 58  B2 35 A7 58 B2 37 3A 93  |1......X.5.X.7:.|
00000100: 22 43 37 22 2C 38 2C 31  00 1F 09 14 00 8B 58 B2  |"C7",8,1......X.|
00000110: 37 A7 58 B2 38 3A 93 22  43 38 22 2C 38 2C 31 00  |7.X.8:."C8",8,1.|
00000120: 37 09 16 00 8B 58 B2 38  A7 58 B2 39 3A 93 22 43  |7....X.8.X.9:."C|
00000130: 31 31 22 2C 38 2C 31 00  4B 09 1A 00 97 35 32 2C  |11",8,1.K....52,|
00000140: 33 32 3A 97 35 36 2C 33  32 3A 9C 00 6A 09 1C 00  |32:.56,32:..j...|
00000150: 58 24 B2 22 41 22 3A 43  4C 24 B2 C7 28 31 34 37  |X$."A":CL$..(147|
00000160: 29 3A 56 48 B2 35 38 37  33 32 00 86 09 1E 00 43  |):VH.58732.....C|
00000170: 30 B2 31 32 AC 34 30 39  36 3A 43 38 B2 43 30 AA  |0.12.4096:C8.C0.|
00000180: 31 33 AC 32 35 36 00 C3  09 20 00 43 39 B2 31 32  |13.256... .C9.12|
00000190: AC 34 30 39 36 AA 39 AC  32 35 36 3A 43 41 B2 43  |.4096.9.256:CA.C|
000001A0: 30 AA 31 30 AC 32 35 36  AA 32 31 32 3A 43 43 B2  |0.10.256.212:CC.|
000001B0: 43 30 AA 31 32 AC 32 35  36 3A 42 46 B2 43 30 AB  |C0.12.256:BF.C0.|
000001C0: 31 32 38 00 E9 09 22 00  4E 55 24 B2 C7 28 30 29  |128...".NU$..(0)|
000001D0: 3A 51 54 24 B2 C7 28 33  34 29 3A 42 4C 24 B2 22  |:QT$..(34):BL$."|
000001E0: 20 20 20 20 20 20 20 20  22 00 06 0A 24 00 44 4E  |        "...$.DN|
000001F0: 24 B2 22 4F 4B 49 4D 41  54 45 20 31 30 A0 A0 A0  |$."OKIMATE 10...|
00000200: A0 A0 A0 D6 32 22 00 1C  0A 26 00 86 43 52 25 28  |....2"...&..CR%(|
00000210: 32 38 2C 32 29 2C 43 50  24 28 33 29 00 64 0A 28  |28,2),CP$(3).d.(|
00000220: 00 45 4D 24 B2 C7 28 31  35 29 AA C7 28 32 37 29  |.EM$..(15)..(27)|
00000230: AA C7 28 32 35 29 3A 52  54 24 B2 C7 28 31 33 29  |..(25):RT$..(13)|
00000240: 3A 4E 4C 24 B2 C7 28 31  30 29 3A 55 4E 24 B2 52  |:NL$..(10):UN$.R|
00000250: 54 24 AA 52 54 24 AA 52  54 24 3A 46 46 24 B2 C7  |T$.RT$.RT$:FF$..|
00000260: 28 31 32 29 00 7B 0A 2C  00 54 42 24 B2 C7 28 31  |(12).{.,.TB$..(1|
00000270: 36 29 3A 97 38 30 38 2C  32 32 35 00 88 0A 2E 00  |6):.808,225.....|
00000280: 97 43 30 AA 31 39 2C 31  00 9A 0A 30 00 9F 31 35  |.C0.19,1...0..15|
00000290: 2C 38 2C 31 35 3A 8D 32  35 30 00 AC 0A 32 00 A1  |,8,15:.250...2..|
000002A0: 58 24 3A 8B 58 24 B2 22  22 A7 35 30 00 B2 0A 34  |X$:.X$."".50...4|
000002B0: 00 8E 00 CF 0A 36 00 8B  58 24 B3 B1 22 59 22 AF  |.....6..X$.."Y".|
000002C0: 58 24 B3 B1 22 4E 22 A7  8D 35 30 3A 89 35 34 00  |X$.."N"..50:.54.|
000002D0: D5 0A 38 00 8E 00 DF 0A  3C 00 58 B2 35 30 30 00  |..8.....<.X.500.|
000002E0: EE 0A 40 00 81 49 B2 31  A4 58 3A A1 58 24 00 02  |..@..I.1.X:.X$..|
000002F0: 0B 44 00 8B 58 24 B3 B1  22 22 A7 49 B2 58 3A 82  |.D..X$.."".I.X:.|
00000300: 3A 8E 00 08 0B 46 00 82  00 1B 0B 48 00 9E 28 35  |:....F.....H..(5|
00000310: 33 32 31 36 29 3A 8D 35  30 3A 8E 00 30 0B 50 00  |3216):.50:..0.P.|
00000320: 42 32 B2 43 41 AA 35 AA  32 31 3A 42 33 B2 42 32  |B2.CA.5.21:B3.B2|
00000330: 00 3C 0B 54 00 46 B2 C3  28 46 24 29 00 5C 0B 56  |.<.T.F..(F$).\.V|
00000340: 00 81 49 B2 31 A4 46 3A  97 42 32 AA 49 2C C6 28  |..I.1.F:.B2.I,.(|
00000350: CA 28 46 24 2C 49 2C 31  29 29 3A 82 00 66 0B 58  |.(F$,I,1)):..f.X|
00000360: 00 97 42 46 2C 46 00 90  0B 5A 00 58 B2 42 32 AA  |..BF,F...Z.X.B2.|
00000370: 31 3A 59 B2 B5 28 58 AD  32 35 36 29 3A 58 B2 58  |1:Y..(X.256):X.X|
00000380: AB 59 AC 32 35 36 3A 97  42 46 AA 31 2C 54 59 25  |.Y.256:.BF.1,TY%|
00000390: 00 A4 0B 5C 00 97 42 46  AA 32 2C 58 3A 97 42 46  |...\..BF.2,X:.BF|
000003A0: AA 33 2C 59 00 AD 0B 5E  00 89 32 39 34 00 C9 0B  |.3,Y...^..294...|
000003B0: AE 00 97 35 33 32 37 32  2C 28 C2 28 35 33 32 37  |...53272,(.(5327|
000003C0: 32 29 AF 32 34 30 29 B0  34 00 E1 0B B0 00 97 35  |2).240).4......5|
000003D0: 33 32 36 35 2C C2 28 35  33 32 36 35 29 AF 32 32  |3265,.(53265).22|
000003E0: 33 00 E7 0B B2 00 8E 00  10 0C B4 00 46 24 B2 22  |3...........F$."|
000003F0: 44 44 53 41 4D 50 4C 45  20 44 4F 4F 44 4C 45 22  |DDSAMPLE DOODLE"|
00000400: 3A 53 4D 25 B2 30 3A 47  24 B2 22 2C 50 2C 52 22  |:SM%.0:G$.",P,R"|
00000410: 00 19 0C B6 00 89 20 38  30 00 41 0C BE 00 46 24  |...... 80.A...F$|
00000420: B2 22 44 44 43 45 4C 54  49 43 20 45 41 47 4C 45  |."DDCELTIC EAGLE|
00000430: 22 3A 53 4D 25 B2 30 3A  47 24 B2 22 2C 50 2C 52  |":SM%.0:G$.",P,R|
00000440: 22 00 4A 0C C0 00 89 20  38 30 00 6C 0C C8 00 8D  |".J.... 80.l....|
00000450: 31 37 34 3A 99 43 4C 24  3A 99 22 4E 4F 54 20 49  |174:.CL$:."NOT I|
00000460: 4D 50 4C 45 4D 45 4E 54  45 44 2E 22 00 8D 0C CA  |MPLEMENTED."....|
00000470: 00 99 22 50 52 45 53 53  20 52 45 54 55 52 4E 20  |.."PRESS RETURN |
00000480: 54 4F 20 43 4F 4E 54 49  4E 55 45 2E 22 00 97 0C  |TO CONTINUE."...|
00000490: CC 00 8D 35 30 3A 8E 00  B4 0C F6 00 97 43 38 AA  |...50:.......C8.|
000004A0: 38 2C 53 51 25 3A 9E 28  43 38 AA 31 36 29 3A 8D  |8,SQ%:.(C8.16):.|
000004B0: 35 30 3A 8E 00 CD 0C F8  00 97 43 38 AA 38 2C 53  |50:.......C8.8,S|
000004C0: 51 25 3A 9E 28 43 38 AA  31 36 29 3A 8E 00 DD 0C  |Q%:.(C8.16):....|
000004D0: FA 00 8F 20 4D 41 49 4E  20 4C 4F 4F 50 00 E6 0C  |... MAIN LOOP...|
000004E0: FC 00 99 43 4C 24 00 FC  0C 02 01 A0 31 35 3A 9F  |...CL$......15:.|
000004F0: 31 35 2C 38 2C 31 35 2C  22 49 30 22 00 10 0D 04  |15,8,15,"I0"....|
00000500: 01 8D 33 32 30 3A 8B 54  59 25 B2 35 A7 32 37 32  |..320:.TY%.5.272|
00000510: 00 27 0D 06 01 8B 54 59  25 B3 34 A7 53 51 25 B2  |.'....TY%.4.SQ%.|
00000520: 31 33 3A 8D 32 34 36 00  47 0D 08 01 8B 54 59 25  |13:.246.G....TY%|
00000530: B2 34 A7 53 51 25 B2 31  36 3A 8D 32 34 36 3A 97  |.4.SQ%.16:.246:.|
00000540: 35 33 32 38 30 2C 30 00  4F 0D 0A 01 46 B2 31 00  |53280,0.O...F.1.|
00000550: 68 0D 0C 01 91 54 59 25  8D 31 38 30 2C 31 39 30  |h....TY%.180,190|
00000560: 2C 37 30 30 2C 35 30 30  00 71 0D 0E 01 89 32 35  |,700,500.q....25|
00000570: 38 00 92 0D 10 01 99 43  4C 24 3A 8D 31 37 34 3A  |8......CL$:.174:|
00000580: 97 38 30 38 2C 32 33 37  3A 99 22 42 59 45 21 22  |.808,237:."BYE!"|
00000590: 3A 80 00 A5 0D 12 01 8F  20 47 45 54 20 46 49 4C  |:....... GET FIL|
000005A0: 45 4E 41 4D 45 00 AD 0D  14 01 41 B2 30 00 BA 0D  |ENAME.....A.0...|
000005B0: 16 01 98 31 35 2C 22 49  30 22 00 CB 0D 18 01 9F  |...15,"I0"......|
000005C0: 32 2C 38 2C 32 2C 46 24  AA 47 24 00 E2 0D 1A 01  |2,8,2,F$.G$.....|
000005D0: 84 31 35 2C 45 2C 45 24  3A A0 32 3A 8B 45 B2 30  |.15,E,E$:.2:.E.0|
000005E0: A7 8E 00 F1 0D 1C 01 8B  41 B2 31 A7 46 B2 30 3A  |........A.1.F.0:|
000005F0: 8E 00 1B 0E 1E 01 41 B2  41 AA 31 3A 53 51 25 B2  |......A.A.1:SQ%.|
00000600: 33 3A 8D 32 34 38 3A 8D  35 30 3A 8B 58 24 B2 C7  |3:.248:.50:.X$..|
00000610: 28 31 33 33 29 A7 46 B2  30 3A 8E 00 24 0E 20 01  |(133).F.0:..$. .|
00000620: 89 32 37 38 00 34 0E 26  01 8D 32 37 36 3A 8B 46  |.278.4.&..276:.F|
00000630: B2 30 A7 8E 00 43 0E 2A  01 53 51 25 B2 35 3A 8D  |.0...C.*.SQ%.5:.|
00000640: 32 34 38 00 58 0E 2D 01  8B 53 4D 25 B2 30 A7 97  |248.X.-..SM%.0..|
00000650: 34 39 30 32 39 2C 39 36  00 6A 0E 2E 01 9E 43 39  |49029,96.j....C9|
00000660: 3A 97 34 39 30 32 39 2C  36 34 00 7C 0E 2F 01 8B  |:.49029,64.|./..|
00000670: 53 4D 25 B2 30 A7 9E 35  31 33 31 39 00 8C 0E 30  |SM%.0..51319...0|
00000680: 01 8D 33 35 34 3A 8B 46  B2 30 A7 8E 00 97 0E 32  |..354:.F.0.....2|
00000690: 01 9E 35 31 35 30 36 00  A2 0E 36 01 9E 34 39 31  |..51506...6..491|
000006A0: 35 32 00 BE 0E 38 01 A0  31 35 3A 9F 31 35 2C 38  |52...8..15:.15,8|
000006B0: 2C 31 35 2C 22 49 30 3A  22 3A 8D 33 37 32 00 EA  |,15,"I0:":.372..|
000006C0: 0E 3A 01 97 35 33 32 36  35 2C C2 28 35 33 32 36  |.:..53265,.(5326|
000006D0: 35 29 AF 32 32 33 3A 97  35 33 32 37 30 2C C2 28  |5).223:.53270,.(|
000006E0: 35 33 32 37 30 29 AF 32  33 39 00 FF 0E 3C 01 A1  |53270).239...<..|
000006F0: 58 24 3A 8B 58 24 B3 B1  22 22 A7 89 33 31 36 00  |X$:.X$..""..316.|
00000700: 05 0F 3E 01 8E 00 17 0F  40 01 8F 20 43 48 4F 4F  |..>.....@.. CHOO|
00000710: 53 45 20 54 59 50 45 00  2B 0F 42 01 53 51 25 B2  |SE TYPE.+.B.SQ%.|
00000720: 31 35 3A 8D 32 34 38 3A  8D 35 30 00 3A 0F 46 01  |15:.248:.50.:.F.|
00000730: 58 B2 C6 28 58 24 29 AB  34 38 00 53 0F 50 01 8B  |X..(X$).48.S.P..|
00000740: 58 B3 31 20 B0 20 58 B1  35 20 A7 8D 35 30 3A 89  |X.1 . X.5 ..50:.|
00000750: 33 32 36 00 5F 0F 52 01  54 59 25 B2 58 3A 8E 00  |326._.R.TY%.X:..|
00000760: 80 0F 62 01 A0 34 3A 9F  34 2C 34 3A 98 34 2C C7  |..b..4:.4,4:.4,.|
00000770: 28 31 33 29 3B 3A 53 54  25 B2 53 54 41 54 55 53  |(13);:ST%.STATUS|
00000780: 00 99 0F 66 01 8B 53 54  25 A7 53 51 25 B2 34 3A  |...f..ST%.SQ%.4:|
00000790: 8D 32 34 36 3A 89 33 36  32 00 AF 0F 68 01 98 34  |.246:.362...h..4|
000007A0: 2C C7 28 32 37 29 3B 22  42 22 3A A0 34 3A 8E 00  |,.(27);"B":.4:..|
000007B0: C3 0F 6A 01 8B 58 24 B3  B1 C7 28 31 33 33 29 A7  |..j..X$...(133).|
000007C0: 33 35 34 00 CD 0F 6C 01  46 B2 30 3A 8E 00 D8 0F  |354...l.F.0:....|
000007D0: 74 01 9F 34 2C 34 2C 37  00 0D 10 78 01 8B 54 59  |t..4,4,7...x..TY|
000007E0: 25 B2 31 A7 4E 24 B2 22  32 35 CD 49 44 44 4C 45  |%.1.N$."25.IDDLE|
000007F0: 20 C5 41 52 54 48 20 42  59 20 D7 41 59 4E 45 20  | .ARTH BY .AYNE |
00000800: D3 43 48 4D 49 44 54 22  3A 89 33 38 36 00 3D 10  |.CHMIDT":.386.=.|
00000810: 7A 01 8B 54 59 25 B2 32  A7 4E 24 B2 22 32 35 C3  |z..TY%.2.N$."25.|
00000820: 45 4C 54 49 43 20 C5 41  47 4C 45 20 42 59 20 D7  |ELTIC .AGLE BY .|
00000830: 41 59 4E 45 20 D3 43 48  4D 49 44 54 22 00 67 10  |AYNE .CHMIDT".g.|
00000840: 82 01 4E 24 B2 54 42 24  AA 4E 24 3A 98 34 2C 55  |..N$.TB$.N$:.4,U|
00000850: 4E 24 3B 45 4D 24 3B 4E  24 3B 52 54 24 3B 4E 24  |N$;EM$;N$;RT$;N$|
00000860: 3B 52 54 24 3B 4E 24 00  87 10 86 01 4E 24 B2 22  |;RT$;N$.....N$."|
00000870: 33 30 C3 52 45 41 54 45  44 20 57 49 54 48 20 C4  |30.REATED WITH .|
00000880: CF CF C4 CC C5 21 22 00  B5 10 92 01 4E 24 B2 54  |.....!".....N$.T|
00000890: 42 24 AA 4E 24 3A 98 34  2C 52 54 24 3B 52 54 24  |B$.N$:.4,RT$;RT$|
000008A0: 3B 45 4D 24 3B 4E 24 3B  52 54 24 3B 4E 24 3B 52  |;EM$;N$;RT$;N$;R|
000008B0: 54 24 3B 4E 24 00 C5 10  94 01 98 34 2C 46 46 24  |T$;N$......4,FF$|
000008C0: 3A A0 34 3A 8E 00 ED 10  F4 01 46 24 B2 22 46 4F  |:.4:......F$."FO|
000008D0: 4E 54 44 45 4D 4F 22 3A  47 24 B2 22 2C 53 2C 52  |NTDEMO":G$.",S,R|
000008E0: 22 3A 8D 32 37 36 3A 8B  46 B2 30 A7 8E 00 FD 10  |":.276:.F.0.....|
000008F0: F8 01 8D 33 35 34 3A 8B  46 B2 30 A7 8E 00 0C 11  |...354:.F.0.....|
00000900: F9 01 53 51 25 B2 30 3A  8D 32 34 38 00 17 11 FA  |..SQ%.0:.248....|
00000910: 01 9E 35 32 33 30 30 00  2C 11 FC 01 A1 58 24 3A  |..52300.,....X$:|
00000920: 8B 58 24 B3 B1 22 22 89  20 35 30 38 00 32 11 FE  |.X$.."". 508.2..|
00000930: 01 8E 00 5D 11 BC 02 46  24 B2 22 43 52 41 42 50  |...]...F$."CRABP|
00000940: 49 43 2E 50 52 54 22 3A  47 24 B2 22 2C 53 2C 52  |IC.PRT":G$.",S,R|
00000950: 22 3A 8D 32 37 36 3A 8B  46 B2 30 A7 8E 00 71 11  |":.276:.F.0...q.|
00000960: BD 02 46 B2 31 3A 8D 33  35 34 3A 8B 46 B2 30 A7  |..F.1:.354:.F.0.|
00000970: 8E 00 80 11 BE 02 53 51  25 B2 30 3A 8D 32 34 38  |......SQ%.0:.248|
00000980: 00 8B 11 C0 02 9E 35 31  39 36 38 00 A0 11 C4 02  |......51968.....|
00000990: A1 58 24 3A 8B 58 24 B3  B1 22 22 89 20 37 30 38  |.X$:.X$.."". 708|
000009A0: 00 AE 11 C6 02 9F 34 2C  34 3A 89 34 30 34 00 00  |......4,4:.404..|
000009B0: 00                                                |.               |
..0....X.0..G(147);G(14):."OKIMATE COLOR
 DEMO":..Q....X.0.."PLEASE WAIT A MOMENT
".~....X.0.."FOR THE PROGRAM MODULES TO 
LOAD."......X.0.X.1:."C1",8,1......X.1.X
.2:."C2",8,1.C....X.2.X.3:."C3",8,1.Z...
.X.3.X.4:."C4",8,1......X.4.X.5:."C5",8,
1......X.5.X.7:."C7",8,1......X.7.X.8:."
C8",8,1.7....X.8.X.9:."C11",8,1.K....52,
32:.56,32:..J...X$."A":CL$.G(147):VH.587
32.....C0.12.4096:C8.C0.13.256.C. .C9.12
.4096.9.256:CA.C0.10.256.212:CC.C0.12.25
6:BF.C0.128...".NU$.G(0):QT$.G(34):BL$."
        "...$.DN$."OKIMATE 10      V2"..
.&..CR%(28,2),CP$(3).D.(.EM$.G(15).G(27)
.G(25):RT$.G(13):NL$.G(10):UN$.RT$.RT$.R
T$:FF$.G(12).{.,.TB$.G(16):.808,225.....
.C0.19,1...0..15,8,15:.250...2..X$:.X$."
".50...4...O.6..X$.."Y".X$.."N"..50:.54.
U.8.....<.X.500...@..I.1.X:.X$...D..X$..
"".I.X:.:....F.....H..(53216):.50:..0.P.
B2.CA.5.21:B3.B2.<.T.F.C(F$).\.V..I.1.F:
.B2.I,F(J(F$,I,1)):..F.X..BF,F...Z.X.B2.
1:Y..(X.256):X.X.Y.256:.BF.1,TY%...\..BF
.2,X:.BF.3,Y...^..294.I....53272,(B(5327
2).240).4......53265,B(53265).223.......
....F$."DDSAMPLE DOODLE":SM%.0:G$.",P,R"
...... 80.A...F$."DDCELTIC EAGLE":SM%.0:
G$.",P,R".J.... 80.L.H..174:.CL$:."NOT I
MPLEMENTED."...J.."PRESS RETURN TO CONTI
NUE."...L..50:.......C8.8,SQ%:.(C8.16):.
50:..M....C8.8,SQ%:.(C8.16):....... MAIN
 LOOP......CL$..... 15:.15,8,15,"I0"....
..320:.TY%.5.272.'....TY%.4.SQ%.13:.246.
G....TY%.4.SQ%.16:.246:.53280,0.O...F.1.
H....TY%.180,190,700,500.Q....258......C
L$:.174:.808,237:."BYE!":....... GET FIL
ENAME.....A.0......15,"I0".K....2,8,2,F$
.G$......15,E,E$: 2:.E.0........A.1.F.0:
......A.A.1:SQ%.3:.248:.50:.X$.G(133).F.
0:..$. ..278.4.&..276:.F.0...C.*.SQ%.5:.
248.X.-..SM%.0..49029,96.J....C9:.49029,
64.|./..SM%.0..51319...0..354:.F.0.....2
..51506...6..49152...8. 15:.15,8,15,"I0:
":.372...:..53265,B(53265).223:.53270,B(
53270).239...<..X$:.X$..""..316...>.....
@.. CHOOSE TYPE.+.B.SQ%.15:.248:.50.:.F.
X.F(X$).48.S.P..X.1 . X.5 ..50:.326._.R.
TY%.X:....B. 4:.4,4:.4,G(13);:ST%.STATUS
...F..ST%.SQ%.4:.246:.362...H..4,G(27);"
B": 4:..C.J..X$..G(133).354.M.L.F.0:..X.
T..4,4,7...X..TY%.1.N$."25MIDDLE EARTH B
Y WAYNE SCHMIDT":.386.=.Z..TY%.2.N$."25C
ELTIC EAGLE BY WAYNE SCHMIDT".G...N$.TB$
.N$:.4,UN$;EM$;N$;RT$;N$;RT$;N$.....N$."
30CREATED WITH DOODLE!".....N$.TB$.N$:.4
,RT$;RT$;EM$;N$;RT$;N$;RT$;N$.E....4,FF$
: 4:......F$."FONTDEMO":G$.",S,R":.276:.
F.0........354:.F.0.......SQ%.0:.248....
..52300.,....X$:.X$.."". 508.2.....]...F
$."CRABPIC.PRT":G$.",S,R":.276:.F.0...Q.
..F.1:.354:.F.0.......SQ%.0:.248......51
968. .D..X$:.X$.."". 708...F..4,4:.404..
.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL