DISK EDITOR 128
FILE INFORMATION
FILENAME(S): DISK EDITOR 128
FILE TYPE(S): PRG
FILE SIZE: 5.8K
FIRST SEEN: 2025-11-30 18:12:57
APPEARS ON: 1 disk(s)
FILE HASH
767580262fcff273e99f2ddd8d07348df66ea75cfe676efc115802b07a1610fe
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JIM S 128 PRO | DISK EDITOR 128 | PRG | Sailor, Ganheden | 15 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 31 40 32 00 FE 25 3A 99 22 93 22 3A DE 31 |.@1@2..%:.".":.1| 00000010: 2C 31 3A DE 30 2C 31 3A 8D 31 33 37 30 3A 9C 3A |,1:.0,1:.1370:.:| 00000020: 86 20 4A 54 28 32 35 30 29 2C 4A 53 28 32 35 30 |. JT(250),JS(250| 00000030: 29 00 72 40 3C 00 99 22 93 0B 0E 22 3A E7 34 2C |).r@<.."...":.4,| 00000040: 31 34 3A E7 30 2C 31 32 3A 99 22 13 22 3B A3 32 |14:.0,12:.".";.2| 00000050: 35 35 29 3B 22 99 20 12 B5 20 20 20 20 31 32 38 |55);". .. 128| 00000060: 20 C4 49 53 4B 20 C5 44 49 54 4F 52 20 20 20 20 | .ISK .DITOR | 00000070: 22 3B 00 CB 40 46 00 44 54 24 B2 22 C4 CF D5 C2 |";..@F.DT$."....| 00000080: CC C5 22 3A 50 53 B2 31 30 32 34 3A 8F 20 49 46 |..":PS.1024:. IF| 00000090: 20 59 4F 55 20 57 41 4E 54 20 53 49 4E 47 4C 45 | YOU WANT SINGLE| 000000A0: 20 53 49 44 45 44 2C 20 43 48 41 4E 47 45 20 22 | SIDED, CHANGE "| 000000B0: C4 CF D5 C2 CC C5 22 20 41 4E 44 20 44 3D 32 20 |......" AND D=2 | 000000C0: 49 4E 20 4C 49 4E 45 20 32 33 30 00 FC 40 50 00 |IN LINE 230..@P.| 000000D0: 99 22 92 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B2 C0 |."..............| 000000E0: C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 |................| 000000F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 2F 41 5A |..........."./AZ| 00000100: 00 99 22 20 20 9E 12 C3 55 52 52 45 4E 54 92 20 |.." ...URRENT. | 00000110: 20 99 DD 20 20 20 12 9E D0 52 49 4F 52 92 20 20 | .. ...RIOR. | 00000120: 20 99 DD 20 05 D0 4F 53 49 54 49 4F 4E 3A 22 00 | .. ..OSITION:".| 00000130: 5A 41 64 00 99 22 20 D4 52 41 43 4B 3A 20 20 20 |ZAd.." .RACK: | 00000140: 20 99 DD 20 05 D4 52 41 43 4B 3A 20 20 20 20 99 | .. ..RACK: .| 00000150: DD 20 05 D6 41 4C 55 45 3A 22 00 85 41 6E 00 99 |. ..ALUE:"..An..| 00000160: 22 D3 45 43 54 4F 52 3A 20 20 20 20 99 DD 20 05 |".ECTOR: .. .| 00000170: D4 52 41 43 4B 3A 20 20 20 20 99 DD 20 05 28 C8 |.RACK: .. .(.| 00000180: C5 D8 29 3A 22 00 B6 41 78 00 99 22 99 C0 C0 C0 |..):"..Ax.."....| 00000190: C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 C0 |................| 000001A0: C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000001B0: C0 C0 C0 C0 C0 22 00 D4 41 82 00 81 41 B2 35 35 |....."..A...A.55| 000001C0: 32 39 36 A4 35 35 32 39 36 AA 32 35 35 3A 97 41 |296.55296.255:.A| 000001D0: 2C 31 3A 82 00 09 42 8C 00 99 22 11 20 20 9E 12 |,1:...B...". ..| 000001E0: D2 92 05 2F 9E 12 D7 92 99 20 2D 20 05 D2 45 41 |.../..... - ..EA| 000001F0: 44 2F D7 52 49 54 45 20 D4 52 41 43 4B 20 41 4E |D/.RITE .RACK AN| 00000200: 44 20 D3 45 43 54 4F 52 22 00 41 42 96 00 99 22 |D .ECTOR".AB..."| 00000210: 20 20 9E 12 2B 92 05 2F 9E 12 2D 92 99 20 2D 20 | ..+../..-.. - | 00000220: 05 C6 4F 52 57 41 52 44 2F 42 41 43 4B 57 41 52 |..ORWARD/BACKWAR| 00000230: 44 20 D4 52 41 43 4B 20 26 20 D3 45 43 54 4F 52 |D .RACK & .ECTOR| 00000240: 22 00 6C 42 A0 00 99 22 20 20 20 20 9E 12 CA 92 |".lB..." ....| 00000250: 99 20 2D 20 05 CA 55 4D 50 20 4C 49 4E 4B 20 55 |. - ..UMP LINK U| 00000260: 4E 44 45 52 20 43 55 52 53 4F 52 22 00 96 42 AA |NDER CURSOR"..B.| 00000270: 00 99 22 20 20 20 20 9E 12 C2 92 99 20 2D 20 05 |.." ..... - .| 00000280: CA 55 4D 50 20 54 4F 20 50 52 45 56 49 4F 55 53 |.UMP TO PREVIOUS| 00000290: 20 4C 49 4E 4B 22 00 C8 42 B4 00 99 22 20 20 20 | LINK"..B..." | 000002A0: 20 9E 12 D4 92 99 20 2D 20 05 D4 45 58 54 20 4D | ..... - ..EXT M| 000002B0: 4F 44 45 2C 20 53 54 41 52 54 49 4E 47 20 41 54 |ODE, STARTING AT| 000002C0: 20 43 55 52 53 4F 52 22 00 F6 42 BE 00 99 22 20 | CURSOR"..B..." | 000002D0: 20 20 20 9E 12 D6 92 99 20 2D 20 05 C3 48 41 4E | ..... - ..HAN| 000002E0: 47 45 20 56 41 4C 55 45 20 55 4E 44 45 52 20 43 |GE VALUE UNDER C| 000002F0: 55 52 53 4F 52 22 00 19 43 C8 00 99 22 20 20 20 |URSOR"..C..." | 00000300: 20 9E 12 C4 92 99 20 2D 20 05 C4 49 53 4B 20 C4 | ..... - ..ISK .| 00000310: 49 52 45 43 54 4F 52 59 22 00 47 43 D2 00 99 22 |IRECTORY".GC..."| 00000320: 20 20 20 20 9E 12 40 92 99 20 2D 20 05 C4 CF D3 | ..@.. - ....| 00000330: 20 C3 4F 4D 4D 41 4E 44 53 2C 20 C4 49 53 4B 20 | .OMMANDS, .ISK | 00000340: D3 54 41 54 55 53 22 00 78 43 DC 00 99 22 20 20 |.TATUS".xC..." | 00000350: 20 20 9E 12 2A 92 99 20 2D 20 05 BA 2D D3 45 4C | ..*.. - ..-.EL| 00000360: 45 43 54 20 C4 4F 55 42 4C 45 2F D3 49 4E 47 4C |ECT .OUBLE/.INGL| 00000370: 45 20 D3 49 44 45 44 22 00 C2 43 DE 00 99 22 20 |E .IDED"..C..." | 00000380: 20 20 20 9E 12 D1 92 99 20 2D 20 05 D1 55 49 54 | ..... - ..UIT| 00000390: 20 54 4F 20 C2 C1 D3 C9 C3 22 3A FE 26 3A 8B 42 | TO .....":.&:.B| 000003A0: 4C B2 31 A7 32 34 30 3A D5 20 8B 42 4C B2 32 A7 |L.1.240:. .BL.2.| 000003B0: 20 42 4C B2 30 3A 89 20 32 34 30 3A D5 20 42 4C | BL.0:. 240:. BL| 000003C0: B2 30 00 EB 43 E6 00 43 54 B2 31 3A 52 54 B2 31 |.0..C..CT.1:RT.1| 000003D0: 38 3A 52 53 B2 30 3A 44 B2 32 3A 81 41 B2 31 A4 |8:RS.0:D.2:.A.1.| 000003E0: 34 30 3A 99 22 99 A4 22 3B 3A 82 00 60 44 F0 00 |40:."..";:..`D..| 000003F0: 99 22 13 13 22 3A 81 41 B2 31 A4 32 32 3A 99 3A |."..":.A.1.22:.:| 00000400: 82 3A 99 22 12 99 20 20 20 20 20 20 20 20 22 3B |.:.".. ";| 00000410: 44 54 24 3B 22 20 D3 C9 C4 C5 C4 20 C4 C9 D3 CB |DT$;" ..... ....| 00000420: C5 D4 D4 C5 20 20 20 20 20 20 20 20 20 20 20 05 |.... .| 00000430: 92 22 3B 44 53 24 3B 22 13 22 3A 99 22 13 11 11 |.";DS$;".":."...| 00000440: 11 11 11 11 11 11 22 3B A3 33 34 29 3B 22 20 20 |......";.34);" | 00000450: 20 20 22 3A 8B 20 42 4C B2 32 A7 20 42 4C B2 30 | ":. BL.2. BL.0| 00000460: 00 AD 44 FA 00 99 22 13 11 11 11 11 11 11 11 11 |..D...".........| 00000470: 22 3B A3 33 34 29 3B 50 53 AB 31 30 32 33 3B 22 |";.34);PS.1023;"| 00000480: 9D 20 22 3A 99 A3 33 31 29 3B C2 28 50 53 29 3B |. ":..31);.(PS);| 00000490: 22 9D 20 20 22 3A 99 A3 33 31 29 3B 22 24 22 3B |". ":..31);"$";| 000004A0: C9 28 D2 28 C2 28 50 53 29 29 2C 32 29 00 FE 44 |.(.(.(PS)),2)..D| 000004B0: 04 01 99 22 13 11 11 11 11 11 11 11 11 11 22 3B |..."..........";| 000004C0: A3 37 29 3B 52 54 3B 22 9D 20 22 3B A3 31 39 29 |.7);RT;". ";.19)| 000004D0: 3B 4A 54 28 43 54 AB 31 29 3B 22 9D 20 22 3A 99 |;JT(CT.1);". ":.| 000004E0: A3 37 29 3B 52 53 3B 22 9D 20 22 3B A3 31 39 29 |.7);RS;". ";.19)| 000004F0: 3B 4A 53 28 43 54 AB 31 29 3B 22 9D 20 22 00 0D |;JS(CT.1);". "..| 00000500: 45 0E 01 8B 20 42 4C B2 30 A7 33 30 30 00 49 45 |E... BL.0.300.IE| 00000510: 18 01 42 4B B2 C2 28 50 53 29 3A 97 35 34 32 37 |..BK..(PS):.5427| 00000520: 32 AA 50 53 2C 37 3A 8B 42 4B B1 B2 31 32 38 A7 |2.PS,7:.BK..128.| 00000530: 97 20 50 53 2C 42 4B AB 31 32 38 3A D5 20 97 20 |. PS,BK.128:. . | 00000540: 50 53 2C 42 4B AA 31 32 38 00 64 45 22 01 8B 42 |PS,BK.128.dE"..B| 00000550: 4B B2 31 36 30 B0 42 4B B2 32 32 34 A7 20 97 50 |K.160.BK.224. .P| 00000560: 53 2C 42 4B 00 87 45 2C 01 A1 4B 24 3A 8B 44 45 |S,BK..E,..K$:.DE| 00000570: B3 B1 30 A7 33 30 30 30 3A D5 20 8B 44 53 B3 B1 |..0.3000:. .DS..| 00000580: 30 A7 20 33 30 30 30 00 A3 45 31 01 8B 4B 24 B2 |0. 3000..E1..K$.| 00000590: 22 22 A7 33 30 30 3A D5 20 8B 42 4C B2 30 A7 20 |"".300:. .BL.0. | 000005A0: 34 36 30 00 BA 45 36 01 97 50 53 2C 42 4B 3A 97 |460..E6..PS,BK:.| 000005B0: 35 34 32 37 32 AA 50 53 2C 31 00 DA 45 40 01 8B |54272.PS,1..E@..| 000005C0: 4B 24 B2 22 91 22 B0 C2 28 32 31 32 29 B2 38 33 |K$."."..(212).83| 000005D0: A7 20 50 53 B2 50 53 AB 34 30 00 FA 45 4A 01 8B |. PS.PS.40..EJ..| 000005E0: 4B 24 B2 22 11 22 B0 C2 28 32 31 32 29 B2 38 34 |K$."."..(212).84| 000005F0: A7 20 50 53 B2 50 53 AA 34 30 00 2C 46 54 01 8B |. PS.PS.40.,FT..| 00000600: 4B 24 B2 22 9D 22 B0 C2 28 32 31 32 29 B2 38 35 |K$."."..(212).85| 00000610: A7 20 50 53 B2 50 53 AB 31 3A 8B 20 50 53 B3 31 |. PS.PS.1:. PS.1| 00000620: 30 32 34 A7 20 50 53 B2 31 32 37 39 00 5E 46 5E |024. PS.1279.^F^| 00000630: 01 8B 4B 24 B2 22 1D 22 B0 C2 28 32 31 32 29 B2 |..K$."."..(212).| 00000640: 38 36 A7 20 50 53 B2 50 53 AA 31 3A 8B 20 50 53 |86. PS.PS.1:. PS| 00000650: B1 31 32 37 39 A7 20 50 53 B2 31 30 32 34 00 76 |.1279. PS.1024.v| 00000660: 46 68 01 8B 50 53 B3 31 30 32 34 20 A7 20 50 53 |Fh..PS.1024 . PS| 00000670: B2 50 53 AA 34 30 00 B8 46 72 01 8B 50 53 B1 31 |.PS.40..Fr..PS.1| 00000680: 32 37 39 20 AF 20 50 53 B3 31 33 30 34 20 A7 20 |279 . PS.1304 . | 00000690: 50 53 B2 50 53 AB 34 30 3A D5 20 8B 50 53 B1 31 |PS.PS.40:. .PS.1| 000006A0: 33 30 33 20 AF 20 50 53 B3 31 33 32 32 20 A7 20 |303 . PS.1322 . | 000006B0: 50 53 B2 50 53 AB 34 30 00 D1 46 7C 01 8B 4B 24 |PS.PS.40..F|..K$| 000006C0: B2 22 13 22 A7 50 53 B2 31 30 32 34 3A 89 32 34 |.".".PS.1024:.24| 000006D0: 30 00 E2 46 86 01 8B 4B 24 B2 22 57 22 A7 20 37 |0..F...K$."W". 7| 000006E0: 32 30 00 F3 46 90 01 8B 4B 24 B2 22 2B 22 A7 20 |20..F...K$."+". | 000006F0: 37 39 30 00 04 47 9A 01 8B 4B 24 B2 22 2D 22 A7 |790..G...K$."-".| 00000700: 20 38 35 30 00 15 47 A4 01 8B 4B 24 B2 22 4A 22 | 850..G...K$."J"| 00000710: A7 20 39 30 30 00 26 47 AE 01 8B 4B 24 B2 22 42 |. 900.&G...K$."B| 00000720: 22 A7 20 39 35 30 00 37 47 B8 01 8B 4B 24 B2 22 |". 950.7G...K$."| 00000730: 54 22 A7 20 39 38 30 00 49 47 C2 01 8B 4B 24 B2 |T". 980.IG...K$.| 00000740: 22 56 22 A7 20 31 31 32 30 00 5B 47 CC 01 8B 4B |"V". 1120.[G...K| 00000750: 24 B2 22 44 22 A7 20 31 31 39 30 00 6D 47 D6 01 |$."D". 1190.mG..| 00000760: 8B 4B 24 B2 22 40 22 A7 20 31 32 32 30 00 7F 47 |.K$."@". 1220..G| 00000770: E0 01 8B 4B 24 B2 22 2A 22 A7 20 31 33 33 30 00 |...K$."*". 1330.| 00000780: 90 47 E5 01 8B 4B 24 B2 22 52 22 A7 20 35 31 30 |.G...K$."R". 510| 00000790: 00 C9 47 E7 01 8B 4B 24 B2 22 51 22 A7 99 22 93 |..G...K$."Q"..".| 000007A0: 11 11 11 11 31 32 38 20 C4 49 53 4B 20 C5 44 49 |....128 .ISK .DI| 000007B0: 54 4F 52 20 54 45 52 4D 49 4E 41 54 45 44 22 3A |TOR TERMINATED":| 000007C0: 93 22 48 49 22 2C 38 3A 80 00 D3 47 EA 01 89 20 |."HI",8:...G... | 000007D0: 32 35 30 00 F0 47 F4 01 8F 20 2A 2A 2A 2A 2A 20 |250..G... ***** | 000007E0: 52 45 41 44 20 52 4F 55 54 49 4E 45 20 2A 2A 2A |READ ROUTINE ***| 000007F0: 00 38 48 FE 01 42 4C B2 31 3A FE 1A 20 30 2C 32 |.8H..BL.1:.. 0,2| 00000800: 34 2C 33 39 2C 32 34 2C 31 3A 99 22 D2 C5 C1 C4 |4,39,24,1:."....| 00000810: 20 D4 52 41 43 4B 3A 22 3B 3A FE 1A 20 31 31 2C | .RACK:";:.. 11,| 00000820: 32 34 2C 31 33 2C 32 34 3A 43 54 B2 31 3A 57 46 |24,13,24:CT.1:WF| 00000830: B2 30 3A 54 24 B2 22 22 00 74 48 08 02 9F 39 2C |.0:T$."".tH...9,| 00000840: 30 2C 30 3A 84 39 2C 54 24 3A A0 39 3A 54 B2 C5 |0,0:.9,T$:.9:T..| 00000850: 28 54 24 29 3A 8B 54 B2 30 A7 20 35 35 30 3A D5 |(T$):.T.0. 550:.| 00000860: 8B 57 46 B2 31 A7 37 33 35 3A D5 20 8B 54 B3 31 |.WF.1.735:. .T.1| 00000870: A7 35 31 30 00 9E 48 12 02 8B 44 B2 31 20 AF 20 |.510..H...D.1 . | 00000880: 54 B1 33 35 20 A7 20 35 31 30 3A D5 20 8B 44 B2 |T.35 . 510:. .D.| 00000890: 32 20 AF 20 54 B1 37 30 20 A7 20 35 31 30 00 A7 |2 . T.70 . 510..| 000008A0: 48 1C 02 52 54 B2 54 00 B1 48 26 02 99 22 13 13 |H..RT.T..H&.."..| 000008B0: 22 00 E1 48 30 02 FE 1A 20 31 36 2C 32 34 2C 33 |"..H0... 16,24,3| 000008C0: 39 2C 32 34 2C 31 3A 99 22 D3 45 43 54 4F 52 3A |9,24,1:.".ECTOR:| 000008D0: 22 3B 3A FE 1A 20 32 33 2C 32 34 2C 32 35 2C 32 |";:.. 23,24,25,2| 000008E0: 34 00 14 49 3A 02 9F 39 2C 30 2C 30 3A 84 39 2C |4..I:..9,0,0:.9,| 000008F0: 53 24 3A A0 39 3A 53 B2 C5 28 53 24 29 3A 8B 53 |S$:.9:S..(S$):.S| 00000900: 24 B2 22 22 A7 20 36 37 30 3A D5 20 8B 53 B3 30 |$."". 670:. .S.0| 00000910: A7 35 36 30 00 36 49 44 02 8B 44 B2 32 20 AF 20 |.560.6ID..D.2 . | 00000920: 52 54 B1 33 35 A7 54 54 B2 52 54 AB 33 35 3A D5 |RT.35.TT.RT.35:.| 00000930: 20 54 54 B2 52 54 00 55 49 4E 02 8B 20 54 54 B1 | TT.RT.UIN.. TT.| 00000940: 33 35 20 B0 20 54 54 B3 31 20 A7 20 4A 4D B2 30 |35 . TT.1 . JM.0| 00000950: 3A 89 35 31 30 00 72 49 58 02 8B 20 54 54 B1 B2 |:.510.rIX.. TT..| 00000960: 31 20 AF 20 54 54 B3 B2 31 37 20 A7 20 4D 53 B2 |1 . TT..17 . MS.| 00000970: 32 30 00 90 49 62 02 8B 20 54 54 B1 B2 31 38 20 |20..Ib.. TT..18 | 00000980: AF 20 54 54 B3 B2 32 34 20 A7 20 4D 53 B2 31 38 |. TT..24 . MS.18| 00000990: 00 AE 49 6C 02 8B 20 54 54 B1 B2 32 35 20 AF 20 |..Il.. TT..25 . | 000009A0: 54 54 B3 B2 33 30 20 A7 20 4D 53 B2 31 37 00 CC |TT..30 . MS.17..| 000009B0: 49 76 02 8B 20 54 54 B1 B2 33 31 20 AF 20 54 54 |Iv.. TT..31 . TT| 000009C0: B3 B2 33 35 20 A7 20 4D 53 B2 31 36 00 D8 49 80 |..35 . MS.16..I.| 000009D0: 02 8B 57 46 B2 32 A7 8E 00 E9 49 8A 02 8B 20 4A |..WF.2....I... J| 000009E0: 4D B2 31 20 A7 20 39 32 30 00 07 4A 94 02 8B 20 |M.1 . 920..J... | 000009F0: 53 B3 30 20 B0 20 53 B1 4D 53 20 A7 20 35 36 30 |S.0 . S.MS . 560| 00000A00: 3A D5 20 52 53 B2 53 00 47 4A 9E 02 8B 20 57 46 |:. RS.S.GJ... WF| 00000A10: B2 30 20 AF 20 52 54 B1 33 35 AC 44 20 B0 20 52 |.0 . RT.35.D . R| 00000A20: 54 B3 30 A7 20 35 31 30 3A D5 20 8B 20 57 46 B2 |T.0. 510:. . WF.| 00000A30: 31 20 AF 20 52 54 B1 33 35 AC 44 20 B0 20 52 54 |1 . RT.35.D . RT| 00000A40: B3 30 A7 20 37 33 35 00 55 4A A8 02 8B 57 46 B2 |.0. 735.UJ...WF.| 00000A50: 30 A7 37 30 30 00 5F 4A B2 02 89 20 37 34 30 00 |0.700._J... 740.| 00000A60: B9 4A BC 02 9F 31 35 2C 38 2C 31 35 3A 9F 35 2C |.J...15,8,15:.5,| 00000A70: 38 2C 35 2C 22 23 22 3A 98 31 35 2C 22 55 31 22 |8,5,"#":.15,"U1"| 00000A80: 3B 35 3B 30 3B 52 54 3B 52 53 3A 9E 38 32 37 32 |;5;0;RT;RS:.8272| 00000A90: 3A 9E 38 31 39 32 3A A0 35 3A A0 31 35 3A 8B 44 |:.8192:.5:.15:.D| 00000AA0: 53 B2 36 36 A7 31 33 33 30 3A D5 20 50 53 B2 31 |S.66.1330:. PS.1| 00000AB0: 30 32 34 3A 89 20 32 34 30 00 D5 4A C6 02 8F 20 |024:. 240..J... | 00000AC0: 2A 2A 2A 20 57 52 49 54 45 20 52 4F 55 54 49 4E |*** WRITE ROUTIN| 00000AD0: 45 20 2A 2A 2A 00 09 4B D0 02 FE 1A 20 30 2C 32 |E ***..K.... 0,2| 00000AE0: 34 2C 33 39 2C 32 34 2C 31 3A 99 22 D7 D2 C9 D4 |4,39,24,1:."....| 00000AF0: C5 20 D4 52 41 43 4B 3A 22 3B 3A FE 1A 20 31 32 |. .RACK:";:.. 12| 00000B00: 2C 32 34 2C 31 34 2C 32 34 00 17 4B DA 02 57 46 |,24,14,24..K..WF| 00000B10: B2 31 3A 89 35 32 30 00 26 4B DF 02 8B 20 54 B3 |.1:.520.&K... T.| 00000B20: 31 A7 20 37 32 30 00 50 4B E0 02 8B 44 B2 31 20 |1. 720.PK...D.1 | 00000B30: AF 20 54 B1 33 35 20 A7 20 37 32 30 3A D5 20 8B |. T.35 . 720:. .| 00000B40: 44 B2 32 20 AF 20 54 B1 37 30 20 A7 20 37 32 30 |D.2 . T.70 . 720| 00000B50: 00 59 4B E1 02 89 35 34 30 00 73 4B E4 02 99 22 |.YK...540.sK..."| 00000B60: 13 13 22 3A FE 1A 20 30 2C 32 34 2C 33 39 2C 32 |..":.. 0,24,39,2| 00000B70: 34 2C 31 00 B4 4B EE 02 99 22 93 20 20 D2 45 2D |4,1..K...". .E-| 00000B80: D7 52 49 54 45 20 D4 52 41 43 4B 3A 22 3B 52 54 |.RITE .RACK:";RT| 00000B90: 3B 22 20 D3 45 43 54 4F 52 3A 22 3B 52 53 3B 22 |;" .ECTOR:";RS;"| 00000BA0: 9D 3F 20 28 12 D9 92 2F 12 CE 92 29 13 22 3B 3A |.? (.../...).";:| 00000BB0: 57 46 B2 30 00 CC 4B F8 02 A1 F9 4C 50 24 3A 8B |WF.0..K....LP$:.| 00000BC0: 4C 50 24 B3 B1 22 59 22 A7 32 34 30 00 17 4C 02 |LP$.."Y".240..L.| 00000BD0: 03 9F 31 35 2C 38 2C 31 35 3A 9F 35 2C 38 2C 35 |..15,8,15:.5,8,5| 00000BE0: 2C 22 23 22 3A 9E 38 32 32 34 3A 98 31 35 2C 22 |,"#":.8224:.15,"| 00000BF0: 55 32 22 3B 35 3B 30 3B 52 54 3B 52 53 3A A0 35 |U2";5;0;RT;RS:.5| 00000C00: 3A A0 31 35 3A 8B 44 53 B3 B1 30 A7 33 30 30 30 |:.15:.DS..0.3000| 00000C10: 3A D5 20 89 32 34 30 00 3D 4C 0C 03 8F 20 2A 2A |:. .240.=L... **| 00000C20: 2A 20 49 4E 43 52 45 41 53 45 20 53 45 43 54 4F |* INCREASE SECTO| 00000C30: 52 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 52 4C |R ROUTINE ***.RL| 00000C40: 16 03 53 B2 52 53 AA 31 3A 57 46 B2 32 3A 8D 35 |..S.RS.1:WF.2:.5| 00000C50: 38 30 00 6B 4C 20 03 8B 20 53 B1 4D 53 20 A7 20 |80.kL .. S.MS . | 00000C60: 52 54 B2 52 54 AA 31 3A 53 B2 30 00 83 4C 2A 03 |RT.RT.1:S.0..L*.| 00000C70: 8B 20 44 B2 31 20 AF 20 52 54 B1 33 35 20 A7 20 |. D.1 . RT.35 . | 00000C80: 35 31 30 00 9B 4C 34 03 8B 20 44 B2 32 20 AF 20 |510..L4.. D.2 . | 00000C90: 52 54 B1 37 30 20 A7 20 35 31 30 00 AE 4C 3E 03 |RT.70 . 510..L>.| 00000CA0: 57 46 B2 30 3A 52 53 B2 53 3A 89 37 30 30 00 D4 |WF.0:RS.S:.700..| 00000CB0: 4C 48 03 8F 20 2A 2A 2A 20 44 45 43 52 45 41 53 |LH.. *** DECREAS| 00000CC0: 45 20 53 45 43 54 4F 52 20 52 4F 55 54 49 4E 45 |E SECTOR ROUTINE| 00000CD0: 20 2A 2A 2A 00 E9 4C 52 03 53 B2 52 53 AB 31 3A | ***..LR.S.RS.1:| 00000CE0: 57 46 B2 32 3A 8D 35 38 30 00 07 4D 5C 03 8B 20 |WF.2:.580..M\.. | 00000CF0: 53 B3 30 20 A7 20 52 54 B2 52 54 AB 31 3A 8D 35 |S.0 . RT.RT.1:.5| 00000D00: 38 30 3A 53 B2 4D 53 00 18 4D 66 03 8B 20 52 54 |80:S.MS..Mf.. RT| 00000D10: B3 31 20 A7 20 35 31 30 00 2B 4D 70 03 57 46 B2 |.1 . 510.+Mp.WF.| 00000D20: 30 3A 52 53 B2 53 3A 89 37 30 30 00 4C 4D 7A 03 |0:RS.S:.700.LMz.| 00000D30: 8F 20 2A 2A 2A 20 4A 55 4D 50 20 42 4C 4F 43 4B |. *** JUMP BLOCK| 00000D40: 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 B6 4D 84 | ROUTINE ***..M.| 00000D50: 03 4A 4D B2 31 3A 8B 50 53 B3 31 32 37 39 20 AF |.JM.1:.PS.1279 .| 00000D60: 20 C2 28 50 53 29 B3 B1 30 20 A7 20 4A 54 28 43 | .(PS)..0 . JT(C| 00000D70: 54 29 B2 52 54 3A 4A 53 28 43 54 29 B2 52 53 3A |T).RT:JS(CT).RS:| 00000D80: 43 54 B2 43 54 AA 31 3A 52 54 B2 C2 28 50 53 29 |CT.CT.1:RT..(PS)| 00000D90: 3A 53 B2 C2 28 50 53 AA 31 29 3A 8B 43 54 B1 32 |:S..(PS.1):.CT.2| 00000DA0: 35 35 A7 20 43 54 B2 30 3A 89 20 35 38 30 3A D5 |55. CT.0:. 580:.| 00000DB0: 20 89 20 35 38 30 00 C0 4D 8E 03 89 20 32 38 30 | . 580..M... 280| 00000DC0: 00 EF 4D 98 03 8B 20 53 B3 30 20 B0 20 53 B1 4D |..M... S.0 . S.M| 00000DD0: 53 20 A7 20 43 54 B2 43 54 AB 31 3A 52 54 B2 4A |S . CT.CT.1:RT.J| 00000DE0: 54 28 43 54 29 3A 52 53 B2 4A 53 28 43 54 29 00 |T(CT):RS.JS(CT).| 00000DF0: 02 4E A2 03 52 53 B2 53 3A 4A 4D B2 30 3A 89 37 |.N..RS.S:JM.0:.7| 00000E00: 30 30 00 24 4E AC 03 8F 20 2A 2A 2A 20 4A 55 4D |00.$N... *** JUM| 00000E10: 50 20 54 4F 20 50 52 49 4F 52 20 42 4C 4F 43 4B |P TO PRIOR BLOCK| 00000E20: 20 2A 2A 2A 00 3B 4E B6 03 43 54 B2 43 54 AB 31 | ***.;N..CT.CT.1| 00000E30: 3A 8B 43 54 B3 31 A7 43 54 B2 31 00 6B 4E C0 03 |:.CT.1.CT.1.kN..| 00000E40: 52 54 B2 4A 54 28 43 54 29 3A 53 B2 4A 53 28 43 |RT.JT(CT):S.JS(C| 00000E50: 54 29 3A 8B 52 54 B2 30 A7 52 54 B2 31 38 3A 89 |T):.RT.0.RT.18:.| 00000E60: 35 31 30 3A D5 20 89 20 35 38 30 00 8B 4E CA 03 |510:. . 580..N..| 00000E70: 8F 20 2A 2A 2A 20 54 45 58 54 20 4D 4F 44 45 20 |. *** TEXT MODE | 00000E80: 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 9F 4E D4 03 |ROUTINE ***..N..| 00000E90: FE 1A 20 30 2C 32 34 2C 33 39 2C 32 34 2C 31 00 |.. 0,24,39,24,1.| 00000EA0: EB 4E DE 03 99 22 93 20 20 20 20 20 20 12 D5 92 |.N...". ...| 00000EB0: 50 50 45 52 20 4F 52 20 12 CC 92 4F 57 45 52 20 |PPER OR ...OWER | 00000EC0: 43 41 53 45 20 57 52 49 54 49 4E 47 3F 13 22 3B |CASE WRITING?.";| 00000ED0: 3A A1 F9 57 39 24 3A 8B 57 39 24 B2 22 4C 22 A7 |:..W9$:.W9$."L".| 00000EE0: 57 39 B2 31 3A D5 20 57 39 B2 30 00 1A 4F E8 03 |W9.1:. W9.0..O..| 00000EF0: 99 22 93 20 20 20 20 D4 45 58 54 20 CD 4F 44 45 |.". .EXT .ODE| 00000F00: 20 28 D0 52 45 53 53 20 D2 C5 D4 D5 D2 CE 20 54 | (.RESS ...... T| 00000F10: 4F 20 45 58 49 54 29 13 22 3B 00 33 4F F2 03 A1 |O EXIT).";.3O...| 00000F20: 49 4E 24 3A 8B 49 4E 24 B2 C7 28 31 33 29 A7 20 |IN$:.IN$..(13). | 00000F30: 32 34 30 00 6A 4F FC 03 43 4B B2 C2 28 50 53 29 |240.jO..CK..(PS)| 00000F40: 3A 42 4B B2 43 4B 3A 8B 20 42 4B B1 B2 31 32 38 |:BK.CK:. BK..128| 00000F50: 20 A7 20 97 50 53 2C 42 4B AB 31 32 38 3A D5 20 | . .PS,BK.128:. | 00000F60: 97 50 53 2C 42 4B AA 31 32 38 00 7F 4F 06 04 81 |.PS,BK.128..O...| 00000F70: 5A B2 31 A4 32 35 3A 82 3A 97 50 53 2C 43 4B 00 |Z.1.25:.:.PS,CK.| 00000F80: 96 4F 10 04 8B 50 53 B1 31 32 37 39 20 A7 20 50 |.O...PS.1279 . P| 00000F90: 53 B2 31 30 32 34 00 AD 4F 1A 04 8B 50 53 B3 31 |S.1024..O...PS.1| 00000FA0: 30 32 34 20 A7 20 50 53 B2 31 32 37 39 00 CA 4F |024 . PS.1279..O| 00000FB0: 24 04 8B 49 4E 24 B2 C7 28 32 30 29 A7 50 53 B2 |$..IN$..(20).PS.| 00000FC0: 50 53 AB 31 3A 89 31 30 31 30 00 DB 4F 2E 04 8B |PS.1:.1010..O...| 00000FD0: 49 4E 24 B2 22 22 A7 31 30 31 30 00 FB 4F 38 04 |IN$."".1010..O8.| 00000FE0: 8B 20 57 39 B2 30 20 A7 20 97 20 50 53 2C C6 28 |. W9.0 . . PS,.(| 00000FF0: 49 4E 24 29 3A 89 20 31 31 30 30 00 5C 50 42 04 |IN$):. 1100.\PB.| 00001000: 8B 20 49 4E 24 B1 B2 22 40 22 20 AF 20 49 4E 24 |. IN$.."@" . IN$| 00001010: B3 B2 22 5F 22 A7 20 97 20 50 53 2C C6 28 49 4E |.."_". . PS,.(IN| 00001020: 24 29 AB 36 34 3A D5 20 8B 20 49 4E 24 B1 B2 22 |$).64:. . IN$.."| 00001030: BA 22 20 AF 20 49 4E 24 B3 B2 22 FF 22 A7 20 97 |." . IN$..".". .| 00001040: 20 50 53 2C C6 28 49 4E 24 29 AB 31 32 38 3A D5 | PS,.(IN$).128:.| 00001050: 20 97 20 50 53 2C C6 28 49 4E 24 29 00 6E 50 4C | . PS,.(IN$).nPL| 00001060: 04 50 53 B2 50 53 AA 31 3A 89 31 30 31 30 00 91 |.PS.PS.1:.1010..| 00001070: 50 56 04 8F 20 2A 2A 2A 20 43 48 41 4E 47 45 20 |PV.. *** CHANGE | 00001080: 56 41 4C 55 45 20 52 4F 55 54 49 4E 45 20 2A 2A |VALUE ROUTINE **| 00001090: 2A 00 A5 50 60 04 FE 1A 20 30 2C 32 34 2C 33 39 |*..P`... 0,24,39| 000010A0: 2C 32 34 2C 31 00 C4 50 6A 04 99 22 93 20 20 20 |,24,1..Pj..". | 000010B0: 20 C5 4E 54 45 52 20 CE 45 57 20 D6 41 4C 55 45 | .NTER .EW .ALUE| 000010C0: 3A 13 22 3B 00 F6 50 74 04 FE 1A 20 32 30 2C 32 |:.";..Pt... 20,2| 000010D0: 34 2C 32 33 2C 32 34 2C 31 3A 9F 39 2C 30 2C 30 |4,23,24,1:.9,0,0| 000010E0: 3A 84 39 2C 56 24 3A A0 39 3A 8B 20 56 24 B2 22 |:.9,V$:.9:. V$."| 000010F0: 22 A7 20 32 34 30 00 28 51 7E 04 8B 20 C8 28 56 |". 240.(Q~.. .(V| 00001100: 24 2C 31 29 B2 22 24 22 A7 20 56 4C 24 B2 C9 28 |$,1)."$". VL$..(| 00001110: 56 24 2C 32 29 3A 56 B2 D1 28 56 4C 24 29 3A D5 |V$,2):V..(VL$):.| 00001120: 20 56 B2 C5 28 56 24 29 00 3C 51 88 04 8B 56 B1 | V..(V$).<Q...V.| 00001130: 32 35 35 B0 56 B3 30 A7 31 31 32 30 00 4B 51 92 |255.V.0.1120.KQ.| 00001140: 04 97 50 53 2C 56 3A 89 32 34 30 00 70 51 9C 04 |..PS,V:.240.pQ..| 00001150: 8F 20 2A 2A 2A 20 44 49 53 50 4C 41 59 20 44 49 |. *** DISPLAY DI| 00001160: 53 4B 20 44 49 52 45 43 54 4F 52 59 20 2A 2A 2A |SK DIRECTORY ***| 00001170: 00 C1 51 A6 04 FE 1A 20 30 2C 31 32 2C 33 39 2C |..Q.... 0,12,39,| 00001180: 32 31 2C 31 3A FE 1A 20 36 2C 31 32 2C 33 39 2C |21,1:.. 6,12,39,| 00001190: 32 31 2C 31 3A EE 3A 99 22 11 20 D0 52 45 53 53 |21,1:.:.". .RESS| 000011A0: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT| 000011B0: 49 4E 55 45 22 3A 8B 42 4C B2 30 A7 20 42 4C B2 |INUE":.BL.0. BL.| 000011C0: 32 00 E5 51 B0 04 A1 F9 20 43 5A 24 3A 99 22 93 |2..Q.... CZ$:.".| 000011D0: 13 13 22 3B 3A 81 41 B2 31 A4 31 32 3A 99 3A 82 |..";:.A.1.12:.:.| 000011E0: 3A 89 31 34 30 00 07 52 BA 04 8F 20 2A 2A 2A 20 |:.140..R... *** | 000011F0: 44 4F 53 20 43 4F 4D 4D 41 4E 44 20 52 4F 55 54 |DOS COMMAND ROUT| 00001200: 49 4E 45 20 2A 2A 2A 00 5C 52 C4 04 44 41 24 B2 |INE ***.\R..DA$.| 00001210: 22 22 3A 44 42 24 B2 22 22 3A 44 43 24 B2 22 22 |"":DB$."":DC$.""| 00001220: 3A 44 44 24 B2 22 22 3A FE 1A 20 30 2C 32 34 2C |:DD$."":.. 0,24,| 00001230: 33 39 2C 32 34 2C 31 3A 99 22 3E 22 3B 3A FE 1A |39,24,1:.">";:..| 00001240: 20 31 2C 32 34 2C 33 39 2C 32 34 3A 9F 39 2C 30 | 1,24,39,24:.9,0| 00001250: 2C 30 3A 84 39 2C 44 41 24 3A A0 39 00 90 52 CE |,0:.9,DA$:.9..R.| 00001260: 04 8B C8 28 44 41 24 2C 31 29 B2 22 49 22 20 B0 |...(DA$,1)."I" .| 00001270: 20 C8 28 44 41 24 2C 31 29 B2 22 56 22 A7 44 44 | .(DA$,1)."V".DD| 00001280: 24 B2 C8 28 44 41 24 2C 32 29 3A 89 31 33 30 30 |$..(DA$,2):.1300| 00001290: 00 A0 52 D8 04 8B 44 41 24 B2 22 22 A7 32 34 30 |..R...DA$."".240| 000012A0: 00 BA 52 E2 04 8B CA 28 44 41 24 2C 33 2C 31 29 |..R....(DA$,3,1)| 000012B0: B3 B1 22 20 22 A7 31 32 32 30 00 26 53 EC 04 44 |.." ".1220.&S..D| 000012C0: 44 24 B2 C8 28 44 41 24 2C 32 29 3A 81 41 38 B2 |D$..(DA$,2):.A8.| 000012D0: 34 A4 C3 28 44 41 24 29 3A 45 44 24 B2 CA 28 44 |4..(DA$):ED$..(D| 000012E0: 41 24 2C 41 38 2C 31 29 3A 8B 45 44 24 B2 22 3B |A$,A8,1):.ED$.";| 000012F0: 22 B0 45 44 24 B2 22 3D 22 A7 20 44 42 24 B2 CA |".ED$."=". DB$..| 00001300: 28 44 41 24 2C 34 2C 41 38 AB 34 29 3A 89 31 32 |(DA$,4,A8.4):.12| 00001310: 37 30 3A D5 20 82 3A 44 42 24 B2 CA 28 44 41 24 |70:. .:DB$..(DA$| 00001320: 2C 34 2C 31 37 29 00 4F 53 F6 04 8B 45 44 24 B2 |,4,17).OS...ED$.| 00001330: 22 3B 22 B0 45 44 24 B2 22 3D 22 A7 20 44 43 24 |";".ED$."=". DC$| 00001340: B2 CA 28 44 41 24 2C 41 38 AA 31 2C 31 37 29 00 |..(DA$,A8.1,17).| 00001350: 7F 53 00 05 8B 45 44 24 B2 22 3B 22 A7 44 42 24 |.S...ED$.";".DB$| 00001360: B2 44 42 24 AA 22 2C 22 3A D5 20 8B 45 44 24 B2 |.DB$.",":. .ED$.| 00001370: 22 3D 22 A7 44 42 24 B2 44 42 24 AA 22 3D 22 00 |"=".DB$.DB$."=".| 00001380: 9D 53 0A 05 99 22 93 22 3B 44 44 24 AA 22 3A 22 |.S...".";DD$.":"| 00001390: AA 44 42 24 AA 44 43 24 3B 22 13 22 3B 00 C2 53 |.DB$.DC$;".";..S| 000013A0: 14 05 9F 31 35 2C 38 2C 31 35 3A 98 31 35 2C 44 |...15,8,15:.15,D| 000013B0: 44 24 AA 22 3A 22 AA 44 42 24 AA 44 43 24 3A A0 |D$.":".DB$.DC$:.| 000013C0: 31 35 00 CB 53 1E 05 89 32 34 30 00 EE 53 28 05 |15..S...240..S(.| 000013D0: 8F 20 2A 2A 2A 20 54 4F 47 47 4C 45 20 53 49 4E |. *** TOGGLE SIN| 000013E0: 47 4C 45 2F 44 4F 55 42 4C 45 20 2A 2A 2A 00 50 |GLE/DOUBLE ***.P| 000013F0: 54 32 05 44 45 B2 44 53 3A 9F 32 2C 38 2C 32 2C |T2.DE.DS:.2,8,2,| 00001400: 22 24 22 3A A0 32 3A 9F 32 2C 38 2C 32 2C 22 24 |"$":.2:.2,8,2,"$| 00001410: 22 3A A1 23 32 2C 41 24 2C 42 24 3A A0 32 3A 8B |":.#2,A$,B$:.2:.| 00001420: 20 C6 28 42 24 29 B2 31 32 38 20 A7 20 44 B2 32 | .(B$).128 . D.2| 00001430: 3A 44 54 24 B2 22 C4 CF D5 C2 CC C5 22 3A D5 20 |:DT$."......":. | 00001440: 44 B2 31 3A 44 54 24 B2 22 D3 C9 CE C7 CC C5 22 |D.1:DT$."......"| 00001450: 00 5A 54 3C 05 89 20 32 34 30 00 79 54 50 05 8F |.ZT<.. 240.yTP..| 00001460: 20 2A 2A 2A 20 52 45 41 44 20 4D 4C 20 52 4F 55 | *** READ ML ROU| 00001470: 54 49 4E 45 53 20 2A 2A 2A 00 84 54 5A 05 8C 3A |TINES ***..TZ..:| 00001480: 43 44 B2 30 00 B1 54 64 05 87 20 44 3A 8B 20 44 |CD.0..Td.. D:. D| 00001490: B1 32 35 35 20 A7 20 53 41 B2 44 3A 89 31 33 38 |.255 . SA.D:.138| 000014A0: 30 3A D5 20 8B 20 44 B2 AB 31 20 A7 20 31 34 30 |0:. . D..1 . 140| 000014B0: 30 00 D1 54 6E 05 97 53 41 2C 44 3A 43 44 B2 43 |0..Tn..SA,D:CD.C| 000014C0: 44 AA 44 3A 53 41 B2 53 41 AA 31 3A 89 31 33 38 |D.D:SA.SA.1:.138| 000014D0: 30 00 09 55 78 05 8B 20 43 44 B3 B1 38 34 30 35 |0..Ux.. CD..8405| 000014E0: 20 A7 20 FE 26 3A 99 22 12 07 20 45 52 52 4F 52 | . .&:.".. ERROR| 000014F0: 20 49 4E 20 44 41 54 41 20 53 54 41 54 45 4D 45 | IN DATA STATEME| 00001500: 4E 54 53 2E 20 92 22 3A 90 00 0F 55 82 05 8E 00 |NTS. .":...U....| 00001510: 77 55 8C 05 83 20 38 31 39 32 2C 31 36 32 2C 35 |wU... 8192,162,5| 00001520: 2C 33 32 2C 31 39 38 2C 32 35 35 2C 31 36 30 2C |,32,198,255,160,| 00001530: 30 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 35 33 |0,32,207,255,153| 00001540: 2C 30 2C 34 2C 31 39 32 2C 32 35 35 2C 32 34 30 |,0,4,192,255,240| 00001550: 2C 34 2C 32 30 30 2C 37 36 2C 37 2C 33 32 2C 33 |,4,200,76,7,32,3| 00001560: 32 2C 31 39 35 2C 32 35 35 2C 33 32 2C 32 30 34 |2,195,255,32,204| 00001570: 2C 32 35 35 2C 39 36 00 DE 55 96 05 83 20 38 32 |,255,96..U... 82| 00001580: 32 34 2C 31 36 32 2C 35 2C 33 32 2C 32 30 31 2C |24,162,5,32,201,| 00001590: 32 35 35 2C 31 36 30 2C 31 2C 31 38 35 2C 30 2C |255,160,1,185,0,| 000015A0: 34 2C 33 32 2C 32 31 30 2C 32 35 35 2C 31 39 32 |4,32,210,255,192| 000015B0: 2C 30 2C 32 34 30 2C 34 2C 32 30 30 2C 37 36 2C |,0,240,4,200,76,| 000015C0: 33 39 2C 33 32 2C 33 32 2C 31 39 35 2C 32 35 35 |39,32,32,195,255| 000015D0: 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 00 19 |,32,204,255,96..| 000015E0: 56 A0 05 83 20 38 32 37 32 2C 31 36 32 2C 32 35 |V... 8272,162,25| 000015F0: 35 2C 31 36 39 2C 33 32 2C 31 35 37 2C 30 2C 34 |5,169,32,157,0,4| 00001600: 2C 32 34 30 2C 34 2C 32 30 32 2C 37 36 2C 38 34 |,240,4,202,76,84| 00001610: 2C 33 32 2C 39 36 2C 2D 31 00 31 56 B8 0B 8B 44 |,32,96,-1.1V...D| 00001620: 45 B2 36 36 A7 20 9E 38 32 37 32 3A 89 33 31 30 |E.66. .8272:.310| 00001630: 30 00 86 56 BD 0B 9E 38 32 37 32 3A 99 22 13 05 |0..V...8272:."..| 00001640: 09 20 12 2A 20 2A 20 2A 20 C4 49 53 4B 20 C5 52 |. .* * * .ISK .R| 00001650: 52 4F 52 20 2A 20 2A 20 2A 92 22 3A 99 22 11 20 |ROR * * *.":.". | 00001660: 20 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 | .RESS ANY KEY T| 00001670: 4F 20 45 4E 54 45 52 20 41 20 4E 45 57 20 53 45 |O ENTER A NEW SE| 00001680: 43 54 4F 52 2E 22 00 B7 56 C2 0B 44 45 B2 30 3A |CTOR."..V..DE.0:| 00001690: A1 F9 20 44 45 24 3A 9E 38 32 37 32 3A 42 4C B2 |.. DE$:.8272:BL.| 000016A0: 30 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A A0 |0:.15,8,15,"I":.| 000016B0: 31 35 3A 89 32 34 30 00 14 57 1C 0C 99 22 13 11 |15:.240..W..."..| 000016C0: 20 20 20 20 20 D4 48 49 53 20 49 53 20 41 20 53 | .HIS IS A S| 000016D0: 49 4E 47 4C 45 20 44 45 4E 53 49 54 59 20 44 49 |INGLE DENSITY DI| 000016E0: 53 4B 2C 22 3A 99 22 11 20 20 20 20 50 52 45 53 |SK,":.". PRES| 000016F0: 53 20 41 20 4B 45 59 20 54 4F 20 52 45 2D 45 4E |S A KEY TO RE-EN| 00001700: 54 45 52 20 41 20 53 45 43 54 4F 52 22 3A 89 20 |TER A SECTOR":. | 00001710: 33 30 31 30 00 00 00 |3010... |
.@1@2..%:.".":.1,1:.0,1:.1370:.:. JT(250
),JS(250).R@<.."...":.4,14:.0,12:.".";.2
55);". .. 128 DISK EDITOR ";.K@F.D
T$."DOUBLE":PS.1024:. IF YOU WANT SINGLE
SIDED, CHANGE "DOUBLE" AND D=2 IN LINE
230..@P.."..............................
..........."./AZ.." ..CURRENT. .. ..
PRIOR. .. .POSITION:".ZAD.." TRACK:
.. .TRACK: .. .VALUE:"..AN.."SECTOR:
.. .TRACK: .. .(HEX):"..AX.."....
.....................................".T
A...A.55296.55296.255:.A,1:...B...". ..
R../..W.. - .READ/WRITE TRACK AND SECTOR
".AB..." ..+../..-.. - .FORWARD/BACKWAR
D TRACK & SECTOR".LB .." ..J.. - .JUM
P LINK UNDER CURSOR"..B..." ..B.. - .
JUMP TO PREVIOUS LINK".HB..." ..T.. -
.TEXT MODE, STARTING AT CURSOR"..B..."
..V.. - .CHANGE VALUE UNDER CURSOR"..
CH.." ..D.. - .DISK DIRECTORY".GCR.."
..@.. - .DOS COMMANDS, DISK STATUS".
XC..." ..*.. - ..-SELECT DOUBLE/SINGL
E SIDED".BC..." ..Q.. - .QUIT TO BASI
C":.&:.BL.1.240:U .BL.2. BL.0:. 240:U BL
.0..C..CT.1:RT.18:RS.0:D.2:.A.1.40:.".."
;:..`D..."..":.A.1.22:.:.:.".. ";
DT$;" SIDED DISKETTE ..";DS$;"
.":.".........";.34);" ":. BL.2. BL.0
..D...".........";.34);PS.1023;". ":..31
);B(PS);". ":..31);"$";I(R(B(PS)),2)..D
..."..........";.7);RT;". ";.19);JT(CT.1
);". ":..7);RS;". ";.19);JS(CT.1);". "..
E... BL.0.300.IE..BK.B(PS):.54272.PS,7:.
BK..128.. PS,BK.128:U . PS,BK.128.DE"..B
K.160.BK.224. .PS,BK..E,..K$:.DE..0.3000
:U .DS..0. 3000..E1..K$."".300:U .BL.0.
460..E6..PS,BK:.54272.PS,1.ZE@..K$.".".B
(212).83. PS.PS.40..EJ..K$.".".B(212).84
. PS.PS.40.,FT..K$.".".B(212).85. PS.PS.
1:. PS.1024. PS.1279.^F^..K$.".".B(212).
86. PS.PS.1:. PS.1279. PS.1024.VFH..PS.1
024 . PS.PS.40..FR..PS.1279 . PS.1304 .
PS.PS.40:U .PS.1303 . PS.1322 . PS.PS.40
.QF|..K$.".".PS.1024:.240..F...K$."W". 7
20..F...K$."+". 790..G...K$."-". 850..G.
..K$."J". 900.&G...K$."B". 950.7G...K$."
T". 980.IGB..K$."V". 1120.[GL..K$."D". 1
190.MGV..K$."@". 1220.G...K$."*". 1330.
.G...K$."R". 510.IG...K$."Q"..".....128
DISK EDITOR TERMINATED":."HI",8:..SG...
250..G... ***** READ ROUTINE ***.8H..BL.
1:.. 0,24,39,24,1:."READ TRACK:";:.. 11,
24,13,24:CT.1:WF.0:T$."".TH...9,0,0:.9,T
$: 9:T.E(T$):.T.0. 550:U.WF.1.735:U .T.1
.510..H...D.1 . T.35 . 510:U .D.2 . T.70
. 510..H..RT.T..H&..".."..H0... 16,24,3
9,24,1:."SECTOR:";:.. 23,24,25,24..I:..9
,0,0:.9,S$: 9:S.E(S$):.S$."". 670:U .S.0
.560.6ID..D.2 . RT.35.TT.RT.35:U TT.RT.U
IN.. TT.35 . TT.1 . JM.0:.510.RIX.. TT..
1 . TT..17 . MS.20..IB.. TT..18 . TT..24
. MS.18..IL.. TT..25 . TT..30 . MS.17.L
IV.. TT..31 . TT..35 . MS.16.XI...WF.2..
..I... JM.1 . 920..J... S.0 . S.MS . 560
:U RS.S.GJ... WF.0 . RT.35.D . RT.0. 510
:U . WF.1 . RT.35.D . RT.0. 735.UJ...WF.
0.700._J... 740..J...15,8,15:.5,8,5,"#":
.15,"U1";5;0;RT;RS:.8272:.8192: 5: 15:.D
S.66.1330:U PS.1024:. 240.UJF.. *** WRIT
E ROUTINE ***..KP... 0,24,39,24,1:."WRIT
E TRACK:";:.. 12,24,14,24..KZ.WF.1:.520.
&K... T.1. 720.PK...D.1 . T.35 . 720:U .
D.2 . T.70 . 720.YK...540.SK..."..":.. 0
,24,39,24,1..K...". RE-WRITE TRACK:";RT
;" SECTOR:";RS;".? (.Y./.N.).";:WF.0.LK.
...LP$:.LP$.."Y".240..L...15,8,15:.5,8,5
,"#":.8224:.15,"U2";5;0;RT;RS: 5: 15:.DS
..0.3000:U .240.=L... *** INCREASE SECTO
R ROUTINE ***.RL..S.RS.1:WF.2:.580.KL ..
S.MS . RT.RT.1:S.0..L*.. D.1 . RT.35 .
510..L4.. D.2 . RT.70 . 510..L>.WF.0:RS.
S:.700.TLH.. *** DECREASE SECTOR ROUTINE
***..LR.S.RS.1:WF.2:.580..M\.. S.0 . RT
.RT.1:.580:S.MS..MF.. RT.1 . 510.+MP.WF.
0:RS.S:.700.LMZ.. *** JUMP BLOCK ROUTINE
***..M..JM.1:.PS.1279 . B(PS)..0 . JT(C
T).RT:JS(CT).RS:CT.CT.1:RT.B(PS):S.B(PS.
1):.CT.255. CT.0:. 580:U . 580..M... 280
..M... S.0 . S.MS . CT.CT.1:RT.JT(CT):RS
.JS(CT)..N..RS.S:JM.0:.700.$N... *** JUM
P TO PRIOR BLOCK ***.;N..CT.CT.1:.CT.1.C
T.1.KN..RT.JT(CT):S.JS(CT):.RT.0.RT.18:.
510:U . 580..NJ.. *** TEXT MODE ROUTINE
***..NT... 0,24,39,24,1..N...". .U.
PPER OR .L.OWER CASE WRITING?.";:..W9$:.
W9$."L".W9.1:U W9.0..O...". TEXT MODE
(PRESS RETURN TO EXIT).";.3O...IN$:.IN$
.G(13). 240.JO..CK.B(PS):BK.CK:. BK..128
. .PS,BK.128:U .PS,BK.128.O...Z.1.25:.
:.PS,CK..O...PS.1279 . PS.1024..O...PS.1
024 . PS.1279.JO$..IN$.G(20).PS.PS.1:.10
10..O...IN$."".1010..O8.. W9.0 . . PS,F(
IN$):. 1100.\PB.. IN$.."@" . IN$.."_". .
PS,F(IN$).64:U . IN$.."." . IN$..".". .
PS,F(IN$).128:U . PS,F(IN$).NPL.PS.PS.1
:.1010..PV.. *** CHANGE VALUE ROUTINE **
*..P`... 0,24,39,24,1.DPJ..". ENTER N
EW VALUE:.";..PT... 20,24,23,24,1:.9,0,0
:.9,V$: 9:. V$."". 240.(Q~.. H(V$,1)."$"
. VL$.I(V$,2):V.Q(VL$):U V.E(V$).<Q...V.
255.V.0.1120.KQ...PS,V:.240.PQ... *** DI
SPLAY DISK DIRECTORY ***.AQ.... 0,12,39,
21,1:.. 6,12,39,21,1:.:.". PRESS ANY KEY
TO CONTINUE":.BL.0. BL.2..Q.... CZ$:.".
..";:.A.1.12:.:.:.140..R... *** DOS COMM
AND ROUTINE ***.\RD.DA$."":DB$."":DC$.""
:DD$."":.. 0,24,39,24,1:.">";:.. 1,24,39
,24:.9,0,0:.9,DA$: 9..RN..H(DA$,1)."I" .
H(DA$,1)."V".DD$.H(DA$,2):.1300. RX..DA
$."".240..R...J(DA$,3,1).." ".1220.&S..D
D$.H(DA$,2):.A8.4.C(DA$):ED$.J(DA$,A8,1)
:.ED$.";".ED$."=". DB$.J(DA$,4,A8.4):.12
70:U .:DB$.J(DA$,4,17).OS...ED$.";".ED$.
"=". DC$.J(DA$,A8.1,17).S...ED$.";".DB$
.DB$.",":U .ED$."=".DB$.DB$."="..S..."."
;DD$.":".DB$.DC$;".";.BS...15,8,15:.15,D
D$.":".DB$.DC$: 15.KS...240..S(.. *** TO
GGLE SINGLE/DOUBLE ***.PT2.DE.DS:.2,8,2,
"$": 2:.2,8,2,"$":.#2,A$,B$: 2:. F(B$).1
28 . D.2:DT$."DOUBLE":U D.1:DT$."SINGLE"
.ZT<.. 240.YTP.. *** READ ML ROUTINES **
*..TZ..:CD.0..TD.. D:. D.255 . SA.D:.138
0:U . D..1 . 1400.QTN..SA,D:CD.CD.D:SA.S
A.1:.1380..UX.. CD..8405 . .&:.".. ERROR
IN DATA STATEMENTS. .":...U....WU... 81
92,162,5,32,198,255,160,0,32,207,255,153
,0,4,192,255,240,4,200,76,7,32,32,195,25
5,32,204,255,96..U... 8224,162,5,32,201,
255,160,1,185,0,4,32,210,255,192,0,240,4
,200,76,39,32,32,195,255,32,204,255,96..
V .. 8272,162,255,169,32,157,0,4,240,4,2
02,76,84,32,96,-1.1V...DE.66. .8272:.310
0..V...8272:."... .* * * DISK ERROR * *
*.":.". PRESS ANY KEY TO ENTER A NEW SE
CTOR."..VB.DE.0:.. DE$:.8272:BL.0:.15,8,
15,"I": 15:.240..W...".. THIS IS A S
INGLE DENSITY DISK,":.". PRESS A KEY
TO RE-ENTER A SECTOR":. 3010...
> CLICK IMAGE PREVIEW FOR FULL MODAL