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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL