128 MENU
FILE INFORMATION
FILENAME(S): 128 MENU
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 18:12:07
APPEARS ON: 1 disk(s)
FILE HASH
48d11dda5e80b5b8ad3f41ca4b4f31eb727cd1884de0409f8b4e4c05adee2fcd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 55 S 2 | 128 MENU | PRG | Sailor, Ganheden | 15 | 5 | 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 35 35 3A 4E 50 B2 32 3A 53 49 B2 32 3A |IN.55:NP.2: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 D1 43 16 00 83 20 22 D2 45 53 54 4F |..:..C... ".ESTO|
000003B0: 52 45 20 C3 4F 4C 4F 52 53 20 31 32 38 22 2C 52 |RE .OLORS 128",R|
000003C0: 45 53 54 4F 52 45 20 43 4F 4C 4F 52 53 20 31 2C |ESTORE COLORS 1,|
000003D0: 45 00 00 44 18 00 83 20 22 C1 52 41 42 49 43 20 |E..D... ".RABIC |
000003E0: D4 4F 20 D2 4F 4D 41 4E 20 31 32 38 22 2C 41 52 |.O .OMAN 128",AR|
000003F0: 41 42 49 43 20 52 4F 4D 41 4E 20 31 32 38 2C 45 |ABIC ROMAN 128,E|
00000400: 00 06 44 2C 00 8F 00 36 44 2D 00 81 4A B2 34 A4 |..D,...6D-..J.4.|
00000410: 37 3A 97 35 33 32 36 35 2C 28 C2 28 35 33 32 36 |7:.53265,(.(5326|
00000420: 35 29 AF 32 34 38 29 B0 4A 3A 81 41 B2 31 A4 31 |5).248).J:.A.1.1|
00000430: 30 3A 82 41 2C 4A 00 78 44 2F 00 81 4A B2 2E A4 |0:.A,J.xD/..J...|
00000440: 33 3A 97 35 33 32 36 35 2C 28 C2 28 35 33 32 36 |3:.53265,(.(5326|
00000450: 35 29 AF 32 34 38 29 B0 4A 3A 81 41 B2 31 A4 31 |5).248).J:.A.1.1|
00000460: 30 3A 82 41 2C 4A 3A FE 04 22 4F 36 20 41 22 3A |0:.A,J:.."O6 A":|
00000470: 97 32 30 38 2C 2E 3A 8E 00 7E 44 30 00 3A 00 84 |.208,.:..~D0.:..|
00000480: 44 32 00 8F 00 95 44 34 00 83 20 22 D2 45 41 44 |D2....D4.. ".EAD|
00000490: 20 49 54 2E 22 00 A5 44 35 00 83 20 22 D2 55 4E | IT."..D5.. ".UN|
000004A0: 20 49 54 2E 22 00 BC 44 36 00 83 20 22 C2 41 43 | IT."..D6.. ".AC|
000004B0: 4B 20 54 4F 20 4D 45 4E 55 2E 13 22 00 E5 44 38 |K TO MENU.."..D8|
000004C0: 00 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.: |
000004D0: 20 20 20 20 AE 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E | ............|
000004E0: 2E 2E 2E 2E AA 00 0D 45 39 00 8F 20 4C 41 53 54 |.......E9.. LAST|
000004F0: 20 53 45 4C 45 43 54 49 4F 4E 20 4D 55 53 54 20 | SELECTION MUST |
00000500: 43 4F 4E 54 41 49 4E 20 41 20 22 13 22 00 2B 45 |CONTAIN A ".".+E|
00000510: 3A 00 3A 20 20 20 41 54 20 54 48 45 20 80 20 4F |:.: AT THE . O|
00000520: 46 20 49 54 53 20 4E 41 4D 45 2E 00 31 45 3B 00 |F ITS NAME..1E;.|
00000530: 3A 00 62 45 46 00 99 22 13 11 11 11 11 11 11 22 |:.bEF.."......."|
00000540: 3A 81 41 B2 31 A4 4E 50 3A 8B 41 B2 53 45 A7 99 |:.A.1.NP:.A.SE..|
00000550: 22 9E 22 A3 54 41 29 4D 24 28 41 2C 31 29 3A 89 |".".TA)M$(A,1):.|
00000560: 37 33 00 76 45 48 00 99 A3 54 41 29 22 81 22 4D |73.vEH...TA)"."M|
00000570: 24 28 41 2C 31 29 00 7E 45 49 00 82 3A 8E 00 84 |$(A,1).~EI..:...|
00000580: 45 4A 00 3A 00 B3 45 4B 00 99 22 13 22 3A 81 49 |EJ.:..EK..".":.I|
00000590: B2 31 A4 53 45 AA 35 3A 99 22 11 22 3B 3A 82 3A |.1.SE.5:.".";:.:|
000005A0: 99 22 12 9E 22 A3 54 41 29 4D 24 28 53 45 2C 31 |."..".TA)M$(SE,1|
000005B0: 29 3A 8E 00 B9 45 4C 00 3A 00 06 46 4D 00 8D 38 |):...EL.:..FM..8|
000005C0: 30 3A 99 A3 31 33 29 22 1E 2A 2A 2A 2A 2A 2A 2A |0:..13)".*******|
000005D0: 2A 2A 2A 2A 2A 22 3A 99 A3 31 33 29 22 2A 20 20 |*****":..13)"* |
000005E0: 99 D3 49 44 45 22 53 49 22 9D 20 20 1E 2A 22 3A |..IDE"SI". .*":|
000005F0: 99 A3 31 33 29 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..13)"**********|
00000600: 2A 2A 11 11 9E 22 00 0C 46 4F 00 3A 00 1F 46 50 |**..."..FO.:..FP|
00000610: 00 FE 1A 20 31 2C 33 2C 33 38 2C 31 37 3A 8E 00 |... 1,3,38,17:..|
00000620: 32 46 51 00 FE 1A 20 31 2C 33 2C 33 39 2C 31 37 |2FQ... 1,3,39,17|
00000630: 3A 8E 00 45 46 52 00 FE 1A 20 31 2C 33 2C 33 39 |:..EFR... 1,3,39|
00000640: 2C 31 39 3A 8E 00 4B 46 55 00 3A 00 61 46 5A 00 |,19:..KFU.:.aFZ.|
00000650: FE 1A 20 31 2C 31 39 2C 33 38 2C 32 33 2C 31 3A |.. 1,19,38,23,1:|
00000660: 8E 00 67 46 5F 00 3A 00 79 46 64 00 E8 3A E7 20 |..gF_.:.yFd..:. |
00000670: 30 2C 31 3A E7 20 34 2C 37 00 87 46 65 00 99 45 |0,1:. 4,7..Fe..E|
00000680: 53 24 AA 22 4C 22 3B 00 A9 46 69 00 F9 31 2C C7 |S$."L";..Fi..1,.|
00000690: 28 31 33 33 29 3A F9 33 2C C7 28 31 33 34 29 3A |(133):.3,.(134):|
000006A0: F9 35 2C C7 28 31 33 35 29 00 AF 46 6A 00 3A 00 |.5,.(135)..Fj.:.|
000006B0: B5 46 6B 00 8F 00 BB 46 6C 00 3A 00 FF 46 6E 00 |.Fk....Fl.:..Fn.|
000006C0: 99 22 13 13 93 05 0B 0E 22 54 4C 24 22 DD 9A CC |."......"TL$"...|
000006D0: CF C1 C4 D3 D4 C1 D2 20 1C 2D 2D 2D 2D 20 96 31 |....... .---- .1|
000006E0: 32 38 20 CD 45 4E 55 20 1C 2D 2D 2D 2D 20 9A C9 |28 .ENU .---- ..|
000006F0: 53 53 55 45 20 23 22 49 4E 22 9D 05 DD 22 3B 00 |SSUE #"IN"...";.|
00000700: 26 47 78 00 99 4D 4C 24 3B 3A 81 41 B2 31 A4 31 |&Gx..ML$;:.A.1.1|
00000710: 35 3A 99 22 DD 22 A3 33 39 29 22 DD 22 3B 3A 82 |5:.".".39)".";:.|
00000720: 3A 99 4D 4C 24 3B 00 5A 47 82 00 81 41 B2 31 A4 |:.ML$;.ZG...A.1.|
00000730: 35 3A 99 22 DD 22 A3 33 39 29 22 DD 22 3B 3A 82 |5:.".".39)".";:.|
00000740: 3A 99 C8 28 42 4C 24 2C C3 28 42 4C 24 29 AB 32 |:..(BL$,.(BL$).2|
00000750: 29 3B 22 BD 9D 94 C0 13 13 22 00 60 47 87 00 3A |);"......".`G..:|
00000760: 00 68 47 8C 00 8D 37 37 00 6E 47 96 00 3A 00 78 |.hG...77.nG..:.x|
00000770: 47 BE 00 8D 31 30 30 30 00 BD 47 C0 00 8B 4E 50 |G...1000..G...NP|
00000780: B2 2E A7 99 22 11 11 11 11 11 11 11 11 11 9E 20 |....".......... |
00000790: D4 48 45 52 45 20 41 52 45 20 4E 4F 20 31 32 38 |.HERE ARE NO 128|
000007A0: 20 50 52 4F 47 52 41 4D 53 20 4F 4E 20 D3 49 44 | PROGRAMS ON .ID|
000007B0: 45 22 53 49 22 9D 2E 22 3A 89 32 33 30 00 C3 47 |E"SI"..":.230..G|
000007C0: C3 00 3A 00 E3 47 C4 00 8F 20 20 50 52 49 4E 54 |..:..G... PRINT|
000007D0: 20 53 49 44 45 20 23 20 26 20 4D 41 49 4E 20 4D | SIDE # & MAIN M|
000007E0: 45 4E 55 00 E9 47 C5 00 3A 00 F1 47 C8 00 8D 37 |ENU..G..:..G...7|
000007F0: 30 00 F7 47 E0 00 3A 00 17 48 E1 00 8F 20 20 20 |0..G..:..H... |
00000800: 47 45 54 20 41 20 4B 45 59 20 46 4F 52 20 4D 41 |GET A KEY FOR MA|
00000810: 49 4E 20 4D 45 4E 55 00 1D 48 E2 00 3A 00 28 48 |IN MENU..H..:.(H|
00000820: E6 00 97 32 30 38 2C 2E 00 3E 48 EB 00 41 4E B2 |...208,..>H..AN.|
00000830: 53 45 3A 48 4E B2 4E 50 3A 8D 35 30 30 30 00 4E |SE:HN.NP:.5000.N|
00000840: 48 F0 00 8B 41 24 B2 22 20 22 A7 33 32 30 00 70 |H...A$." ".320.p|
00000850: 48 F5 00 8B 41 24 B2 22 05 22 A7 45 24 B2 22 CC |H...A$.".".E$.".|
00000860: CF C1 C4 D3 D4 C1 D2 20 36 34 22 3A 89 32 36 30 |....... 64":.260|
00000870: 00 92 48 F6 00 8B 41 24 B2 22 02 22 A7 45 24 B2 |..H...A$.".".E$.|
00000880: 22 2D C2 C1 D3 C9 C3 20 37 2E 30 2D 22 3A 89 32 |"-..... 7.0-":.2|
00000890: 37 30 00 A1 48 FA 00 53 45 B2 41 4E 3A 89 32 30 |70..H..SE.AN:.20|
000008A0: 30 00 DC 48 04 01 8D 39 35 30 3A 3A 8B 45 58 A7 |0..H...950::.EX.|
000008B0: 9F 31 35 2C 38 2C 31 35 2C 22 55 30 3E 4D 30 22 |.15,8,15,"U0>M0"|
000008C0: 3A A0 31 35 3A FE 11 22 4D 41 47 49 43 20 49 49 |:.15:.."MAGIC II|
000008D0: 22 3A CB 36 34 3A D5 20 89 31 39 30 00 08 49 0E |":.64:. .190..I.|
000008E0: 01 8D 39 35 30 3A 8B 45 58 A7 99 22 13 13 93 99 |..950:.EX.."....|
000008F0: 22 3A E7 20 34 2C 31 34 3A E7 20 30 2C 31 32 3A |":. 4,14:. 0,12:|
00000900: 80 3A D5 20 89 31 39 30 00 0E 49 3A 01 3A 00 2A |.:. .190..I:.:.*|
00000910: 49 3B 01 8F 20 20 20 20 52 45 41 44 2C 20 52 55 |I;.. READ, RU|
00000920: 4E 2C 20 4F 52 20 4D 45 4E 55 00 30 49 3C 01 3A |N, OR MENU.0I<.:|
00000930: 00 38 49 40 01 8D 37 35 00 42 49 45 01 8D 31 30 |.8I@..75.BIE..10|
00000940: 35 30 00 4D 49 47 01 97 32 30 38 2C 2E 00 68 49 |50.MIG..208,..hI|
00000950: 4A 01 41 4E B2 53 53 3A 48 4E B2 33 3A 8D 35 30 |J.AN.SS:HN.3:.50|
00000960: 30 30 3A 53 53 B2 41 4E 00 8B 49 4F 01 8B 4D 24 |00:SS.AN..IO..M$|
00000970: 28 53 45 2C 33 29 B2 22 52 22 AF 53 53 B2 32 AF |(SE,3)."R".SS.2.|
00000980: 41 24 B2 22 91 22 A7 53 53 B2 31 00 AE 49 50 01 |A$.".".SS.1..IP.|
00000990: 8B 4D 24 28 53 45 2C 33 29 B2 22 52 22 AF 53 53 |.M$(SE,3)."R".SS|
000009A0: B2 32 AF 41 24 B2 22 11 22 A7 53 53 B2 33 00 C6 |.2.A$.".".SS.3..|
000009B0: 49 54 01 8B 41 24 B3 B1 22 20 22 A7 8D 31 30 37 |IT..A$.." "..107|
000009C0: 30 3A 89 33 33 30 00 DF 49 5E 01 8B 53 53 B2 33 |0:.330..I^..SS.3|
000009D0: A7 FE 04 22 4F 36 54 36 45 22 3A 89 31 39 30 00 |..."O6T6E":.190.|
000009E0: ED 49 68 01 8B 53 53 B2 32 A7 38 30 30 00 FB 49 |.Ih..SS.2.800..I|
000009F0: 72 01 8B 53 53 B2 31 A7 34 30 30 00 04 4A 7C 01 |r..SS.1.400..J|.|
00000A00: 89 33 33 30 00 0A 4A 86 01 3A 00 20 4A 8B 01 8F |.330..J..:. J...|
00000A10: 20 20 20 20 20 52 45 41 44 20 41 20 46 49 4C 45 | READ A FILE|
00000A20: 00 26 4A 8C 01 3A 00 3C 4A 90 01 8B 4D 24 28 53 |.&J..:.<J...M$(S|
00000A30: 45 2C 32 29 B2 4C 53 24 A7 34 34 35 00 42 4A 96 |E,2).LS$.445.BJ.|
00000A40: 01 3A 00 78 4A 97 01 F5 20 22 54 2E 22 AA C8 28 |.:.xJ... "T."..(|
00000A50: 4D 24 28 53 45 2C 32 29 2C 31 34 29 AA 22 22 20 |M$(SE,2),14)."" |
00000A60: A4 20 22 54 2E 22 AA C8 28 4D 24 28 53 45 2C 32 |. "T."..(M$(SE,2|
00000A70: 29 2C 31 34 29 AA 22 22 00 88 4A 98 01 8B 44 53 |),14).""..J...DS|
00000A80: B3 B1 36 33 A7 39 30 30 00 BB 4A 9A 01 8D 39 30 |..63.900..J...90|
00000A90: 3A 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 9F CC |:.".............|
00000AA0: 4F 41 44 49 4E 47 20 D4 45 58 54 20 C6 49 4C 45 |OADING .EXT .ILE|
00000AB0: 20 2E 2E 2E 22 3A 50 4D B2 31 35 00 F5 4A A4 01 | ...":PM.15..J..|
00000AC0: 46 49 24 B2 22 54 2E 22 AA 4D 24 28 53 45 2C 32 |FI$."T.".M$(SE,2|
00000AD0: 29 3A 46 49 24 B2 C8 28 46 49 24 2C 31 36 29 3A |):FI$..(FI$,16):|
00000AE0: E8 31 3A FE 11 20 22 22 AA 46 49 24 AA 22 22 2C |.1:.. "".FI$."",|
00000AF0: 50 38 31 39 32 00 35 4B A9 01 45 41 B2 C2 28 31 |P8192.5K..EA..(1|
00000B00: 37 34 29 AA C2 28 31 37 35 29 AC 32 35 36 3A 8F |74)..(175).256:.|
00000B10: 20 20 20 20 20 20 20 20 20 20 45 4E 44 49 4E 47 | ENDING|
00000B20: 20 41 44 44 52 45 53 53 20 4F 46 20 54 45 58 54 | ADDRESS OF TEXT|
00000B30: 20 46 49 4C 45 00 5F 4B AE 01 8D 39 30 3A 99 22 | FILE._K...90:."|
00000B40: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 9F CF 52 47 41 |.............RGA|
00000B50: 4E 49 5A 49 4E 47 20 D4 45 58 54 2E 2E 2E 22 00 |NIZING .EXT...".|
00000B60: 93 4B B8 01 8D 33 31 30 30 3A 8F 20 43 48 41 4E |.K...3100:. CHAN|
00000B70: 47 45 20 48 49 2D 52 45 53 20 44 41 54 41 20 54 |GE HI-RES DATA T|
00000B80: 4F 20 20 20 20 20 54 45 58 54 20 49 4E 20 54 24 |O TEXT IN T$|
00000B90: 28 58 29 00 B8 4B BD 01 8D 38 30 3A 99 22 93 9E |(X)..K...80:."..|
00000BA0: 22 3B 3A 8D 38 32 3A 81 41 B2 31 A4 31 35 3A 99 |";:.82:.A.1.15:.|
00000BB0: 54 24 28 41 29 3B 3A 82 00 E2 4B C2 01 4C 53 24 |T$(A);:...K..LS$|
00000BC0: B2 4D 24 28 53 45 2C 32 29 3A 4C 49 B2 31 35 3A |.M$(SE,2):LI.15:|
00000BD0: 48 4E B2 48 4C 3A 41 4E B2 4C 49 3A 97 32 30 38 |HN.HL:AN.LI:.208|
00000BE0: 2C 2E 00 F2 4B CC 01 8D 32 30 30 30 3A 99 22 9E |,...K...2000:.".|
00000BF0: 22 3B 00 03 4C D6 01 97 32 34 34 2C 2E 3A 8D 35 |";..L...244,.:.5|
00000C00: 30 30 30 00 26 4C DB 01 8B 41 24 B2 22 20 22 A7 |000.&L...A$." ".|
00000C10: 8D 38 30 3A 99 22 93 22 3B 3A 8D 37 37 3A 8D 37 |.80:.".";:.77:.7|
00000C20: 30 3A 89 33 32 30 00 5D 4C E0 01 8B 41 24 B2 22 |0:.320.]L...A$."|
00000C30: 11 22 AF 4C 49 B3 48 4C A7 4C 49 B2 4C 49 AA 31 |.".LI.HL.LI.LI.1|
00000C40: 3A 8D 38 30 3A 99 53 55 24 3A 8D 38 32 3A 99 42 |:.80:.SU$:.82:.B|
00000C50: 57 24 54 24 28 4C 49 29 3A 89 34 37 30 00 97 4C |W$T$(LI):.470..L|
00000C60: EA 01 8B 41 24 B2 22 91 22 AF 4C 49 AB 31 34 B1 |...A$.".".LI.14.|
00000C70: 31 A7 4C 49 B2 4C 49 AB 31 3A 8D 38 30 3A 99 53 |1.LI.LI.1:.80:.S|
00000C80: 44 24 3A 8D 38 31 3A 99 54 24 28 4C 49 AB 31 34 |D$:.81:.T$(LI.14|
00000C90: 29 3B 3A 89 34 37 30 00 A0 4C F4 01 89 34 37 30 |);:.470..L...470|
00000CA0: 00 A6 4C 20 03 3A 00 BD 4C 25 03 8F 20 20 20 20 |..L .:..L%.. |
00000CB0: 52 55 4E 20 41 20 50 52 4F 47 52 41 4D 00 C3 4C |RUN A PROGRAM..L|
00000CC0: 26 03 3A 00 F5 4C 2A 03 F5 20 22 22 AA C8 28 4D |&.:..L*.. ""..(M|
00000CD0: 24 28 53 45 2C 32 29 2C 31 36 29 AA 22 22 20 A4 |$(SE,2),16)."" .|
00000CE0: 20 22 22 AA C8 28 4D 24 28 53 45 2C 32 29 2C 31 | ""..(M$(SE,2),1|
00000CF0: 36 29 AA 22 22 00 05 4D 2F 03 8B 44 53 B3 B1 36 |6).""..M/..DS..6|
00000D00: 33 A7 39 30 30 00 27 4D 3E 03 54 4C B2 C3 28 4D |3.900.'M>.TL..(M|
00000D10: 24 28 53 45 2C 31 29 29 AA 31 32 3A 54 B2 32 30 |$(SE,1)).12:T.20|
00000D20: AB 54 4C AD 32 AB 31 00 52 4D 48 03 8D 39 30 3A |.TL.2.1.RMH..90:|
00000D30: 99 22 11 11 22 A3 54 29 22 9E CC 4F 41 44 49 4E |."..".T)"..OADIN|
00000D40: 47 20 22 4D 24 28 53 45 2C 31 29 22 20 2E 2E 2E |G "M$(SE,1)" ...|
00000D50: 99 22 00 62 4D 52 03 55 24 B2 C8 28 4C 24 2C 54 |.".bMR.U$..(L$,T|
00000D60: 4C 29 00 79 4D 5C 03 99 A3 54 29 55 24 3A 8D 38 |L).yM\...T)U$:.8|
00000D70: 30 3A 99 22 13 13 13 22 3B 00 94 4D 66 03 8A 20 |0:."...";..Mf.. |
00000D80: 22 22 AA C8 28 4D 24 28 53 45 2C 32 29 2C 31 36 |""..(M$(SE,2),16|
00000D90: 29 AA 22 22 00 9A 4D 83 03 80 00 C0 4D 84 03 8D |).""..M.....M...|
00000DA0: 39 30 3A FE 04 22 4F 32 45 22 3A 99 22 11 1C C4 |90:.."O2E":."...|
00000DB0: 49 53 4B 20 C5 52 52 4F 52 3A 20 96 22 44 53 24 |ISK .RROR: ."DS$|
00000DC0: 00 D8 4D 89 03 99 22 9A 22 C8 28 4C 24 2C C3 28 |..M...".".(L$,.(|
00000DD0: 44 53 24 29 AA 31 32 29 00 0C 4E 8E 03 99 22 9F |DS$).12)..N...".|
00000DE0: 20 20 20 20 D0 52 45 53 53 20 41 4E 59 20 4B 45 | .RESS ANY KE|
00000DF0: 59 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D |Y TO RETURN TO M|
00000E00: 45 4E 55 2E 22 3A 97 32 30 38 2C 2E 00 20 4E 98 |ENU.":.208,.. N.|
00000E10: 03 A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 33 32 35 |..A$:.A$.."".325|
00000E20: 00 32 4E A2 03 8B CF 28 32 29 AF 31 32 38 A7 33 |.2N....(2).128.3|
00000E30: 32 35 00 3B 4E AC 03 89 39 32 30 00 64 4E B6 03 |25.;N...920.dN..|
00000E40: 45 58 B2 2E 3A 8D 39 30 3A 99 22 11 20 20 20 20 |EX..:.90:.". |
00000E50: 20 20 20 20 20 9F C5 58 49 54 20 54 4F 20 22 45 | ..XIT TO "E|
00000E60: 24 22 3F 22 00 8B 4E BB 03 99 22 11 9E 20 20 20 |$"?"..N...".. |
00000E70: 20 20 20 20 20 20 C1 52 45 20 59 4F 55 20 53 55 | .RE YOU SU|
00000E80: 52 45 3F 20 20 28 D9 2F CE 29 22 00 B2 4E C0 03 |RE? (./.)"..N..|
00000E90: 99 22 99 20 20 20 20 20 20 20 20 20 A3 A3 A3 A3 |.". ....|
00000EA0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000EB0: 13 22 00 D1 4E CA 03 A1 41 24 3A 8B 41 24 B2 22 |."..N...A$:.A$."|
00000EC0: 59 22 B0 41 24 B2 22 D9 22 A7 45 58 B2 AB 31 3A |Y".A$.".".EX..1:|
00000ED0: 8E 00 E6 4E D4 03 8B 41 24 B2 22 4E 22 B0 41 24 |...N...A$."N".A$|
00000EE0: B2 22 CE 22 A7 8E 00 EF 4E DE 03 89 39 37 30 00 |."."....N...970.|
00000EF0: F5 4E E2 03 3A 00 12 4F E3 03 8F 20 20 20 20 20 |.N..:..O... |
00000F00: 49 4E 53 54 52 55 43 54 49 4F 4E 20 57 49 4E 44 |INSTRUCTION WIND|
00000F10: 4F 57 00 18 4F E4 03 3A 00 54 4F E8 03 8D 39 30 |OW..O..:.TO...90|
00000F20: 3A 8B 4E 50 B1 31 A7 99 22 20 20 20 9F CA CF D9 |:.NP.1.." ....|
00000F30: D3 D4 C9 C3 CB 20 9A 41 4E 44 20 9F C3 D5 D2 D3 |..... .AND .....|
00000F40: CF D2 20 CB C5 D9 D3 9A 20 53 43 52 4F 4C 4C 3B |.. ..... SCROLL;|
00000F50: 22 3A D5 99 00 91 4F F2 03 8B 4E 50 B1 2E A7 99 |":....O...NP....|
00000F60: 22 9F D2 C5 D4 D5 D2 CE 9A 2C 20 9F D3 D0 C1 C3 |"........, .....|
00000F70: C5 9A 2C 20 41 4E 44 20 9F C6 C9 D2 C5 C2 D5 D4 |.., AND ........|
00000F80: D4 CF CE 20 9A 53 45 4C 45 43 54 53 2E 22 3A D5 |... .SELECTS.":.|
00000F90: 99 00 97 4F F7 03 99 00 C8 4F FC 03 99 22 9A D0 |...O.....O..."..|
00000FA0: 52 45 53 53 3A 20 20 9F C3 D4 D2 CC 20 C5 9A 20 |RESS: ..... .. |
00000FB0: 54 4F 20 45 58 49 54 20 54 4F 20 CC CF C1 C4 D3 |TO EXIT TO .....|
00000FC0: D4 C1 D2 20 36 34 2E 22 00 FE 4F 06 04 99 22 20 |... 64."..O..." |
00000FD0: 20 20 20 20 20 20 20 9F C3 D4 D2 CC 20 C2 9A 20 | ..... .. |
00000FE0: 54 4F 20 45 58 49 54 20 54 4F 20 C2 C1 D3 C9 C3 |TO EXIT TO .....|
00000FF0: 20 37 2E 30 2E 13 13 22 3A 8D 38 30 3A 8E 00 04 | 7.0...":.80:...|
00001000: 50 0F 04 3A 00 0A 50 10 04 8F 00 10 50 11 04 3A |P..:..P.....P..:|
00001010: 00 4F 50 1A 04 FE 04 22 4F 36 54 36 46 22 3A 8D |.OP...."O6T6F":.|
00001020: 39 30 3A 53 53 B2 31 3A 99 22 9E D0 4C 45 41 53 |90:SS.1:."..LEAS|
00001030: 45 20 43 48 4F 4F 53 45 20 4F 4E 45 20 4F 46 20 |E CHOOSE ONE OF |
00001040: 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 3A 22 00 |THE FOLLOWING:".|
00001050: 83 50 24 04 99 22 99 A3 A3 A3 A3 A3 A3 A3 A3 A3 |.P$.."..........|
00001060: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001070: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3A 8D 31 30 37 |..........":.107|
00001080: 30 3A 8E 00 B0 50 2E 04 4F 4B B2 AB 31 3A 99 22 |0:...P..OK..1:."|
00001090: 13 11 11 22 3B 3A 81 41 B2 31 A4 33 3A 8B 53 53 |...";:.A.1.3:.SS|
000010A0: B2 41 A7 99 22 9E 22 3B 3A D5 20 99 22 9A 22 3B |.A..".";:. .".";|
000010B0: 00 C0 50 38 04 99 A3 31 31 29 53 45 24 28 41 29 |..P8...11)SE$(A)|
000010C0: 00 DE 50 3D 04 8B 4D 24 28 53 45 2C 33 29 B2 22 |..P=..M$(SE,3)."|
000010D0: 52 22 AF 4F 4B A7 41 B2 32 3A 4F 4B B2 2E 00 E6 |R".OK.A.2:OK....|
000010E0: 50 42 04 82 3A 8E 00 1A 51 D0 07 8D 39 30 3A 99 |PB..:...Q...90:.|
000010F0: 22 11 20 20 20 9F CA CF D9 D3 D4 C9 C3 CB 20 9A |". ......... .|
00001100: 41 4E 44 20 9F C3 D5 D2 D3 CF D2 20 CB C5 D9 D3 |AND ....... ....|
00001110: 9A 20 53 43 52 4F 4C 4C 3B 22 00 4D 51 DA 07 99 |. SCROLL;".MQ...|
00001120: 22 11 20 9F D2 C5 D4 D5 D2 CE 9A 2C 20 9F D3 D0 |". ........, ...|
00001130: C1 C3 C5 9A 2C 20 41 4E 44 20 9F C6 C9 D2 C5 C2 |...., AND ......|
00001140: D5 D4 D4 CF CE 20 9A 45 58 49 54 2E 22 00 53 51 |..... .EXIT.".SQ|
00001150: DF 07 8E 00 74 51 F4 0B 8F 20 2A 2A 2A 2A 2A 2A |....tQ... ******|
00001160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001170: 2A 2A 2A 2A 00 B7 51 1C 0C 97 32 35 31 2C 2E 3A |****..Q...251,.:|
00001180: 97 32 35 32 2C 31 34 3A 8F 20 20 20 20 20 20 20 |.252,14:. |
00001190: 20 20 20 20 20 20 20 20 20 50 4F 49 4E 54 45 52 | POINTER|
000011A0: 20 46 4F 52 20 4D 45 4D 4D 4F 56 45 2E 4F 20 20 | FOR MEMMOVE.O |
000011B0: 20 5B 33 35 38 34 5D 00 FA 51 26 0C 97 32 35 33 | [3584]..Q&..253|
000011C0: 2C 2E 3A 97 32 35 34 2C 33 32 3A 8F 20 20 20 20 |,.:.254,32:. |
000011D0: 20 20 20 20 20 20 20 20 20 20 20 20 50 4F 49 4E | POIN|
000011E0: 54 45 52 20 46 4F 52 20 4D 45 4D 4D 4F 56 45 2E |TER FOR MEMMOVE.|
000011F0: 4F 20 20 20 5B 38 31 39 32 5D 00 0A 52 30 0C 48 |O [8192]..R0.H|
00001200: 4C B2 2E 3A 4C 4C 24 B2 22 22 00 4D 52 3A 0C 48 |L..:LL$."".MR:.H|
00001210: 4C B2 48 4C AA 31 3A 9E 34 30 33 32 3A 8F 20 43 |L.HL.1:.4032:. C|
00001220: 4F 50 59 20 48 49 2D 52 45 53 20 20 20 20 20 20 |OPY HI-RES |
00001230: 20 20 20 44 41 54 41 20 54 4F 20 53 50 52 49 54 | DATA TO SPRIT|
00001240: 45 20 31 20 44 41 54 41 20 41 52 45 41 00 90 52 |E 1 DATA AREA..R|
00001250: 44 0C FE 16 20 31 2C 41 24 3A 41 24 B2 C8 28 41 |D... 1,A$:A$..(A|
00001260: 24 2C 36 33 29 3A 8F 20 20 20 20 20 20 20 20 20 |$,63):. |
00001270: 43 4F 50 59 20 44 41 54 41 20 49 4E 20 53 50 52 |COPY DATA IN SPR|
00001280: 49 54 45 20 31 20 41 52 45 41 20 54 4F 20 41 24 |ITE 1 AREA TO A$|
00001290: 00 F7 52 49 0C 41 24 B2 4C 4C 24 AA 41 24 3A 8F |..RI.A$.LL$.A$:.|
000012A0: 20 20 2B 43 48 52 24 28 50 45 45 4B 28 50 45 45 | +CHR$(PEEK(PEE|
000012B0: 4B 28 32 35 33 29 2B 50 45 45 4B 28 32 35 34 29 |K(253)+PEEK(254)|
000012C0: 2A 32 35 36 2D 31 29 29 3A 52 45 4D 20 41 44 44 |*256-1)):REM ADD|
000012D0: 20 41 4E 59 20 42 59 54 45 53 20 20 20 20 20 20 | ANY BYTES |
000012E0: 20 20 20 4C 45 46 54 20 46 52 4F 4D 20 4C 41 53 | LEFT FROM LAS|
000012F0: 54 20 47 52 4F 55 50 00 59 53 4E 0C 43 52 B2 D4 |T GROUP.YSN.CR..|
00001300: 28 41 24 2C C7 28 31 33 29 29 3A 54 24 28 48 4C |(A$,.(13)):T$(HL|
00001310: 29 B2 C8 28 41 24 2C 43 52 29 3A 8B C8 28 54 24 |)..(A$,CR):..(T$|
00001320: 28 48 4C 29 2C 33 29 B2 22 5E 55 3A 22 A7 48 4C |(HL),3)."^U:".HL|
00001330: B2 48 4C AB 31 3A 8F 20 49 46 20 4C 49 4E 45 20 |.HL.1:. IF LINE |
00001340: 49 53 20 22 5E 55 3A 3F 3F 3F 3F 3F 22 2C 20 46 |IS "^U:?????", F|
00001350: 4F 52 47 45 54 20 49 54 21 00 95 53 58 0C 8B 28 |ORGET IT!..SX..(|
00001360: C2 28 32 35 33 29 AA C2 28 32 35 34 29 AC 32 35 |.(253)..(254).25|
00001370: 36 B1 B2 45 41 29 AF 43 52 B2 2E A7 8E 3A 8F 20 |6..EA).CR....:. |
00001380: 43 48 45 43 4B 20 46 4F 52 20 45 4E 44 20 4F 46 |CHECK FOR END OF|
00001390: 20 46 49 4C 45 00 B0 53 62 0C 8B 43 52 B2 C3 28 | FILE..Sb..CR..(|
000013A0: 41 24 29 A7 4C 4C 24 B2 22 22 3A 89 33 31 33 30 |A$).LL$."":.3130|
000013B0: 00 E6 53 6C 0C 41 24 B2 C9 28 41 24 2C C3 28 41 |..Sl.A$..(A$,.(A|
000013C0: 24 29 AB 43 52 29 3A 8B 28 D4 28 41 24 2C C7 28 |$).CR):.(.(A$,.(|
000013D0: 31 33 29 29 B3 B1 2E 29 A7 48 4C B2 48 4C AA 31 |13))...).HL.HL.1|
000013E0: 3A 89 33 31 35 30 00 F7 53 76 0C 4C 4C 24 B2 41 |:.3150..Sv.LL$.A|
000013F0: 24 3A 89 33 31 33 30 00 FD 53 88 13 3A 00 17 54 |$:.3130..S..:..T|
00001400: 89 13 8F 20 20 20 47 45 54 20 41 20 4B 45 59 20 |... GET A KEY |
00001410: 52 4F 55 54 49 4E 45 00 1D 54 8A 13 3A 00 32 54 |ROUTINE..T..:.2T|
00001420: 8D 13 A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 35 30 |...A$:.A$.."".50|
00001430: 33 30 00 48 54 92 13 8B CF 28 32 29 B2 2E B0 4E |30.HT....(2)...N|
00001440: 50 B2 2E A7 35 30 30 35 00 52 54 9C 13 89 35 30 |P...5005.RT...50|
00001450: 37 30 00 71 54 A6 13 8B 41 24 B2 22 11 22 AF 41 |70.qT...A$.".".A|
00001460: 4E B3 48 4E AF 4E 50 A7 41 4E B2 41 4E AA 31 3A |N.HN.NP.AN.AN.1:|
00001470: 8E 00 9F 54 B0 13 8B 28 41 24 B2 22 91 22 B0 41 |...T...(A$.".".A|
00001480: 24 B2 22 1D 22 29 AF 41 4E B1 31 AF 4E 50 A7 41 |$.".").AN.1.NP.A|
00001490: 4E B2 41 4E AB 31 3A 41 24 B2 22 91 22 3A 8E 00 |N.AN.1:A$.".":..|
000014A0: C2 54 BA 13 8B 28 41 24 B2 22 20 22 B0 41 24 B2 |.T...(A$." ".A$.|
000014B0: C7 28 31 33 29 29 AF 4E 50 A7 41 24 B2 22 20 22 |.(13)).NP.A$." "|
000014C0: 3A 8E 00 D7 54 BF 13 8B 41 24 B2 22 05 22 B0 41 |:...T...A$.".".A|
000014D0: 24 B2 22 02 22 A7 8E 00 E5 54 C4 13 8D 34 35 3A |$."."....T...45:|
000014E0: 89 35 30 31 30 00 FE 54 CE 13 8B CF 28 32 29 B2 |.5010..T....(2).|
000014F0: 31 A7 41 24 B2 22 91 22 3A 89 35 30 34 30 00 17 |1.A$.".":.5040..|
00001500: 55 D8 13 8B CF 28 32 29 B2 35 A7 41 24 B2 22 11 |U....(2).5.A$.".|
00001510: 22 3A 89 35 30 33 30 00 32 55 E2 13 8B CF 28 32 |":.5030.2U....(2|
00001520: 29 AF 31 32 38 A7 41 24 B2 22 20 22 3A 89 35 30 |).128.A$." ":.50|
00001530: 35 30 00 40 55 E7 13 8D 34 35 3A 89 35 30 30 35 |50.@U...45:.5005|
00001540: 00 00 00 |... |
.@.@...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.55:NP.2: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..:.QC... "RESTORE COLORS 128",R
ESTORE COLORS 1,E..D... "ARABIC TO ROMAN
128",ARABIC ROMAN 128,E..D,...6D-..J.4.
7:.53265,(B(53265).248).J:.A.1.10:.A,J.X
D/..J...3:.53265,(B(53265).248).J:.A.1.1
0:.A,J:.."O6 A":.208,.:..~D0.:..D2....D4
.. "READ IT."..D5.. "RUN IT."..D6.. "BAC
K TO MENU.."..D8.: ....
...............E9.. LAST SELECTION MUST
CONTAIN A ".".+E:.: AT THE . OF ITS NA
ME..1E;.:.BEF..".......":.A.1.NP:.A.SE..
".".TA)M$(A,1):.73.VEH...TA)"."M$(A,1).~
EI..:...EJ.:..EK..".":.I.1.SE.5:.".";:.:
."..".TA)M$(SE,1):...EL.:..FM..80:..13)"
.************":..13)"* .SIDE"SI". .*":
..13)"************..."..FO.:..FP... 1,3,
38,17:..2FQ... 1,3,39,17:..EFR... 1,3,39
,19:..KFU.:.AFZ... 1,19,38,23,1:..GF_.:.
YFD..:. 0,1:. 4,7..FE..ES$."L";..FI..1,G
(133):.3,G(134):.5,G(135)..FJ.:..FK....F
L.:..FN.."......"TL$"..LOADSTAR .---- .1
28 MENU .---- .ISSUE #"IN"...";.&GX..ML$
;:.A.1.15:.".".39)".";:.:.ML$;.ZG...A.1.
5:.".".39)".";:.:.H(BL$,C(BL$).2);".....
.".`G..:.HG...77.NG..:.XG...1000..G...NP
....".......... THERE ARE NO 128 PROGRAM
S ON SIDE"SI"..":.230.CGC.:..GD.. PRINT
SIDE # & MAIN MENU..GE.:..GH..70..G..:.
.H... GET A KEY FOR MAIN MENU..H..:.(H
...208,..>H..AN.SE:HN.NP:.5000.NH...A$."
".320.PH...A$.".".E$."LOADSTAR 64":.260
..H...A$.".".E$."-BASIC 7.0-":.270..H..S
E.AN:.200..H...950::.EX..15,8,15,"U0>M0"
: 15:.."MAGIC II":K64:U .190..I...950:.E
X.."....":. 4,14:. 0,12:.:U .190..I:.:.*
I;.. READ, RUN, OR MENU.0I<.:.8I@..75
.BIE..1050.MIG..208,..HIJ.AN.SS:HN.3:.50
00:SS.AN..IO..M$(SE,3)."R".SS.2.A$.".".S
S.1..IP..M$(SE,3)."R".SS.2.A$.".".SS.3.F
IT..A$.." "..1070:.330..I^..SS.3..."O6T6
E":.190..IH..SS.2.800..IR..SS.1.400..J|.
.330..J..:. J... READ A FILE.&J..:.<
J...M$(SE,2).LS$.445.BJ..:.XJ... "T.".H(
M$(SE,2),14)."" . "T.".H(M$(SE,2),14).""
..J...DS..63.900..J...90:."............L
OADING TEXT FILE ...":PM.15..J..FI$."T."
.M$(SE,2):FI$.H(FI$,16):.1:.. "".FI$."",
P8192.5K..EA.B(174).B(175).256:.
ENDING ADDRESS OF TEXT FILE._K...90:."
............ORGANIZING TEXT..."..K...310
0:. CHANGE HI-RES DATA TO TEXT IN T$
(X)..K...80:."..";:.82:.A.1.15:.T$(A);:.
..KB.LS$.M$(SE,2):LI.15:HN.HL:AN.LI:.208
,...KL..2000:.".";..LV..244,.:.5000.&L..
.A$." "..80:.".";:.77:.70:.320.]L...A$."
.".LI.HL.LI.LI.1:.80:.SU$:.82:.BW$T$(LI)
:.470..L...A$.".".LI.14.1.LI.LI.1:.80:.S
D$:.81:.T$(LI.14);:.470. L...470..L .:..
L%.. RUN A PROGRAM.CL&.:..L*.. "".H(M
$(SE,2),16)."" . "".H(M$(SE,2),16).""..M
/..DS..63.900.'M>.TL.C(M$(SE,1)).12:T.20
.TL.2.1.RMH..90:."..".T)".LOADING "M$(SE
,1)" ....".BMR.U$.H(L$,TL).YM\...T)U$:.8
0:."...";..MF.. "".H(M$(SE,2),16).""..M.
....M...90:.."O2E":."..DISK ERROR: ."DS$
.XM..."."H(L$,C(DS$).12)..N...". PRES
S ANY KEY TO RETURN TO MENU.":.208,.. N.
..A$:.A$.."".325.2N...O(2).128.325.;N...
920.DN..EX..:.90:.". .EXIT TO "E
$"?"..N...".. ARE YOU SURE? (Y/
N)"..N...". ....................
.".QNJ..A$:.A$."Y".A$."Y".EX..1:...NT..A
$."N".A$."N"....N...970..N..:..O...
INSTRUCTION WINDOW..O..:.TO...90:.NP.1..
" .JOYSTICK .AND .CURSOR KEYS. SCROLL;
":U...O...NP....".RETURN., .SPACE., AND
.FIREBUTTON .SELECTS.":U...O....HO...".P
RESS: .CTRL E. TO EXIT TO LOADSTAR 64."
..O..." .CTRL B. TO EXIT TO BASIC
7.0...":.80:...P..:..P.....P..:.OP...."
O6T6F":.90:SS.1:.".PLEASE CHOOSE ONE OF
THE FOLLOWING:"..P$.."..................
..................":.1070:...P..OK..1:."
...";:.A.1.3:.SS.A..".";:U .".";..P8...1
1)SE$(A)..P=..M$(SE,3)."R".OK.A.2:OK....
PB..:...QP..90:.". .JOYSTICK .AND .CUR
SOR KEYS. SCROLL;".MQZ..". .RETURN., .SP
ACE., AND .FIREBUTTON .EXIT.".SQ....TQ..
. **************************..Q...251,.:
.252,14:. POINTER FOR MEM
MOVE.O [3584]..Q&..253,.:.254,32:.
POINTER FOR MEMMOVE.O [819
2]..R0.HL..:LL$."".MR:.HL.HL.1:.4032:. C
OPY HI-RES DATA TO SPRITE 1 DATA
AREA..RD... 1,A$:A$.H(A$,63):.
COPY DATA IN SPRITE 1 AREA TO A$..RI.A$.
LL$.A$:. +CHR$(PEEK(PEEK(253)+PEEK(254)
*256-1)):REM ADD ANY BYTES LEFT
FROM LAST GROUP.YSN.CR.T(A$,G(13)):T$(HL
).H(A$,CR):.H(T$(HL),3)."^U:".HL.HL.1:.
IF LINE IS "^U:?????", FORGET IT!..SX..(
B(253).B(254).256..EA).CR....:. CHECK FO
R END OF FILE..SB..CR.C(A$).LL$."":.3130
..SL.A$.I(A$,C(A$).CR):.(T(A$,G(13))...)
.HL.HL.1:.3150..SV.LL$.A$:.3130..S..:..T
... GET A KEY ROUTINE..T..:.2T...A$:.A
$.."".5030.HT...O(2)...NP...5005.RT...50
70.QT...A$.".".AN.HN.NP.AN.AN.1:...T...(
A$.".".A$.".").AN.1.NP.AN.AN.1:A$.".":..
BT...(A$." ".A$.G(13)).NP.A$." ":..WT...
A$.".".A$."."....TD..45:.5010..TN..O(2).
1.A$.".":.5040..UX..O(2).5.A$.".":.5030.
2U...O(2).128.A$." ":.5050.@U...45:.5005
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL