128 MENU
FILE INFORMATION
FILENAME(S): 128 MENU
FILE TYPE(S): PRG
FILE SIZE: 5.4K
FIRST SEEN: 2025-11-30 18:12:19
APPEARS ON: 1 disk(s)
FILE HASH
5a7ef7d847b9ce9a3a5547fc79b0c56205021d74a8f02495c94fac4d532a40e5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 45 S 4 | 128 MENU | PRG | Sailor, Ganheden | 23 | 14 | 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 35 3A 4E 50 B2 30 3A 53 49 B2 34 3A |IN.45:NP.0:SI.4:|
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 F8 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 20 31 32 38 2C 45 00 49 44 2C 00 8F 20 20 |ND 128,E.ID,.. |
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 42 4F | BO|
00000430: 49 4E 4B 21 20 20 20 20 20 20 20 20 20 20 20 20 |INK! |
00000440: 20 20 20 20 20 20 20 20 3A 00 79 44 2D 00 81 4A | :.yD-..J|
00000450: B2 34 A4 37 3A 97 35 33 32 36 35 2C 28 C2 28 35 |.4.7:.53265,(.(5|
00000460: 33 32 36 35 29 AF 32 34 38 29 B0 4A 3A 81 41 B2 |3265).248).J:.A.|
00000470: 31 A4 31 30 3A 82 41 2C 4A 00 BB 44 2F 00 81 4A |1.10:.A,J..D/..J|
00000480: B2 2E A4 33 3A 97 35 33 32 36 35 2C 28 C2 28 35 |...3:.53265,(.(5|
00000490: 33 32 36 35 29 AF 32 34 38 29 B0 4A 3A 81 41 B2 |3265).248).J:.A.|
000004A0: 31 A4 31 30 3A 82 41 2C 4A 3A FE 04 22 4F 36 20 |1.10:.A,J:.."O6 |
000004B0: 41 22 3A 97 32 30 38 2C 2E 3A 8E 00 C1 44 30 00 |A":.208,.:...D0.|
000004C0: 3A 00 ED 44 32 00 8F 20 20 20 20 20 20 53 45 4C |:..D2.. SEL|
000004D0: 45 43 54 49 4F 4E 20 44 41 54 41 20 20 20 20 20 |ECTION DATA |
000004E0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 00 FE 44 | :..D|
000004F0: 34 00 83 20 22 D2 45 41 44 20 49 54 2E 22 00 0E |4.. ".EAD IT."..|
00000500: 45 35 00 83 20 22 D2 55 4E 20 49 54 2E 22 00 25 |E5.. ".UN IT.".%|
00000510: 45 36 00 83 20 22 C2 41 43 4B 20 54 4F 20 4D 45 |E6.. ".ACK TO ME|
00000520: 4E 55 2E 13 22 00 4E 45 38 00 3A 20 20 20 20 20 |NU..".NE8.: |
00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 AE 2E 2E | ...|
00000540: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E AA 00 76 |...............v|
00000550: 45 39 00 8F 20 4C 41 53 54 20 53 45 4C 45 43 54 |E9.. LAST SELECT|
00000560: 49 4F 4E 20 4D 55 53 54 20 43 4F 4E 54 41 49 4E |ION MUST CONTAIN|
00000570: 20 41 20 22 13 22 00 94 45 3A 00 3A 20 20 20 41 | A "."..E:.: A|
00000580: 54 20 54 48 45 20 80 20 4F 46 20 49 54 53 20 4E |T THE . OF ITS N|
00000590: 41 4D 45 2E 00 9A 45 3B 00 3A 00 CB 45 46 00 99 |AME...E;.:..EF..|
000005A0: 22 13 11 11 11 11 11 11 22 3A 81 41 B2 31 A4 4E |".......":.A.1.N|
000005B0: 50 3A 8B 41 B2 53 45 A7 99 22 9E 22 A3 54 41 29 |P:.A.SE..".".TA)|
000005C0: 4D 24 28 41 2C 31 29 3A 89 37 33 00 DF 45 48 00 |M$(A,1):.73..EH.|
000005D0: 99 A3 54 41 29 22 81 22 4D 24 28 41 2C 31 29 00 |..TA)"."M$(A,1).|
000005E0: E7 45 49 00 82 3A 8E 00 ED 45 4A 00 3A 00 1C 46 |.EI..:...EJ.:..F|
000005F0: 4B 00 99 22 13 22 3A 81 49 B2 31 A4 53 45 AA 35 |K..".":.I.1.SE.5|
00000600: 3A 99 22 11 22 3B 3A 82 3A 99 22 12 9E 22 A3 54 |:.".";:.:."..".T|
00000610: 41 29 4D 24 28 53 45 2C 31 29 3A 8E 00 22 46 4C |A)M$(SE,1):.."FL|
00000620: 00 3A 00 6F 46 4D 00 8D 38 30 3A 99 A3 31 33 29 |.:.oFM..80:..13)|
00000630: 22 1E 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A |".************":|
00000640: 99 A3 31 33 29 22 2A 20 20 99 D3 49 44 45 22 53 |..13)"* ..IDE"S|
00000650: 49 22 9D 20 20 1E 2A 22 3A 99 A3 31 33 29 22 2A |I". .*":..13)"*|
00000660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 11 11 9E 22 00 |***********...".|
00000670: 75 46 4F 00 3A 00 88 46 50 00 FE 1A 20 31 2C 33 |uFO.:..FP... 1,3|
00000680: 2C 33 38 2C 31 37 3A 8E 00 9B 46 51 00 FE 1A 20 |,38,17:...FQ... |
00000690: 31 2C 33 2C 33 39 2C 31 37 3A 8E 00 AE 46 52 00 |1,3,39,17:...FR.|
000006A0: FE 1A 20 31 2C 33 2C 33 39 2C 31 39 3A 8E 00 B4 |.. 1,3,39,19:...|
000006B0: 46 55 00 3A 00 CA 46 5A 00 FE 1A 20 31 2C 31 39 |FU.:..FZ... 1,19|
000006C0: 2C 33 38 2C 32 33 2C 31 3A 8E 00 D0 46 5F 00 3A |,38,23,1:...F_.:|
000006D0: 00 E2 46 64 00 E8 3A E7 20 30 2C 31 3A E7 20 34 |..Fd..:. 0,1:. 4|
000006E0: 2C 37 00 F0 46 65 00 99 45 53 24 AA 22 4C 22 3B |,7..Fe..ES$."L";|
000006F0: 00 12 47 69 00 F9 31 2C C7 28 31 33 33 29 3A F9 |..Gi..1,.(133):.|
00000700: 33 2C C7 28 31 33 34 29 3A F9 35 2C C7 28 31 33 |3,.(134):.5,.(13|
00000710: 35 29 00 18 47 6A 00 3A 00 33 47 6B 00 8F 20 20 |5)..Gj.:.3Gk.. |
00000720: 20 20 20 20 20 20 20 50 52 49 4E 54 20 42 4F 52 | PRINT BOR|
00000730: 44 45 52 00 39 47 6C 00 3A 00 7D 47 6E 00 99 22 |DER.9Gl.:.}Gn.."|
00000740: 13 13 93 05 0B 0E 22 54 4C 24 22 DD 9A CC CF C1 |......"TL$".....|
00000750: C4 D3 D4 C1 D2 20 1C 2D 2D 2D 2D 20 96 31 32 38 |..... .---- .128|
00000760: 20 CD 45 4E 55 20 1C 2D 2D 2D 2D 20 9A C9 53 53 | .ENU .---- ..SS|
00000770: 55 45 20 23 22 49 4E 22 9D 05 DD 22 3B 00 A4 47 |UE #"IN"...";..G|
00000780: 78 00 99 4D 4C 24 3B 3A 81 41 B2 31 A4 31 35 3A |x..ML$;:.A.1.15:|
00000790: 99 22 DD 22 A3 33 39 29 22 DD 22 3B 3A 82 3A 99 |.".".39)".";:.:.|
000007A0: 4D 4C 24 3B 00 D8 47 82 00 81 41 B2 31 A4 35 3A |ML$;..G...A.1.5:|
000007B0: 99 22 DD 22 A3 33 39 29 22 DD 22 3B 3A 82 3A 99 |.".".39)".";:.:.|
000007C0: C8 28 42 4C 24 2C C3 28 42 4C 24 29 AB 32 29 3B |.(BL$,.(BL$).2);|
000007D0: 22 BD 9D 94 C0 13 13 22 00 DE 47 87 00 3A 00 E6 |"......"..G..:..|
000007E0: 47 8C 00 8D 37 37 00 EC 47 96 00 3A 00 F6 47 BE |G...77..G..:..G.|
000007F0: 00 8D 31 30 30 30 00 3B 48 C0 00 8B 4E 50 B2 2E |..1000.;H...NP..|
00000800: A7 99 22 11 11 11 11 11 11 11 11 11 9E 20 D4 48 |..".......... .H|
00000810: 45 52 45 20 41 52 45 20 4E 4F 20 31 32 38 20 50 |ERE ARE NO 128 P|
00000820: 52 4F 47 52 41 4D 53 20 4F 4E 20 D3 49 44 45 22 |ROGRAMS ON .IDE"|
00000830: 53 49 22 9D 2E 22 3A 89 32 33 30 00 41 48 C3 00 |SI"..":.230.AH..|
00000840: 3A 00 61 48 C4 00 8F 20 20 50 52 49 4E 54 20 53 |:.aH... PRINT S|
00000850: 49 44 45 20 23 20 26 20 4D 41 49 4E 20 4D 45 4E |IDE # & MAIN MEN|
00000860: 55 00 67 48 C5 00 3A 00 6F 48 C8 00 8D 37 30 00 |U.gH..:.oH...70.|
00000870: 75 48 E0 00 3A 00 95 48 E1 00 8F 20 20 20 47 45 |uH..:..H... GE|
00000880: 54 20 41 20 4B 45 59 20 46 4F 52 20 4D 41 49 4E |T A KEY FOR MAIN|
00000890: 20 4D 45 4E 55 00 9B 48 E2 00 3A 00 A6 48 E6 00 | MENU..H..:..H..|
000008A0: 97 32 30 38 2C 2E 00 BC 48 EB 00 41 4E B2 53 45 |.208,...H..AN.SE|
000008B0: 3A 48 4E B2 4E 50 3A 8D 35 30 30 30 00 CC 48 F0 |:HN.NP:.5000..H.|
000008C0: 00 8B 41 24 B2 22 20 22 A7 33 32 30 00 EE 48 F5 |..A$." ".320..H.|
000008D0: 00 8B 41 24 B2 22 05 22 A7 45 24 B2 22 CC CF C1 |..A$.".".E$."...|
000008E0: C4 D3 D4 C1 D2 20 36 34 22 3A 89 32 36 30 00 10 |..... 64":.260..|
000008F0: 49 F6 00 8B 41 24 B2 22 02 22 A7 45 24 B2 22 2D |I...A$.".".E$."-|
00000900: C2 C1 D3 C9 C3 20 37 2E 30 2D 22 3A 89 32 37 30 |..... 7.0-":.270|
00000910: 00 1F 49 FA 00 53 45 B2 41 4E 3A 89 32 30 30 00 |..I..SE.AN:.200.|
00000920: 5A 49 04 01 8D 39 35 30 3A 3A 8B 45 58 A7 9F 31 |ZI...950::.EX..1|
00000930: 35 2C 38 2C 31 35 2C 22 55 30 3E 4D 30 22 3A A0 |5,8,15,"U0>M0":.|
00000940: 31 35 3A FE 11 22 4D 41 47 49 43 20 49 49 22 3A |15:.."MAGIC II":|
00000950: CB 36 34 3A D5 20 89 31 39 30 00 86 49 0E 01 8D |.64:. .190..I...|
00000960: 39 35 30 3A 8B 45 58 A7 99 22 13 13 93 99 22 3A |950:.EX.."....":|
00000970: E7 20 34 2C 31 34 3A E7 20 30 2C 31 32 3A 80 3A |. 4,14:. 0,12:.:|
00000980: D5 20 89 31 39 30 00 8C 49 3A 01 3A 00 A8 49 3B |. .190..I:.:..I;|
00000990: 01 8F 20 20 20 20 52 45 41 44 2C 20 52 55 4E 2C |.. READ, RUN,|
000009A0: 20 4F 52 20 4D 45 4E 55 00 AE 49 3C 01 3A 00 B6 | OR MENU..I<.:..|
000009B0: 49 40 01 8D 37 35 00 C0 49 45 01 8D 31 30 35 30 |I@..75..IE..1050|
000009C0: 00 CB 49 47 01 97 32 30 38 2C 2E 00 E6 49 4A 01 |..IG..208,...IJ.|
000009D0: 41 4E B2 53 53 3A 48 4E B2 33 3A 8D 35 30 30 30 |AN.SS:HN.3:.5000|
000009E0: 3A 53 53 B2 41 4E 00 09 4A 4F 01 8B 4D 24 28 53 |:SS.AN..JO..M$(S|
000009F0: 45 2C 33 29 B2 22 52 22 AF 53 53 B2 32 AF 41 24 |E,3)."R".SS.2.A$|
00000A00: B2 22 91 22 A7 53 53 B2 31 00 2C 4A 50 01 8B 4D |.".".SS.1.,JP..M|
00000A10: 24 28 53 45 2C 33 29 B2 22 52 22 AF 53 53 B2 32 |$(SE,3)."R".SS.2|
00000A20: AF 41 24 B2 22 11 22 A7 53 53 B2 33 00 44 4A 54 |.A$.".".SS.3.DJT|
00000A30: 01 8B 41 24 B3 B1 22 20 22 A7 8D 31 30 37 30 3A |..A$.." "..1070:|
00000A40: 89 33 33 30 00 5D 4A 5E 01 8B 53 53 B2 33 A7 FE |.330.]J^..SS.3..|
00000A50: 04 22 4F 36 54 36 45 22 3A 89 31 39 30 00 6B 4A |."O6T6E":.190.kJ|
00000A60: 68 01 8B 53 53 B2 32 A7 38 30 30 00 79 4A 72 01 |h..SS.2.800.yJr.|
00000A70: 8B 53 53 B2 31 A7 34 30 30 00 82 4A 7C 01 89 33 |.SS.1.400..J|..3|
00000A80: 33 30 00 88 4A 86 01 3A 00 9E 4A 8B 01 8F 20 20 |30..J..:..J... |
00000A90: 20 20 20 52 45 41 44 20 41 20 46 49 4C 45 00 A4 | READ A FILE..|
00000AA0: 4A 8C 01 3A 00 BA 4A 90 01 8B 4D 24 28 53 45 2C |J..:..J...M$(SE,|
00000AB0: 32 29 B2 4C 53 24 A7 34 34 35 00 C0 4A 96 01 3A |2).LS$.445..J..:|
00000AC0: 00 F6 4A 97 01 F5 20 22 54 2E 22 AA C8 28 4D 24 |..J... "T."..(M$|
00000AD0: 28 53 45 2C 32 29 2C 31 34 29 AA 22 22 20 A4 20 |(SE,2),14)."" . |
00000AE0: 22 54 2E 22 AA C8 28 4D 24 28 53 45 2C 32 29 2C |"T."..(M$(SE,2),|
00000AF0: 31 34 29 AA 22 22 00 06 4B 98 01 8B 44 53 B3 B1 |14).""..K...DS..|
00000B00: 36 33 A7 39 30 30 00 39 4B 9A 01 8D 39 30 3A 99 |63.900.9K...90:.|
00000B10: 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 9F CC 4F 41 |".............OA|
00000B20: 44 49 4E 47 20 D4 45 58 54 20 C6 49 4C 45 20 2E |DING .EXT .ILE .|
00000B30: 2E 2E 22 3A 50 4D B2 31 35 00 73 4B A4 01 46 49 |..":PM.15.sK..FI|
00000B40: 24 B2 22 54 2E 22 AA 4D 24 28 53 45 2C 32 29 3A |$."T.".M$(SE,2):|
00000B50: 46 49 24 B2 C8 28 46 49 24 2C 31 36 29 3A E8 31 |FI$..(FI$,16):.1|
00000B60: 3A FE 11 20 22 22 AA 46 49 24 AA 22 22 2C 50 38 |:.. "".FI$."",P8|
00000B70: 31 39 32 00 B3 4B A9 01 45 41 B2 C2 28 31 37 34 |192..K..EA..(174|
00000B80: 29 AA C2 28 31 37 35 29 AC 32 35 36 3A 8F 20 20 |)..(175).256:. |
00000B90: 20 20 20 20 20 20 20 20 45 4E 44 49 4E 47 20 41 | ENDING A|
00000BA0: 44 44 52 45 53 53 20 4F 46 20 54 45 58 54 20 46 |DDRESS OF TEXT F|
00000BB0: 49 4C 45 00 DD 4B AE 01 8D 39 30 3A 99 22 11 11 |ILE..K...90:."..|
00000BC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 9F CF 52 47 41 4E 49 |...........RGANI|
00000BD0: 5A 49 4E 47 20 D4 45 58 54 2E 2E 2E 22 00 11 4C |ZING .EXT..."..L|
00000BE0: B8 01 8D 33 31 30 30 3A 8F 20 43 48 41 4E 47 45 |...3100:. CHANGE|
00000BF0: 20 48 49 2D 52 45 53 20 44 41 54 41 20 54 4F 20 | HI-RES DATA TO |
00000C00: 20 20 20 20 54 45 58 54 20 49 4E 20 54 24 28 58 | TEXT IN T$(X|
00000C10: 29 00 36 4C BD 01 8D 38 30 3A 99 22 93 9E 22 3B |).6L...80:."..";|
00000C20: 3A 8D 38 32 3A 81 41 B2 31 A4 31 35 3A 99 54 24 |:.82:.A.1.15:.T$|
00000C30: 28 41 29 3B 3A 82 00 60 4C C2 01 4C 53 24 B2 4D |(A);:..`L..LS$.M|
00000C40: 24 28 53 45 2C 32 29 3A 4C 49 B2 31 35 3A 48 4E |$(SE,2):LI.15:HN|
00000C50: B2 48 4C 3A 41 4E B2 4C 49 3A 97 32 30 38 2C 2E |.HL:AN.LI:.208,.|
00000C60: 00 70 4C CC 01 8D 32 30 30 30 3A 99 22 9E 22 3B |.pL...2000:.".";|
00000C70: 00 81 4C D6 01 97 32 34 34 2C 2E 3A 8D 35 30 30 |..L...244,.:.500|
00000C80: 30 00 A4 4C DB 01 8B 41 24 B2 22 20 22 A7 8D 38 |0..L...A$." "..8|
00000C90: 30 3A 99 22 93 22 3B 3A 8D 37 37 3A 8D 37 30 3A |0:.".";:.77:.70:|
00000CA0: 89 33 32 30 00 DB 4C E0 01 8B 41 24 B2 22 11 22 |.320..L...A$."."|
00000CB0: AF 4C 49 B3 48 4C A7 4C 49 B2 4C 49 AA 31 3A 8D |.LI.HL.LI.LI.1:.|
00000CC0: 38 30 3A 99 53 55 24 3A 8D 38 32 3A 99 42 57 24 |80:.SU$:.82:.BW$|
00000CD0: 54 24 28 4C 49 29 3A 89 34 37 30 00 15 4D EA 01 |T$(LI):.470..M..|
00000CE0: 8B 41 24 B2 22 91 22 AF 4C 49 AB 31 34 B1 31 A7 |.A$.".".LI.14.1.|
00000CF0: 4C 49 B2 4C 49 AB 31 3A 8D 38 30 3A 99 53 44 24 |LI.LI.1:.80:.SD$|
00000D00: 3A 8D 38 31 3A 99 54 24 28 4C 49 AB 31 34 29 3B |:.81:.T$(LI.14);|
00000D10: 3A 89 34 37 30 00 1E 4D F4 01 89 34 37 30 00 24 |:.470..M...470.$|
00000D20: 4D 20 03 3A 00 3B 4D 25 03 8F 20 20 20 20 52 55 |M .:.;M%.. RU|
00000D30: 4E 20 41 20 50 52 4F 47 52 41 4D 00 41 4D 26 03 |N A PROGRAM.AM&.|
00000D40: 3A 00 73 4D 2A 03 F5 20 22 22 AA C8 28 4D 24 28 |:.sM*.. ""..(M$(|
00000D50: 53 45 2C 32 29 2C 31 36 29 AA 22 22 20 A4 20 22 |SE,2),16)."" . "|
00000D60: 22 AA C8 28 4D 24 28 53 45 2C 32 29 2C 31 36 29 |"..(M$(SE,2),16)|
00000D70: AA 22 22 00 83 4D 2F 03 8B 44 53 B3 B1 36 33 A7 |.""..M/..DS..63.|
00000D80: 39 30 30 00 A5 4D 3E 03 54 4C B2 C3 28 4D 24 28 |900..M>.TL..(M$(|
00000D90: 53 45 2C 31 29 29 AA 31 32 3A 54 B2 32 30 AB 54 |SE,1)).12:T.20.T|
00000DA0: 4C AD 32 AB 31 00 D0 4D 48 03 8D 39 30 3A 99 22 |L.2.1..MH..90:."|
00000DB0: 11 11 22 A3 54 29 22 9E CC 4F 41 44 49 4E 47 20 |..".T)"..OADING |
00000DC0: 22 4D 24 28 53 45 2C 31 29 22 20 2E 2E 2E 99 22 |"M$(SE,1)" ...."|
00000DD0: 00 E0 4D 52 03 55 24 B2 C8 28 4C 24 2C 54 4C 29 |..MR.U$..(L$,TL)|
00000DE0: 00 EF 4D 5C 03 99 A3 54 29 55 24 3A 8D 38 30 00 |..M\...T)U$:.80.|
00000DF0: 0A 4E 66 03 8A 20 22 22 AA C8 28 4D 24 28 53 45 |.Nf.. ""..(M$(SE|
00000E00: 2C 32 29 2C 31 36 29 AA 22 22 00 10 4E 83 03 80 |,2),16).""..N...|
00000E10: 00 36 4E 84 03 8D 39 30 3A FE 04 22 4F 32 45 22 |.6N...90:.."O2E"|
00000E20: 3A 99 22 11 1C C4 49 53 4B 20 C5 52 52 4F 52 3A |:."...ISK .RROR:|
00000E30: 20 96 22 44 53 24 00 4E 4E 89 03 99 22 9A 22 C8 | ."DS$.NN...".".|
00000E40: 28 4C 24 2C C3 28 44 53 24 29 AA 31 32 29 00 82 |(L$,.(DS$).12)..|
00000E50: 4E 8E 03 99 22 9F 20 20 20 20 D0 52 45 53 53 20 |N...". .RESS |
00000E60: 41 4E 59 20 4B 45 59 20 54 4F 20 52 45 54 55 52 |ANY KEY TO RETUR|
00000E70: 4E 20 54 4F 20 4D 45 4E 55 2E 22 3A 97 32 30 38 |N TO MENU.":.208|
00000E80: 2C 2E 00 96 4E 98 03 A1 41 24 3A 8B 41 24 B3 B1 |,...N...A$:.A$..|
00000E90: 22 22 A7 33 32 35 00 A8 4E A2 03 8B CF 28 32 29 |"".325..N....(2)|
00000EA0: AF 31 32 38 A7 33 32 35 00 B1 4E AC 03 89 39 32 |.128.325..N...92|
00000EB0: 30 00 DA 4E B6 03 45 58 B2 2E 3A 8D 39 30 3A 99 |0..N..EX..:.90:.|
00000EC0: 22 11 20 20 20 20 20 20 20 20 20 9F C5 58 49 54 |". ..XIT|
00000ED0: 20 54 4F 20 22 45 24 22 3F 22 00 01 4F BB 03 99 | TO "E$"?"..O...|
00000EE0: 22 11 9E 20 20 20 20 20 20 20 20 20 C1 52 45 20 |".. .RE |
00000EF0: 59 4F 55 20 53 55 52 45 3F 20 20 28 D9 2F CE 29 |YOU SURE? (./.)|
00000F00: 22 00 28 4F C0 03 99 22 99 20 20 20 20 20 20 20 |".(O...". |
00000F10: 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..............|
00000F20: A3 A3 A3 A3 A3 A3 13 22 00 47 4F CA 03 A1 41 24 |.......".GO...A$|
00000F30: 3A 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 22 A7 |:.A$."Y".A$.".".|
00000F40: 45 58 B2 AB 31 3A 8E 00 5C 4F D4 03 8B 41 24 B2 |EX..1:..\O...A$.|
00000F50: 22 4E 22 B0 41 24 B2 22 CE 22 A7 8E 00 65 4F DE |"N".A$."."...eO.|
00000F60: 03 89 39 37 30 00 6B 4F E2 03 3A 00 88 4F E3 03 |..970.kO..:..O..|
00000F70: 8F 20 20 20 20 20 49 4E 53 54 52 55 43 54 49 4F |. INSTRUCTIO|
00000F80: 4E 20 57 49 4E 44 4F 57 00 8E 4F E4 03 3A 00 CA |N WINDOW..O..:..|
00000F90: 4F E8 03 8D 39 30 3A 8B 4E 50 B1 31 A7 99 22 20 |O...90:.NP.1.." |
00000FA0: 20 20 9F CA CF D9 D3 D4 C9 C3 CB 20 9A 41 4E 44 | ......... .AND|
00000FB0: 20 9F C3 D5 D2 D3 CF D2 20 CB C5 D9 D3 9A 20 53 | ....... ..... S|
00000FC0: 43 52 4F 4C 4C 3B 22 3A D5 99 00 07 50 F2 03 8B |CROLL;":....P...|
00000FD0: 4E 50 B1 2E A7 99 22 9F D2 C5 D4 D5 D2 CE 9A 2C |NP...."........,|
00000FE0: 20 9F D3 D0 C1 C3 C5 9A 2C 20 41 4E 44 20 9F C6 | ......., AND ..|
00000FF0: C9 D2 C5 C2 D5 D4 D4 CF CE 20 9A 53 45 4C 45 43 |......... .SELEC|
00001000: 54 53 2E 22 3A D5 99 00 0D 50 F7 03 99 00 3E 50 |TS.":....P....>P|
00001010: FC 03 99 22 9A D0 52 45 53 53 3A 20 20 9F C3 D4 |..."..RESS: ...|
00001020: D2 CC 20 C5 9A 20 54 4F 20 45 58 49 54 20 54 4F |.. .. TO EXIT TO|
00001030: 20 CC CF C1 C4 D3 D4 C1 D2 20 36 34 2E 22 00 74 | ........ 64.".t|
00001040: 50 06 04 99 22 20 20 20 20 20 20 20 20 9F C3 D4 |P..." ...|
00001050: D2 CC 20 C2 9A 20 54 4F 20 45 58 49 54 20 54 4F |.. .. TO EXIT TO|
00001060: 20 C2 C1 D3 C9 C3 20 37 2E 30 2E 13 13 22 3A 8D | ..... 7.0...":.|
00001070: 38 30 3A 8E 00 7A 50 0F 04 3A 00 80 50 10 04 8F |80:..zP..:..P...|
00001080: 00 86 50 11 04 3A 00 C5 50 1A 04 FE 04 22 4F 36 |..P..:..P...."O6|
00001090: 54 36 46 22 3A 8D 39 30 3A 53 53 B2 31 3A 99 22 |T6F":.90:SS.1:."|
000010A0: 9E D0 4C 45 41 53 45 20 43 48 4F 4F 53 45 20 4F |..LEASE CHOOSE O|
000010B0: 4E 45 20 4F 46 20 54 48 45 20 46 4F 4C 4C 4F 57 |NE OF THE FOLLOW|
000010C0: 49 4E 47 3A 22 00 F9 50 24 04 99 22 99 A3 A3 A3 |ING:"..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: 22 3A 8D 31 30 37 30 3A 8E 00 26 51 2E 04 4F 4B |":.1070:..&Q..OK|
00001100: B2 AB 31 3A 99 22 13 11 11 22 3B 3A 81 41 B2 31 |..1:."...";:.A.1|
00001110: A4 33 3A 8B 53 53 B2 41 A7 99 22 9E 22 3B 3A D5 |.3:.SS.A..".";:.|
00001120: 20 99 22 9A 22 3B 00 36 51 38 04 99 A3 31 31 29 | .".";.6Q8...11)|
00001130: 53 45 24 28 41 29 00 54 51 3D 04 8B 4D 24 28 53 |SE$(A).TQ=..M$(S|
00001140: 45 2C 33 29 B2 22 52 22 AF 4F 4B A7 41 B2 32 3A |E,3)."R".OK.A.2:|
00001150: 4F 4B B2 2E 00 5C 51 42 04 82 3A 8E 00 90 51 D0 |OK...\QB..:...Q.|
00001160: 07 8D 39 30 3A 99 22 11 20 20 20 9F CA CF D9 D3 |..90:.". .....|
00001170: D4 C9 C3 CB 20 9A 41 4E 44 20 9F C3 D5 D2 D3 CF |.... .AND ......|
00001180: D2 20 CB C5 D9 D3 9A 20 53 43 52 4F 4C 4C 3B 22 |. ..... SCROLL;"|
00001190: 00 C3 51 DA 07 99 22 11 20 9F D2 C5 D4 D5 D2 CE |..Q...". .......|
000011A0: 9A 2C 20 9F D3 D0 C1 C3 C5 9A 2C 20 41 4E 44 20 |., ......., AND |
000011B0: 9F C6 C9 D2 C5 C2 D5 D4 D4 CF CE 20 9A 45 58 49 |........... .EXI|
000011C0: 54 2E 22 00 C9 51 DF 07 8E 00 EA 51 F4 0B 8F 20 |T."..Q.....Q... |
000011D0: 2A 2A 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 00 2D 52 1C 0C 97 |**********.-R...|
000011F0: 32 35 31 2C 2E 3A 97 32 35 32 2C 31 34 3A 8F 20 |251,.:.252,14:. |
00001200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 | P|
00001210: 4F 49 4E 54 45 52 20 46 4F 52 20 4D 45 4D 4D 4F |OINTER FOR MEMMO|
00001220: 56 45 2E 4F 20 20 20 5B 33 35 38 34 5D 00 70 52 |VE.O [3584].pR|
00001230: 26 0C 97 32 35 33 2C 2E 3A 97 32 35 34 2C 33 32 |&..253,.:.254,32|
00001240: 3A 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. |
00001250: 20 20 50 4F 49 4E 54 45 52 20 46 4F 52 20 4D 45 | POINTER FOR ME|
00001260: 4D 4D 4F 56 45 2E 4F 20 20 20 5B 38 31 39 32 5D |MMOVE.O [8192]|
00001270: 00 80 52 30 0C 48 4C B2 2E 3A 4C 4C 24 B2 22 22 |..R0.HL..:LL$.""|
00001280: 00 C3 52 3A 0C 48 4C B2 48 4C AA 31 3A 9E 34 30 |..R:.HL.HL.1:.40|
00001290: 33 32 3A 8F 20 43 4F 50 59 20 48 49 2D 52 45 53 |32:. COPY HI-RES|
000012A0: 20 20 20 20 20 20 20 20 20 44 41 54 41 20 54 4F | DATA TO|
000012B0: 20 53 50 52 49 54 45 20 31 20 44 41 54 41 20 41 | SPRITE 1 DATA A|
000012C0: 52 45 41 00 06 53 44 0C FE 16 20 31 2C 41 24 3A |REA..SD... 1,A$:|
000012D0: 41 24 B2 C8 28 41 24 2C 36 33 29 3A 8F 20 20 20 |A$..(A$,63):. |
000012E0: 20 20 20 20 20 20 43 4F 50 59 20 44 41 54 41 20 | COPY DATA |
000012F0: 49 4E 20 53 50 52 49 54 45 20 31 20 41 52 45 41 |IN SPRITE 1 AREA|
00001300: 20 54 4F 20 41 24 00 6D 53 49 0C 41 24 B2 4C 4C | TO A$.mSI.A$.LL|
00001310: 24 AA 41 24 3A 8F 20 20 2B 43 48 52 24 28 50 45 |$.A$:. +CHR$(PE|
00001320: 45 4B 28 50 45 45 4B 28 32 35 33 29 2B 50 45 45 |EK(PEEK(253)+PEE|
00001330: 4B 28 32 35 34 29 2A 32 35 36 2D 31 29 29 3A 52 |K(254)*256-1)):R|
00001340: 45 4D 20 41 44 44 20 41 4E 59 20 42 59 54 45 53 |EM ADD ANY BYTES|
00001350: 20 20 20 20 20 20 20 20 20 4C 45 46 54 20 46 52 | LEFT FR|
00001360: 4F 4D 20 4C 41 53 54 20 47 52 4F 55 50 00 CF 53 |OM LAST GROUP..S|
00001370: 4E 0C 43 52 B2 D4 28 41 24 2C C7 28 31 33 29 29 |N.CR..(A$,.(13))|
00001380: 3A 54 24 28 48 4C 29 B2 C8 28 41 24 2C 43 52 29 |:T$(HL)..(A$,CR)|
00001390: 3A 8B C8 28 54 24 28 48 4C 29 2C 33 29 B2 22 5E |:..(T$(HL),3)."^|
000013A0: 55 3A 22 A7 48 4C B2 48 4C AB 31 3A 8F 20 49 46 |U:".HL.HL.1:. IF|
000013B0: 20 4C 49 4E 45 20 49 53 20 22 5E 55 3A 3F 3F 3F | LINE IS "^U:???|
000013C0: 3F 3F 22 2C 20 46 4F 52 47 45 54 20 49 54 21 00 |??", FORGET IT!.|
000013D0: 0B 54 58 0C 8B 28 C2 28 32 35 33 29 AA C2 28 32 |.TX..(.(253)..(2|
000013E0: 35 34 29 AC 32 35 36 B1 B2 45 41 29 AF 43 52 B2 |54).256..EA).CR.|
000013F0: 2E A7 8E 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 |...:. CHECK FOR |
00001400: 45 4E 44 20 4F 46 20 46 49 4C 45 00 26 54 62 0C |END OF FILE.&Tb.|
00001410: 8B 43 52 B2 C3 28 41 24 29 A7 4C 4C 24 B2 22 22 |.CR..(A$).LL$.""|
00001420: 3A 89 33 31 33 30 00 5C 54 6C 0C 41 24 B2 C9 28 |:.3130.\Tl.A$..(|
00001430: 41 24 2C C3 28 41 24 29 AB 43 52 29 3A 8B 28 D4 |A$,.(A$).CR):.(.|
00001440: 28 41 24 2C C7 28 31 33 29 29 B3 B1 2E 29 A7 48 |(A$,.(13))...).H|
00001450: 4C B2 48 4C AA 31 3A 89 33 31 35 30 00 6D 54 76 |L.HL.1:.3150.mTv|
00001460: 0C 4C 4C 24 B2 41 24 3A 89 33 31 33 30 00 73 54 |.LL$.A$:.3130.sT|
00001470: 88 13 3A 00 8D 54 89 13 8F 20 20 20 47 45 54 20 |..:..T... GET |
00001480: 41 20 4B 45 59 20 52 4F 55 54 49 4E 45 00 93 54 |A KEY ROUTINE..T|
00001490: 8A 13 3A 00 A8 54 8D 13 A1 41 24 3A 8B 41 24 B3 |..:..T...A$:.A$.|
000014A0: B1 22 22 A7 35 30 33 30 00 BE 54 92 13 8B CF 28 |."".5030..T....(|
000014B0: 32 29 B2 2E B0 4E 50 B2 2E A7 35 30 30 35 00 C8 |2)...NP...5005..|
000014C0: 54 9C 13 89 35 30 37 30 00 E7 54 A6 13 8B 41 24 |T...5070..T...A$|
000014D0: B2 22 11 22 AF 41 4E B3 48 4E AF 4E 50 A7 41 4E |.".".AN.HN.NP.AN|
000014E0: B2 41 4E AA 31 3A 8E 00 15 55 B0 13 8B 28 41 24 |.AN.1:...U...(A$|
000014F0: B2 22 91 22 B0 41 24 B2 22 1D 22 29 AF 41 4E B1 |.".".A$.".").AN.|
00001500: 31 AF 4E 50 A7 41 4E B2 41 4E AB 31 3A 41 24 B2 |1.NP.AN.AN.1:A$.|
00001510: 22 91 22 3A 8E 00 38 55 BA 13 8B 28 41 24 B2 22 |".":..8U...(A$."|
00001520: 20 22 B0 41 24 B2 C7 28 31 33 29 29 AF 4E 50 A7 | ".A$..(13)).NP.|
00001530: 41 24 B2 22 20 22 3A 8E 00 4D 55 BF 13 8B 41 24 |A$." ":..MU...A$|
00001540: B2 22 05 22 B0 41 24 B2 22 02 22 A7 8E 00 5B 55 |.".".A$."."...[U|
00001550: C4 13 8D 34 35 3A 89 35 30 31 30 00 74 55 CE 13 |...45:.5010.tU..|
00001560: 8B CF 28 32 29 B2 31 A7 41 24 B2 22 91 22 3A 89 |..(2).1.A$.".":.|
00001570: 35 30 34 30 00 8D 55 D8 13 8B CF 28 32 29 B2 35 |5040..U....(2).5|
00001580: A7 41 24 B2 22 11 22 3A 89 35 30 33 30 00 A8 55 |.A$.".":.5030..U|
00001590: E2 13 8B CF 28 32 29 AF 31 32 38 A7 41 24 B2 22 |....(2).128.A$."|
000015A0: 20 22 3A 89 35 30 35 30 00 B6 55 E7 13 8D 34 35 | ":.5050..U...45|
000015B0: 3A 89 35 30 30 35 00 00 00 |:.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.45:NP.0:SI.4:
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 FIND 128,E.ID,..
BOINK!
:.YD-..J.4.7:.53265,(B(5
3265).248).J:.A.1.10:.A,J..D/..J...3:.53
265,(B(53265).248).J:.A.1.10:.A,J:.."O6
A":.208,.:..AD0.:..D2.. SELECTION D
ATA :..D4.. "READ IT."..
E5.. "RUN IT.".%E6.. "BACK TO MENU..".NE
8.: ..................V
E9.. LAST SELECTION MUST CONTAIN A "."..
E:.: AT THE . OF ITS NAME...E;.:.KEF..
".......":.A.1.NP:.A.SE..".".TA)M$(A,1):
.73..EH...TA)"."M$(A,1)..EI..:...EJ.:..F
K..".":.I.1.SE.5:.".";:.:."..".TA)M$(SE,
1):.."FL.:.OFM..80:..13)".************":
..13)"* .SIDE"SI". .*":..13)"*********
***...".UFO.:..FP... 1,3,38,17:...FQ...
1,3,39,17:...FR... 1,3,39,19:...FU.:.JFZ
... 1,19,38,23,1:..PF_.:..FD..:. 0,1:. 4
,7..FE..ES$."L";..GI..1,G(133):.3,G(134)
:.5,G(135)..GJ.:.3GK.. PRINT BOR
DER.9GL.:.}GN.."......"TL$"..LOADSTAR .-
--- .128 MENU .---- .ISSUE #"IN"...";..G
X..ML$;:.A.1.15:.".".39)".";:.:.ML$;.XG.
..A.1.5:.".".39)".";:.:.H(BL$,C(BL$).2);
"......"..G..:..G...77..G..:..G...1000.;
H...NP....".......... THERE ARE NO 128 P
ROGRAMS ON SIDE"SI"..":.230.AHC.:.AHD..
PRINT SIDE # & MAIN MENU.GHE.:.OHH..70.
UH..:..H... GET A KEY FOR MAIN MENU..H
..:..H...208,...H..AN.SE:HN.NP:.5000.LH.
..A$." ".320..H...A$.".".E$."LOADSTAR 64
":.260..I...A$.".".E$."-BASIC 7.0-":.270
..I..SE.AN:.200.ZI...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..IE..1050.KIG..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.DJT..A$.." "..1070:.330.]J^..SS.3..
."O6T6E":.190.KJH..SS.2.800.YJR..SS.1.40
0..J|..330..J..:..J... READ A FILE..
J..:..J...M$(SE,2).LS$.445..J..:..J... "
T.".H(M$(SE,2),14)."" . "T.".H(M$(SE,2),
14).""..K...DS..63.900.9K...90:.".......
.....LOADING TEXT FILE ...":PM.15.SK..FI
$."T.".M$(SE,2):FI$.H(FI$,16):.1:.. "".F
I$."",P8192..K..EA.B(174).B(175).256:.
ENDING ADDRESS OF TEXT FILE..K..
.90:."............ORGANIZING TEXT..."..L
...3100:. CHANGE HI-RES DATA TO TEXT
IN T$(X).6L...80:."..";:.82:.A.1.15:.T$
(A);:..`LB.LS$.M$(SE,2):LI.15:HN.HL:AN.L
I:.208,..PLL..2000:.".";..LV..244,.:.500
0..L...A$." "..80:.".";:.77:.70:.320..L.
..A$.".".LI.HL.LI.LI.1:.80:.SU$:.82:.BW$
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.AM&.:.SM*..
"".H(M$(SE,2),16)."" . "".H(M$(SE,2),16)
.""..M/..DS..63.900..M>.TL.C(M$(SE,1)).1
2:T.20.TL.2.1.PMH..90:."..".T)".LOADING
"M$(SE,1)" ...."..MR.U$.H(L$,TL)..M\...T
)U$:.80..NF.. "".H(M$(SE,2),16).""..N...
.6N...90:.."O2E":."..DISK ERROR: ."DS$.N
N..."."H(L$,C(DS$).12)..N...". PRESS
ANY KEY TO RETURN TO MENU.":.208,...N...
A$:.A$.."".325..N...O(2).128.325..N...92
0.ZN..EX..:.90:.". .EXIT TO "E$"
?"..O...".. ARE YOU SURE? (Y/N)
".(O...". ....................."
.GOJ..A$:.A$."Y".A$."Y".EX..1:..\OT..A$.
"N".A$."N"...EO...970.KO..:..O... IN
STRUCTION WINDOW..O..:.JO...90:.NP.1.."
.JOYSTICK .AND .CURSOR KEYS. SCROLL;":
U...P...NP....".RETURN., .SPACE., AND .F
IREBUTTON .SELECTS.":U...P....>P...".PRE
SS: .CTRL E. TO EXIT TO LOADSTAR 64.".T
P..." .CTRL B. TO EXIT TO BASIC 7
.0...":.80:..ZP..:..P.....P..:.EP...."O6
T6F":.90:SS.1:.".PLEASE CHOOSE ONE OF TH
E FOLLOWING:"..P$.."....................
................":.1070:..&Q..OK..1:."..
.";:.A.1.3:.SS.A..".";:U .".";.6Q8...11)
SE$(A).TQ=..M$(SE,3)."R".OK.A.2:OK...\QB
..:...QP..90:.". .JOYSTICK .AND .CURSO
R KEYS. SCROLL;".CQZ..". .RETURN., .SPAC
E., AND .FIREBUTTON .EXIT.".IQ.....Q...
**************************.-R...251,.:.2
52,14:. POINTER FOR MEMMO
VE.O [3584].PR&..253,.:.254,32:.
POINTER FOR MEMMOVE.O [8192]
..R0.HL..:LL$."".CR:.HL.HL.1:.4032:. COP
Y HI-RES DATA TO SPRITE 1 DATA A
REA..SD... 1,A$:A$.H(A$,63):. CO
PY DATA IN SPRITE 1 AREA TO A$.MSI.A$.LL
$.A$:. +CHR$(PEEK(PEEK(253)+PEEK(254)*2
56-1)):REM ADD ANY BYTES LEFT FR
OM LAST GROUP.OSN.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 FOR
END OF FILE.&TB..CR.C(A$).LL$."":.3130.\
TL.A$.I(A$,C(A$).CR):.(T(A$,G(13))...).H
L.HL.1:.3150.MTV.LL$.A$:.3130.ST..:..T..
. GET A KEY ROUTINE..T..:..T...A$:.A$.
."".5030..T...O(2)...NP...5005.HT...5070
..T...A$.".".AN.HN.NP.AN.AN.1:...U...(A$
.".".A$.".").AN.1.NP.AN.AN.1:A$.".":..8U
...(A$." ".A$.G(13)).NP.A$." ":..MU...A$
.".".A$."."...[UD..45:.5010.TUN..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