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

MENU

FILE INFORMATION

FILENAME(S): MENU

FILE TYPE(S): PRG

FILE SIZE: 3.3K

FIRST SEEN: 2025-10-20 14:29:55

APPEARS ON: 1 disk(s)

FILE HASH

c1104361c8d6f4c6d84417ea68f0fcf5817a052c1ba69977487e960939176b6c

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
G01 MENU PRG Treasure Chest - Klaus Der Suhler 17 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 12 08 05 00 9C 3A  86 41 24 28 35 30 30 2C  |.......:.A$(500,|
00000010: 33 29 00 2D 08 0A 00 9F  31 35 2C 38 2C 31 35 3A  |3).-....15,8,15:|
00000020: 84 31 35 2C 45 3A 8B 45  B1 30 A7 32 30 00 37 08  |.15,E:.E.0.20.7.|
00000030: 0F 00 89 31 30 30 30 00  5B 08 14 00 8D 35 30 3A  |...1000.[....50:|
00000040: 99 A3 31 32 29 22 9F 11  11 46 49 4C 45 20 4E 4F  |..12)"...FILE NO|
00000050: 54 20 4F 4E 20 44 49 53  4B 21 22 00 7F 08 19 00  |T ON DISK!".....|
00000060: 99 A3 39 29 22 9E 11 50  52 45 53 53 20 4D 20 54  |..9)"..PRESS M T|
00000070: 4F 20 52 45 4C 4F 41 44  20 4D 45 4E 55 2C 22 00  |O RELOAD MENU,".|
00000080: A4 08 1E 00 99 A3 38 29  22 11 50 52 45 53 53 20  |......8)".PRESS |
00000090: 45 20 54 4F 20 45 58 49  54 20 54 4F 20 42 41 53  |E TO EXIT TO BAS|
000000A0: 49 43 2E 22 00 B9 08 23  00 8D 39 35 3A 8B 57 24  |IC."...#..95:.W$|
000000B0: B2 22 4D 22 A7 31 30 30  30 00 CA 08 28 00 8B 57  |."M".1000...(..W|
000000C0: 24 B2 22 45 22 A7 8D 31  30 30 00 D2 08 2D 00 89  |$."E"..100...-..|
000000D0: 32 30 00 E6 08 32 00 99  22 93 22 C7 28 31 34 32  |20...2..".".(142|
000000E0: 29 2C C7 28 38 29 00 03  09 37 00 97 35 33 32 38  |),.(8)...7..5328|
000000F0: 30 2C 30 3A 97 35 33 32  38 31 2C 30 3A 97 31 39  |0,0:.53281,0:.19|
00000100: 38 2C 30 00 32 09 3C 00  99 22 1E 11 20 B6 B8 B8  |8,0.2.<..".. ...|
00000110: B8 B8 B8 B8 B8 B8 B8 B8  B8 B8 B8 B8 B8 B8 B8 B8  |................|
00000120: B8 B8 B8 B8 B8 B8 B8 B8  B8 B8 B8 B8 B8 B8 B8 B8  |................|
00000130: B5 22 00 42 09 41 00 8D  38 35 3A 8D 38 35 3A 8D  |.".B.A..85:.85:.|
00000140: 38 35 00 6F 09 46 00 99  22 20 B6 B9 B9 B9 B9 B9  |85.o.F.." ......|
00000150: B9 B9 B9 B9 B9 B9 B9 B9  B9 B9 B9 B9 B9 B9 B9 B9  |................|
00000160: B9 B9 B9 B9 B9 B9 B9 B9  B9 B9 B9 B9 B9 B5 22 00  |..............".|
00000170: A1 09 4B 00 99 22 1C 11  57 45 20 4F 46 46 45 52  |..K.."..WE OFFER|
00000180: 20 4F 4E 4C 59 20 54 48  45 20 42 45 53 54 20 49  | ONLY THE BEST I|
00000190: 4E 20 50 55 42 4C 49 43  20 44 4F 4D 41 49 4E 21  |N PUBLIC DOMAIN!|
000001A0: 22 00 BE 09 50 00 99 2C  22 9E 20 50 20 4F 20 57  |"...P..,". P O W|
000001B0: 20 45 20 52 20 44 20 49  20 53 20 4B 11 22 00 EE  | E R D I S K."..|
000001C0: 09 52 00 99 22 20 36 38  31 33 20 4C 4F 54 55 53  |.R.." 6813 LOTUS|
000001D0: 20 57 41 59 2C 20 57 45  53 54 20 4A 4F 52 44 41  | WAY, WEST JORDA|
000001E0: 4E 2C 20 55 54 20 20 38  34 30 38 34 11 22 00 1C  |N, UT  84084."..|
000001F0: 0A 53 00 99 22 1E 20 20  20 20 20 57 52 49 54 45  |.S..".     WRITE|
00000200: 20 46 4F 52 20 46 52 45  45 20 53 4F 46 54 57 41  | FOR FREE SOFTWA|
00000210: 52 45 20 4C 49 53 54 21  21 22 3A 8E 00 2F 0A 55  |RE LIST!!":../.U|
00000220: 00 99 22 20 B6 22 A3 33  36 29 22 B5 22 3A 8E 00  |.." .".36)".":..|
00000230: 64 0A 56 00 99 22 1F 22  43 43 24 22 13 11 11 11  |d.V.."."CC$"....|
00000240: 1D 1D 1D D5 B2 C9 20 D5  C0 C9 20 D5 C0 C9 20 D5  |...... ... ... .|
00000250: C0 C9 20 20 D5 B2 C9 20  D5 C0 C9 20 D5 C9 B2 20  |..  ... ... ... |
00000260: B2 20 B2 22 00 8F 0A 57  00 99 22 1D 1D 1D DD DD  |. ."...W..".....|
00000270: DD 20 AB C0 20 20 DD 20  AE 20 AB C0 B3 20 20 DD  |. ..  . . ...  .|
00000280: DD DD 20 AB C0 20 20 DD  DD DD 20 DD 20 DD 22 00  |.. ..  ... . .".|
00000290: BF 0A 58 00 99 22 1D 1D  1D B1 20 B1 20 CA C0 CB  |..X..".... . ...|
000002A0: 20 CA C0 CB 20 B1 20 B1  20 20 B1 20 B1 20 CA C0  | ... . .  . . ..|
000002B0: CB 20 B1 CA CB 20 CA C0  CB 11 11 11 11 11 22 00  |. ... ........".|
000002C0: D1 0A 5A 00 81 49 B2 31  A4 33 30 30 30 3A 82 3A  |..Z..I.1.3000:.:|
000002D0: 8E 00 07 0B 5F 00 43 43  24 B2 22 9F 22 3A 8D 38  |...._.CC$.".":.8|
000002E0: 36 3A 43 43 24 B2 22 9A  22 3A 8D 38 36 3A 43 43  |6:CC$.".":.86:CC|
000002F0: 24 B2 22 1F 22 3A 8D 38  36 3A A1 57 24 3A 8B 57  |$.".":.86:.W$:.W|
00000300: 24 B2 22 22 A7 39 35 00  0D 0B 60 00 8E 00 30 0B  |$."".95...`...0.|
00000310: 64 00 8D 35 30 3A 99 A3  31 33 29 22 9F 11 11 11  |d..50:..13)"....|
00000320: 11 11 41 52 45 20 59 4F  55 20 53 55 52 45 3F 22  |..ARE YOU SURE?"|
00000330: 00 5A 0B 69 00 99 A3 31  33 29 22 9E 11 50 52 45  |.Z.i...13)"..PRE|
00000340: 53 53 20 59 20 4F 52 20  4E 2E 22 3A 8D 39 35 3A  |SS Y OR N.":.95:|
00000350: 8B 57 24 B3 B1 22 59 22  A7 8E 00 62 0B 6E 00 A0  |.W$.."Y"...b.n..|
00000360: 31 35 00 97 0B 73 00 99  C7 28 31 34 32 29 2C C7  |15...s...(142),.|
00000370: 28 39 29 3A 97 35 33 32  38 30 2C 31 34 3A 97 35  |(9):.53280,14:.5|
00000380: 33 32 38 31 2C 36 3A 97  36 34 36 2C 31 34 3A 9E  |3281,6:.646,14:.|
00000390: 35 38 32 36 36 3A A2 00  D5 0B 78 00 8D 35 30 3A  |58266:....x..50:|
000003A0: 8D 38 36 3A 99 22 9F 11  11 11 11 11 20 50 4C 45  |.86:."...... PLE|
000003B0: 41 53 45 20 57 41 49 54  20 46 4F 52 20 50 52 4F  |ASE WAIT FOR PRO|
000003C0: 47 52 41 4D 20 54 4F 20  52 45 41 44 20 44 41 54  |GRAM TO READ DAT|
000003D0: 41 2E 22 3A 8E 00 01 0C  7D 00 99 A3 38 29 22 9E  |A.":....}...8)".|
000003E0: 11 50 52 45 53 53 20 52  45 54 55 52 4E 20 54 4F  |.PRESS RETURN TO|
000003F0: 20 43 4F 4E 54 49 4E 55  45 2E 22 3A 8D 39 35 3A  | CONTINUE.":.95:|
00000400: 8E 00 33 0C 82 00 8D 35  30 3A 99 A3 39 29 22 05  |..3....50:..9)".|
00000410: 11 11 11 11 11 45 4E 54  52 59 20 4D 55 53 54 20  |.....ENTRY MUST |
00000420: 42 45 20 4E 55 4D 45 52  49 43 2E 22 3A 8D 31 32  |BE NUMERIC.":.12|
00000430: 35 3A 8E 00 50 0C 91 00  8B 52 B1 30 AF 52 B3 31  |5:..P....R.0.R.1|
00000440: 30 A7 53 24 B2 22 20 20  22 3A 54 24 B2 22 20 22  |0.S$."  ":T$." "|
00000450: 00 6C 0C 96 00 8B 52 B1  39 AF 52 B3 36 31 A7 53  |.l....R.9.R.61.S|
00000460: 24 B2 22 20 22 3A 54 24  B2 22 20 22 00 89 0C 9B  |$." ":T$." "....|
00000470: 00 8B 52 B1 38 30 AF 52  B3 31 30 30 A7 53 24 B2  |..R.80.R.100.S$.|
00000480: 22 20 22 3A 54 24 B2 22  22 00 9F 0C A0 00 8B 52  |" ":T$.""......R|
00000490: B1 39 39 A7 53 24 B2 22  22 3A 54 24 B2 22 22 00  |.99.S$."":T$."".|
000004A0: C0 0C A5 00 55 24 B2 C4  28 52 AA 44 29 3A 8B 28  |....U$..(R.D):.(|
000004B0: 52 AA 44 29 B1 42 A7 55  24 B2 22 20 20 20 20 22  |R.D).B.U$."    "|
000004C0: 00 C6 0C AA 00 8E 00 FC  0C AF 00 8D 35 30 3A 99  |............50:.|
000004D0: 22 9F 11 11 11 11 11 20  20 20 20 20 20 20 22 4B  |"......       "K|
000004E0: 22 4E 4F 54 20 49 4E 20  55 53 45 20 4F 4E 20 54  |"NOT IN USE ON T|
000004F0: 48 49 53 20 4D 45 4E 55  21 22 3A 8E 00 12 0D B4  |HIS MENU!":.....|
00000500: 00 4E 24 B2 22 9A 20 20  20 20 20 9D 9D 9D 9D 22  |.N$.".     ...."|
00000510: 3A 8E 00 33 0D C8 00 99  22 9E 22 4D 24 3B 3A 97  |:..3...."."M$;:.|
00000520: 31 39 39 2C 31 38 3A 99  4E 24 3B 4F 24 3B 22 A4  |199,18:.N$;O$;".|
00000530: 9D 22 3B 00 48 0D CD 00  9F 39 2C 30 3A 58 24 B2  |.";.H....9,0:X$.|
00000540: 4F 24 3A 4F 24 B2 22 22  00 68 0D D2 00 81 58 58  |O$:O$."".h....XX|
00000550: B2 31 A4 34 30 3A A1 23  39 2C 59 24 3A 8B 59 24  |.1.40:.#9,Y$:.Y$|
00000560: B3 B1 22 22 A7 32 31 35  00 6E 0D D3 00 82 00 80  |.."".215.n......|
00000570: 0D D4 00 8B 59 24 B2 22  22 A7 99 22 20 9D 22 3B  |....Y$."".." .";|
00000580: 00 A0 0D D5 00 81 58 58  B2 31 A4 34 30 3A A1 23  |......XX.1.40:.#|
00000590: 39 2C 59 24 3A 8B 59 24  B3 B1 22 22 A7 32 31 35  |9,Y$:.Y$.."".215|
000005A0: 00 A6 0D D6 00 82 00 BD  0D D7 00 8B 59 24 B2 22  |............Y$."|
000005B0: 22 A7 99 22 A4 9D 22 3B  3A 89 32 31 30 00 DC 0D  |".."..";:.210...|
000005C0: D8 00 8B 59 24 B2 C7 28  31 33 29 A7 99 22 20 22  |...Y$..(13).." "|
000005D0: 3A A0 39 3A 97 31 39 39  2C 30 3A 8E 00 18 0E DC  |:.9:.199,0:.....|
000005E0: 00 8B 59 24 B2 22 11 22  B0 59 24 B2 22 91 22 B0  |..Y$.".".Y$.".".|
000005F0: 59 24 B2 22 1D 22 B0 59  24 B2 22 9D 22 B0 59 24  |Y$.".".Y$.".".Y$|
00000600: B2 22 13 22 B0 59 24 B2  22 93 22 B0 59 24 B2 C7  |.".".Y$.".".Y$..|
00000610: 28 33 34 29 A7 32 31 30  00 2B 0E DE 00 8B 59 24  |(34).210.+....Y$|
00000620: B2 C7 28 31 34 38 29 A7  32 31 30 00 43 0E E1 00  |..(148).210.C...|
00000630: 8B 58 24 B2 22 22 AF 59  24 B2 C7 28 32 30 29 A7  |.X$."".Y$..(20).|
00000640: 32 31 30 00 55 0E E6 00  8B 59 24 B2 C7 28 32 30  |210.U....Y$..(20|
00000650: 29 A7 32 34 35 00 67 0E  EB 00 8B C3 28 58 24 29  |).245.g.....(X$)|
00000660: B2 4C 4C A7 32 31 30 00  83 0E F0 00 58 24 B2 58  |.LL.210.....X$.X|
00000670: 24 AA 59 24 3A 99 59 24  3B 22 A4 9D 22 3B 3A 89  |$.Y$:.Y$;"..";:.|
00000680: 32 31 30 00 A7 0E F5 00  99 22 20 9D 9D A4 9D 22  |210......" ...."|
00000690: 3B 3A 58 24 B2 C8 28 58  24 2C C3 28 58 24 29 AB  |;:X$..(X$,.(X$).|
000006A0: 31 29 3A 89 32 31 30 00  BC 0E 04 01 84 31 35 2C  |1):.210......15,|
000006B0: 45 2C 45 24 3A 8B 45 B3  31 30 A7 8E 00 DB 0E 09  |E,E$:.E.10......|
000006C0: 01 46 B2 45 3A 8D 35 30  3A 99 A3 31 32 29 22 9F  |.F.E:.50:..12)".|
000006D0: 11 11 11 11 11 22 45 24  3A A0 32 00 03 0F 0E 01  |....."E$:.2.....|
000006E0: 99 A3 37 29 22 9E 11 43  4F 52 52 45 43 54 2C 20  |..7)"..CORRECT, |
000006F0: 54 48 45 4E 20 50 52 45  53 53 20 52 45 54 55 52  |THEN PRESS RETUR|
00000700: 4E 2E 22 00 3C 0F 13 01  99 A3 36 29 22 11 28 4F  |N.".<.....6)".(O|
00000710: 52 20 50 52 45 53 53 20  45 20 54 4F 20 45 58 49  |R PRESS E TO EXI|
00000720: 54 20 54 4F 20 42 41 53  49 43 29 22 3A 8D 39 35  |T TO BASIC)":.95|
00000730: 3A 8B 57 24 B2 22 45 22  A7 31 30 30 00 42 0F 18  |:.W$."E".100.B..|
00000740: 01 8E 00 77 0F 22 01 9F  32 2C 38 2C 32 2C 22 30  |...w."..2,8,2,"0|
00000750: 3A 4D 45 4E 55 20 44 41  54 41 2C 53 2C 52 22 3A  |:MENU DATA,S,R":|
00000760: 8D 32 36 30 3A 8B 46 B1  31 A7 46 B2 30 3A 8D 31  |.260:.F.1.F.0:.1|
00000770: 32 30 3A 89 32 39 30 00  89 0F 27 01 84 32 2C 42  |20:.290...'..2,B|
00000780: 24 3A 84 32 2C 50 24 3A  8E 00 9D 0F 29 01 81 52  |$:.2,P$:....)..R|
00000790: B2 50 A4 33 30 30 3A 81  43 B2 31 A4 33 00 B9 0F  |.P.300:.C.1.3...|
000007A0: 2C 01 84 32 2C 41 24 28  52 2C 43 29 3A 8B 53 54  |,..2,A$(R,C):.ST|
000007B0: A7 42 B2 52 3A A0 32 3A  8E 00 D1 0F 31 01 82 43  |.B.R:.2:....1..C|
000007C0: 3A 99 A3 31 37 29 22 11  22 52 22 91 91 22 3A 82  |:..17)"."R"..":.|
000007D0: 52 00 F5 0F 36 01 8D 31  34 35 3A 99 22 05 22 53  |R...6..145:."."S|
000007E0: 24 52 22 9A 22 41 24 28  52 2C 31 29 3A 8B 52 B2  |$R"."A$(R,1):.R.|
000007F0: 42 A7 33 32 30 00 FB 0F  3B 01 8E 00 11 10 40 01  |B.320...;.....@.|
00000800: 81 51 B2 31 A4 41 AB 42  3A 8B 41 B2 42 A7 33 33  |.Q.1.A.B:.A.B.33|
00000810: 30 00 1A 10 45 01 99 3A  82 51 00 26 10 4A 01 52  |0...E..:.Q.&.J.R|
00000820: B2 52 AA 51 3A 8E 00 3B  10 4F 01 8B 42 B3 32 31  |.R.Q:..;.O..B.21|
00000830: AF 47 24 B2 22 31 22 A7  33 35 30 00 50 10 54 01  |.G$."1".350.P.T.|
00000840: 8B 42 B3 34 31 AF 47 24  B2 22 32 22 A7 33 35 30  |.B.41.G$."2".350|
00000850: 00 81 10 59 01 99 22 93  22 A3 37 29 C7 28 31 34  |...Y..".".7).(14|
00000860: 29 22 9E D0 52 45 53 53  20 D2 C5 D4 D5 D2 CE 20  |)"..RESS ...... |
00000870: 46 4F 52 20 CE 45 58 54  20 D0 41 47 45 11 22 3A  |FOR .EXT .AGE.":|
00000880: 8E 00 9D 10 5E 01 99 22  93 22 A3 31 39 29 C7 28  |....^..".".19).(|
00000890: 31 34 29 22 9E CD 45 4E  55 11 22 3A 8E 00 DB 10  |14)"..ENU.":....|
000008A0: 63 01 99 22 9F 11 11 11  11 11 20 20 20 20 20 46  |c.."......     F|
000008B0: 49 4C 45 4E 41 4D 45 20  4D 49 53 53 49 4E 47 20  |ILENAME MISSING |
000008C0: 46 52 4F 4D 20 4D 45 4E  55 20 44 41 54 41 2E 22  |FROM MENU DATA."|
000008D0: 3A 8D 31 32 35 3A 89 31  30 32 35 00 14 11 E8 03  |:.125:.1025.....|
000008E0: 8D 31 32 30 3A 41 24 28  31 2C 31 29 B2 22 1E C5  |.120:A$(1,1)."..|
000008F0: 58 49 54 20 54 4F 20 C2  41 53 49 43 22 3A 8D 32  |XIT TO .ASIC":.2|
00000900: 39 30 3A 50 B2 33 3A 8B  C5 28 50 24 29 B3 32 30  |90:P.3:..(P$).20|
00000910: A7 50 B2 32 00 30 11 EA  03 8D 32 39 37 3A 8B 42  |.P.2.0....297:.B|
00000920: B3 32 31 A7 47 24 B2 22  31 22 3A 89 31 30 32 35  |.21.G$."1":.1025|
00000930: 00 6A 11 ED 03 8D 35 30  3A 99 22 9E 11 11 11 11  |.j....50:.".....|
00000940: 11 53 45 4C 45 43 54 20  31 20 4F 52 20 32 20 43  |.SELECT 1 OR 2 C|
00000950: 4F 4C 55 4D 4E 20 4D 45  4E 55 20 28 50 52 45 53  |OLUMN MENU (PRES|
00000960: 53 20 31 20 4F 52 20 32  29 22 00 78 11 F2 03 8D  |S 1 OR 2)".x....|
00000970: 39 35 3A 47 24 B2 57 24  00 A1 11 01 04 8D 33 33  |95:G$.W$......33|
00000980: 35 3A 8B 47 24 B2 22 31  22 A7 41 B2 B5 28 28 42  |5:.G$."1".A..((B|
00000990: AA 31 39 29 AD 32 30 29  AC 32 30 3A 89 31 30 34  |.19).20).20:.104|
000009A0: 30 00 C5 11 06 04 8B 47  24 B2 22 32 22 A7 41 B2  |0......G$."2".A.|
000009B0: B5 28 28 42 AA 33 39 29  AD 34 30 29 AC 34 30 3A  |.((B.39).40).40:|
000009C0: 89 31 30 34 35 00 CF 11  0B 04 89 31 30 30 35 00  |.1045......1005.|
000009D0: DD 11 10 04 8B 50 B2 32  A7 31 30 34 33 00 FA 11  |.....P.2.1043...|
000009E0: 12 04 41 24 28 32 2C 31  29 B2 22 1E 32 20 C3 4F  |..A$(2,1).".2 .O|
000009F0: 4C 55 4D 4E 20 CD 45 4E  55 22 00 14 12 13 04 81  |LUMN .ENU"......|
00000A00: 52 B2 31 A4 32 30 3A 8D  33 31 30 3A 82 52 3A 89  |R.1.20:.310:.R:.|
00000A10: 31 30 38 35 00 3E 12 15  04 41 24 28 32 2C 31 29  |1085.>...A$(2,1)|
00000A20: B2 22 1E 31 20 C3 4F 4C  55 4D 4E 20 CD 45 4E 55  |.".1 .OLUMN .ENU|
00000A30: 22 3A 81 52 B2 31 A4 32  30 3A 44 B2 32 30 00 64  |":.R.1.20:D.20.d|
00000A40: 12 1A 04 8D 31 34 35 3A  99 A3 33 39 29 22 91 05  |....145:..39)"..|
00000A50: 22 53 24 52 22 9A 22 C8  28 41 24 28 52 2C 31 29  |"S$R".".(A$(R,1)|
00000A60: 2C 31 35 29 00 8D 12 1F  04 99 A3 31 39 29 22 91  |,15).......19)".|
00000A70: 05 22 54 24 3B 55 24 22  9A 20 22 C8 28 41 24 28  |."T$;U$". ".(A$(|
00000A80: 28 52 AA 32 30 29 2C 31  29 2C 31 35 29 00 9B 12  |(R.20),1),15)...|
00000A90: 24 04 8B 52 B2 42 A7 31  30 37 30 00 A8 12 29 04  |$..R.B.1070...).|
00000AA0: 82 52 3A 89 31 30 38 35  00 C6 12 2E 04 81 51 B2  |.R:.1085......Q.|
00000AB0: 31 A4 28 28 41 AB 32 30  29 AB 42 29 3A 8B 41 B2  |1.((A.20).B):.A.|
00000AC0: 42 A7 31 30 38 30 00 CF  12 33 04 99 3A 82 51 00  |B.1080...3..:.Q.|
00000AD0: D9 12 38 04 52 B2 52 AA  51 00 1A 13 3D 04 4D 24  |..8.R.R.Q...=.M$|
00000AE0: B2 22 9E 11 D4 59 50 45  20 CE 55 4D 42 45 52 2C  |."...YPE .UMBER,|
00000AF0: 20 D4 48 45 4E 20 D2 C5  D4 D5 D2 CE 20 D4 4F 20  | .HEN ...... .O |
00000B00: CC 4F 41 44 2E 20 22 3A  4C B2 52 3A 4C 4C B2 33  |.OAD. ":L.R:LL.3|
00000B10: 3A 8D 31 38 30 3A 8D 32  30 30 00 3D 13 42 04 4B  |:.180:.200.=.B.K|
00000B20: B2 C5 28 58 24 29 3A 8B  58 24 B3 B1 22 22 AF 4B  |..(X$):.X$.."".K|
00000B30: B2 30 A7 8D 31 33 30 3A  89 31 30 32 35 00 6B 13  |.0..130:.1025.k.|
00000B40: 47 04 4B 24 B2 C4 28 4B  29 3A 8B 58 24 B3 B1 22  |G.K$..(K):.X$.."|
00000B50: 22 AF C3 28 4B 24 29 AB  31 B3 B1 C3 28 58 24 29  |"..(K$).1...(X$)|
00000B60: A7 8D 31 33 30 3A 89 31  30 32 35 00 85 13 4C 04  |..130:.1025...L.|
00000B70: 8B 4B B1 42 A7 8D 31 37  35 3A 8D 31 32 35 3A 89  |.K.B..175:.125:.|
00000B80: 20 31 30 32 35 00 9D 13  51 04 8B 4B B1 28 50 AB  | 1025...Q..K.(P.|
00000B90: 31 29 AF 4B B3 33 30 31  A7 39 30 30 30 00 B1 13  |1).K.301.9000...|
00000BA0: 56 04 8B 4B B2 31 A7 8D  31 30 30 3A 89 31 30 32  |V..K.1..100:.102|
00000BB0: 35 00 CE 13 5B 04 8B 4B  B2 32 AF 47 24 B2 22 31  |5...[..K.2.G$."1|
00000BC0: 22 A7 47 24 B2 22 32 22  3A 89 31 30 32 35 00 EB  |".G$."2":.1025..|
00000BD0: 13 60 04 8B 4B B2 32 AF  47 24 B2 22 32 22 A7 47  |.`..K.2.G$."2".G|
00000BE0: 24 B2 22 31 22 3A 89 31  30 32 35 00 F9 13 65 04  |$."1":.1025...e.|
00000BF0: 8B 4B B2 30 A7 8D 33 33  35 00 0E 14 6A 04 8B 47  |.K.0..335...j..G|
00000C00: 24 B2 22 31 22 AF 52 B1  42 A7 31 30 34 33 00 26  |$."1".R.B.1043.&|
00000C10: 14 6F 04 8B 47 24 B2 22  32 22 AF 52 B1 42 AB 32  |.o..G$."2".R.B.2|
00000C20: 30 A7 31 30 34 35 00 4C  14 74 04 8B 47 24 B2 22  |0.1045.L.t..G$."|
00000C30: 31 22 A7 81 52 B2 4C A4  28 4C AA 31 39 29 3A 8D  |1"..R.L.(L.19):.|
00000C40: 33 31 30 3A 82 52 3A 89  31 30 38 35 00 6F 14 79  |310:.R:.1085.o.y|
00000C50: 04 8B 47 24 B2 22 32 22  A7 81 52 B2 28 4C AA 32  |..G$."2"..R.(L.2|
00000C60: 30 29 A4 28 4C AA 33 39  29 3A 89 31 30 35 30 00  |0).(L.39):.1050.|
00000C70: 88 14 28 23 8B 41 24 28  4B 2C 32 29 B2 22 22 A7  |..(#.A$(K,2)."".|
00000C80: 8D 35 30 3A 89 33 35 35  00 B0 14 2D 23 A0 31 35  |.50:.355...-#.15|
00000C90: 3A 99 22 93 90 50 4F 4B  45 20 34 34 2C 36 34 3A  |:."..POKE 44,64:|
00000CA0: 50 4F 4B 45 31 36 33 38  34 2C 30 3A 4E 45 57 22  |POKE16384,0:NEW"|
00000CB0: 00 BD 14 32 23 51 24 B2  C7 28 33 34 29 00 E3 14  |...2#Q$..(34)...|
00000CC0: 37 23 99 22 11 11 4C 4F  41 44 22 51 24 3B 41 24  |7#."..LOAD"Q$;A$|
00000CD0: 28 4B 2C 32 29 3B 51 24  22 2C 38 22 41 24 28 4B  |(K,2);Q$",8"A$(K|
00000CE0: 2C 33 29 00 FE 14 3C 23  99 22 11 11 11 11 52 55  |,3)...<#."....RU|
00000CF0: 4E 13 22 C7 28 31 34 32  29 2C C7 28 39 29 00 21  |N.".(142),.(9).!|
00000D00: 15 41 23 97 31 39 38 2C  32 3A 97 36 33 31 2C 31  |.A#.198,2:.631,1|
00000D10: 33 3A 97 36 33 32 2C 31  33 3A 97 36 34 36 2C 31  |3:.632,13:.646,1|
00000D20: 34 00 00 00                                       |4...            |
.......:.A$(500,3).-....15,8,15:.15,E:.E
.0.20.7....1000.[....50:..12)"...FILE NO
T ON DISK!"......9)"..PRESS M TO RELOAD
 MENU,".......8)".PRESS E TO EXIT TO BAS
IC."...#..95:.W$."M".1000.J.(..W$."E"..1
00.R.-..20...2.."."G(142),G(8)...7..5328
0,0:.53281,0:.198,0.2.<..".. ...........
.........................".B.A..85:.85:.
85.O.F.." ..............................
......"...K.."..WE OFFER ONLY THE BEST I
N PUBLIC DOMAIN!"...P..,". P O W E R D I
 S K."...R.." 6813 LOTUS WAY, WEST JORDA
N, UT  84084."...S..".     WRITE FOR FRE
E SOFTWARE LIST!!":../.U.." .".36)".":..
D.V.."."CC$".......U.I U.I U.I U.I  U.I 
U.I UI. . ."...W.."...... ..  . . ...  .
.. ..  ... . ."...X..".... . J.K J.K . .
  . . J.K .JK J.K.....".Q.Z..I.1.3000:.:
...._.CC$.".":.86:CC$.".":.86:CC$.".":.8
6:.W$:.W$."".95...`...0.D..50:..13)"....
..ARE YOU SURE?".Z.I...13)"..PRESS Y OR 
N.":.95:.W$.."Y"...B.N. 15...S..G(142),G
(9):.53280,14:.53281,6:.646,14:.58266:..
U.X..50:.86:."...... PLEASE WAIT FOR PRO
GRAM TO READ DATA.":....}...8)"..PRESS R
ETURN TO CONTINUE.":.95:..3....50:..9)".
.....ENTRY MUST BE NUMERIC.":.125:..P...
.R.0.R.10.S$."  ":T$." ".L....R.9.R.61.S
$." ":T$." "......R.80.R.100.S$." ":T$."
"... ..R.99.S$."":T$."".....U$.D(R.D):.(
R.D).B.U$."    ".F..........50:."...... 
      "K"NOT IN USE ON THIS MENU!":.....
.N$.".     ....":..3.H.."."M$;:.199,18:.
N$;O$;"..";.H.M..9,0:X$.O$:O$."".H.R..XX
.1.40:.#9,Y$:.Y$.."".215.N.S.....T..Y$."
".." .";. .U..XX.1.40:.#9,Y$:.Y$.."".215
...V.....W..Y$."".."..";:.210...X..Y$.G(
13).." ": 9:.199,0:.......Y$.".".Y$.".".
Y$.".".Y$.".".Y$.".".Y$.".".Y$.G(34).210
.+....Y$.G(148).210.C....X$."".Y$.G(20).
210.U....Y$.G(20).245.G....C(X$).LL.210.
....X$.X$.Y$:.Y$;"..";:.210......" ...."
;:X$.H(X$,C(X$).1):.210......15,E,E$:.E.
10.......F.E:.50:..12)"......"E$: 2.....
..7)"..CORRECT, THEN PRESS RETURN.".<...
..6)".(OR PRESS E TO EXIT TO BASIC)":.95
:.W$."E".100.B.....W."..2,8,2,"0:MENU DA
TA,S,R":.260:.F.1.F.0:.120:.290...'..2,B
$:.2,P$:....)..R.P.300:.C.1.3...,..2,A$(
R,C):.ST.B.R: 2:..Q.1..C:..17)"."R"..":.
R...6..145:."."S$R"."A$(R,1):.R.B.320...
;.....@..Q.1.A.B:.A.B.330...E..:.Q.&.J.R
.R.Q:..;.O..B.21.G$."1".350.P.T..B.41.G$
."2".350...Y..".".7)G(14)".PRESS RETURN 
FOR NEXT PAGE.":....^..".".19)G(14)".MEN
U.":....C.."......     FILENAME MISSING 
FROM MENU DATA.":.125:.1025......120:A$(
1,1).".EXIT TO BASIC":.290:P.3:.E(P$).20
.P.2.0....297:.B.21.G$."1":.1025.J....50
:."......SELECT 1 OR 2 COLUMN MENU (PRES
S 1 OR 2)".X....95:G$.W$......335:.G$."1
".A..((B.19).20).20:.1040.E....G$."2".A.
.((B.39).40).40:.1045.O....1005......P.2
.1043.....A$(2,1).".2 COLUMN MENU"......
R.1.20:.310:.R:.1085.>...A$(2,1).".1 COL
UMN MENU":.R.1.20:D.20.D....145:..39)"..
"S$R"."H(A$(R,1),15).......19)".."T$;U$"
. "H(A$((R.20),1),15)...$..R.B.1070...).
.R:.1085.F....Q.1.((A.20).B):.A.B.1080.O
.3..:.Q.Y.8.R.R.Q...=.M$."..TYPE NUMBER,
 THEN RETURN TO LOAD. ":L.R:LL.3:.180:.2
00.=.B.K.E(X$):.X$.."".K.0..130:.1025.K.
G.K$.D(K):.X$.."".C(K$).1..C(X$)..130:.1
025...L..K.B..175:.125:. 1025...Q..K.(P.
1).K.301.9000...V..K.1..100:.1025.N.[..K
.2.G$."1".G$."2":.1025...`..K.2.G$."2".G
$."1":.1025...E..K.0..335...J..G$."1".R.
B.1043.&.O..G$."2".R.B.20.1045.L.T..G$."
1"..R.L.(L.19):.310:.R:.1085.O.Y..G$."2"
..R.(L.20).(L.39):.1050...(#.A$(K,2)."".
.50:.355...-# 15:."..POKE 44,64:POKE1638
4,0:NEW"...2#Q$.G(34)...7#."..LOAD"Q$;A$
(K,2);Q$",8"A$(K,3)...<#."....RUN."G(142
),G(9).!.A#.198,2:.631,13:.632,13:.646,1
4...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL