00000000: 01 1C 29 1C 0A 00 97 35 33 32 38 30 2C 36 3A 97 |..)....53280,6:.|
00000010: 35 33 32 38 31 2C 31 3A 4E 50 B2 30 3A 99 C7 28 |53281,1:NP.0:..(|
00000020: 31 34 32 29 22 93 11 05 22 00 37 1C 14 00 8B 4E |142)"...".7....N|
00000030: 50 B2 30 A7 34 35 30 00 66 1C 1E 00 41 24 B2 22 |P.0.450.f...A$."|
00000040: 90 D5 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000050: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 20 20 20 20 |............ |
00000060: 22 3A 8D 33 31 30 00 91 1C 28 00 41 24 B2 22 DD |":.310...(.A$.".|
00000070: 20 20 56 41 2E 20 42 45 41 43 48 20 55 4E 44 45 | VA. BEACH UNDE|
00000080: 52 47 52 4F 55 4E 44 20 20 DD 20 22 3A 8D 33 31 |RGROUND . ":.31|
00000090: 30 00 BC 1C 32 00 41 24 B2 22 DD 20 20 20 20 31 |0...2.A$.". 1|
000000A0: 32 38 20 4D 45 4E 55 20 20 50 41 47 45 20 32 20 |28 MENU PAGE 2 |
000000B0: 20 20 20 20 C2 20 22 3A 8D 33 31 30 00 E6 1C 3C | . ":.310...<|
000000C0: 00 41 24 B2 22 CA C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |.A$."...........|
000000D0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB |................|
000000E0: 22 3A 8D 33 31 30 00 12 1D 46 00 41 24 B2 22 0F |":.310...F.A$.".|
000000F0: 11 95 20 20 20 20 20 2A 2A 20 43 48 4F 4F 53 45 |.. ** CHOOSE|
00000100: 20 4F 4E 45 20 2A 2A 20 20 20 20 20 22 3A 8D 33 | ONE ** ":.3|
00000110: 31 30 00 3E 1D 50 00 41 24 B2 22 0F 11 95 20 20 |10.>.P.A$."... |
00000120: 4F 50 54 49 4F 4E 53 20 2D 2D 20 50 52 4F 47 52 |OPTIONS -- PROGR|
00000130: 41 4D 20 4E 41 4D 45 20 22 3A 8D 33 31 30 00 69 |AM NAME ":.310.i|
00000140: 1D 5A 00 41 24 B2 22 0F 95 20 20 B8 B8 B8 B8 B8 |.Z.A$.".. .....|
00000150: B8 B8 20 20 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |.. ..........|
00000160: B8 B8 20 22 3A 8D 33 31 30 00 78 1D 64 00 81 20 |.. ":.310.x.d.. |
00000170: 54 B2 31 20 A4 20 4E 50 00 AB 1D 6E 00 87 50 47 |T.1 . NP...n..PG|
00000180: 24 28 54 29 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D 90 |$(T):.".........|
00000190: 3C 22 C7 28 36 34 AA 54 29 22 3E 20 20 20 20 20 |<".(64.T)"> |
000001A0: 2D 2D 1F 20 22 50 47 24 28 54 29 00 B3 1D 78 00 |--. "PG$(T)...x.|
000001B0: 82 20 54 00 E4 1D 82 00 99 3A 99 22 1D 1D 1D 1D |. T......:."....|
000001C0: 1D 1D 1D 1D 11 0F 90 3C 51 3E 20 20 20 20 20 2D |.......<Q> -|
000001D0: 2D 1F 20 51 55 49 54 20 31 32 38 20 4D 45 4E 55 |-. QUIT 128 MENU|
000001E0: 20 20 20 22 00 05 1E 8C 00 A1 54 24 3A 8B 54 24 | "......T$:.T$|
000001F0: B1 B2 22 41 22 AF 54 24 B3 C7 28 36 35 AA 4E 50 |.."A".T$..(65.NP|
00000200: 29 A7 31 37 30 00 16 1E 96 00 8B 54 24 B2 22 51 |).170......T$."Q|
00000210: 22 A7 20 35 33 30 00 1F 1E A0 00 89 31 34 30 00 |". 530......140.|
00000220: 2E 1E AA 00 54 B2 C6 28 54 24 29 AB 36 34 00 48 |....T..(T$).64.H|
00000230: 1E B4 00 99 22 93 13 11 11 4C 4F 41 44 20 50 47 |...."....LOAD PG|
00000240: 24 28 54 29 2C 38 3A 22 00 5A 1E BE 00 99 22 11 |$(T),8:".Z....".|
00000250: 11 11 11 52 55 4E 3A 13 22 3B 00 77 1E C8 00 97 |...RUN:.";.w....|
00000260: 38 34 32 2C 31 33 3A 97 38 34 33 2C 31 33 3A 97 |842,13:.843,13:.|
00000270: 32 30 38 2C 32 3A 80 00 8C 1E D2 00 8F 20 2A 2A |208,2:....... **|
00000280: 2A 20 42 4F 52 44 45 52 20 2A 2A 2A 00 AA 1E DC |* BORDER ***....|
00000290: 00 42 43 B2 31 34 3A 42 50 B2 31 36 30 3A 81 54 |.BC.14:BP.160:.T|
000002A0: B2 31 30 32 34 A4 31 30 36 33 00 C0 1E E6 00 97 |.1024.1063......|
000002B0: 54 2C 42 50 3A 97 54 AA 35 34 32 37 32 2C 42 43 |T,BP:.T.54272,BC|
000002C0: 00 DE 1E F0 00 97 54 AA 39 36 30 2C 42 50 3A 97 |......T.960,BP:.|
000002D0: 54 AA 35 34 32 37 32 AA 39 36 30 2C 42 43 00 E5 |T.54272.960,BC..|
000002E0: 1E FA 00 82 3A 00 F9 1E 04 01 81 54 B2 31 30 36 |....:......T.106|
000002F0: 34 A4 31 39 34 34 A9 34 30 00 0F 1F 0E 01 97 54 |4.1944.40......T|
00000300: 2C 42 50 3A 97 54 AA 35 34 32 37 32 2C 42 43 00 |,BP:.T.54272,BC.|
00000310: 2B 1F 18 01 97 54 AA 33 39 2C 42 50 3A 97 54 AA |+....T.39,BP:.T.|
00000320: 35 34 32 37 32 AA 33 39 2C 42 43 00 33 1F 22 01 |54272.39,BC.3.".|
00000330: 82 3A 8E 00 50 1F 2C 01 8F 20 2A 2A 2A 20 43 45 |.:..P.,.. *** CE|
00000340: 4E 54 45 52 20 52 4F 55 54 49 4E 45 20 2A 2A 2A |NTER ROUTINE ***|
00000350: 00 76 1F 36 01 4C B2 28 34 30 AB C3 28 41 24 29 |.v.6.L.(40..(A$)|
00000360: 29 AD 32 AA 31 2E 35 20 20 20 20 20 20 20 20 20 |).2.1.5 |
00000370: 20 20 20 20 20 20 00 83 1F 40 01 99 A3 36 29 41 | ...@...6)A|
00000380: 24 3A 8E 00 9F 1F 4A 01 8F 20 2A 2A 2A 20 50 52 |$:....J.. *** PR|
00000390: 4F 47 52 41 4D 20 4E 41 4D 45 53 20 2A 2A 2A 00 |OGRAM NAMES ***.|
000003A0: A5 1F 54 01 83 00 AB 1F 5E 01 83 00 B1 1F 68 01 |..T.....^.....h.|
000003B0: 83 00 B7 1F 72 01 83 00 BD 1F 7C 01 83 00 C3 1F |....r.....|.....|
000003C0: 86 01 83 00 C9 1F 90 01 83 00 CF 1F 9A 01 83 00 |................|
000003D0: D5 1F A4 01 83 00 DB 1F AE 01 83 00 E4 1F B8 01 |................|
000003E0: 8D 32 32 30 00 19 20 C2 01 99 22 90 11 11 11 22 |.220.. ..."...."|
000003F0: 3A 41 24 B2 22 54 48 45 52 45 20 41 52 45 20 4E |:A$."THERE ARE N|
00000400: 4F 20 31 32 38 20 50 52 4F 47 52 41 4D 53 20 1D |O 128 PROGRAMS .|
00000410: 1D 1D 1D 22 3A 8D 33 31 30 00 4B 20 CC 01 99 3A |...":.310.K ...:|
00000420: 41 24 B2 22 49 4E 20 54 48 45 20 4D 45 4E 55 20 |A$."IN THE MENU |
00000430: 59 45 54 2E 20 59 4F 55 20 4D 41 59 20 45 4E 54 |YET. YOU MAY ENT|
00000440: 45 52 1D 1D 1D 22 3A 8D 33 31 30 00 7D 20 D6 01 |ER...":.310.} ..|
00000450: 99 3A 41 24 B2 22 50 52 4F 47 52 41 4D 20 4E 41 |.:A$."PROGRAM NA|
00000460: 4D 45 53 20 41 54 20 4C 49 4E 45 20 32 30 30 30 |MES AT LINE 2000|
00000470: 20 54 4F 20 20 20 20 22 3A 8D 33 31 30 00 AF 20 | TO ":.310.. |
00000480: E0 01 99 3A 41 24 B2 22 32 30 30 39 2E 20 45 4E |...:A$."2009. EN|
00000490: 53 55 52 45 20 59 4F 55 20 43 48 41 4E 47 45 20 |SURE YOU CHANGE |
000004A0: 4E 50 20 49 4E 20 20 20 20 22 3A 8D 33 31 30 00 |NP IN ":.310.|
000004B0: E1 20 EA 01 99 3A 41 24 B2 22 4C 49 4E 45 20 31 |. ...:A$."LINE 1|
000004C0: 30 20 54 4F 20 54 4F 54 41 4C 20 4E 55 4D 42 45 |0 TO TOTAL NUMBE|
000004D0: 52 20 4F 46 20 20 20 20 20 20 20 22 3A 8D 33 31 |R OF ":.31|
000004E0: 30 00 10 21 F4 01 99 3A 41 24 B2 22 50 52 4F 47 |0..!...:A$."PROG|
000004F0: 52 41 4D 53 20 49 4E 20 54 48 45 20 4D 45 4E 55 |RAMS IN THE MENU|
00000500: 2E 20 54 48 45 20 4D 41 58 2E 22 3A 8D 33 31 30 |. THE MAX.":.310|
00000510: 00 41 21 F5 01 99 3A 41 24 B2 22 50 52 4F 47 52 |.A!...:A$."PROGR|
00000520: 41 4D 53 20 46 4F 52 20 45 41 43 48 20 4D 45 4E |AMS FOR EACH MEN|
00000530: 55 20 49 53 20 54 45 4E 2E 20 20 22 3A 8D 33 31 |U IS TEN. ":.31|
00000540: 30 00 72 21 F6 01 99 3A 41 24 B2 22 59 4F 55 20 |0.r!...:A$."YOU |
00000550: 4D 41 59 20 4C 49 4E 4B 20 4D 55 4C 54 49 50 4C |MAY LINK MULTIPL|
00000560: 45 20 4D 45 4E 55 53 20 42 59 20 20 22 3A 8D 33 |E MENUS BY ":.3|
00000570: 31 30 00 A3 21 F7 01 99 3A 41 24 B2 22 4D 41 4B |10..!...:A$."MAK|
00000580: 49 4E 47 20 54 48 45 20 4C 41 53 54 20 50 52 4F |ING THE LAST PRO|
00000590: 47 52 41 4D 20 4C 4F 41 44 20 20 20 20 22 3A 8D |GRAM LOAD ":.|
000005A0: 33 31 30 00 D4 21 F8 01 99 3A 41 24 B2 22 54 48 |310..!...:A$."TH|
000005B0: 45 20 4E 45 58 54 20 4F 4E 45 2E 20 20 20 20 20 |E NEXT ONE. |
000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
000005D0: 8D 33 31 30 00 05 22 F9 01 99 3A 41 24 B2 22 45 |.310.."...:A$."E|
000005E0: 58 41 4D 50 4C 45 3A 20 20 20 31 32 38 20 4D 45 |XAMPLE: 128 ME|
000005F0: 4E 55 2D 50 41 47 45 20 32 20 20 20 20 20 20 22 |NU-PAGE 2 "|
00000600: 3A 8D 33 31 30 00 26 22 FE 01 A1 54 24 3A 8B 54 |:.310.&"...T$:.T|
00000610: 24 B3 B1 22 09 22 A7 35 31 30 20 20 20 20 20 20 |$..".".510 |
00000620: 20 20 20 20 20 20 00 36 22 08 02 54 24 B2 22 51 | .6"..T$."Q|
00000630: 22 3A 89 31 35 30 00 65 22 12 02 99 22 93 11 11 |":.150.e"..."...|
00000640: 11 11 11 11 11 11 11 11 11 22 A3 31 30 29 22 2A |.........".10)"*|
00000650: 2A 20 48 41 56 45 20 41 20 4E 49 43 45 20 44 41 |* HAVE A NICE DA|
00000660: 59 20 2A 2A 22 00 6D 22 1C 02 FE 0B 32 00 75 22 |Y **".m"....2.u"|
00000670: 26 02 E8 3A 80 00 00 00 |&..:.... |
..)....53280,6:.53281,1:NP.0:.G(142)"...
".7....NP.0.450.F...A$.".UCCCCCCCCCCCCCC
CCCCCCCCCCCI ":.310...(.A$.". VA. BE
ACH UNDERGROUND . ":.310...2.A$.". 1
28 MENU PAGE 2 B ":.310...<.A$."JCC
CCCCCCCCCCCCCCCCCCCCCCCK":.310...F.A$.".
.. ** CHOOSE ONE ** ":.310.>.P.A
$."... OPTIONS -- PROGRAM NAME ":.310.I
.Z.A$.".. ....... ............ ":.31
0.X.D.. T.1 . NP...N..PG$(T):.".........
<"G(64.T)"> --. "PG$(T)...X.. T.....
.:."...........<Q> --. QUIT 128 MENU
"......T$:.T$.."A".T$.G(65.NP).170...
...T$."Q". 530... ..140.....T.F(T$).64.H
...."....LOAD PG$(T),8:".Z...."....RUN:.
";.W.H..842,13:.843,13:.208,2:....R.. **
* BORDER ***.....BC.14:BP.160:.T.1024.10
63......T,BP:.T.54272,BC......T.960,BP:.
T.54272.960,BC......:......T.1064.1944.4
0......T,BP:.T.54272,BC.+....T.39,BP:.T.
54272.39,BC.3."..:..P.,.. *** CENTER ROU
TINE ***.V.6.L.(40.C(A$)).2.1.5
...@...6)A$:....J.. *** PROGRAM NA
MES ***...T.....^.....H.....R.....|...C.
....I.....O.....U................220.. B
.."....":A$."THERE ARE NO 128 PROGRAMS .
...":.310.K L..:A$."IN THE MENU YET. YOU
MAY ENTER...":.310.} V..:A$."PROGRAM NA
MES AT LINE 2000 TO ":.310.. ...:A$."
2009. ENSURE YOU CHANGE NP IN ":.310.
. ...:A$."LINE 10 TO TOTAL NUMBER OF
":.310..!...:A$."PROGRAMS IN THE MENU
. THE MAX.":.310.A!...:A$."PROGRAMS FOR
EACH MENU IS TEN. ":.310.R!...:A$."YOU
MAY LINK MULTIPLE MENUS BY ":.310..!...
:A$."MAKING THE LAST PROGRAM LOAD ":.
310.T!...:A$."THE NEXT ONE.
":.310.."...:A$."EXAMPLE: 128 ME
NU-PAGE 2 ":.310.&"...T$:.T$..".".5
10 .6"..T$."Q":.150.E"..."...
.........".10)"** HAVE A NICE DAY **".M"
....2.U"&..:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL