SCHA.SAVE
FILE INFORMATION
FILENAME(S): SCHA.SAVE
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 18:12:44
APPEARS ON: 1 disk(s)
FILE HASH
fd780b984592e6ed0e08de5fc188b7285df0cbde018da84f0d7412f7d5049202
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SWIFTAX SIDE 1 | SCHA.SAVE | PRG | Sailor, Ganheden | 6 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 01 00 9F 31 35 2C 44 53 2C 31 35 3A |.......15,DS,15:|
00000010: 5A 31 24 B2 22 53 43 48 41 22 00 4D 08 05 00 42 |Z1$."SCHA".M...B|
00000020: 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |L$." |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 7B 08 | ".{.|
00000050: 0F 00 46 50 24 B2 22 43 4F 4E 46 49 47 2E 53 59 |..FP$."CONFIG.SY|
00000060: 53 22 3A 47 50 24 B2 22 53 22 3A 44 56 B2 44 53 |S":GP$."S":DV.DS|
00000070: 3A 52 50 B2 31 3A 8D 38 30 30 30 00 A2 08 3C 00 |:RP.1:.8000...<.|
00000080: 9F 32 2C 44 53 2C 32 2C 44 50 24 AA 54 4E 24 AA |.2,DS,2,DP$.TN$.|
00000090: 22 53 54 41 54 55 53 2C 53 2C 52 22 3A 84 32 2C |"STATUS,S,R":.2,|
000000A0: 4E 24 00 C1 08 46 00 8B C5 28 4E 24 29 B2 30 A7 |N$...F...(N$).0.|
000000B0: 54 4C 24 28 31 29 B2 4E 24 3A A0 32 3A 89 31 31 |TL$(1).N$:.2:.11|
000000C0: 35 00 EB 08 50 00 81 49 B2 31 A4 C5 28 4E 24 29 |5...P..I.1..(N$)|
000000D0: 3A 84 32 2C 54 4C 24 28 49 AA 31 29 3A 82 3A 54 |:.2,TL$(I.1):.:T|
000000E0: 4C 24 28 31 29 B2 4E 24 3A A0 32 00 FE 08 6E 00 |L$(1).N$:.2...n.|
000000F0: 81 49 B2 31 A4 28 C5 28 4E 24 29 AA 31 29 00 1B |.I.1.(.(N$).1)..|
00000100: 09 6F 00 8B 54 4C 24 28 49 29 B2 22 D3 43 48 45 |.o..TL$(I).".CHE|
00000110: 44 55 4C 45 20 C1 22 A7 32 30 30 00 21 09 70 00 |DULE .".200.!.p.|
00000120: 82 00 27 09 73 00 8F 00 4B 09 78 00 4E 4D 24 B2 |..'.s...K.x.NM$.|
00000130: 54 4E 24 AA 5A 31 24 AA 22 2E 44 41 54 41 22 3A |TN$.Z1$.".DATA":|
00000140: 52 4E B2 33 34 3A 8D 31 30 30 30 00 81 09 82 00 |RN.34:.1000.....|
00000150: 52 4E B2 32 31 3A 81 49 B2 31 A4 35 3A 4E 4D 24 |RN.21:.I.1.5:NM$|
00000160: B2 54 4E 24 AA 5A 31 24 AA 22 2E 4C 53 54 22 AA |.TN$.Z1$.".LST".|
00000170: C9 28 C4 28 49 29 2C 31 29 3A 8D 31 30 30 30 3A |.(.(I),1):.1000:|
00000180: 82 00 BA 09 AB 00 4E 25 B2 C5 28 4E 24 29 3A 4E |......N%..(N$):N|
00000190: 25 B2 4E 25 AA 31 3A 54 4C 24 28 4E 25 AA 31 29 |%.N%.1:TL$(N%.1)|
000001A0: B2 22 D3 43 48 45 44 55 4C 45 20 C1 22 3A 54 4C |.".CHEDULE .":TL|
000001B0: 24 28 31 29 B2 C4 28 4E 25 29 00 E1 09 AC 00 A0 |$(1)..(N%)......|
000001C0: 31 35 3A 9F 31 35 2C 44 53 2C 31 35 2C 22 53 22 |15:.15,DS,15,"S"|
000001D0: AA 44 50 24 AA 54 4E 24 AA 22 53 54 41 54 55 53 |.DP$.TN$."STATUS|
000001E0: 22 00 08 0A AD 00 9F 32 2C 44 53 2C 32 2C 44 50 |"......2,DS,2,DP|
000001F0: 24 AA 54 4E 24 AA 22 53 54 41 54 55 53 2C 53 2C |$.TN$."STATUS,S,|
00000200: 57 22 3A 8D 35 30 30 30 00 25 0A AE 00 81 49 B2 |W":.5000.%....I.|
00000210: 31 A4 4E 25 AA 31 3A 98 32 2C 54 4C 24 28 49 29 |1.N%.1:.2,TL$(I)|
00000220: 3A 82 3A A0 32 00 61 0A C8 00 4E 4D 24 B2 54 4E |:.:.2.a...NM$.TN|
00000230: 24 AA 5A 31 24 AA 22 2E 44 41 54 41 22 3A 8D 32 |$.Z1$.".DATA":.2|
00000240: 30 30 30 3A 81 49 B2 31 A4 33 34 3A 52 45 B2 49 |000:.I.1.34:RE.I|
00000250: 3A 4D 24 B2 44 24 28 49 29 3A 8D 32 30 32 30 3A |:M$.D$(I):.2020:|
00000260: 82 00 6B 0A CD 00 8D 32 30 37 30 00 AA 0A D2 00 |..k....2070.....|
00000270: 4E 4D 24 B2 54 4E 24 AA 5A 31 24 AA 22 2E 4C 53 |NM$.TN$.Z1$.".LS|
00000280: 54 31 22 3A 8D 32 30 30 30 3A 81 49 B2 31 A4 32 |T1":.2000:.I.1.2|
00000290: 31 3A 52 45 B2 49 3A 4D 24 B2 4C 31 24 28 49 AB |1:RE.I:M$.L1$(I.|
000002A0: 31 29 3A 8D 32 30 32 30 3A 82 00 B4 0A D7 00 8D |1):.2020:.......|
000002B0: 32 30 37 30 00 F3 0A DC 00 4E 4D 24 B2 54 4E 24 |2070.....NM$.TN$|
000002C0: AA 5A 31 24 AA 22 2E 4C 53 54 32 22 3A 8D 32 30 |.Z1$.".LST2":.20|
000002D0: 30 30 3A 81 49 B2 31 A4 32 31 3A 52 45 B2 49 3A |00:.I.1.21:RE.I:|
000002E0: 4D 24 B2 4C 32 24 28 49 AB 31 29 3A 8D 32 30 32 |M$.L2$(I.1):.202|
000002F0: 30 3A 82 00 FD 0A E1 00 8D 32 30 37 30 00 3C 0B |0:.......2070.<.|
00000300: E6 00 4E 4D 24 B2 54 4E 24 AA 5A 31 24 AA 22 2E |..NM$.TN$.Z1$.".|
00000310: 4C 53 54 33 22 3A 8D 32 30 30 30 3A 81 49 B2 31 |LST3":.2000:.I.1|
00000320: A4 32 31 3A 52 45 B2 49 3A 4D 24 B2 4C 33 24 28 |.21:RE.I:M$.L3$(|
00000330: 49 AB 31 29 3A 8D 32 30 32 30 3A 82 00 46 0B EB |I.1):.2020:..F..|
00000340: 00 8D 32 30 37 30 00 85 0B F0 00 4E 4D 24 B2 54 |..2070.....NM$.T|
00000350: 4E 24 AA 5A 31 24 AA 22 2E 4C 53 54 34 22 3A 8D |N$.Z1$.".LST4":.|
00000360: 32 30 30 30 3A 81 49 B2 31 A4 32 31 3A 52 45 B2 |2000:.I.1.21:RE.|
00000370: 49 3A 4D 24 B2 4C 34 24 28 49 AB 31 29 3A 8D 32 |I:M$.L4$(I.1):.2|
00000380: 30 32 30 3A 82 00 8F 0B F5 00 8D 32 30 37 30 00 |020:.......2070.|
00000390: CE 0B FA 00 4E 4D 24 B2 54 4E 24 AA 5A 31 24 AA |....NM$.TN$.Z1$.|
000003A0: 22 2E 4C 53 54 35 22 3A 8D 32 30 30 30 3A 81 49 |".LST5":.2000:.I|
000003B0: B2 31 A4 32 31 3A 52 45 B2 49 3A 4D 24 B2 4C 35 |.1.21:RE.I:M$.L5|
000003C0: 24 28 49 AB 31 29 3A 8D 32 30 32 30 3A 82 00 D8 |$(I.1):.2020:...|
000003D0: 0B FF 00 8D 32 30 37 30 00 F3 0B 13 01 50 54 24 |....2070.....PT$|
000003E0: B2 22 D3 54 41 4E 44 42 59 2E 2E 2E 22 3A 8D 39 |.".TANDBY...":.9|
000003F0: 30 30 30 00 1E 0C 2C 01 46 50 24 B2 22 42 4F 4F |000...,.FP$."BOO|
00000400: 54 22 3A 47 50 24 B2 22 50 22 3A 44 56 B2 38 3A |T":GP$."P":DV.8:|
00000410: 52 50 B2 30 3A 8D 38 30 30 30 3A A0 31 35 00 48 |RP.0:.8000:.15.H|
00000420: 0C 4A 01 8B C2 28 31 30 32 32 29 B2 31 A7 97 31 |.J...(1022).1..1|
00000430: 30 32 32 2C 30 3A 93 22 31 30 34 30 50 47 32 2E |022,0:."1040PG2.|
00000440: 53 45 54 55 50 22 2C 38 00 6F 0C 4F 01 50 54 24 |SETUP",8.o.O.PT$|
00000450: B2 22 D2 45 54 55 52 4E 49 4E 47 20 54 4F 20 4D |.".ETURNING TO M|
00000460: 41 49 4E 20 4D 45 4E 55 22 3A 8D 39 30 30 30 00 |AIN MENU":.9000.|
00000470: 85 0C 54 01 97 31 30 32 32 2C 30 3A 93 22 4D 45 |..T..1022,0:."ME|
00000480: 4E 55 22 2C 38 00 B4 0C F4 01 99 C8 28 22 13 11 |NU",8.......("..|
00000490: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000004A0: 11 11 11 11 11 11 11 22 2C 59 AA 31 29 3B A6 58 |.......",Y.1);.X|
000004B0: 29 3B 3A 8E 00 E5 0C FE 01 46 54 24 B2 22 C0 C0 |);:......FT$."..|
000004C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004E0: C0 C0 C0 C0 22 00 F8 0C 03 02 54 24 B2 22 B0 22 |....".....T$."."|
000004F0: AA 46 54 24 AA 22 AE 22 00 0B 0D 08 02 42 24 B2 |.FT$.".".....B$.|
00000500: 22 AD 22 AA 46 54 24 AA 22 BD 22 00 2B 0D 12 02 |".".FT$.".".+...|
00000510: 99 C8 28 54 24 2C 31 29 3B CA 28 54 24 2C 32 2C |..(T$,1);.(T$,2,|
00000520: 4C 25 29 3B C9 28 54 24 2C 31 29 00 37 0D 1C 02 |L%);.(T$,1).7...|
00000530: 81 49 B2 31 A4 57 25 00 51 0D 26 02 99 A6 58 29 |.I.1.W%.Q.&...X)|
00000540: 22 DD 22 3B C8 28 42 4C 24 2C 4C 25 29 3B 22 DD |".";.(BL$,L%);".|
00000550: 22 00 57 0D 30 02 82 00 7C 0D 3A 02 99 A6 58 29 |".W.0...|.:...X)|
00000560: C8 28 42 24 2C 31 29 3B CA 28 42 24 2C 32 2C 4C |.(B$,1);.(B$,2,L|
00000570: 25 29 3B C9 28 42 24 2C 31 29 3A 8E 00 82 0D E8 |%);.(B$,1):.....|
00000580: 03 8F 00 A2 0D F2 03 9F 38 2C 44 53 2C 38 2C 44 |........8,DS,8,D|
00000590: 50 24 AA 4E 4D 24 AA 22 2C 4C 2C 22 AA C7 28 32 |P$.NM$.",L,"..(2|
000005A0: 35 29 00 C0 0D FC 03 52 48 B2 B5 28 52 4E AD 32 |5).....RH..(RN.2|
000005B0: 35 36 29 3A 52 4C B2 52 4E AB 32 35 36 AC 52 48 |56):RL.RN.256.RH|
000005C0: 00 EA 0D 06 04 98 31 35 2C 22 50 22 AA C7 28 31 |......15,"P"..(1|
000005D0: 30 34 29 AA C7 28 52 4C 29 AA C7 28 52 48 29 AA |04)..(RL)..(RH).|
000005E0: C7 28 31 29 3A 8D 35 30 30 30 00 14 0E 10 04 98 |.(1):.5000......|
000005F0: 31 35 2C 22 50 22 AA C7 28 31 30 34 29 AA C7 28 |15,"P"..(104)..(|
00000600: 52 4C 29 AA C7 28 52 48 29 AA C7 28 31 29 3A 8D |RL)..(RH)..(1):.|
00000610: 35 30 30 30 00 22 0E 1A 04 98 38 2C C7 28 32 35 |5000."....8,.(25|
00000620: 35 29 00 37 0E 24 04 8D 35 30 30 30 3A A0 38 3A |5).7.$..5000:.8:|
00000630: 8D 35 30 30 30 3A 8E 00 3D 0E D0 07 8F 00 58 0E |.5000:..=.....X.|
00000640: DA 07 9F 33 2C 44 53 2C 33 2C 44 50 24 AA 4E 4D |...3,DS,3,DP$.NM|
00000650: 24 AA 22 2C 4C 22 3A 8E 00 76 0E E4 07 52 48 B2 |$.",L":..v...RH.|
00000660: B5 28 52 45 AD 32 35 36 29 3A 52 4C B2 52 45 AB |.(RE.256):RL.RE.|
00000670: 32 35 36 AC 52 48 00 99 0E EE 07 98 31 35 2C 22 |256.RH......15,"|
00000680: 50 22 AA C7 28 39 39 29 AA C7 28 52 4C 29 AA C7 |P"..(99)..(RL)..|
00000690: 28 52 48 29 AA C7 28 31 29 00 BA 0E F8 07 8D 35 |(RH)..(1)......5|
000006A0: 30 30 30 3A 8B 45 4E B2 35 30 A7 98 33 2C C7 28 |000:.EN.50..3,.(|
000006B0: 32 35 35 29 3A 8D 35 30 30 30 00 DD 0E 02 08 98 |255):.5000......|
000006C0: 31 35 2C 22 50 22 AA C7 28 39 39 29 AA C7 28 52 |15,"P"..(99)..(R|
000006D0: 4C 29 AA C7 28 52 48 29 AA C7 28 31 29 00 F5 0E |L)..(RH)..(1)...|
000006E0: 0C 08 8D 35 30 30 30 3A 98 33 2C 4D 24 3A 8D 35 |...5000:.3,M$:.5|
000006F0: 30 30 30 3A 8E 00 FE 0E 16 08 A0 33 3A 8E 00 13 |000:.......3:...|
00000700: 0F 88 13 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 |....15,EN,EM$,ET|
00000710: 2C 45 53 00 26 0F 92 13 8B 45 4E B3 32 30 B0 45 |,ES.&....EN.20.E|
00000720: 4E B2 35 30 A7 8E 00 58 0F 9C 13 9E 4C 32 3A 58 |N.50...X....L2:X|
00000730: B2 36 3A 59 B2 39 3A 8D 35 30 30 3A 99 22 20 20 |.6:Y.9:.500:." |
00000740: 20 22 3B 45 4D 24 AA C8 28 42 4C 24 2C 32 31 AB | ";EM$..(BL$,21.|
00000750: C3 28 45 4D 24 29 29 3B 00 88 0F A6 13 59 B2 31 |.(EM$));.....Y.1|
00000760: 30 3A 8D 35 30 30 3A 99 22 20 20 20 20 28 D2 29 |0:.500:." (.)|
00000770: 45 54 52 59 20 20 20 28 CD 29 41 49 4E 20 4D 45 |ETRY (.)AIN ME|
00000780: 4E 55 20 20 20 20 22 3B 00 9C 0F B0 13 A1 43 24 |NU ";......C$|
00000790: 3A 8B 43 24 B2 22 22 A7 35 30 34 30 00 BC 0F BA |:.C$."".5040....|
000007A0: 13 8B 43 24 B2 22 52 22 A7 A0 32 3A A0 33 3A A0 |..C$."R"..2:.3:.|
000007B0: 38 3A A0 31 35 3A 9E 4C 33 3A 89 31 00 CE 0F C4 |8:.15:.L3:.1....|
000007C0: 13 8B 43 24 B3 B1 22 4D 22 A7 35 30 34 30 00 05 |..C$.."M".5040..|
000007D0: 10 CE 13 8B 43 24 B2 22 4D 22 A7 97 31 30 32 31 |....C$."M"..1021|
000007E0: 2C 31 3A 46 50 24 B2 22 42 4F 4F 54 22 3A 47 50 |,1:FP$."BOOT":GP|
000007F0: 24 B2 22 50 22 3A 44 56 B2 38 3A 52 50 B2 30 3A |$."P":DV.8:RP.0:|
00000800: 8D 38 30 30 30 00 1B 10 D3 13 A0 31 35 3A 9E 4C |.8000......15:.L|
00000810: 33 3A 93 22 4D 45 4E 55 22 2C 38 00 38 10 40 1F |3:."MENU",8.8.@.|
00000820: 9F 32 2C 44 56 2C 32 2C 46 50 24 AA 22 2C 22 AA |.2,DV,2,FP$.",".|
00000830: 47 50 24 AA 22 2C 52 22 00 4B 10 4A 1F 9F 31 2C |GP$.",R".K.J..1,|
00000840: 44 56 2C 31 35 3A 84 31 2C 45 4E 00 55 10 54 1F |DV,15:.1,EN.U.T.|
00000850: A0 32 3A A0 31 00 62 10 5E 1F 8B 45 4E B3 32 30 |.2:.1.b.^..EN.20|
00000860: A7 8E 00 87 10 08 20 9E 4C 32 3A 58 B2 34 3A 59 |...... .L2:X.4:Y|
00000870: B2 37 3A 8D 35 30 30 3A 4C 25 B2 33 31 3A 57 25 |.7:.500:L%.31:W%|
00000880: B2 34 3A 8D 35 31 30 00 BF 10 12 20 8B 52 50 B2 |.4:.510.... .RP.|
00000890: 30 A7 58 B2 37 3A 59 B2 39 3A 8D 35 30 30 3A 99 |0.X.7:Y.9:.500:.|
000008A0: 22 C9 4E 53 45 52 54 20 50 52 4F 47 52 41 4D 20 |".NSERT PROGRAM |
000008B0: 44 49 53 4B 20 2D 20 53 49 44 45 20 31 22 3B 00 |DISK - SIDE 1";.|
000008C0: FB 10 13 20 8B 52 50 B3 B1 30 A7 58 B2 31 31 3A |... .RP..0.X.11:|
000008D0: 59 B2 39 3A 8D 35 30 30 3A 99 22 C9 4E 53 45 52 |Y.9:.500:.".NSER|
000008E0: 54 20 44 41 54 41 20 44 49 53 4B 22 3A 58 B2 31 |T DATA DISK":X.1|
000008F0: 30 3A 59 B2 31 30 3A 8D 35 30 30 00 25 11 1C 20 |0:Y.10:.500.%.. |
00000900: 58 B2 31 30 3A 59 B2 31 30 3A 8D 35 30 30 3A 99 |X.10:Y.10:.500:.|
00000910: 22 D0 52 45 53 53 20 C3 20 54 4F 20 C3 4F 4E 54 |".RESS . TO .ONT|
00000920: 49 4E 55 45 22 00 39 11 26 20 A1 43 24 3A 8B 43 |INUE".9.& .C$:.C|
00000930: 24 B2 22 22 A7 38 32 33 30 00 5A 11 30 20 8F 20 |$."".8230.Z.0 . |
00000940: 20 20 49 46 43 24 3D 22 5F 22 54 48 45 4E 53 59 | IFC$="_"THENSY|
00000950: 53 4C 33 3A 52 45 54 55 52 4E 00 6C 11 3A 20 8B |SL3:RETURN.l.: .|
00000960: 43 24 B3 B1 22 43 22 A7 38 32 33 30 00 7A 11 44 |C$.."C".8230.z.D|
00000970: 20 9E 4C 33 3A 89 38 30 30 30 00 AE 11 28 23 9E | .L3:.8000...(#.|
00000980: 4C 31 3A 59 B2 37 3A 58 B2 B5 28 28 34 30 AB 28 |L1:Y.7:X..((40.(|
00000990: C3 28 50 54 24 29 AA 32 29 29 AD 32 29 3A 57 25 |.(PT$).2)).2):W%|
000009A0: B2 33 3A 4C 25 B2 C3 28 50 54 24 29 AA 32 00 BC |.3:L%..(PT$).2..|
000009B0: 11 2A 23 8D 35 30 30 3A 8D 35 31 30 00 D6 11 2B |.*#.500:.510...+|
000009C0: 23 58 B2 58 AA 32 3A 59 B2 39 3A 8D 35 30 30 3A |#X.X.2:Y.9:.500:|
000009D0: 99 50 54 24 3A 8E 00 00 00 |.PT$:.... |
.......15,DS,15:Z1$."SCHA".M...BL$."
".{.
..FP$."CONFIG.SYS":GP$."S":DV.DS:RP.1:.8
000...<..2,DS,2,DP$.TN$."STATUS,S,R":.2,
N$.A.F..E(N$).0.TL$(1).N$: 2:.115...P..I
.1.E(N$):.2,TL$(I.1):.:TL$(1).N$: 2...N.
.I.1.(E(N$).1)...O..TL$(I)."SCHEDULE A".
200.!.P...'.S...K.X.NM$.TN$.Z1$.".DATA":
RN.34:.1000.....RN.21:.I.1.5:NM$.TN$.Z1$
.".LST".I(D(I),1):.1000:......N%.E(N$):N
%.N%.1:TL$(N%.1)."SCHEDULE A":TL$(1).D(N
%)..... 15:.15,DS,15,"S".DP$.TN$."STATUS
"......2,DS,2,DP$.TN$."STATUS,S,W":.5000
.%....I.1.N%.1:.2,TL$(I):.: 2.A.H.NM$.TN
$.Z1$.".DATA":.2000:.I.1.34:RE.I:M$.D$(I
):.2020:..K.M..2070...R.NM$.TN$.Z1$.".LS
T1":.2000:.I.1.21:RE.I:M$.L1$(I.1):.2020
:....W..2070.....NM$.TN$.Z1$.".LST2":.20
00:.I.1.21:RE.I:M$.L2$(I.1):.2020:......
.2070.<...NM$.TN$.Z1$.".LST3":.2000:.I.1
.21:RE.I:M$.L3$(I.1):.2020:..F....2070..
...NM$.TN$.Z1$.".LST4":.2000:.I.1.21:RE.
I:M$.L4$(I.1):.2020:.......2070.N...NM$.
TN$.Z1$.".LST5":.2000:.I.1.21:RE.I:M$.L5
$(I.1):.2020:..X....2070.....PT$."STANDB
Y...":.9000...,.FP$."BOOT":GP$."P":DV.8:
RP.0:.8000: 15.H.J..B(1022).1..1022,0:."
1040PG2.SETUP",8.O.O.PT$."RETURNING TO M
AIN MENU":.9000...T..1022,0:."MENU",8...
...H(".........................",Y.1);.X
);:......FT$."..........................
............".....T$.".".FT$.".".....B$.
".".FT$.".".+....H(T$,1);J(T$,2,L%);I(T$
,1).7....I.1.W%.Q.&...X)".";H(BL$,L%);".
".W.0...|.:...X)H(B$,1);J(B$,2,L%);I(B$,
1):.............8,DS,8,DP$.NM$.",L,".G(2
5).....RH..(RN.256):RL.RN.256.RH......15
,"P".G(104).G(RL).G(RH).G(1):.5000......
15,"P".G(104).G(RL).G(RH).G(1):.5000."..
..8,G(255).7.$..5000: 8:.5000:..=.P...X.
Z..3,DS,3,DP$.NM$.",L":..V...RH..(RE.256
):RL.RE.256.RH......15,"P".G(99).G(RL).G
(RH).G(1)......5000:.EN.50..3,G(255):.50
00......15,"P".G(99).G(RL).G(RH).G(1)...
...5000:.3,M$:.5000:...... 3:.......15,E
N,EM$,ET,ES.&....EN.20.EN.50...X....L2:X
.6:Y.9:.500:." ";EM$.H(BL$,21.C(EM$));
.....Y.10:.500:." (R)ETRY (M)AIN ME
NU ";......C$:.C$."".5040......C$."R"
. 2: 3: 8: 15:.L3:.1.N.D..C$.."M".5040..
.N..C$."M"..1021,1:FP$."BOOT":GP$."P":DV
.8:RP.0:.8000...S. 15:.L3:."MENU",8.8.@.
.2,DV,2,FP$.",".GP$.",R".K.J..1,DV,15:.1
,EN.U.T. 2: 1.B.^..EN.20...... .L2:X.4:Y
.7:.500:L%.31:W%.4:.510.... .RP.0.X.7:Y.
9:.500:."INSERT PROGRAM DISK - SIDE 1";.
... .RP..0.X.11:Y.9:.500:."INSERT DATA D
ISK":X.10:Y.10:.500.%.. X.10:Y.10:.500:.
"PRESS C TO CONTINUE".9.& .C$:.C$."".823
0.Z.0 . IFC$="_"THENSYSL3:RETURN.L.: .
C$.."C".8230.Z.D .L3:.8000...(#.L1:Y.7:X
..((40.(C(PT$).2)).2):W%.3:L%.C(PT$).2..
.*#.500:.510.V.+#X.X.2:Y.9:.500:.PT$:...
.
> CLICK IMAGE PREVIEW FOR FULL MODAL