128 MENU
FILE INFORMATION
FILENAME(S): 128 MENU
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-11-30 18:12:13
APPEARS ON: 1 disk(s)
FILE HASH
ff8e832490713b5ae59f71996ed4c4af44afcd9c716ad498b1bad7e116ab8825
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 38 S 2 | 128 MENU | PRG | Sailor, Ganheden | 21 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 18 40 00 00 8B CE 09 28 32 29 B2 34 30 A7 |.@.@.....(2).40.|
00000010: 34 3A D5 20 E7 36 2C 37 00 8B 40 01 00 99 22 93 |4:. .6,7..@...".|
00000020: 0B 0E 05 D4 48 45 20 31 32 38 20 CD C5 CE D5 20 |....HE 128 .... |
00000030: 49 53 20 54 4F 20 42 45 20 55 53 45 44 20 49 4E |IS TO BE USED IN|
00000040: 20 34 30 20 43 4F 4C 55 4D 4E 20 4D 4F 44 45 2E | 40 COLUMN MODE.|
00000050: 22 3A 99 22 11 20 20 20 31 29 20 D0 52 45 53 53 |":.". 1) .RESS|
00000060: 20 54 48 45 20 5B 34 30 2F 38 30 20 C4 C9 D3 D0 | THE [40/80 ....|
00000070: CC C1 D9 5D 20 42 55 54 54 4F 4E 20 4F 4E 20 59 |...] BUTTON ON Y|
00000080: 4F 55 52 20 C3 2D 31 32 38 2E 22 00 E0 40 02 00 |OUR .-128."..@..|
00000090: 99 22 20 20 20 32 29 20 C3 48 41 4E 47 45 20 59 |." 2) .HANGE Y|
000000A0: 4F 55 52 20 4D 4F 4E 49 54 4F 52 20 54 4F 20 34 |OUR MONITOR TO 4|
000000B0: 30 20 43 4F 4C 55 4D 4E 20 4D 4F 44 45 2E 22 3A |0 COLUMN MODE.":|
000000C0: 99 22 20 20 20 33 29 20 D0 52 45 53 53 20 D2 D5 |." 3) .RESS ..|
000000D0: CE 2F D3 D4 CF D0 20 D2 C5 D3 D4 CF D2 C5 2E 22 |./.... ........"|
000000E0: 00 0C 41 03 00 99 22 20 20 20 34 29 20 D4 59 50 |..A..." 4) .YP|
000000F0: 45 20 D2 D5 CE 20 41 4E 44 20 50 52 45 53 53 20 |E ... AND PRESS |
00000100: 5B D2 C5 D4 D5 D2 CE 5D 2E 22 3A 80 00 43 41 04 |[......].":..CA.|
00000110: 00 8B C2 28 34 30 33 32 29 B3 B1 31 36 30 B0 C2 |...(4032)..160..|
00000120: 28 34 30 33 34 29 B3 B1 31 37 37 A7 FE 11 22 4D |(4034)..177..."M|
00000130: 45 4D 4D 4F 56 45 20 31 32 38 2E 4F 22 2C 50 34 |EMMOVE 128.O",P4|
00000140: 30 33 32 00 7B 41 05 00 FE 02 31 35 3A DE 31 3A |032.{A....15:.1:|
00000150: DE 30 3A 8F 20 41 4C 4C 4F 43 41 54 45 20 20 20 |.0:. ALLOCATE |
00000160: 38 31 39 32 20 2D 20 31 36 33 38 33 20 46 4F 52 |8192 - 16383 FOR|
00000170: 20 54 45 58 54 20 46 49 4C 45 53 00 C8 41 08 00 | TEXT FILES..A..|
00000180: 49 4E B2 33 38 3A 4E 50 B2 30 3A 53 49 B2 32 3A |IN.38:NP.0:SI.2:|
00000190: 54 41 B2 31 32 3A 45 53 24 B2 C7 28 32 37 29 3A |TA.12:ES$..(27):|
000001A0: 53 55 24 B2 45 53 24 AA C7 28 38 36 29 AA 22 13 |SU$.ES$..(86).".|
000001B0: 22 3A 53 44 24 B2 45 53 24 AA C7 28 38 37 29 AA |":SD$.ES$..(87).|
000001C0: 22 13 22 3A 53 45 B2 31 00 59 42 09 00 54 4C 24 |".":SE.1.YB..TL$|
000001D0: B2 22 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |."..............|
000001E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000001F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 3A 42 4C 24 B2 |..........":BL$.|
00000200: 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000210: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000220: C0 C0 C0 C0 C0 C0 C0 C0 BD 22 3A 4D 4C 24 B2 22 |.........":ML$."|
00000230: AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000240: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000250: C0 C0 C0 C0 C0 C0 C0 B3 22 00 71 42 0A 00 86 20 |........".qB... |
00000260: 4D 24 28 4E 50 2C 33 29 2C 54 24 28 32 30 30 30 |M$(NP,3),T$(2000|
00000270: 29 00 B8 42 0B 00 4C 24 B2 22 A3 A3 A3 A3 A3 A3 |)..B..L$."......|
00000280: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000290: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000002A0: A3 A3 22 3A 42 57 24 B2 22 11 11 11 11 11 11 11 |..":BW$.".......|
000002B0: 11 11 11 11 11 11 11 22 00 C6 42 0C 00 8B 4E 50 |......."..B...NP|
000002C0: B2 2E A7 31 30 30 00 ED 42 0D 00 81 41 B2 31 A4 |...100..B...A.1.|
000002D0: 4E 50 3A 81 42 B2 31 A4 33 3A 87 41 24 3A 4D 24 |NP:.B.1.3:.A$:M$|
000002E0: 28 41 2C 42 29 B2 41 24 3A 82 42 2C 41 00 03 43 |(A,B).A$:.B,A..C|
000002F0: 0E 00 81 41 B2 31 A4 33 3A 87 20 53 45 24 28 41 |...A.1.3:. SE$(A|
00000300: 29 3A 82 00 1C 43 0F 00 81 41 B2 31 A4 38 3A F9 |):...C...A.1.8:.|
00000310: 41 2C C7 28 32 34 30 AA 41 29 3A 82 00 25 43 11 |A,.(240.A):..%C.|
00000320: 00 89 31 30 30 00 2B 43 12 00 3A 00 9D 43 13 00 |..100.+C..:..C..|
00000330: 8F 20 44 41 54 41 20 22 CD 45 4E 55 20 CE 41 4D |. DATA ".ENU .AM|
00000340: 45 22 2C 44 49 53 4B 20 4E 41 4D 45 2C 5B 52 2F |E",DISK NAME,[R/|
00000350: 45 5D 20 20 20 20 20 20 20 20 52 20 3D 20 4F 4E |E] R = ON|
00000360: 4C 59 20 22 D2 45 41 44 20 49 54 2E 22 20 20 20 |LY ".EAD IT." |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 45 20 3D 20 22 D2 45 41 44 20 49 54 2E 22 | E = ".EAD IT."|
00000390: 20 4F 52 20 22 D2 55 4E 20 49 54 2E 22 00 A3 43 | OR ".UN IT."..C|
000003A0: 14 00 3A 00 F4 43 2C 00 8F 20 20 20 20 20 20 20 |..:..C,.. |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003D0: 20 20 20 20 20 20 20 20 20 42 4F 49 4E 4B 21 20 | BOINK! |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003F0: 20 20 20 3A 00 24 44 2D 00 81 4A B2 34 A4 37 3A | :.$D-..J.4.7:|
00000400: 97 35 33 32 36 35 2C 28 C2 28 35 33 32 36 35 29 |.53265,(.(53265)|
00000410: AF 32 34 38 29 B0 4A 3A 81 41 B2 31 A4 31 30 3A |.248).J:.A.1.10:|
00000420: 82 41 2C 4A 00 66 44 2F 00 81 4A B2 2E A4 33 3A |.A,J.fD/..J...3:|
00000430: 97 35 33 32 36 35 2C 28 C2 28 35 33 32 36 35 29 |.53265,(.(53265)|
00000440: AF 32 34 38 29 B0 4A 3A 81 41 B2 31 A4 31 30 3A |.248).J:.A.1.10:|
00000450: 82 41 2C 4A 3A FE 04 22 4F 36 20 41 22 3A 97 32 |.A,J:.."O6 A":.2|
00000460: 30 38 2C 2E 3A 8E 00 6C 44 30 00 3A 00 98 44 32 |08,.:..lD0.:..D2|
00000470: 00 8F 20 20 20 20 20 20 53 45 4C 45 43 54 49 4F |.. SELECTIO|
00000480: 4E 20 44 41 54 41 20 20 20 20 20 20 20 20 20 20 |N DATA |
00000490: 20 20 20 20 20 20 20 3A 00 A9 44 34 00 83 20 22 | :..D4.. "|
000004A0: D2 45 41 44 20 49 54 2E 22 00 B9 44 35 00 83 20 |.EAD IT."..D5.. |
000004B0: 22 D2 55 4E 20 49 54 2E 22 00 D0 44 36 00 83 20 |".UN IT."..D6.. |
000004C0: 22 C2 41 43 4B 20 54 4F 20 4D 45 4E 55 2E 13 22 |".ACK TO MENU.."|
000004D0: 00 F9 44 38 00 3A 20 20 20 20 20 20 20 20 20 20 |..D8.: |
000004E0: 20 20 20 20 20 20 20 20 AE 2E 2E 2E 2E 2E 2E 2E | ........|
000004F0: 2E 2E 2E 2E 2E 2E 2E 2E AA 00 21 45 39 00 8F 20 |..........!E9.. |
00000500: 4C 41 53 54 20 53 45 4C 45 43 54 49 4F 4E 20 4D |LAST SELECTION M|
00000510: 55 53 54 20 43 4F 4E 54 41 49 4E 20 41 20 22 13 |UST CONTAIN A ".|
00000520: 22 00 3F 45 3A 00 3A 20 20 20 41 54 20 54 48 45 |".?E:.: AT THE|
00000530: 20 80 20 4F 46 20 49 54 53 20 4E 41 4D 45 2E 00 | . OF ITS NAME..|
00000540: 45 45 3B 00 3A 00 76 45 46 00 99 22 13 11 11 11 |EE;.:.vEF.."....|
00000550: 11 11 11 22 3A 81 41 B2 31 A4 4E 50 3A 8B 41 B2 |...":.A.1.NP:.A.|
00000560: 53 45 A7 99 22 9E 22 A3 54 41 29 4D 24 28 41 2C |SE..".".TA)M$(A,|
00000570: 31 29 3A 89 37 33 00 8A 45 48 00 99 A3 54 41 29 |1):.73..EH...TA)|
00000580: 22 81 22 4D 24 28 41 2C 31 29 00 92 45 49 00 82 |"."M$(A,1)..EI..|
00000590: 3A 8E 00 98 45 4A 00 3A 00 C7 45 4B 00 99 22 13 |:...EJ.:..EK..".|
000005A0: 22 3A 81 49 B2 31 A4 53 45 AA 35 3A 99 22 11 22 |":.I.1.SE.5:."."|
000005B0: 3B 3A 82 3A 99 22 12 9E 22 A3 54 41 29 4D 24 28 |;:.:."..".TA)M$(|
000005C0: 53 45 2C 31 29 3A 8E 00 CD 45 4C 00 3A 00 1A 46 |SE,1):...EL.:..F|
000005D0: 4D 00 8D 38 30 3A 99 A3 31 33 29 22 1E 2A 2A 2A |M..80:..13)".***|
000005E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 A3 31 33 29 |*********":..13)|
000005F0: 22 2A 20 20 99 D3 49 44 45 22 53 49 22 9D 20 20 |"* ..IDE"SI". |
00000600: 1E 2A 22 3A 99 A3 31 33 29 22 2A 2A 2A 2A 2A 2A |.*":..13)"******|
00000610: 2A 2A 2A 2A 2A 2A 11 11 9E 22 00 20 46 4F 00 3A |******...". FO.:|
00000620: 00 33 46 50 00 FE 1A 20 31 2C 33 2C 33 38 2C 31 |.3FP... 1,3,38,1|
00000630: 37 3A 8E 00 46 46 51 00 FE 1A 20 31 2C 33 2C 33 |7:..FFQ... 1,3,3|
00000640: 39 2C 31 37 3A 8E 00 59 46 52 00 FE 1A 20 31 2C |9,17:..YFR... 1,|
00000650: 33 2C 33 39 2C 31 39 3A 8E 00 5F 46 55 00 3A 00 |3,39,19:.._FU.:.|
00000660: 75 46 5A 00 FE 1A 20 31 2C 31 39 2C 33 38 2C 32 |uFZ... 1,19,38,2|
00000670: 33 2C 31 3A 8E 00 7B 46 5F 00 3A 00 8D 46 64 00 |3,1:..{F_.:..Fd.|
00000680: E8 3A E7 20 30 2C 31 3A E7 20 34 2C 37 00 9B 46 |.:. 0,1:. 4,7..F|
00000690: 65 00 99 45 53 24 AA 22 4C 22 3B 00 BD 46 69 00 |e..ES$."L";..Fi.|
000006A0: F9 31 2C C7 28 31 33 33 29 3A F9 33 2C C7 28 31 |.1,.(133):.3,.(1|
000006B0: 33 34 29 3A F9 35 2C C7 28 31 33 35 29 00 C3 46 |34):.5,.(135)..F|
000006C0: 6A 00 3A 00 DE 46 6B 00 8F 20 20 20 20 20 20 20 |j.:..Fk.. |
000006D0: 20 20 50 52 49 4E 54 20 42 4F 52 44 45 52 00 E4 | PRINT BORDER..|
000006E0: 46 6C 00 3A 00 28 47 6E 00 99 22 13 13 93 05 0B |Fl.:.(Gn..".....|
000006F0: 0E 22 54 4C 24 22 DD 9A CC CF C1 C4 D3 D4 C1 D2 |."TL$"..........|
00000700: 20 1C 2D 2D 2D 2D 20 96 31 32 38 20 CD 45 4E 55 | .---- .128 .ENU|
00000710: 20 1C 2D 2D 2D 2D 20 9A C9 53 53 55 45 20 23 22 | .---- ..SSUE #"|
00000720: 49 4E 22 9D 05 DD 22 3B 00 4F 47 78 00 99 4D 4C |IN"...";.OGx..ML|
00000730: 24 3B 3A 81 41 B2 31 A4 31 35 3A 99 22 DD 22 A3 |$;:.A.1.15:.".".|
00000740: 33 39 29 22 DD 22 3B 3A 82 3A 99 4D 4C 24 3B 00 |39)".";:.:.ML$;.|
00000750: 83 47 82 00 81 41 B2 31 A4 35 3A 99 22 DD 22 A3 |.G...A.1.5:.".".|
00000760: 33 39 29 22 DD 22 3B 3A 82 3A 99 C8 28 42 4C 24 |39)".";:.:..(BL$|
00000770: 2C C3 28 42 4C 24 29 AB 32 29 3B 22 BD 9D 94 C0 |,.(BL$).2);"....|
00000780: 13 13 22 00 89 47 87 00 3A 00 91 47 8C 00 8D 37 |.."..G..:..G...7|
00000790: 37 00 97 47 96 00 3A 00 A1 47 BE 00 8D 31 30 30 |7..G..:..G...100|
000007A0: 30 00 E6 47 C0 00 8B 4E 50 B2 2E A7 99 22 11 11 |0..G...NP...."..|
000007B0: 11 11 11 11 11 11 11 9E 20 D4 48 45 52 45 20 41 |........ .HERE A|
000007C0: 52 45 20 4E 4F 20 31 32 38 20 50 52 4F 47 52 41 |RE NO 128 PROGRA|
000007D0: 4D 53 20 4F 4E 20 D3 49 44 45 22 53 49 22 9D 2E |MS ON .IDE"SI"..|
000007E0: 22 3A 89 32 33 30 00 EC 47 C3 00 3A 00 0C 48 C4 |":.230..G..:..H.|
000007F0: 00 8F 20 20 50 52 49 4E 54 20 53 49 44 45 20 23 |.. PRINT SIDE #|
00000800: 20 26 20 4D 41 49 4E 20 4D 45 4E 55 00 12 48 C5 | & MAIN MENU..H.|
00000810: 00 3A 00 1A 48 C8 00 8D 37 30 00 20 48 E0 00 3A |.:..H...70. H..:|
00000820: 00 40 48 E1 00 8F 20 20 20 47 45 54 20 41 20 4B |.@H... GET A K|
00000830: 45 59 20 46 4F 52 20 4D 41 49 4E 20 4D 45 4E 55 |EY FOR MAIN MENU|
00000840: 00 46 48 E2 00 3A 00 51 48 E6 00 97 32 30 38 2C |.FH..:.QH...208,|
00000850: 2E 00 67 48 EB 00 41 4E B2 53 45 3A 48 4E B2 4E |..gH..AN.SE:HN.N|
00000860: 50 3A 8D 35 30 30 30 00 77 48 F0 00 8B 41 24 B2 |P:.5000.wH...A$.|
00000870: 22 20 22 A7 33 32 30 00 99 48 F5 00 8B 41 24 B2 |" ".320..H...A$.|
00000880: 22 05 22 A7 45 24 B2 22 CC CF C1 C4 D3 D4 C1 D2 |".".E$."........|
00000890: 20 36 34 22 3A 89 32 36 30 00 BB 48 F6 00 8B 41 | 64":.260..H...A|
000008A0: 24 B2 22 02 22 A7 45 24 B2 22 2D C2 C1 D3 C9 C3 |$.".".E$."-.....|
000008B0: 20 37 2E 30 2D 22 3A 89 32 37 30 00 CA 48 FA 00 | 7.0-":.270..H..|
000008C0: 53 45 B2 41 4E 3A 89 32 30 30 00 05 49 04 01 8D |SE.AN:.200..I...|
000008D0: 39 35 30 3A 3A 8B 45 58 A7 9F 31 35 2C 38 2C 31 |950::.EX..15,8,1|
000008E0: 35 2C 22 55 30 3E 4D 30 22 3A A0 31 35 3A FE 11 |5,"U0>M0":.15:..|
000008F0: 22 4D 41 47 49 43 20 49 49 22 3A CB 36 34 3A D5 |"MAGIC II":.64:.|
00000900: 20 89 31 39 30 00 31 49 0E 01 8D 39 35 30 3A 8B | .190.1I...950:.|
00000910: 45 58 A7 99 22 13 13 93 99 22 3A E7 20 34 2C 31 |EX.."....":. 4,1|
00000920: 34 3A E7 20 30 2C 31 32 3A 80 3A D5 20 89 31 39 |4:. 0,12:.:. .19|
00000930: 30 00 37 49 3A 01 3A 00 53 49 3B 01 8F 20 20 20 |0.7I:.:.SI;.. |
00000940: 20 52 45 41 44 2C 20 52 55 4E 2C 20 4F 52 20 4D | READ, RUN, OR M|
00000950: 45 4E 55 00 59 49 3C 01 3A 00 61 49 40 01 8D 37 |ENU.YI<.:.aI@..7|
00000960: 35 00 6B 49 45 01 8D 31 30 35 30 00 76 49 47 01 |5.kIE..1050.vIG.|
00000970: 97 32 30 38 2C 2E 00 91 49 4A 01 41 4E B2 53 53 |.208,...IJ.AN.SS|
00000980: 3A 48 4E B2 33 3A 8D 35 30 30 30 3A 53 53 B2 41 |:HN.3:.5000:SS.A|
00000990: 4E 00 B4 49 4F 01 8B 4D 24 28 53 45 2C 33 29 B2 |N..IO..M$(SE,3).|
000009A0: 22 52 22 AF 53 53 B2 32 AF 41 24 B2 22 91 22 A7 |"R".SS.2.A$.".".|
000009B0: 53 53 B2 31 00 D7 49 50 01 8B 4D 24 28 53 45 2C |SS.1..IP..M$(SE,|
000009C0: 33 29 B2 22 52 22 AF 53 53 B2 32 AF 41 24 B2 22 |3)."R".SS.2.A$."|
000009D0: 11 22 A7 53 53 B2 33 00 EF 49 54 01 8B 41 24 B3 |.".SS.3..IT..A$.|
000009E0: B1 22 20 22 A7 8D 31 30 37 30 3A 89 33 33 30 00 |." "..1070:.330.|
000009F0: 08 4A 5E 01 8B 53 53 B2 33 A7 FE 04 22 4F 36 54 |.J^..SS.3..."O6T|
00000A00: 36 45 22 3A 89 31 39 30 00 16 4A 68 01 8B 53 53 |6E":.190..Jh..SS|
00000A10: B2 32 A7 38 30 30 00 24 4A 72 01 8B 53 53 B2 31 |.2.800.$Jr..SS.1|
00000A20: A7 34 30 30 00 2D 4A 7C 01 89 33 33 30 00 33 4A |.400.-J|..330.3J|
00000A30: 86 01 3A 00 49 4A 8B 01 8F 20 20 20 20 20 52 45 |..:.IJ... RE|
00000A40: 41 44 20 41 20 46 49 4C 45 00 4F 4A 8C 01 3A 00 |AD A FILE.OJ..:.|
00000A50: 65 4A 90 01 8B 4D 24 28 53 45 2C 32 29 B2 4C 53 |eJ...M$(SE,2).LS|
00000A60: 24 A7 34 34 35 00 6B 4A 96 01 3A 00 A1 4A 97 01 |$.445.kJ..:..J..|
00000A70: F5 20 22 54 2E 22 AA C8 28 4D 24 28 53 45 2C 32 |. "T."..(M$(SE,2|
00000A80: 29 2C 31 34 29 AA 22 22 20 A4 20 22 54 2E 22 AA |),14)."" . "T.".|
00000A90: C8 28 4D 24 28 53 45 2C 32 29 2C 31 34 29 AA 22 |.(M$(SE,2),14)."|
00000AA0: 22 00 B1 4A 98 01 8B 44 53 B3 B1 36 33 A7 39 30 |"..J...DS..63.90|
00000AB0: 30 00 E4 4A 9A 01 8D 39 30 3A 99 22 11 11 1D 1D |0..J...90:."....|
00000AC0: 1D 1D 1D 1D 1D 1D 1D 9F CC 4F 41 44 49 4E 47 20 |.........OADING |
00000AD0: D4 45 58 54 20 C6 49 4C 45 20 2E 2E 2E 22 3A 50 |.EXT .ILE ...":P|
00000AE0: 4D B2 31 35 00 FA 4A A4 01 8D 33 30 30 30 3A 8F |M.15..J...3000:.|
00000AF0: 20 42 4C 4F 41 44 20 46 49 24 00 24 4B AE 01 8D | BLOAD FI$.$K...|
00000B00: 39 30 3A 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |90:."...........|
00000B10: 9F CF 52 47 41 4E 49 5A 49 4E 47 20 D4 45 58 54 |..RGANIZING .EXT|
00000B20: 2E 2E 2E 22 00 58 4B B8 01 8D 33 31 30 30 3A 8F |...".XK...3100:.|
00000B30: 20 43 48 41 4E 47 45 20 48 49 2D 52 45 53 20 44 | CHANGE HI-RES D|
00000B40: 41 54 41 20 54 4F 20 20 20 20 20 54 45 58 54 20 |ATA TO TEXT |
00000B50: 49 4E 20 54 24 28 58 29 00 7D 4B BD 01 8D 38 30 |IN T$(X).}K...80|
00000B60: 3A 99 22 93 9E 22 3B 3A 8D 38 32 3A 81 41 B2 31 |:."..";:.82:.A.1|
00000B70: A4 31 35 3A 99 54 24 28 41 29 3B 3A 82 00 A7 4B |.15:.T$(A);:...K|
00000B80: C2 01 4C 53 24 B2 4D 24 28 53 45 2C 32 29 3A 4C |..LS$.M$(SE,2):L|
00000B90: 49 B2 31 35 3A 48 4E B2 48 4C 3A 41 4E B2 4C 49 |I.15:HN.HL:AN.LI|
00000BA0: 3A 97 32 30 38 2C 2E 00 B7 4B CC 01 8D 32 30 30 |:.208,...K...200|
00000BB0: 30 3A 99 22 9E 22 3B 00 C8 4B D6 01 97 32 34 34 |0:.".";..K...244|
00000BC0: 2C 2E 3A 8D 35 30 30 30 00 EB 4B DB 01 8B 41 24 |,.:.5000..K...A$|
00000BD0: B2 22 20 22 A7 8D 38 30 3A 99 22 93 22 3B 3A 8D |." "..80:.".";:.|
00000BE0: 37 37 3A 8D 37 30 3A 89 33 32 30 00 22 4C E0 01 |77:.70:.320."L..|
00000BF0: 8B 41 24 B2 22 11 22 AF 4C 49 B3 48 4C A7 4C 49 |.A$.".".LI.HL.LI|
00000C00: B2 4C 49 AA 31 3A 8D 38 30 3A 99 53 55 24 3A 8D |.LI.1:.80:.SU$:.|
00000C10: 38 32 3A 99 42 57 24 54 24 28 4C 49 29 3A 89 34 |82:.BW$T$(LI):.4|
00000C20: 37 30 00 5C 4C EA 01 8B 41 24 B2 22 91 22 AF 4C |70.\L...A$.".".L|
00000C30: 49 AB 31 34 B1 31 A7 4C 49 B2 4C 49 AB 31 3A 8D |I.14.1.LI.LI.1:.|
00000C40: 38 30 3A 99 53 44 24 3A 8D 38 31 3A 99 54 24 28 |80:.SD$:.81:.T$(|
00000C50: 4C 49 AB 31 34 29 3B 3A 89 34 37 30 00 65 4C F4 |LI.14);:.470.eL.|
00000C60: 01 89 34 37 30 00 6B 4C 20 03 3A 00 82 4C 25 03 |..470.kL .:..L%.|
00000C70: 8F 20 20 20 20 52 55 4E 20 41 20 50 52 4F 47 52 |. RUN A PROGR|
00000C80: 41 4D 00 88 4C 26 03 3A 00 AE 4C 2A 03 F5 20 22 |AM..L&.:..L*.. "|
00000C90: 22 AA 4D 24 28 53 45 2C 32 29 AA 22 22 20 A4 20 |".M$(SE,2)."" . |
00000CA0: 22 22 AA 4D 24 28 53 45 2C 32 29 AA 22 22 00 BE |"".M$(SE,2).""..|
00000CB0: 4C 2F 03 8B 44 53 B3 B1 36 33 A7 39 30 30 00 DE |L/..DS..63.900..|
00000CC0: 4C 34 03 FE 1A 20 30 2C 30 2C 33 39 2C 31 37 3A |L4... 0,0,39,17:|
00000CD0: 81 41 B2 31 A4 31 32 3A 99 53 44 24 3A 82 00 00 |.A.1.12:.SD$:...|
00000CE0: 4D 3E 03 54 4C B2 C3 28 4D 24 28 53 45 2C 31 29 |M>.TL..(M$(SE,1)|
00000CF0: 29 AA 31 32 3A 54 B2 32 30 AB 54 4C AD 32 AB 31 |).12:T.20.TL.2.1|
00000D00: 00 2B 4D 48 03 8D 39 30 3A 99 22 11 11 22 A3 54 |.+MH..90:."..".T|
00000D10: 29 22 9E CC 4F 41 44 49 4E 47 20 22 4D 24 28 53 |)"..OADING "M$(S|
00000D20: 45 2C 31 29 22 20 2E 2E 2E 99 22 00 3B 4D 52 03 |E,1)" ....".;MR.|
00000D30: 55 24 B2 C8 28 4C 24 2C 54 4C 29 00 4A 4D 5C 03 |U$..(L$,TL).JM\.|
00000D40: 99 A3 54 29 55 24 3A 8D 38 30 00 74 4D 66 03 99 |..T)U$:.80.tMf..|
00000D50: 22 13 13 11 11 11 90 52 55 4E 20 22 AA C7 28 33 |"......RUN "..(3|
00000D60: 34 29 AA 4D 24 28 53 45 2C 32 29 AA C7 28 33 34 |4).M$(SE,2)..(34|
00000D70: 29 22 13 22 00 89 4D 70 03 97 38 34 32 2C 31 33 |)"."..Mp..842,13|
00000D80: 3A 97 32 30 38 2C 31 3A 80 00 8F 4D 83 03 80 00 |:.208,1:...M....|
00000D90: B5 4D 84 03 8D 39 30 3A FE 04 22 4F 32 45 22 3A |.M...90:.."O2E":|
00000DA0: 99 22 11 1C C4 49 53 4B 20 C5 52 52 4F 52 3A 20 |."...ISK .RROR: |
00000DB0: 96 22 44 53 24 00 CD 4D 89 03 99 22 9A 22 C8 28 |."DS$..M...".".(|
00000DC0: 4C 24 2C C3 28 44 53 24 29 AA 31 32 29 00 01 4E |L$,.(DS$).12)..N|
00000DD0: 8E 03 99 22 9F 20 20 20 20 D0 52 45 53 53 20 41 |...". .RESS A|
00000DE0: 4E 59 20 4B 45 59 20 54 4F 20 52 45 54 55 52 4E |NY KEY TO RETURN|
00000DF0: 20 54 4F 20 4D 45 4E 55 2E 22 3A 97 32 30 38 2C | TO MENU.":.208,|
00000E00: 2E 00 15 4E 98 03 A1 41 24 3A 8B 41 24 B3 B1 22 |...N...A$:.A$.."|
00000E10: 22 A7 33 32 35 00 27 4E A2 03 8B CF 28 32 29 AF |".325.'N....(2).|
00000E20: 31 32 38 A7 33 32 35 00 30 4E AC 03 89 39 32 30 |128.325.0N...920|
00000E30: 00 59 4E B6 03 45 58 B2 2E 3A 8D 39 30 3A 99 22 |.YN..EX..:.90:."|
00000E40: 11 20 20 20 20 20 20 20 20 20 9F C5 58 49 54 20 |. ..XIT |
00000E50: 54 4F 20 22 45 24 22 3F 22 00 80 4E BB 03 99 22 |TO "E$"?"..N..."|
00000E60: 11 9E 20 20 20 20 20 20 20 20 20 C1 52 45 20 59 |.. .RE Y|
00000E70: 4F 55 20 53 55 52 45 3F 20 20 28 D9 2F CE 29 22 |OU SURE? (./.)"|
00000E80: 00 A7 4E C0 03 99 22 99 20 20 20 20 20 20 20 20 |..N...". |
00000E90: 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ...............|
00000EA0: A3 A3 A3 A3 A3 13 22 00 C6 4E CA 03 A1 41 24 3A |......"..N...A$:|
00000EB0: 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 22 A7 45 |.A$."Y".A$.".".E|
00000EC0: 58 B2 AB 31 3A 8E 00 DB 4E D4 03 8B 41 24 B2 22 |X..1:...N...A$."|
00000ED0: 4E 22 B0 41 24 B2 22 CE 22 A7 8E 00 E4 4E DE 03 |N".A$."."....N..|
00000EE0: 89 39 37 30 00 EA 4E E2 03 3A 00 07 4F E3 03 8F |.970..N..:..O...|
00000EF0: 20 20 20 20 20 49 4E 53 54 52 55 43 54 49 4F 4E | INSTRUCTION|
00000F00: 20 57 49 4E 44 4F 57 00 0D 4F E4 03 3A 00 49 4F | WINDOW..O..:.IO|
00000F10: E8 03 8D 39 30 3A 8B 4E 50 B1 31 A7 99 22 20 20 |...90:.NP.1.." |
00000F20: 20 9F CA CF D9 D3 D4 C9 C3 CB 20 9A 41 4E 44 20 | ......... .AND |
00000F30: 9F C3 D5 D2 D3 CF D2 20 CB C5 D9 D3 9A 20 53 43 |....... ..... SC|
00000F40: 52 4F 4C 4C 3B 22 3A D5 99 00 86 4F F2 03 8B 4E |ROLL;":....O...N|
00000F50: 50 B1 2E A7 99 22 9F D2 C5 D4 D5 D2 CE 9A 2C 20 |P...."........, |
00000F60: 9F D3 D0 C1 C3 C5 9A 2C 20 41 4E 44 20 9F C6 C9 |......., AND ...|
00000F70: D2 C5 C2 D5 D4 D4 CF CE 20 9A 53 45 4C 45 43 54 |........ .SELECT|
00000F80: 53 2E 22 3A D5 99 00 8C 4F F7 03 99 00 BD 4F FC |S.":....O.....O.|
00000F90: 03 99 22 9A D0 52 45 53 53 3A 20 20 9F C3 D4 D2 |.."..RESS: ....|
00000FA0: CC 20 C5 9A 20 54 4F 20 45 58 49 54 20 54 4F 20 |. .. TO EXIT TO |
00000FB0: CC CF C1 C4 D3 D4 C1 D2 20 36 34 2E 22 00 F3 4F |........ 64."..O|
00000FC0: 06 04 99 22 20 20 20 20 20 20 20 20 9F C3 D4 D2 |..." ....|
00000FD0: CC 20 C2 9A 20 54 4F 20 45 58 49 54 20 54 4F 20 |. .. TO EXIT TO |
00000FE0: C2 C1 D3 C9 C3 20 37 2E 30 2E 13 13 22 3A 8D 38 |..... 7.0...":.8|
00000FF0: 30 3A 8E 00 F9 4F 0F 04 3A 00 FF 4F 10 04 8F 00 |0:...O..:..O....|
00001000: 05 50 11 04 3A 00 44 50 1A 04 FE 04 22 4F 36 54 |.P..:.DP...."O6T|
00001010: 36 46 22 3A 8D 39 30 3A 53 53 B2 31 3A 99 22 9E |6F":.90:SS.1:.".|
00001020: D0 4C 45 41 53 45 20 43 48 4F 4F 53 45 20 4F 4E |.LEASE CHOOSE ON|
00001030: 45 20 4F 46 20 54 48 45 20 46 4F 4C 4C 4F 57 49 |E OF THE FOLLOWI|
00001040: 4E 47 3A 22 00 78 50 24 04 99 22 99 A3 A3 A3 A3 |NG:".xP$..".....|
00001050: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001060: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |..............."|
00001070: 3A 8D 31 30 37 30 3A 8E 00 A5 50 2E 04 4F 4B B2 |:.1070:...P..OK.|
00001080: AB 31 3A 99 22 13 11 11 22 3B 3A 81 41 B2 31 A4 |.1:."...";:.A.1.|
00001090: 33 3A 8B 53 53 B2 41 A7 99 22 9E 22 3B 3A D5 20 |3:.SS.A..".";:. |
000010A0: 99 22 9A 22 3B 00 B5 50 38 04 99 A3 31 31 29 53 |.".";..P8...11)S|
000010B0: 45 24 28 41 29 00 D3 50 3D 04 8B 4D 24 28 53 45 |E$(A)..P=..M$(SE|
000010C0: 2C 33 29 B2 22 52 22 AF 4F 4B A7 41 B2 32 3A 4F |,3)."R".OK.A.2:O|
000010D0: 4B B2 2E 00 DB 50 42 04 82 3A 8E 00 0F 51 D0 07 |K....PB..:...Q..|
000010E0: 8D 39 30 3A 99 22 11 20 20 20 9F CA CF D9 D3 D4 |.90:.". ......|
000010F0: C9 C3 CB 20 9A 41 4E 44 20 9F C3 D5 D2 D3 CF D2 |... .AND .......|
00001100: 20 CB C5 D9 D3 9A 20 53 43 52 4F 4C 4C 3B 22 00 | ..... SCROLL;".|
00001110: 42 51 DA 07 99 22 11 20 9F D2 C5 D4 D5 D2 CE 9A |BQ...". ........|
00001120: 2C 20 9F D3 D0 C1 C3 C5 9A 2C 20 41 4E 44 20 9F |, ......., AND .|
00001130: C6 C9 D2 C5 C2 D5 D4 D4 CF CE 20 9A 45 58 49 54 |.......... .EXIT|
00001140: 2E 22 00 48 51 DF 07 8E 00 68 51 B7 0B 8F 20 2A |.".HQ....hQ... *|
00001150: 2A 2A 2A 2A 2A 2A 2A 20 42 4C 4F 41 44 20 2A 2A |******* BLOAD **|
00001160: 2A 2A 2A 2A 2A 2A 2A 2A 00 8F 51 B8 0B 46 49 24 |********..Q..FI$|
00001170: B2 22 54 2E 22 AA 4D 24 28 53 45 2C 32 29 3A 46 |."T.".M$(SE,2):F|
00001180: 49 24 B2 C8 28 46 49 24 2C 31 36 29 3A E8 31 00 |I$..(FI$,16):.1.|
00001190: 03 52 C2 0B 97 36 2C C3 28 46 49 24 29 3A 97 37 |.R...6,.(FI$):.7|
000011A0: 2C 32 33 39 3A 97 38 2C 36 33 3A 81 41 B2 31 A4 |,239:.8,63:.A.1.|
000011B0: C3 28 46 49 24 29 3A 97 31 36 33 36 36 AA 41 2C |.(FI$):.16366.A,|
000011C0: C6 28 CA 28 46 49 24 2C 41 2C 31 29 29 3A 82 3A |.(.(FI$,A,1)):.:|
000011D0: 9E 36 35 34 36 39 3A 8F 20 20 20 20 20 20 20 20 |.65469:. |
000011E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 4A 55 4D | JUM|
000011F0: 50 20 54 4F 20 53 45 54 4E 41 4D 20 52 4F 55 54 |P TO SETNAM ROUT|
00001200: 49 4E 45 00 3C 52 CC 0B 97 36 2C 2E 3A 97 37 2C |INE.<R...6,.:.7,|
00001210: 31 35 3A 9E 36 35 33 38 34 3A 8F 20 20 20 20 20 |15:.65384:. |
00001220: 20 20 20 20 20 20 4A 55 4D 50 20 54 4F 20 53 45 | JUMP TO SE|
00001230: 54 42 4E 4B 20 52 4F 55 54 49 4E 45 00 72 52 D6 |TBNK ROUTINE.rR.|
00001240: 0B 97 36 2C 2E 3A 97 37 2C 38 3A 97 38 2C 2E 3A |..6,.:.7,8:.8,.:|
00001250: 9E 36 35 34 36 36 3A 8F 20 20 20 20 4A 55 4D 50 |.65466:. JUMP|
00001260: 20 54 4F 20 53 45 54 4C 46 53 20 52 4F 55 54 49 | TO SETLFS ROUTI|
00001270: 4E 45 00 AA 52 E0 0B 97 36 2C 2E 3A 97 37 2C 2E |NE..R...6,.:.7,.|
00001280: 3A 97 38 2C 33 32 3A 9E 36 35 34 39 33 3A 20 20 |:.8,32:.65493: |
00001290: 20 20 20 20 8F 20 4A 55 4D 50 20 54 4F 20 4C 4F | . JUMP TO LO|
000012A0: 41 44 20 52 4F 55 54 49 4E 45 00 BF 52 E5 0B 45 |AD ROUTINE..R..E|
000012B0: 41 B2 C2 28 37 29 AA C2 28 38 29 AC 32 35 36 00 |A..(7)..(8).256.|
000012C0: C5 52 EA 0B 8E 00 E6 52 F4 0B 8F 20 2A 2A 2A 2A |.R.....R... ****|
000012D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000012E0: 2A 2A 2A 2A 2A 2A 00 29 53 1C 0C 97 32 35 31 2C |******.)S...251,|
000012F0: 2E 3A 97 32 35 32 2C 31 34 3A 8F 20 20 20 20 20 |.:.252,14:. |
00001300: 20 20 20 20 20 20 20 20 20 20 20 50 4F 49 4E 54 | POINT|
00001310: 45 52 20 46 4F 52 20 4D 45 4D 4D 4F 56 45 2E 4F |ER FOR MEMMOVE.O|
00001320: 20 20 20 5B 33 35 38 34 5D 00 6C 53 26 0C 97 32 | [3584].lS&..2|
00001330: 35 33 2C 2E 3A 97 32 35 34 2C 33 32 3A 8F 20 20 |53,.:.254,32:. |
00001340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4F | PO|
00001350: 49 4E 54 45 52 20 46 4F 52 20 4D 45 4D 4D 4F 56 |INTER FOR MEMMOV|
00001360: 45 2E 4F 20 20 20 5B 38 31 39 32 5D 00 7C 53 30 |E.O [8192].|S0|
00001370: 0C 48 4C B2 2E 3A 4C 4C 24 B2 22 22 00 BF 53 3A |.HL..:LL$.""..S:|
00001380: 0C 48 4C B2 48 4C AA 31 3A 9E 34 30 33 32 3A 8F |.HL.HL.1:.4032:.|
00001390: 20 43 4F 50 59 20 48 49 2D 52 45 53 20 20 20 20 | COPY HI-RES |
000013A0: 20 20 20 20 20 44 41 54 41 20 54 4F 20 53 50 52 | DATA TO SPR|
000013B0: 49 54 45 20 31 20 44 41 54 41 20 41 52 45 41 00 |ITE 1 DATA AREA.|
000013C0: 02 54 44 0C FE 16 20 31 2C 41 24 3A 41 24 B2 C8 |.TD... 1,A$:A$..|
000013D0: 28 41 24 2C 36 33 29 3A 8F 20 20 20 20 20 20 20 |(A$,63):. |
000013E0: 20 20 43 4F 50 59 20 44 41 54 41 20 49 4E 20 53 | COPY DATA IN S|
000013F0: 50 52 49 54 45 20 31 20 41 52 45 41 20 54 4F 20 |PRITE 1 AREA TO |
00001400: 41 24 00 69 54 49 0C 41 24 B2 4C 4C 24 AA 41 24 |A$.iTI.A$.LL$.A$|
00001410: 3A 8F 20 20 2B 43 48 52 24 28 50 45 45 4B 28 50 |:. +CHR$(PEEK(P|
00001420: 45 45 4B 28 32 35 33 29 2B 50 45 45 4B 28 32 35 |EEK(253)+PEEK(25|
00001430: 34 29 2A 32 35 36 2D 31 29 29 3A 52 45 4D 20 41 |4)*256-1)):REM A|
00001440: 44 44 20 41 4E 59 20 42 59 54 45 53 20 20 20 20 |DD ANY BYTES |
00001450: 20 20 20 20 20 4C 45 46 54 20 46 52 4F 4D 20 4C | LEFT FROM L|
00001460: 41 53 54 20 47 52 4F 55 50 00 CB 54 4E 0C 43 52 |AST GROUP..TN.CR|
00001470: B2 D4 28 41 24 2C C7 28 31 33 29 29 3A 54 24 28 |..(A$,.(13)):T$(|
00001480: 48 4C 29 B2 C8 28 41 24 2C 43 52 29 3A 8B C8 28 |HL)..(A$,CR):..(|
00001490: 54 24 28 48 4C 29 2C 33 29 B2 22 5E 55 3A 22 A7 |T$(HL),3)."^U:".|
000014A0: 48 4C B2 48 4C AB 31 3A 8F 20 49 46 20 4C 49 4E |HL.HL.1:. IF LIN|
000014B0: 45 20 49 53 20 22 5E 55 3A 3F 3F 3F 3F 3F 22 2C |E IS "^U:?????",|
000014C0: 20 46 4F 52 47 45 54 20 49 54 21 00 07 55 58 0C | FORGET IT!..UX.|
000014D0: 8B 28 C2 28 32 35 33 29 AA C2 28 32 35 34 29 AC |.(.(253)..(254).|
000014E0: 32 35 36 B1 B2 45 41 29 AF 43 52 B2 2E A7 8E 3A |256..EA).CR....:|
000014F0: 8F 20 43 48 45 43 4B 20 46 4F 52 20 45 4E 44 20 |. CHECK FOR END |
00001500: 4F 46 20 46 49 4C 45 00 22 55 62 0C 8B 43 52 B2 |OF FILE."Ub..CR.|
00001510: C3 28 41 24 29 A7 4C 4C 24 B2 22 22 3A 89 33 31 |.(A$).LL$."":.31|
00001520: 33 30 00 58 55 6C 0C 41 24 B2 C9 28 41 24 2C C3 |30.XUl.A$..(A$,.|
00001530: 28 41 24 29 AB 43 52 29 3A 8B 28 D4 28 41 24 2C |(A$).CR):.(.(A$,|
00001540: C7 28 31 33 29 29 B3 B1 2E 29 A7 48 4C B2 48 4C |.(13))...).HL.HL|
00001550: AA 31 3A 89 33 31 35 30 00 69 55 76 0C 4C 4C 24 |.1:.3150.iUv.LL$|
00001560: B2 41 24 3A 89 33 31 33 30 00 6F 55 88 13 3A 00 |.A$:.3130.oU..:.|
00001570: 89 55 89 13 8F 20 20 20 47 45 54 20 41 20 4B 45 |.U... GET A KE|
00001580: 59 20 52 4F 55 54 49 4E 45 00 8F 55 8A 13 3A 00 |Y ROUTINE..U..:.|
00001590: A4 55 8D 13 A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 |.U...A$:.A$.."".|
000015A0: 35 30 33 30 00 BA 55 92 13 8B CF 28 32 29 B2 2E |5030..U....(2)..|
000015B0: B0 4E 50 B2 2E A7 35 30 30 35 00 C4 55 9C 13 89 |.NP...5005..U...|
000015C0: 35 30 37 30 00 E3 55 A6 13 8B 41 24 B2 22 11 22 |5070..U...A$."."|
000015D0: AF 41 4E B3 48 4E AF 4E 50 A7 41 4E B2 41 4E AA |.AN.HN.NP.AN.AN.|
000015E0: 31 3A 8E 00 11 56 B0 13 8B 28 41 24 B2 22 91 22 |1:...V...(A$."."|
000015F0: B0 41 24 B2 22 1D 22 29 AF 41 4E B1 31 AF 4E 50 |.A$.".").AN.1.NP|
00001600: A7 41 4E B2 41 4E AB 31 3A 41 24 B2 22 91 22 3A |.AN.AN.1:A$.".":|
00001610: 8E 00 34 56 BA 13 8B 28 41 24 B2 22 20 22 B0 41 |..4V...(A$." ".A|
00001620: 24 B2 C7 28 31 33 29 29 AF 4E 50 A7 41 24 B2 22 |$..(13)).NP.A$."|
00001630: 20 22 3A 8E 00 49 56 BF 13 8B 41 24 B2 22 05 22 | ":..IV...A$."."|
00001640: B0 41 24 B2 22 02 22 A7 8E 00 57 56 C4 13 8D 34 |.A$."."...WV...4|
00001650: 35 3A 89 35 30 31 30 00 70 56 CE 13 8B CF 28 32 |5:.5010.pV....(2|
00001660: 29 B2 31 A7 41 24 B2 22 91 22 3A 89 35 30 34 30 |).1.A$.".":.5040|
00001670: 00 89 56 D8 13 8B CF 28 32 29 B2 35 A7 41 24 B2 |..V....(2).5.A$.|
00001680: 22 11 22 3A 89 35 30 33 30 00 A4 56 E2 13 8B CF |".":.5030..V....|
00001690: 28 32 29 AF 31 32 38 A7 41 24 B2 22 20 22 3A 89 |(2).128.A$." ":.|
000016A0: 35 30 35 30 00 B2 56 E7 13 8D 34 35 3A 89 35 30 |5050..V...45:.50|
000016B0: 30 35 00 00 00 |05... |
.@.@...N.(2).40.4:U .6,7..@..."....THE 1
28 MENU IS TO BE USED IN 40 COLUMN MODE.
":.". 1) PRESS THE [40/80 DISPLAY] BUT
TON ON YOUR C-128."..@..." 2) CHANGE Y
OUR MONITOR TO 40 COLUMN MODE.":." 3)
PRESS RUN/STOP RESTORE."..A..." 4) TYP
E RUN AND PRESS [RETURN].":..CA...B(4032
)..160.B(4034)..177..."MEMMOVE 128.O",P4
032.{A....15:.1:.0:. ALLOCATE 8192 - 1
6383 FOR TEXT FILES.HA..IN.38:NP.0:SI.2:
TA.12:ES$.G(27):SU$.ES$.G(86).".":SD$.ES
$.G(87).".":SE.1.YB..TL$."..............
..........................":BL$.".......
.................................":ML$."
........................................
".QB... M$(NP,3),T$(2000)..B..L$."......
..................................":BW$.
"..............".FB...NP...100..B...A.1.
NP:.B.1.3:.A$:M$(A,B).A$:.B,A..C...A.1.3
:. SE$(A):...C...A.1.8:.A,G(240.A):..%C.
..100.+C..:..C... DATA "MENU NAME",DISK
NAME,[R/E] R = ONLY "READ IT."
E = "READ IT." OR "RUN
IT."..C..:..C,..
BOINK!
:.$D-..J.4.7:.53265,(B(53265)
.248).J:.A.1.10:.A,J.FD/..J...3:.53265,(
B(53265).248).J:.A.1.10:.A,J:.."O6 A":.2
08,.:..LD0.:..D2.. SELECTION DATA
:..D4.. "READ IT."..D5..
"RUN IT.".PD6.. "BACK TO MENU.."..D8.:
..................!E9..
LAST SELECTION MUST CONTAIN A ".".?E:.:
AT THE . OF ITS NAME..EE;.:.VEF.."....
...":.A.1.NP:.A.SE..".".TA)M$(A,1):.73..
EH...TA)"."M$(A,1)..EI..:...EJ.:.GEK..".
":.I.1.SE.5:.".";:.:."..".TA)M$(SE,1):..
MEL.:..FM..80:..13)".************":..13)
"* .SIDE"SI". .*":..13)"************..
.". FO.:.3FP... 1,3,38,17:..FFQ... 1,3,3
9,17:..YFR... 1,3,39,19:.._FU.:.UFZ... 1
,19,38,23,1:..{F_.:..FD..:. 0,1:. 4,7..F
E..ES$."L";..FI..1,G(133):.3,G(134):.5,G
(135).CFJ.:..FK.. PRINT BORDER..
FL.:.(GN.."......"TL$"..LOADSTAR .---- .
128 MENU .---- .ISSUE #"IN"...";.OGX..ML
$;:.A.1.15:.".".39)".";:.:.ML$;..G...A.1
.5:.".".39)".";:.:.H(BL$,C(BL$).2);"....
.."..G..:..G...77..G..:..G...1000..G...N
P....".......... THERE ARE NO 128 PROGRA
MS ON SIDE"SI"..":.230..GC.:..HD.. PRIN
T SIDE # & MAIN MENU..HE.:..HH..70. H..:
.@H... GET A KEY FOR MAIN MENU.FH..:.Q
H...208,..GH..AN.SE:HN.NP:.5000.WH...A$.
" ".320..H...A$.".".E$."LOADSTAR 64":.26
0..H...A$.".".E$."-BASIC 7.0-":.270.JH..
SE.AN:.200..I...950::.EX..15,8,15,"U0>M0
": 15:.."MAGIC II":K64:U .190.1I...950:.
EX.."....":. 4,14:. 0,12:.:U .190.7I:.:.
SI;.. READ, RUN, OR MENU.YI<.:.AI@..7
5.KIE..1050.VIG..208,...IJ.AN.SS:HN.3:.5
000:SS.AN..IO..M$(SE,3)."R".SS.2.A$.".".
SS.1.WIP..M$(SE,3)."R".SS.2.A$.".".SS.3.
.IT..A$.." "..1070:.330..J^..SS.3..."O6T
6E":.190..JH..SS.2.800.$JR..SS.1.400.-J|
..330.3J..:.IJ... READ A FILE.OJ..:.
EJ...M$(SE,2).LS$.445.KJ..:..J... "T.".H
(M$(SE,2),14)."" . "T.".H(M$(SE,2),14)."
"..J...DS..63.900..J...90:."............
LOADING TEXT FILE ...":PM.15..J...3000:.
BLOAD FI$.$K...90:."............ORGANIZ
ING TEXT...".XK...3100:. CHANGE HI-RES D
ATA TO TEXT IN T$(X).}K...80:."..";:
.82:.A.1.15:.T$(A);:...KB.LS$.M$(SE,2):L
I.15:HN.HL:AN.LI:.208,...KL..2000:.".";.
HKV..244,.:.5000..K...A$." "..80:.".";:.
77:.70:.320."L...A$.".".LI.HL.LI.LI.1:.8
0:.SU$:.82:.BW$T$(LI):.470.\L...A$.".".L
I.14.1.LI.LI.1:.80:.SD$:.81:.T$(LI.14);:
.470.EL...470.KL .:..L%.. RUN A PROGR
AM..L&.:..L*.. "".M$(SE,2)."" . "".M$(SE
,2).""..L/..DS..63.900..L4... 0,0,39,17:
.A.1.12:.SD$:...M>.TL.C(M$(SE,1)).12:T.2
0.TL.2.1.+MH..90:."..".T)".LOADING "M$(S
E,1)" ....".;MR.U$.H(L$,TL).JM\...T)U$:.
80.TMF.."......RUN ".G(34).M$(SE,2).G(34
)"."..MP..842,13:.208,1:...M.....M...90:
.."O2E":."..DISK ERROR: ."DS$.MM..."."H(
L$,C(DS$).12)..N...". PRESS ANY KEY T
O RETURN TO MENU.":.208,...N...A$:.A$.."
".325.'N...O(2).128.325.0N...920.YN..EX.
.:.90:.". .EXIT TO "E$"?"..N..."
.. ARE YOU SURE? (Y/N)"..N...".
.....................".FNJ..A$:
.A$."Y".A$."Y".EX..1:...NT..A$."N".A$."N
"....N...970..N..:..O... INSTRUCTION
WINDOW..O..:.IO...90:.NP.1.." .JOYSTI
CK .AND .CURSOR KEYS. SCROLL;":U...O...N
P....".RETURN., .SPACE., AND .FIREBUTTON
.SELECTS.":U...O.....O...".PRESS: .CTR
L E. TO EXIT TO LOADSTAR 64."..O..."
.CTRL B. TO EXIT TO BASIC 7.0...":.8
0:...O..:..O.....P..:.DP...."O6T6F":.90:
SS.1:.".PLEASE CHOOSE ONE OF THE FOLLOWI
NG:".XP$..".............................
.......":.1070:...P..OK..1:."...";:.A.1.
3:.SS.A..".";:U .".";..P8...11)SE$(A).SP
=..M$(SE,3)."R".OK.A.2:OK....PB..:...QP.
.90:.". .JOYSTICK .AND .CURSOR KEYS. S
CROLL;".BQZ..". .RETURN., .SPACE., AND .
FIREBUTTON .EXIT.".HQ....HQ... ********
BLOAD **********..Q..FI$."T.".M$(SE,2):F
I$.H(FI$,16):.1..RB..6,C(FI$):.7,239:.8,
63:.A.1.C(FI$):.16366.A,F(J(FI$,A,1)):.:
.65469:. JUMP TO SET
NAM ROUTINE.<RL..6,.:.7,15:.65384:.
JUMP TO SETBNK ROUTINE.RRV..6,.:.7
,8:.8,.:.65466:. JUMP TO SETLFS ROUTI
NE..R...6,.:.7,.:.8,32:.65493: . JU
MP TO LOAD ROUTINE..R..EA.B(7).B(8).256.
ER.....R... **************************.)
S...251,.:.252,14:. POINT
ER FOR MEMMOVE.O [3584].LS&..253,.:.25
4,32:. POINTER FOR MEMMOV
E.O [8192].|S0.HL..:LL$.""..S:.HL.HL.1
:.4032:. COPY HI-RES DATA TO SPR
ITE 1 DATA AREA..TD... 1,A$:A$.H(A$,63):
. COPY DATA IN SPRITE 1 AREA TO
A$.ITI.A$.LL$.A$:. +CHR$(PEEK(PEEK(253)
+PEEK(254)*256-1)):REM ADD ANY BYTES
LEFT FROM LAST GROUP.KTN.CR.T(A$,G(
13)):T$(HL).H(A$,CR):.H(T$(HL),3)."^U:".
HL.HL.1:. IF LINE IS "^U:?????", FORGET
IT!..UX..(B(253).B(254).256..EA).CR....:
. CHECK FOR END OF FILE."UB..CR.C(A$).LL
$."":.3130.XUL.A$.I(A$,C(A$).CR):.(T(A$,
G(13))...).HL.HL.1:.3150.IUV.LL$.A$:.313
0.OU..:..U... GET A KEY ROUTINE..U..:.
.U...A$:.A$.."".5030..U...O(2)...NP...50
05.DU...5070..U...A$.".".AN.HN.NP.AN.AN.
1:...V...(A$.".".A$.".").AN.1.NP.AN.AN.1
:A$.".":..4V...(A$." ".A$.G(13)).NP.A$."
":..IV...A$.".".A$."."...WVD..45:.5010.
PVN..O(2).1.A$.".":.5040..VX..O(2).5.A$.
".":.5030..V...O(2).128.A$." ":.5050..V.
..45:.5005...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL