128 MENU
FILE INFORMATION
FILENAME(S): 128 MENU
FILE TYPE(S): PRG
FILE SIZE: 5.4K
FIRST SEEN: 2025-11-30 18:12:09
APPEARS ON: 1 disk(s)
FILE HASH
0e899d694f019bce2dedb531cbd47dd9801d219920ae85d08f90d659f8b5f46a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 47 S 1 | 128 MENU | PRG | Sailor, Ganheden | 14 | 2 | 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 34 37 3A 4E 50 B2 30 3A 53 49 B2 31 3A |IN.47:NP.0:SI.1:|
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 CD 43 16 00 83 20 22 D3 43 52 45 45 |..:..C... ".CREE|
000003B0: 4E 20 D3 41 56 45 20 31 32 38 22 2C 53 43 52 45 |N .AVE 128",SCRE|
000003C0: 45 4E 20 53 41 56 45 20 31 32 38 2C 45 00 FA 43 |EN SAVE 128,E..C|
000003D0: 18 00 83 20 22 D6 41 52 49 41 42 4C 45 20 C6 49 |... ".ARIABLE .I|
000003E0: 4E 44 45 52 20 31 32 38 22 2C 56 41 52 20 46 49 |NDER 128",VAR FI|
000003F0: 4E 44 45 52 20 31 32 38 2C 45 00 4B 44 2C 00 8F |NDER 128,E.KD,..|
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000430: 42 4F 49 4E 4B 21 20 20 20 20 20 20 20 20 20 20 |BOINK! |
00000440: 20 20 20 20 20 20 20 20 20 20 3A 00 7B 44 2D 00 | :.{D-.|
00000450: 81 4A B2 34 A4 37 3A 97 35 33 32 36 35 2C 28 C2 |.J.4.7:.53265,(.|
00000460: 28 35 33 32 36 35 29 AF 32 34 38 29 B0 4A 3A 81 |(53265).248).J:.|
00000470: 41 B2 31 A4 31 30 3A 82 41 2C 4A 00 BD 44 2F 00 |A.1.10:.A,J..D/.|
00000480: 81 4A B2 2E A4 33 3A 97 35 33 32 36 35 2C 28 C2 |.J...3:.53265,(.|
00000490: 28 35 33 32 36 35 29 AF 32 34 38 29 B0 4A 3A 81 |(53265).248).J:.|
000004A0: 41 B2 31 A4 31 30 3A 82 41 2C 4A 3A FE 04 22 4F |A.1.10:.A,J:.."O|
000004B0: 36 20 41 22 3A 97 32 30 38 2C 2E 3A 8E 00 C3 44 |6 A":.208,.:...D|
000004C0: 30 00 3A 00 EF 44 32 00 8F 20 20 20 20 20 20 53 |0.:..D2.. S|
000004D0: 45 4C 45 43 54 49 4F 4E 20 44 41 54 41 20 20 20 |ELECTION DATA |
000004E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 00 | :.|
000004F0: 00 45 34 00 83 20 22 D2 45 41 44 20 49 54 2E 22 |.E4.. ".EAD IT."|
00000500: 00 10 45 35 00 83 20 22 D2 55 4E 20 49 54 2E 22 |..E5.. ".UN IT."|
00000510: 00 27 45 36 00 83 20 22 C2 41 43 4B 20 54 4F 20 |.'E6.. ".ACK TO |
00000520: 4D 45 4E 55 2E 13 22 00 50 45 38 00 3A 20 20 20 |MENU..".PE8.: |
00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 AE | .|
00000540: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E AA |................|
00000550: 00 78 45 39 00 8F 20 4C 41 53 54 20 53 45 4C 45 |.xE9.. LAST SELE|
00000560: 43 54 49 4F 4E 20 4D 55 53 54 20 43 4F 4E 54 41 |CTION MUST CONTA|
00000570: 49 4E 20 41 20 22 13 22 00 96 45 3A 00 3A 20 20 |IN A "."..E:.: |
00000580: 20 41 54 20 54 48 45 20 80 20 4F 46 20 49 54 53 | AT THE . OF ITS|
00000590: 20 4E 41 4D 45 2E 00 9C 45 3B 00 3A 00 CD 45 46 | NAME...E;.:..EF|
000005A0: 00 99 22 13 11 11 11 11 11 11 22 3A 81 41 B2 31 |..".......":.A.1|
000005B0: A4 4E 50 3A 8B 41 B2 53 45 A7 99 22 9E 22 A3 54 |.NP:.A.SE..".".T|
000005C0: 41 29 4D 24 28 41 2C 31 29 3A 89 37 33 00 E1 45 |A)M$(A,1):.73..E|
000005D0: 48 00 99 A3 54 41 29 22 81 22 4D 24 28 41 2C 31 |H...TA)"."M$(A,1|
000005E0: 29 00 E9 45 49 00 82 3A 8E 00 EF 45 4A 00 3A 00 |)..EI..:...EJ.:.|
000005F0: 1E 46 4B 00 99 22 13 22 3A 81 49 B2 31 A4 53 45 |.FK..".":.I.1.SE|
00000600: AA 35 3A 99 22 11 22 3B 3A 82 3A 99 22 12 9E 22 |.5:.".";:.:.".."|
00000610: A3 54 41 29 4D 24 28 53 45 2C 31 29 3A 8E 00 24 |.TA)M$(SE,1):..$|
00000620: 46 4C 00 3A 00 71 46 4D 00 8D 38 30 3A 99 A3 31 |FL.:.qFM..80:..1|
00000630: 33 29 22 1E 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |3)".************|
00000640: 22 3A 99 A3 31 33 29 22 2A 20 20 99 D3 49 44 45 |":..13)"* ..IDE|
00000650: 22 53 49 22 9D 20 20 1E 2A 22 3A 99 A3 31 33 29 |"SI". .*":..13)|
00000660: 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 11 11 9E |"************...|
00000670: 22 00 77 46 4F 00 3A 00 8A 46 50 00 FE 1A 20 31 |".wFO.:..FP... 1|
00000680: 2C 33 2C 33 38 2C 31 37 3A 8E 00 9D 46 51 00 FE |,3,38,17:...FQ..|
00000690: 1A 20 31 2C 33 2C 33 39 2C 31 37 3A 8E 00 B0 46 |. 1,3,39,17:...F|
000006A0: 52 00 FE 1A 20 31 2C 33 2C 33 39 2C 31 39 3A 8E |R... 1,3,39,19:.|
000006B0: 00 B6 46 55 00 3A 00 CC 46 5A 00 FE 1A 20 31 2C |..FU.:..FZ... 1,|
000006C0: 31 39 2C 33 38 2C 32 33 2C 31 3A 8E 00 D2 46 5F |19,38,23,1:...F_|
000006D0: 00 3A 00 E4 46 64 00 E8 3A E7 20 30 2C 31 3A E7 |.:..Fd..:. 0,1:.|
000006E0: 20 34 2C 37 00 F2 46 65 00 99 45 53 24 AA 22 4C | 4,7..Fe..ES$."L|
000006F0: 22 3B 00 14 47 69 00 F9 31 2C C7 28 31 33 33 29 |";..Gi..1,.(133)|
00000700: 3A F9 33 2C C7 28 31 33 34 29 3A F9 35 2C C7 28 |:.3,.(134):.5,.(|
00000710: 31 33 35 29 00 1A 47 6A 00 3A 00 35 47 6B 00 8F |135)..Gj.:.5Gk..|
00000720: 20 20 20 20 20 20 20 20 20 50 52 49 4E 54 20 42 | PRINT B|
00000730: 4F 52 44 45 52 00 3B 47 6C 00 3A 00 7F 47 6E 00 |ORDER.;Gl.:..Gn.|
00000740: 99 22 13 13 93 05 0B 0E 22 54 4C 24 22 DD 9A CC |."......"TL$"...|
00000750: CF C1 C4 D3 D4 C1 D2 20 1C 2D 2D 2D 2D 20 96 31 |....... .---- .1|
00000760: 32 38 20 CD 45 4E 55 20 1C 2D 2D 2D 2D 20 9A C9 |28 .ENU .---- ..|
00000770: 53 53 55 45 20 23 22 49 4E 22 9D 05 DD 22 3B 00 |SSUE #"IN"...";.|
00000780: A6 47 78 00 99 4D 4C 24 3B 3A 81 41 B2 31 A4 31 |.Gx..ML$;:.A.1.1|
00000790: 35 3A 99 22 DD 22 A3 33 39 29 22 DD 22 3B 3A 82 |5:.".".39)".";:.|
000007A0: 3A 99 4D 4C 24 3B 00 DA 47 82 00 81 41 B2 31 A4 |:.ML$;..G...A.1.|
000007B0: 35 3A 99 22 DD 22 A3 33 39 29 22 DD 22 3B 3A 82 |5:.".".39)".";:.|
000007C0: 3A 99 C8 28 42 4C 24 2C C3 28 42 4C 24 29 AB 32 |:..(BL$,.(BL$).2|
000007D0: 29 3B 22 BD 9D 94 C0 13 13 22 00 E0 47 87 00 3A |);"......"..G..:|
000007E0: 00 E8 47 8C 00 8D 37 37 00 EE 47 96 00 3A 00 F8 |..G...77..G..:..|
000007F0: 47 BE 00 8D 31 30 30 30 00 3D 48 C0 00 8B 4E 50 |G...1000.=H...NP|
00000800: B2 2E A7 99 22 11 11 11 11 11 11 11 11 11 9E 20 |....".......... |
00000810: D4 48 45 52 45 20 41 52 45 20 4E 4F 20 31 32 38 |.HERE ARE NO 128|
00000820: 20 50 52 4F 47 52 41 4D 53 20 4F 4E 20 D3 49 44 | PROGRAMS ON .ID|
00000830: 45 22 53 49 22 9D 2E 22 3A 89 32 33 30 00 43 48 |E"SI"..":.230.CH|
00000840: C3 00 3A 00 63 48 C4 00 8F 20 20 50 52 49 4E 54 |..:.cH... PRINT|
00000850: 20 53 49 44 45 20 23 20 26 20 4D 41 49 4E 20 4D | SIDE # & MAIN M|
00000860: 45 4E 55 00 69 48 C5 00 3A 00 71 48 C8 00 8D 37 |ENU.iH..:.qH...7|
00000870: 30 00 77 48 E0 00 3A 00 97 48 E1 00 8F 20 20 20 |0.wH..:..H... |
00000880: 47 45 54 20 41 20 4B 45 59 20 46 4F 52 20 4D 41 |GET A KEY FOR MA|
00000890: 49 4E 20 4D 45 4E 55 00 9D 48 E2 00 3A 00 A8 48 |IN MENU..H..:..H|
000008A0: E6 00 97 32 30 38 2C 2E 00 BE 48 EB 00 41 4E B2 |...208,...H..AN.|
000008B0: 53 45 3A 48 4E B2 4E 50 3A 8D 35 30 30 30 00 CE |SE:HN.NP:.5000..|
000008C0: 48 F0 00 8B 41 24 B2 22 20 22 A7 33 32 30 00 F0 |H...A$." ".320..|
000008D0: 48 F5 00 8B 41 24 B2 22 05 22 A7 45 24 B2 22 CC |H...A$.".".E$.".|
000008E0: CF C1 C4 D3 D4 C1 D2 20 36 34 22 3A 89 32 36 30 |....... 64":.260|
000008F0: 00 12 49 F6 00 8B 41 24 B2 22 02 22 A7 45 24 B2 |..I...A$.".".E$.|
00000900: 22 2D C2 C1 D3 C9 C3 20 37 2E 30 2D 22 3A 89 32 |"-..... 7.0-":.2|
00000910: 37 30 00 21 49 FA 00 53 45 B2 41 4E 3A 89 32 30 |70.!I..SE.AN:.20|
00000920: 30 00 5C 49 04 01 8D 39 35 30 3A 3A 8B 45 58 A7 |0.\I...950::.EX.|
00000930: 9F 31 35 2C 38 2C 31 35 2C 22 55 30 3E 4D 30 22 |.15,8,15,"U0>M0"|
00000940: 3A A0 31 35 3A FE 11 22 4D 41 47 49 43 20 49 49 |:.15:.."MAGIC II|
00000950: 22 3A CB 36 34 3A D5 20 89 31 39 30 00 88 49 0E |":.64:. .190..I.|
00000960: 01 8D 39 35 30 3A 8B 45 58 A7 99 22 13 13 93 99 |..950:.EX.."....|
00000970: 22 3A E7 20 34 2C 31 34 3A E7 20 30 2C 31 32 3A |":. 4,14:. 0,12:|
00000980: 80 3A D5 20 89 31 39 30 00 8E 49 3A 01 3A 00 AA |.:. .190..I:.:..|
00000990: 49 3B 01 8F 20 20 20 20 52 45 41 44 2C 20 52 55 |I;.. READ, RU|
000009A0: 4E 2C 20 4F 52 20 4D 45 4E 55 00 B0 49 3C 01 3A |N, OR MENU..I<.:|
000009B0: 00 B8 49 40 01 8D 37 35 00 C2 49 45 01 8D 31 30 |..I@..75..IE..10|
000009C0: 35 30 00 CD 49 47 01 97 32 30 38 2C 2E 00 E8 49 |50..IG..208,...I|
000009D0: 4A 01 41 4E B2 53 53 3A 48 4E B2 33 3A 8D 35 30 |J.AN.SS:HN.3:.50|
000009E0: 30 30 3A 53 53 B2 41 4E 00 0B 4A 4F 01 8B 4D 24 |00:SS.AN..JO..M$|
000009F0: 28 53 45 2C 33 29 B2 22 52 22 AF 53 53 B2 32 AF |(SE,3)."R".SS.2.|
00000A00: 41 24 B2 22 91 22 A7 53 53 B2 31 00 2E 4A 50 01 |A$.".".SS.1..JP.|
00000A10: 8B 4D 24 28 53 45 2C 33 29 B2 22 52 22 AF 53 53 |.M$(SE,3)."R".SS|
00000A20: B2 32 AF 41 24 B2 22 11 22 A7 53 53 B2 33 00 46 |.2.A$.".".SS.3.F|
00000A30: 4A 54 01 8B 41 24 B3 B1 22 20 22 A7 8D 31 30 37 |JT..A$.." "..107|
00000A40: 30 3A 89 33 33 30 00 5F 4A 5E 01 8B 53 53 B2 33 |0:.330._J^..SS.3|
00000A50: A7 FE 04 22 4F 36 54 36 45 22 3A 89 31 39 30 00 |..."O6T6E":.190.|
00000A60: 6D 4A 68 01 8B 53 53 B2 32 A7 38 30 30 00 7B 4A |mJh..SS.2.800.{J|
00000A70: 72 01 8B 53 53 B2 31 A7 34 30 30 00 84 4A 7C 01 |r..SS.1.400..J|.|
00000A80: 89 33 33 30 00 8A 4A 86 01 3A 00 A0 4A 8B 01 8F |.330..J..:..J...|
00000A90: 20 20 20 20 20 52 45 41 44 20 41 20 46 49 4C 45 | READ A FILE|
00000AA0: 00 A6 4A 8C 01 3A 00 BC 4A 90 01 8B 4D 24 28 53 |..J..:..J...M$(S|
00000AB0: 45 2C 32 29 B2 4C 53 24 A7 34 34 35 00 C2 4A 96 |E,2).LS$.445..J.|
00000AC0: 01 3A 00 F8 4A 97 01 F5 20 22 54 2E 22 AA C8 28 |.:..J... "T."..(|
00000AD0: 4D 24 28 53 45 2C 32 29 2C 31 34 29 AA 22 22 20 |M$(SE,2),14)."" |
00000AE0: A4 20 22 54 2E 22 AA C8 28 4D 24 28 53 45 2C 32 |. "T."..(M$(SE,2|
00000AF0: 29 2C 31 34 29 AA 22 22 00 08 4B 98 01 8B 44 53 |),14).""..K...DS|
00000B00: B3 B1 36 33 A7 39 30 30 00 3B 4B 9A 01 8D 39 30 |..63.900.;K...90|
00000B10: 3A 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 9F CC |:.".............|
00000B20: 4F 41 44 49 4E 47 20 D4 45 58 54 20 C6 49 4C 45 |OADING .EXT .ILE|
00000B30: 20 2E 2E 2E 22 3A 50 4D B2 31 35 00 75 4B A4 01 | ...":PM.15.uK..|
00000B40: 46 49 24 B2 22 54 2E 22 AA 4D 24 28 53 45 2C 32 |FI$."T.".M$(SE,2|
00000B50: 29 3A 46 49 24 B2 C8 28 46 49 24 2C 31 36 29 3A |):FI$..(FI$,16):|
00000B60: E8 31 3A FE 11 20 22 22 AA 46 49 24 AA 22 22 2C |.1:.. "".FI$."",|
00000B70: 50 38 31 39 32 00 B5 4B A9 01 45 41 B2 C2 28 31 |P8192..K..EA..(1|
00000B80: 37 34 29 AA C2 28 31 37 35 29 AC 32 35 36 3A 8F |74)..(175).256:.|
00000B90: 20 20 20 20 20 20 20 20 20 20 45 4E 44 49 4E 47 | ENDING|
00000BA0: 20 41 44 44 52 45 53 53 20 4F 46 20 54 45 58 54 | ADDRESS OF TEXT|
00000BB0: 20 46 49 4C 45 00 DF 4B AE 01 8D 39 30 3A 99 22 | FILE..K...90:."|
00000BC0: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 9F CF 52 47 41 |.............RGA|
00000BD0: 4E 49 5A 49 4E 47 20 D4 45 58 54 2E 2E 2E 22 00 |NIZING .EXT...".|
00000BE0: 13 4C B8 01 8D 33 31 30 30 3A 8F 20 43 48 41 4E |.L...3100:. CHAN|
00000BF0: 47 45 20 48 49 2D 52 45 53 20 44 41 54 41 20 54 |GE HI-RES DATA T|
00000C00: 4F 20 20 20 20 20 54 45 58 54 20 49 4E 20 54 24 |O TEXT IN T$|
00000C10: 28 58 29 00 38 4C BD 01 8D 38 30 3A 99 22 93 9E |(X).8L...80:."..|
00000C20: 22 3B 3A 8D 38 32 3A 81 41 B2 31 A4 31 35 3A 99 |";:.82:.A.1.15:.|
00000C30: 54 24 28 41 29 3B 3A 82 00 62 4C C2 01 4C 53 24 |T$(A);:..bL..LS$|
00000C40: B2 4D 24 28 53 45 2C 32 29 3A 4C 49 B2 31 35 3A |.M$(SE,2):LI.15:|
00000C50: 48 4E B2 48 4C 3A 41 4E B2 4C 49 3A 97 32 30 38 |HN.HL:AN.LI:.208|
00000C60: 2C 2E 00 72 4C CC 01 8D 32 30 30 30 3A 99 22 9E |,..rL...2000:.".|
00000C70: 22 3B 00 83 4C D6 01 97 32 34 34 2C 2E 3A 8D 35 |";..L...244,.:.5|
00000C80: 30 30 30 00 A6 4C DB 01 8B 41 24 B2 22 20 22 A7 |000..L...A$." ".|
00000C90: 8D 38 30 3A 99 22 93 22 3B 3A 8D 37 37 3A 8D 37 |.80:.".";:.77:.7|
00000CA0: 30 3A 89 33 32 30 00 DD 4C E0 01 8B 41 24 B2 22 |0:.320..L...A$."|
00000CB0: 11 22 AF 4C 49 B3 48 4C A7 4C 49 B2 4C 49 AA 31 |.".LI.HL.LI.LI.1|
00000CC0: 3A 8D 38 30 3A 99 53 55 24 3A 8D 38 32 3A 99 42 |:.80:.SU$:.82:.B|
00000CD0: 57 24 54 24 28 4C 49 29 3A 89 34 37 30 00 17 4D |W$T$(LI):.470..M|
00000CE0: EA 01 8B 41 24 B2 22 91 22 AF 4C 49 AB 31 34 B1 |...A$.".".LI.14.|
00000CF0: 31 A7 4C 49 B2 4C 49 AB 31 3A 8D 38 30 3A 99 53 |1.LI.LI.1:.80:.S|
00000D00: 44 24 3A 8D 38 31 3A 99 54 24 28 4C 49 AB 31 34 |D$:.81:.T$(LI.14|
00000D10: 29 3B 3A 89 34 37 30 00 20 4D F4 01 89 34 37 30 |);:.470. M...470|
00000D20: 00 26 4D 20 03 3A 00 3D 4D 25 03 8F 20 20 20 20 |.&M .:.=M%.. |
00000D30: 52 55 4E 20 41 20 50 52 4F 47 52 41 4D 00 43 4D |RUN A PROGRAM.CM|
00000D40: 26 03 3A 00 75 4D 2A 03 F5 20 22 22 AA C8 28 4D |&.:.uM*.. ""..(M|
00000D50: 24 28 53 45 2C 32 29 2C 31 36 29 AA 22 22 20 A4 |$(SE,2),16)."" .|
00000D60: 20 22 22 AA C8 28 4D 24 28 53 45 2C 32 29 2C 31 | ""..(M$(SE,2),1|
00000D70: 36 29 AA 22 22 00 85 4D 2F 03 8B 44 53 B3 B1 36 |6).""..M/..DS..6|
00000D80: 33 A7 39 30 30 00 A7 4D 3E 03 54 4C B2 C3 28 4D |3.900..M>.TL..(M|
00000D90: 24 28 53 45 2C 31 29 29 AA 31 32 3A 54 B2 32 30 |$(SE,1)).12:T.20|
00000DA0: AB 54 4C AD 32 AB 31 00 D2 4D 48 03 8D 39 30 3A |.TL.2.1..MH..90:|
00000DB0: 99 22 11 11 22 A3 54 29 22 9E CC 4F 41 44 49 4E |."..".T)"..OADIN|
00000DC0: 47 20 22 4D 24 28 53 45 2C 31 29 22 20 2E 2E 2E |G "M$(SE,1)" ...|
00000DD0: 99 22 00 E2 4D 52 03 55 24 B2 C8 28 4C 24 2C 54 |."..MR.U$..(L$,T|
00000DE0: 4C 29 00 F1 4D 5C 03 99 A3 54 29 55 24 3A 8D 38 |L)..M\...T)U$:.8|
00000DF0: 30 00 0C 4E 66 03 8A 20 22 22 AA C8 28 4D 24 28 |0..Nf.. ""..(M$(|
00000E00: 53 45 2C 32 29 2C 31 36 29 AA 22 22 00 12 4E 83 |SE,2),16).""..N.|
00000E10: 03 80 00 38 4E 84 03 8D 39 30 3A FE 04 22 4F 32 |...8N...90:.."O2|
00000E20: 45 22 3A 99 22 11 1C C4 49 53 4B 20 C5 52 52 4F |E":."...ISK .RRO|
00000E30: 52 3A 20 96 22 44 53 24 00 50 4E 89 03 99 22 9A |R: ."DS$.PN...".|
00000E40: 22 C8 28 4C 24 2C C3 28 44 53 24 29 AA 31 32 29 |".(L$,.(DS$).12)|
00000E50: 00 84 4E 8E 03 99 22 9F 20 20 20 20 D0 52 45 53 |..N...". .RES|
00000E60: 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 52 45 54 |S ANY KEY TO RET|
00000E70: 55 52 4E 20 54 4F 20 4D 45 4E 55 2E 22 3A 97 32 |URN TO MENU.":.2|
00000E80: 30 38 2C 2E 00 98 4E 98 03 A1 41 24 3A 8B 41 24 |08,...N...A$:.A$|
00000E90: B3 B1 22 22 A7 33 32 35 00 AA 4E A2 03 8B CF 28 |.."".325..N....(|
00000EA0: 32 29 AF 31 32 38 A7 33 32 35 00 B3 4E AC 03 89 |2).128.325..N...|
00000EB0: 39 32 30 00 DC 4E B6 03 45 58 B2 2E 3A 8D 39 30 |920..N..EX..:.90|
00000EC0: 3A 99 22 11 20 20 20 20 20 20 20 20 20 9F C5 58 |:.". ..X|
00000ED0: 49 54 20 54 4F 20 22 45 24 22 3F 22 00 03 4F BB |IT TO "E$"?"..O.|
00000EE0: 03 99 22 11 9E 20 20 20 20 20 20 20 20 20 C1 52 |..".. .R|
00000EF0: 45 20 59 4F 55 20 53 55 52 45 3F 20 20 28 D9 2F |E YOU SURE? (./|
00000F00: CE 29 22 00 2A 4F C0 03 99 22 99 20 20 20 20 20 |.)".*O...". |
00000F10: 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ............|
00000F20: A3 A3 A3 A3 A3 A3 A3 A3 13 22 00 49 4F CA 03 A1 |.........".IO...|
00000F30: 41 24 3A 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 |A$:.A$."Y".A$.".|
00000F40: 22 A7 45 58 B2 AB 31 3A 8E 00 5E 4F D4 03 8B 41 |".EX..1:..^O...A|
00000F50: 24 B2 22 4E 22 B0 41 24 B2 22 CE 22 A7 8E 00 67 |$."N".A$."."...g|
00000F60: 4F DE 03 89 39 37 30 00 6D 4F E2 03 3A 00 8A 4F |O...970.mO..:..O|
00000F70: E3 03 8F 20 20 20 20 20 49 4E 53 54 52 55 43 54 |... INSTRUCT|
00000F80: 49 4F 4E 20 57 49 4E 44 4F 57 00 90 4F E4 03 3A |ION WINDOW..O..:|
00000F90: 00 CC 4F E8 03 8D 39 30 3A 8B 4E 50 B1 31 A7 99 |..O...90:.NP.1..|
00000FA0: 22 20 20 20 9F CA CF D9 D3 D4 C9 C3 CB 20 9A 41 |" ......... .A|
00000FB0: 4E 44 20 9F C3 D5 D2 D3 CF D2 20 CB C5 D9 D3 9A |ND ....... .....|
00000FC0: 20 53 43 52 4F 4C 4C 3B 22 3A D5 99 00 09 50 F2 | SCROLL;":....P.|
00000FD0: 03 8B 4E 50 B1 2E A7 99 22 9F D2 C5 D4 D5 D2 CE |..NP....".......|
00000FE0: 9A 2C 20 9F D3 D0 C1 C3 C5 9A 2C 20 41 4E 44 20 |., ......., AND |
00000FF0: 9F C6 C9 D2 C5 C2 D5 D4 D4 CF CE 20 9A 53 45 4C |........... .SEL|
00001000: 45 43 54 53 2E 22 3A D5 99 00 0F 50 F7 03 99 00 |ECTS.":....P....|
00001010: 40 50 FC 03 99 22 9A D0 52 45 53 53 3A 20 20 9F |@P..."..RESS: .|
00001020: C3 D4 D2 CC 20 C5 9A 20 54 4F 20 45 58 49 54 20 |.... .. TO EXIT |
00001030: 54 4F 20 CC CF C1 C4 D3 D4 C1 D2 20 36 34 2E 22 |TO ........ 64."|
00001040: 00 76 50 06 04 99 22 20 20 20 20 20 20 20 20 9F |.vP..." .|
00001050: C3 D4 D2 CC 20 C2 9A 20 54 4F 20 45 58 49 54 20 |.... .. TO EXIT |
00001060: 54 4F 20 C2 C1 D3 C9 C3 20 37 2E 30 2E 13 13 22 |TO ..... 7.0..."|
00001070: 3A 8D 38 30 3A 8E 00 7C 50 0F 04 3A 00 82 50 10 |:.80:..|P..:..P.|
00001080: 04 8F 00 88 50 11 04 3A 00 C7 50 1A 04 FE 04 22 |....P..:..P...."|
00001090: 4F 36 54 36 46 22 3A 8D 39 30 3A 53 53 B2 31 3A |O6T6F":.90:SS.1:|
000010A0: 99 22 9E D0 4C 45 41 53 45 20 43 48 4F 4F 53 45 |."..LEASE CHOOSE|
000010B0: 20 4F 4E 45 20 4F 46 20 54 48 45 20 46 4F 4C 4C | ONE OF THE FOLL|
000010C0: 4F 57 49 4E 47 3A 22 00 FB 50 24 04 99 22 99 A3 |OWING:"..P$.."..|
000010D0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000010E0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000010F0: A3 A3 22 3A 8D 31 30 37 30 3A 8E 00 28 51 2E 04 |..":.1070:..(Q..|
00001100: 4F 4B B2 AB 31 3A 99 22 13 11 11 22 3B 3A 81 41 |OK..1:."...";:.A|
00001110: B2 31 A4 33 3A 8B 53 53 B2 41 A7 99 22 9E 22 3B |.1.3:.SS.A..".";|
00001120: 3A D5 20 99 22 9A 22 3B 00 38 51 38 04 99 A3 31 |:. .".";.8Q8...1|
00001130: 31 29 53 45 24 28 41 29 00 56 51 3D 04 8B 4D 24 |1)SE$(A).VQ=..M$|
00001140: 28 53 45 2C 33 29 B2 22 52 22 AF 4F 4B A7 41 B2 |(SE,3)."R".OK.A.|
00001150: 32 3A 4F 4B B2 2E 00 5E 51 42 04 82 3A 8E 00 92 |2:OK...^QB..:...|
00001160: 51 D0 07 8D 39 30 3A 99 22 11 20 20 20 9F CA CF |Q...90:.". ...|
00001170: D9 D3 D4 C9 C3 CB 20 9A 41 4E 44 20 9F C3 D5 D2 |...... .AND ....|
00001180: D3 CF D2 20 CB C5 D9 D3 9A 20 53 43 52 4F 4C 4C |... ..... SCROLL|
00001190: 3B 22 00 C5 51 DA 07 99 22 11 20 9F D2 C5 D4 D5 |;"..Q...". .....|
000011A0: D2 CE 9A 2C 20 9F D3 D0 C1 C3 C5 9A 2C 20 41 4E |..., ......., AN|
000011B0: 44 20 9F C6 C9 D2 C5 C2 D5 D4 D4 CF CE 20 9A 45 |D ........... .E|
000011C0: 58 49 54 2E 22 00 CB 51 DF 07 8E 00 EC 51 F4 0B |XIT."..Q.....Q..|
000011D0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000011E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2F 52 1C |************./R.|
000011F0: 0C 97 32 35 31 2C 2E 3A 97 32 35 32 2C 31 34 3A |..251,.:.252,14:|
00001200: 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00001210: 20 50 4F 49 4E 54 45 52 20 46 4F 52 20 4D 45 4D | POINTER FOR MEM|
00001220: 4D 4F 56 45 2E 4F 20 20 20 5B 33 35 38 34 5D 00 |MOVE.O [3584].|
00001230: 72 52 26 0C 97 32 35 33 2C 2E 3A 97 32 35 34 2C |rR&..253,.:.254,|
00001240: 33 32 3A 8F 20 20 20 20 20 20 20 20 20 20 20 20 |32:. |
00001250: 20 20 20 20 50 4F 49 4E 54 45 52 20 46 4F 52 20 | POINTER FOR |
00001260: 4D 45 4D 4D 4F 56 45 2E 4F 20 20 20 5B 38 31 39 |MEMMOVE.O [819|
00001270: 32 5D 00 82 52 30 0C 48 4C B2 2E 3A 4C 4C 24 B2 |2]..R0.HL..:LL$.|
00001280: 22 22 00 C5 52 3A 0C 48 4C B2 48 4C AA 31 3A 9E |""..R:.HL.HL.1:.|
00001290: 34 30 33 32 3A 8F 20 43 4F 50 59 20 48 49 2D 52 |4032:. COPY HI-R|
000012A0: 45 53 20 20 20 20 20 20 20 20 20 44 41 54 41 20 |ES DATA |
000012B0: 54 4F 20 53 50 52 49 54 45 20 31 20 44 41 54 41 |TO SPRITE 1 DATA|
000012C0: 20 41 52 45 41 00 08 53 44 0C FE 16 20 31 2C 41 | AREA..SD... 1,A|
000012D0: 24 3A 41 24 B2 C8 28 41 24 2C 36 33 29 3A 8F 20 |$:A$..(A$,63):. |
000012E0: 20 20 20 20 20 20 20 20 43 4F 50 59 20 44 41 54 | COPY DAT|
000012F0: 41 20 49 4E 20 53 50 52 49 54 45 20 31 20 41 52 |A IN SPRITE 1 AR|
00001300: 45 41 20 54 4F 20 41 24 00 6F 53 49 0C 41 24 B2 |EA TO A$.oSI.A$.|
00001310: 4C 4C 24 AA 41 24 3A 8F 20 20 2B 43 48 52 24 28 |LL$.A$:. +CHR$(|
00001320: 50 45 45 4B 28 50 45 45 4B 28 32 35 33 29 2B 50 |PEEK(PEEK(253)+P|
00001330: 45 45 4B 28 32 35 34 29 2A 32 35 36 2D 31 29 29 |EEK(254)*256-1))|
00001340: 3A 52 45 4D 20 41 44 44 20 41 4E 59 20 42 59 54 |:REM ADD ANY BYT|
00001350: 45 53 20 20 20 20 20 20 20 20 20 4C 45 46 54 20 |ES LEFT |
00001360: 46 52 4F 4D 20 4C 41 53 54 20 47 52 4F 55 50 00 |FROM LAST GROUP.|
00001370: D1 53 4E 0C 43 52 B2 D4 28 41 24 2C C7 28 31 33 |.SN.CR..(A$,.(13|
00001380: 29 29 3A 54 24 28 48 4C 29 B2 C8 28 41 24 2C 43 |)):T$(HL)..(A$,C|
00001390: 52 29 3A 8B C8 28 54 24 28 48 4C 29 2C 33 29 B2 |R):..(T$(HL),3).|
000013A0: 22 5E 55 3A 22 A7 48 4C B2 48 4C AB 31 3A 8F 20 |"^U:".HL.HL.1:. |
000013B0: 49 46 20 4C 49 4E 45 20 49 53 20 22 5E 55 3A 3F |IF LINE IS "^U:?|
000013C0: 3F 3F 3F 3F 22 2C 20 46 4F 52 47 45 54 20 49 54 |????", FORGET IT|
000013D0: 21 00 0D 54 58 0C 8B 28 C2 28 32 35 33 29 AA C2 |!..TX..(.(253)..|
000013E0: 28 32 35 34 29 AC 32 35 36 B1 B2 45 41 29 AF 43 |(254).256..EA).C|
000013F0: 52 B2 2E A7 8E 3A 8F 20 43 48 45 43 4B 20 46 4F |R....:. CHECK FO|
00001400: 52 20 45 4E 44 20 4F 46 20 46 49 4C 45 00 28 54 |R END OF FILE.(T|
00001410: 62 0C 8B 43 52 B2 C3 28 41 24 29 A7 4C 4C 24 B2 |b..CR..(A$).LL$.|
00001420: 22 22 3A 89 33 31 33 30 00 5E 54 6C 0C 41 24 B2 |"":.3130.^Tl.A$.|
00001430: C9 28 41 24 2C C3 28 41 24 29 AB 43 52 29 3A 8B |.(A$,.(A$).CR):.|
00001440: 28 D4 28 41 24 2C C7 28 31 33 29 29 B3 B1 2E 29 |(.(A$,.(13))...)|
00001450: A7 48 4C B2 48 4C AA 31 3A 89 33 31 35 30 00 6F |.HL.HL.1:.3150.o|
00001460: 54 76 0C 4C 4C 24 B2 41 24 3A 89 33 31 33 30 00 |Tv.LL$.A$:.3130.|
00001470: 75 54 88 13 3A 00 8F 54 89 13 8F 20 20 20 47 45 |uT..:..T... GE|
00001480: 54 20 41 20 4B 45 59 20 52 4F 55 54 49 4E 45 00 |T A KEY ROUTINE.|
00001490: 95 54 8A 13 3A 00 AA 54 8D 13 A1 41 24 3A 8B 41 |.T..:..T...A$:.A|
000014A0: 24 B3 B1 22 22 A7 35 30 33 30 00 C0 54 92 13 8B |$.."".5030..T...|
000014B0: CF 28 32 29 B2 2E B0 4E 50 B2 2E A7 35 30 30 35 |.(2)...NP...5005|
000014C0: 00 CA 54 9C 13 89 35 30 37 30 00 E9 54 A6 13 8B |..T...5070..T...|
000014D0: 41 24 B2 22 11 22 AF 41 4E B3 48 4E AF 4E 50 A7 |A$.".".AN.HN.NP.|
000014E0: 41 4E B2 41 4E AA 31 3A 8E 00 17 55 B0 13 8B 28 |AN.AN.1:...U...(|
000014F0: 41 24 B2 22 91 22 B0 41 24 B2 22 1D 22 29 AF 41 |A$.".".A$.".").A|
00001500: 4E B1 31 AF 4E 50 A7 41 4E B2 41 4E AB 31 3A 41 |N.1.NP.AN.AN.1:A|
00001510: 24 B2 22 91 22 3A 8E 00 3A 55 BA 13 8B 28 41 24 |$.".":..:U...(A$|
00001520: B2 22 20 22 B0 41 24 B2 C7 28 31 33 29 29 AF 4E |." ".A$..(13)).N|
00001530: 50 A7 41 24 B2 22 20 22 3A 8E 00 4F 55 BF 13 8B |P.A$." ":..OU...|
00001540: 41 24 B2 22 05 22 B0 41 24 B2 22 02 22 A7 8E 00 |A$.".".A$."."...|
00001550: 5D 55 C4 13 8D 34 35 3A 89 35 30 31 30 00 76 55 |]U...45:.5010.vU|
00001560: CE 13 8B CF 28 32 29 B2 31 A7 41 24 B2 22 91 22 |....(2).1.A$."."|
00001570: 3A 89 35 30 34 30 00 8F 55 D8 13 8B CF 28 32 29 |:.5040..U....(2)|
00001580: B2 35 A7 41 24 B2 22 11 22 3A 89 35 30 33 30 00 |.5.A$.".":.5030.|
00001590: AA 55 E2 13 8B CF 28 32 29 AF 31 32 38 A7 41 24 |.U....(2).128.A$|
000015A0: B2 22 20 22 3A 89 35 30 35 30 00 B8 55 E7 13 8D |." ":.5050..U...|
000015B0: 34 35 3A 89 35 30 30 35 00 00 00 |45:.5005... |
.@.@...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.47:NP.0:SI.1:
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..:.MC... "SCREEN SAVE 128",SCRE
EN SAVE 128,E..C... "VARIABLE FINDER 128
",VAR FINDER 128,E.KD,..
BOINK!
:.{D-..J.4.7:.53265,(B
(53265).248).J:.A.1.10:.A,J..D/..J...3:.
53265,(B(53265).248).J:.A.1.10:.A,J:.."O
6 A":.208,.:..CD0.:..D2.. SELECTION
DATA :..E4.. "READ IT."
..E5.. "RUN IT.".'E6.. "BACK TO MENU..".
PE8.: .................
.XE9.. LAST SELECTION MUST CONTAIN A "."
..E:.: AT THE . OF ITS NAME...E;.:.MEF
..".......":.A.1.NP:.A.SE..".".TA)M$(A,1
):.73..EH...TA)"."M$(A,1)..EI..:...EJ.:.
.FK..".":.I.1.SE.5:.".";:.:."..".TA)M$(S
E,1):..$FL.:.QFM..80:..13)".************
":..13)"* .SIDE"SI". .*":..13)"*******
*****...".WFO.:..FP... 1,3,38,17:...FQ..
. 1,3,39,17:...FR... 1,3,39,19:...FU.:.L
FZ... 1,19,38,23,1:..RF_.:..FD..:. 0,1:.
4,7..FE..ES$."L";..GI..1,G(133):.3,G(13
4):.5,G(135)..GJ.:.5GK.. PRINT B
ORDER.;GL.:.GN.."......"TL$"..LOADSTAR
.---- .128 MENU .---- .ISSUE #"IN"...";.
.GX..ML$;:.A.1.15:.".".39)".";:.:.ML$;.Z
G...A.1.5:.".".39)".";:.:.H(BL$,C(BL$).2
);"......"..G..:..G...77..G..:..G...1000
.=H...NP....".......... THERE ARE NO 128
PROGRAMS ON SIDE"SI"..":.230.CHC.:.CHD.
. PRINT SIDE # & MAIN MENU.IHE.:.QHH..7
0.WH..:..H... GET A KEY FOR MAIN MENU.
.H..:..H...208,...H..AN.SE:HN.NP:.5000.N
H...A$." ".320..H...A$.".".E$."LOADSTAR
64":.260..I...A$.".".E$."-BASIC 7.0-":.2
70.!I..SE.AN:.200.\I...950::.EX..15,8,15
,"U0>M0": 15:.."MAGIC II":K64:U .190..I.
..950:.EX.."....":. 4,14:. 0,12:.:U .190
..I:.:..I;.. READ, RUN, OR MENU..I<.:
..I@..75.BIE..1050.MIG..208,...IJ.AN.SS:
HN.3:.5000:SS.AN..JO..M$(SE,3)."R".SS.2.
A$.".".SS.1..JP..M$(SE,3)."R".SS.2.A$.".
".SS.3.FJT..A$.." "..1070:.330._J^..SS.3
..."O6T6E":.190.MJH..SS.2.800.{JR..SS.1.
400..J|..330..J..:. J... READ A FILE
..J..:..J...M$(SE,2).LS$.445.BJ..:..J...
"T.".H(M$(SE,2),14)."" . "T.".H(M$(SE,2
),14).""..K...DS..63.900.;K...90:.".....
.......LOADING TEXT FILE ...":PM.15.UK..
FI$."T.".M$(SE,2):FI$.H(FI$,16):.1:.. ""
.FI$."",P8192..K..EA.B(174).B(175).256:.
ENDING ADDRESS OF TEXT FILE..K
...90:."............ORGANIZING TEXT...".
.L...3100:. CHANGE HI-RES DATA TO TE
XT IN T$(X).8L...80:."..";:.82:.A.1.15:.
T$(A);:..BLB.LS$.M$(SE,2):LI.15:HN.HL:AN
.LI:.208,..RLL..2000:.".";..LV..244,.:.5
000..L...A$." "..80:.".";:.77:.70:.320..
L...A$.".".LI.HL.LI.LI.1:.80:.SU$:.82:.B
W$T$(LI):.470..M...A$.".".LI.14.1.LI.LI.
1:.80:.SD$:.81:.T$(LI.14);:.470. M...470
.&M .:.=M%.. RUN A PROGRAM.CM&.:.UM*.
. "".H(M$(SE,2),16)."" . "".H(M$(SE,2),1
6).""..M/..DS..63.900..M>.TL.C(M$(SE,1))
.12:T.20.TL.2.1.RMH..90:."..".T)".LOADIN
G "M$(SE,1)" ...."..MR.U$.H(L$,TL)..M\..
.T)U$:.80..NF.. "".H(M$(SE,2),16).""..N.
...8N...90:.."O2E":."..DISK ERROR: ."DS$
.PN..."."H(L$,C(DS$).12)..N...". PRES
S ANY KEY TO RETURN TO MENU.":.208,...N.
..A$:.A$.."".325..N...O(2).128.325..N...
920..N..EX..:.90:.". .EXIT TO "E
$"?"..O...".. ARE YOU SURE? (Y/
N)".*O...". ....................
.".IOJ..A$:.A$."Y".A$."Y".EX..1:..^OT..A
$."N".A$."N"...GO...970.MO..:..O...
INSTRUCTION WINDOW..O..:.LO...90:.NP.1..
" .JOYSTICK .AND .CURSOR KEYS. SCROLL;
":U...P...NP....".RETURN., .SPACE., AND
.FIREBUTTON .SELECTS.":U...P....@P...".P
RESS: .CTRL E. TO EXIT TO LOADSTAR 64."
.VP..." .CTRL B. TO EXIT TO BASIC
7.0...":.80:..|P..:..P.....P..:.GP...."
O6T6F":.90:SS.1:.".PLEASE CHOOSE ONE OF
THE FOLLOWING:"..P$.."..................
..................":.1070:..(Q..OK..1:."
...";:.A.1.3:.SS.A..".";:U .".";.8Q8...1
1)SE$(A).VQ=..M$(SE,3)."R".OK.A.2:OK...^
QB..:...QP..90:.". .JOYSTICK .AND .CUR
SOR KEYS. SCROLL;".EQZ..". .RETURN., .SP
ACE., AND .FIREBUTTON .EXIT.".KQ.....Q..
. **************************./R...251,.:
.252,14:. POINTER FOR MEM
MOVE.O [3584].RR&..253,.:.254,32:.
POINTER FOR MEMMOVE.O [819
2]..R0.HL..:LL$."".ER:.HL.HL.1:.4032:. C
OPY HI-RES DATA TO SPRITE 1 DATA
AREA..SD... 1,A$:A$.H(A$,63):.
COPY DATA IN SPRITE 1 AREA TO A$.OSI.A$.
LL$.A$:. +CHR$(PEEK(PEEK(253)+PEEK(254)
*256-1)):REM ADD ANY BYTES LEFT
FROM LAST GROUP.QSN.CR.T(A$,G(13)):T$(HL
).H(A$,CR):.H(T$(HL),3)."^U:".HL.HL.1:.
IF LINE IS "^U:?????", FORGET IT!..TX..(
B(253).B(254).256..EA).CR....:. CHECK FO
R END OF FILE.(TB..CR.C(A$).LL$."":.3130
.^TL.A$.I(A$,C(A$).CR):.(T(A$,G(13))...)
.HL.HL.1:.3150.OTV.LL$.A$:.3130.UT..:..T
... GET A KEY ROUTINE..T..:..T...A$:.A
$.."".5030..T...O(2)...NP...5005.JT...50
70..T...A$.".".AN.HN.NP.AN.AN.1:...U...(
A$.".".A$.".").AN.1.NP.AN.AN.1:A$.".":..
:U...(A$." ".A$.G(13)).NP.A$." ":..OU...
A$.".".A$."."...]UD..45:.5010.VUN..O(2).
1.A$.".":.5040..UX..O(2).5.A$.".":.5030.
.U...O(2).128.A$." ":.5050..U...45:.5005
...
> CLICK IMAGE PREVIEW FOR FULL MODAL