DISK MANAGER 128
FILE INFORMATION
FILENAME(S): DISK MANAGER 128
FILE TYPE(S): PRG
FILE SIZE: 5.5K
FIRST SEEN: 2025-10-20 14:30:58
APPEARS ON: 1 disk(s)
FILE HASH
38d96c42933bddcc08150e5517df42332d0ccd4463a32830968fc093c0c65adf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WOLF S SOFT C020 | DISK MANAGER 128 | PRG | Treasure Chest - Klaus Der Suhler | 27 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 2C 1C 00 00 8F 20 2A 2A 20 42 45 41 52 42 |..,.... ** BEARB| 00000010: 45 49 54 45 54 20 44 55 52 43 48 20 31 32 38 27 |EITET DURCH 128'| 00000020: 45 52 20 41 4B 54 55 45 4C 4C 2A 2A 00 3A 1C 05 |ER AKTUELL**.:..| 00000030: 00 A0 31 35 3A A0 35 3A A0 31 00 5B 1C 06 00 46 |..15:.5:.1.[...F| 00000040: 52 B2 B8 28 30 29 3A 8B 20 46 52 B3 30 20 A7 20 |R..(0):. FR.0 . | 00000050: 46 52 B2 46 52 AA 36 35 35 33 36 00 6C 1C 07 00 |FR.FR.65536.l...| 00000060: 53 B2 28 46 52 AB 34 30 30 29 AD 32 00 7A 1C 08 |S.(FR.400).2.z..| 00000070: 00 86 54 45 4D 50 25 28 53 29 00 90 1C 0A 00 99 |..TEMP%(S)......| 00000080: 22 93 22 3B C7 28 31 34 29 3B C7 28 33 30 29 3B |".";.(14);.(30);| 00000090: 00 B1 1C 0F 00 99 A3 39 29 22 B0 C0 C0 C0 C0 C0 |.......9)"......| 000000A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE |................| 000000B0: 22 00 D2 1C 14 00 99 A3 39 29 22 DD 20 C3 2D 31 |".......9)". .-1| 000000C0: 32 38 20 C4 C9 D3 CB 20 CD C1 CE C1 C7 C5 D2 20 |28 .... ....... | 000000D0: DD 22 00 F3 1C 19 00 99 A3 39 29 22 AD C0 C0 C0 |.".......9)"....| 000000E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000000F0: C0 BD 22 00 F9 1C 28 00 99 00 14 1D 32 00 99 A3 |.."...(.....2...| 00000100: 39 29 22 31 20 20 C4 49 53 4B 20 44 49 52 45 43 |9)"1 .ISK DIREC| 00000110: 54 4F 52 59 00 30 1D 3C 00 99 A3 39 29 22 32 20 |TORY.0.<...9)"2 | 00000120: 20 C6 4F 52 4D 41 54 20 4E 45 57 20 44 49 53 4B | .ORMAT NEW DISK| 00000130: 00 4C 1D 46 00 99 A3 39 29 22 33 20 20 C9 4E 49 |.L.F...9)"3 .NI| 00000140: 54 49 41 4C 49 5A 45 20 44 49 53 4B 00 6F 1D 50 |TIALIZE DISK.o.P| 00000150: 00 99 A3 39 29 22 34 20 20 C3 4F 50 59 20 46 49 |...9)"4 .OPY FI| 00000160: 4C 45 20 54 4F 20 53 41 4D 45 20 44 49 53 4B 00 |LE TO SAME DISK.| 00000170: 91 1D 55 00 99 A3 39 29 22 35 20 20 C3 4F 50 59 |..U...9)"5 .OPY| 00000180: 20 46 49 4C 45 20 54 4F 20 4E 45 57 20 44 49 53 | FILE TO NEW DIS| 00000190: 4B 00 AB 1D 56 00 99 A3 39 29 22 36 20 20 D2 45 |K...V...9)"6 .E| 000001A0: 4E 41 4D 45 20 41 20 46 49 4C 45 00 C4 1D 57 00 |NAME A FILE...W.| 000001B0: 99 A3 39 29 22 37 20 20 C5 52 41 53 45 20 41 20 |..9)"7 .RASE A | 000001C0: 46 49 4C 45 00 DF 1D 58 00 99 A3 39 29 22 38 20 |FILE...X...9)"8 | 000001D0: 20 D6 41 4C 49 44 41 54 45 20 46 49 4C 45 53 00 | .ALIDATE FILES.| 000001E0: FA 1D 59 00 99 A3 39 29 22 39 20 20 C5 58 49 54 |..Y...9)"9 .XIT| 000001F0: 20 54 4F 20 C2 C1 D3 C9 C3 22 00 1B 1E 5A 00 99 | TO ....."...Z..| 00000200: A3 39 29 22 C1 20 20 C1 D3 C3 C9 C9 2D C3 C2 CD |.9)". .....-...| 00000210: 20 43 4F 4E 56 45 52 53 49 4F 4E 00 3A 1E 5B 00 | CONVERSION.:.[.| 00000220: 99 A3 39 29 22 C3 20 20 C3 4F 4D 42 49 4E 45 20 |..9)". .OMBINE | 00000230: 44 49 53 4B 20 46 49 4C 45 53 00 55 1E 5D 00 99 |DISK FILES.U.]..| 00000240: A3 39 29 22 D0 20 20 D0 52 49 4E 54 20 44 49 53 |.9)". .RINT DIS| 00000250: 4B 46 49 4C 45 00 71 1E 5F 00 99 A3 39 29 22 D3 |KFILE.q._...9)".| 00000260: 20 20 D3 50 4C 49 54 20 44 49 53 4B 20 46 49 4C | .PLIT DISK FIL| 00000270: 45 00 8C 1E 61 00 99 A3 39 29 22 D6 20 20 D6 49 |E...a...9)". .I| 00000280: 45 57 20 44 49 53 4B 20 46 49 4C 45 00 AB 1E 63 |EW DISK FILE...c| 00000290: 00 99 3A 99 A3 31 31 29 22 CD 41 4B 45 20 53 45 |..:..11)".AKE SE| 000002A0: 4C 45 43 54 49 4F 4E 20 3A 22 3B 00 BB 1E 6E 00 |LECTION :";...n.| 000002B0: 8D 36 39 35 3A 44 49 24 B2 22 22 00 D6 1E 73 00 |.695:DI$.""...s.| 000002C0: 8B 57 24 B2 22 41 22 A7 99 57 24 3A 8D 31 35 35 |.W$."A"..W$:.155| 000002D0: 30 3A 89 32 31 30 00 F1 1E 78 00 8B 57 24 B2 22 |0:.210...x..W$."| 000002E0: 43 22 A7 99 57 24 3A 8D 31 37 30 30 3A 89 32 31 |C"..W$:.1700:.21| 000002F0: 30 00 0C 1F 82 00 8B 57 24 B2 22 50 22 A7 99 57 |0......W$."P"..W| 00000300: 24 3A 8D 31 31 30 30 3A 89 32 31 30 00 27 1F 86 |$:.1100:.210.'..| 00000310: 00 8B 57 24 B2 22 53 22 A7 99 57 24 3A 8D 31 32 |..W$."S"..W$:.12| 00000320: 30 30 3A 89 32 31 30 00 42 1F 8C 00 8B 57 24 B2 |00:.210.B....W$.| 00000330: 22 56 22 A7 99 57 24 3A 8D 31 33 30 30 3A 89 32 |"V"..W$:.1300:.2| 00000340: 31 30 00 5D 1F C0 00 8B 57 24 B3 22 31 22 20 B0 |10.]....W$."1" .| 00000350: 20 57 24 B1 22 39 22 20 A7 20 31 31 30 00 73 1F | W$."9" . 110.s.| 00000360: C1 00 99 57 24 3A 43 48 B2 28 C6 28 57 24 29 AB |...W$:CH.(.(W$).| 00000370: 34 38 29 00 A2 1F C8 00 91 20 43 48 20 8D 20 32 |48)...... CH . 2| 00000380: 35 30 2C 33 30 30 2C 33 35 30 2C 34 30 30 2C 38 |50,300,350,400,8| 00000390: 30 30 2C 34 35 30 2C 35 30 30 2C 35 35 30 2C 37 |00,450,500,550,7| 000003A0: 30 30 00 AB 1F D2 00 89 20 31 30 00 D0 1F FA 00 |00...... 10.....| 000003B0: 99 22 93 9B 22 3A 99 A3 31 31 29 22 C4 20 C9 20 |."..":..11)". . | 000003C0: D2 20 C5 20 C3 20 D4 20 CF 20 D2 20 D9 22 3A 99 |. . . . . . .":.| 000003D0: 00 DF 1F FB 00 9F 31 2C 38 2C 30 2C 22 24 22 00 |......1,8,0,"$".| 000003E0: ED 1F FC 00 A1 23 31 2C 41 24 2C 42 24 00 F7 1F |.....#1,A$,B$...| 000003F0: FD 00 99 22 12 22 3B 00 05 20 FE 00 A1 23 31 2C |...".";.. ...#1,| 00000400: 41 24 2C 42 24 00 13 20 00 01 A1 23 31 2C 41 24 |A$,B$.. ...#1,A$| 00000410: 2C 42 24 00 33 20 02 01 43 B2 C6 28 41 24 AA C7 |,B$.3 ..C..(A$..| 00000420: 28 30 29 29 AA C6 28 42 24 AA C7 28 30 29 29 AC |(0))..(B$..(0)).| 00000430: 32 35 36 00 42 20 04 01 8B 53 54 B3 B1 30 A7 32 |256.B ...ST..0.2| 00000440: 38 33 00 5A 20 06 01 99 A3 37 29 CA 28 C4 28 43 |83.Z ....7).(.(C| 00000450: 29 2C 32 29 3B A3 31 31 29 3B 00 70 20 08 01 A1 |),2);.11);.p ...| 00000460: 23 31 2C 42 24 3A 8B 20 53 54 20 A7 20 32 38 30 |#1,B$:. ST . 280| 00000470: 00 85 20 0A 01 8B 42 24 B3 B1 C7 28 33 34 29 20 |.. ...B$...(34) | 00000480: A7 20 32 36 34 00 AC 20 0C 01 A1 20 23 31 2C 42 |. 264.. ... #1,B| 00000490: 24 3A 8B 20 42 24 B3 B1 20 C7 28 33 34 29 20 A7 |$:. B$.. .(34) .| 000004A0: 20 99 20 42 24 3B 3A 89 20 32 36 38 00 C8 20 0E | . B$;:. 268.. .| 000004B0: 01 A1 23 31 2C 42 24 3A 8B 20 42 24 B2 C7 28 33 |..#1,B$:. B$..(3| 000004C0: 32 29 20 A7 20 32 37 30 00 D9 20 10 01 99 A3 32 |2) . 270.. ....2| 000004D0: 39 29 3B 3A 43 24 B2 22 22 00 FD 20 12 01 43 24 |9);:C$."".. ..C$| 000004E0: B2 43 24 AA 42 24 3A A1 20 23 31 2C 42 24 3A 8B |.C$.B$:. #1,B$:.| 000004F0: 20 42 24 B3 B1 22 22 20 A7 20 32 37 34 00 10 21 | B$.."" . 274..!| 00000500: 14 01 99 20 C8 28 43 24 2C 33 29 3A 8F 20 49 44 |... .(C$,3):. ID| 00000510: 00 20 21 18 01 8B 20 53 54 B2 30 A7 20 32 35 34 |. !... ST.0. 254| 00000520: 00 39 21 1A 01 99 A3 32 31 29 22 C2 4C 4F 43 4B |.9!....21)".LOCK| 00000530: 53 20 C6 52 45 45 22 3A 99 00 54 21 1B 01 A0 31 |S .REE":..T!...1| 00000540: 3A 8D 36 35 30 3A 8B 20 C5 28 41 24 29 B3 B1 30 |:.650:. .(A$)..0| 00000550: 20 A7 20 8E 00 5D 21 1C 01 89 36 39 30 00 63 21 | . ..]!...690.c!| 00000560: 1D 01 3A 00 6D 21 2C 01 99 44 53 24 3B 00 93 21 |..:.m!,..DS$;..!| 00000570: 31 01 99 A3 37 29 22 C9 4E 53 45 52 54 20 44 49 |1...7)".NSERT DI| 00000580: 53 4B 20 54 4F 20 42 45 20 46 4F 52 4D 41 54 54 |SK TO BE FORMATT| 00000590: 45 44 22 00 A8 21 36 01 85 22 C4 49 53 4B 20 4E |ED"..!6..".ISK N| 000005A0: 41 4D 45 22 3B 44 49 24 00 BB 21 3B 01 8B 20 C3 |AME";DI$..!;.. .| 000005B0: 28 44 49 24 29 B2 30 20 A7 20 8E 00 CE 21 40 01 |(DI$).0 . ...!@.| 000005C0: 85 22 C4 49 53 4B 20 C9 C4 22 3B 45 58 24 00 E1 |.".ISK ..";EX$..| 000005D0: 21 45 01 8B 20 C3 28 45 58 24 29 B2 30 20 A7 20 |!E.. .(EX$).0 . | 000005E0: 8E 00 07 22 4A 01 A0 31 35 3A 9F 20 31 35 2C 38 |..."J..15:. 15,8| 000005F0: 2C 31 35 2C 22 4E 3A 22 AA 44 49 53 4B 24 AA 22 |,15,"N:".DISK$."| 00000600: 2C 22 AA 45 58 54 24 00 29 22 54 01 89 36 35 35 |,".EXT$.)"T..655| 00000610: 3A 8F 20 50 52 49 4E 54 20 41 4E 59 20 45 52 52 |:. PRINT ANY ERR| 00000620: 4F 52 53 20 26 20 52 45 54 00 47 22 5E 01 99 44 |ORS & RET.G"^..D| 00000630: 53 24 3B 3A 8F 20 20 20 20 2A 2A 2A 20 49 4E 49 |S$;:. *** INI| 00000640: 54 49 41 4C 49 5A 45 00 6F 22 68 01 99 A3 35 29 |TIALIZE.o"h...5)| 00000650: 22 C9 4E 53 45 52 54 20 44 49 53 4B 20 54 4F 20 |".NSERT DISK TO | 00000660: 42 45 20 49 4E 49 54 49 41 4C 49 5A 45 44 22 00 |BE INITIALIZED".| 00000670: 97 22 72 01 99 A3 37 29 3B 22 D0 52 45 53 53 20 |."r...7);".RESS | 00000680: D2 C5 D4 D5 D2 CE 20 54 4F 20 49 4E 49 54 49 41 |...... TO INITIA| 00000690: 4C 49 5A 45 22 3A 99 00 A0 22 77 01 8D 36 39 35 |LIZE":..."w..695| 000006A0: 00 B6 22 7C 01 A0 31 35 3A 9F 20 31 35 2C 38 2C |.."|..15:. 15,8,| 000006B0: 31 35 2C 22 49 22 00 BF 22 86 01 89 36 35 35 00 |15,"I".."...655.| 000006C0: C5 22 8B 01 3A 00 E2 22 90 01 99 44 53 24 3A 8F |."..:.."...DS$:.| 000006D0: 20 43 4F 50 59 20 46 49 4C 45 20 52 4F 55 54 49 | COPY FILE ROUTI| 000006E0: 4E 45 00 FE 22 9A 01 85 22 D3 4F 55 52 43 45 20 |NE.."...".OURCE | 000006F0: 46 49 4C 45 20 4E 41 4D 45 22 3B 44 49 24 00 11 |FILE NAME";DI$..| 00000700: 23 9F 01 8B 20 C3 28 44 49 24 29 B2 30 20 A7 20 |#... .(DI$).0 . | 00000710: 8E 00 2A 23 A4 01 85 22 CE 45 57 20 46 49 4C 45 |..*#...".EW FILE| 00000720: 20 4E 41 4D 45 22 3B 4E 57 24 00 3D 23 A9 01 8B | NAME";NW$.=#...| 00000730: 20 C3 28 4E 57 24 29 B2 30 20 A7 20 8E 00 62 23 | .(NW$).0 . ..b#| 00000740: AE 01 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C 22 |...15:.15,8,15,"| 00000750: 43 3A 22 AA 4E 57 53 24 AA 22 3D 22 AA 44 49 53 |C:".NWS$."=".DIS| 00000760: 4B 24 00 80 23 B8 01 89 36 35 35 3A 8F 20 50 52 |K$..#...655:. PR| 00000770: 49 4E 54 20 45 52 52 4F 52 53 20 26 20 52 45 54 |INT ERRORS & RET| 00000780: 00 86 23 BD 01 3A 00 8F 23 C2 01 99 44 53 24 00 |..#..:..#...DS$.| 00000790: A8 23 CC 01 85 22 CF 4C 44 20 46 49 4C 45 20 4E |.#...".LD FILE N| 000007A0: 41 4D 45 22 3B 44 49 24 00 BB 23 D1 01 8B 20 C3 |AME";DI$..#... .| 000007B0: 28 44 49 24 29 B2 30 20 A7 20 8E 00 D5 23 D6 01 |(DI$).0 . ...#..| 000007C0: 85 22 CE 45 57 20 46 49 4C 45 20 4E 41 4D 45 22 |.".EW FILE NAME"| 000007D0: 3B 4E 57 53 24 00 E8 23 DB 01 8B 20 C3 28 4E 57 |;NWS$..#... .(NW| 000007E0: 24 29 B2 30 20 A7 20 8E 00 0E 24 E0 01 A0 31 35 |$).0 . ...$...15| 000007F0: 3A 9F 20 31 35 2C 38 2C 31 35 2C 22 52 3A 22 AA |:. 15,8,15,"R:".| 00000800: 4E 57 53 24 AA 22 3D 22 AA 44 49 53 4B 24 00 2D |NWS$."=".DISK$.-| 00000810: 24 EA 01 89 20 36 35 35 3A 8F 20 50 52 49 4E 54 |$... 655:. PRINT| 00000820: 20 45 52 52 4F 52 53 20 26 20 52 45 54 00 33 24 | ERRORS & RET.3$| 00000830: EF 01 3A 00 49 24 F4 01 8F 20 20 2A 2A 2A 20 45 |..:.I$... *** E| 00000840: 52 41 53 45 20 46 49 4C 45 00 63 24 FE 01 99 44 |RASE FILE.c$...D| 00000850: 53 24 3A 85 22 C6 49 4C 45 20 4E 41 4D 45 22 3B |S$:.".ILE NAME";| 00000860: 44 49 24 00 76 24 08 02 8B 20 C3 28 44 49 24 29 |DI$.v$... .(DI$)| 00000870: B2 30 20 A7 20 8E 00 90 24 17 02 A0 31 35 3A 9F |.0 . ...$...15:.| 00000880: 31 35 2C 38 2C 31 35 2C 22 53 3A 22 AA 44 49 24 |15,8,15,"S:".DI$| 00000890: 00 B2 24 1C 02 89 36 35 35 3A 8F 20 50 52 49 4E |..$...655:. PRIN| 000008A0: 54 20 41 4E 59 20 45 52 52 4F 52 53 20 26 20 52 |T ANY ERRORS & R| 000008B0: 45 54 00 B8 24 21 02 3A 00 D7 24 26 02 99 44 53 |ET..$!.:..$&..DS| 000008C0: 24 3B 3A 8F 20 20 2A 2A 2A 20 56 41 4C 49 44 41 |$;:. *** VALIDA| 000008D0: 54 45 20 44 49 53 4B 00 04 25 30 02 99 22 20 20 |TE DISK..%0.." | 000008E0: D7 C1 D2 CE C9 CE C7 3A 20 20 CF 50 45 4E 20 46 |.......: .PEN F| 000008F0: 49 4C 45 53 20 57 49 4C 4C 20 42 45 20 44 45 4C |ILES WILL BE DEL| 00000900: 45 54 45 44 00 2E 25 3A 02 99 3A 99 A3 38 29 22 |ETED..%:..:..8)"| 00000910: D0 52 45 53 53 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 |.RESS ...... TO | 00000920: 56 41 4C 49 44 41 54 45 22 3A 8D 36 39 35 00 3E |VALIDATE":.695.>| 00000930: 25 44 02 9F 31 2C 38 2C 31 35 2C 22 56 22 00 4A |%D..1,8,15,"V".J| 00000940: 25 4E 02 A0 31 3A 89 36 35 30 00 50 25 53 02 3A |%N..1:.650.P%S.:| 00000950: 00 74 25 58 02 3A 8F 20 2A 2A 2A 20 45 20 52 20 |.t%X.:. *** E R | 00000960: 52 20 4F 20 52 20 20 48 20 41 20 4E 20 44 20 4C |R O R H A N D L| 00000970: 20 45 20 52 00 85 25 8A 02 A0 31 35 3A 9F 31 35 | E R..%...15:.15| 00000980: 2C 38 2C 31 35 00 99 25 8F 02 84 31 35 2C 41 24 |,8,15..%...15,A$| 00000990: 2C 42 24 2C 43 24 2C 44 24 00 AB 25 91 02 8B 20 |,B$,C$,D$..%... | 000009A0: C5 28 41 24 29 B2 30 20 A7 20 8E 00 EF 25 94 02 |.(A$).0 . ...%..| 000009B0: 45 52 24 B2 42 24 AA 22 20 23 22 AA 41 24 AA 22 |ER$.B$." #".A$."| 000009C0: 20 4F 4E 20 54 52 4B 20 22 AA 43 24 AA 22 20 53 | ON TRK ".C$." S| 000009D0: 45 43 20 22 AA 44 24 3A 99 A3 28 34 30 AB C3 28 |EC ".D$:..(40..(| 000009E0: 45 52 24 29 29 AD 32 29 45 52 24 3A A0 31 35 00 |ER$)).2)ER$:.15.| 000009F0: 12 26 B2 02 99 A3 37 29 22 D0 52 45 53 53 20 41 |.&....7)".RESS A| 00000A00: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN| 00000A10: 55 45 00 2B 26 B7 02 57 24 B2 22 22 3A A1 57 24 |UE.+&..W$."":.W$| 00000A20: 3A 8B 57 24 B2 22 22 A7 36 39 35 00 31 26 B8 02 |:.W$."".695.1&..| 00000A30: 8E 00 37 26 B9 02 3A 00 56 26 BC 02 99 22 93 22 |..7&..:.V&..."."| 00000A40: 3A A0 31 3A A0 35 3A A0 34 3A A0 31 35 3A A0 36 |:.1:.5:.4:.15:.6| 00000A50: 3A 89 31 39 30 30 00 5C 26 EE 02 3A 00 75 26 20 |:.1900.\&..:.u& | 00000A60: 03 99 20 22 93 22 3A 8F 20 32 20 44 52 49 56 45 |.. ".":. 2 DRIVE| 00000A70: 20 43 4F 50 59 00 7E 26 22 03 A0 20 31 35 00 8F | COPY.~&".. 15..| 00000A80: 26 23 03 4D 41 58 B2 B5 28 53 AD 32 35 36 29 00 |&#.MAX..(S.256).| 00000A90: B6 26 24 03 99 20 22 CD 41 58 49 4D 55 4D 20 53 |.&$.. ".AXIMUM S| 00000AA0: 49 5A 45 20 4F 46 20 46 49 4C 45 20 57 48 49 43 |IZE OF FILE WHIC| 00000AB0: 48 20 43 41 4E 22 00 DB 26 25 03 99 20 22 20 20 |H CAN"..&%.. " | 00000AC0: 42 45 20 43 4F 50 49 45 44 20 49 53 20 22 4D 41 |BE COPIED IS "MA| 00000AD0: 58 22 20 42 4C 4F 43 4B 53 2E 22 00 05 27 2A 03 |X" BLOCKS."..'*.| 00000AE0: 99 3A 99 20 22 C5 4E 54 45 52 20 4E 41 4D 45 20 |.:. ".NTER NAME | 00000AF0: 4F 46 20 46 49 4C 45 20 54 4F 20 42 45 20 43 4F |OF FILE TO BE CO| 00000B00: 50 49 45 44 22 00 0F 27 34 03 85 20 46 49 24 00 |PIED"..'4.. FI$.| 00000B10: 22 27 35 03 8B 20 C3 28 46 49 24 29 B2 30 20 A7 |"'5.. .(FI$).0 .| 00000B20: 20 8E 00 40 27 3E 03 99 3A 99 20 22 20 20 20 C5 | ..@'>..:. " .| 00000B30: 4E 54 45 52 20 46 49 4C 45 20 54 59 50 45 3A 22 |NTER FILE TYPE:"| 00000B40: 00 57 27 48 03 99 20 22 20 20 20 20 20 D0 20 50 |.W'H.. " . P| 00000B50: 52 4F 47 52 41 4D 22 00 71 27 52 03 99 20 22 20 |ROGRAM".q'R.. " | 00000B60: 20 20 20 20 D3 20 53 45 51 55 45 4E 54 49 41 4C | . SEQUENTIAL| 00000B70: 22 00 85 27 5C 03 99 20 22 20 20 20 20 20 D5 20 |"..'\.. " . | 00000B80: 55 53 45 52 22 00 9D 27 66 03 99 20 22 20 20 20 |USER"..'f.. " | 00000B90: 20 20 D2 20 52 45 4C 41 54 49 56 45 22 00 A9 27 | . RELATIVE"..'| 00000BA0: 70 03 85 20 54 59 50 45 24 00 D7 27 7A 03 99 3A |p.. TYPE$..'z..:| 00000BB0: 99 20 22 C9 4E 53 45 52 54 20 53 4F 55 52 43 45 |. ".NSERT SOURCE| 00000BC0: 20 44 49 53 4B 20 41 4E 44 20 50 52 45 53 53 20 | DISK AND PRESS | 00000BD0: D2 C5 D4 D5 D2 CE 22 00 E0 27 84 03 8D 36 39 35 |......"..'...695| 00000BE0: 00 00 28 8E 03 8D 31 30 30 30 3A 8F 20 52 45 41 |..(...1000:. REA| 00000BF0: 44 20 46 49 4C 45 20 49 4E 54 4F 20 54 45 4D 50 |D FILE INTO TEMP| 00000C00: 00 12 28 93 03 8B 20 C5 28 41 24 29 B3 B1 30 A7 |..(... .(A$)..0.| 00000C10: 20 8E 00 44 28 98 03 99 3A 99 20 22 C9 4E 53 45 | ..D(...:. ".NSE| 00000C20: 52 54 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 44 |RT DESTINATION D| 00000C30: 49 53 4B 20 41 4E 44 20 50 52 45 53 53 20 52 45 |ISK AND PRESS RE| 00000C40: 54 55 52 4E 00 4D 28 A2 03 8D 36 39 35 00 6E 28 |TURN.M(...695.n(| 00000C50: AC 03 8D 31 30 35 30 3A 8F 20 57 52 49 54 45 20 |...1050:. WRITE | 00000C60: 46 49 4C 45 20 46 52 4F 4D 20 54 45 4D 50 00 8E |FILE FROM TEMP..| 00000C70: 28 B6 03 99 3A 85 22 CD 41 4B 45 20 41 4E 4F 54 |(...:.".AKE ANOT| 00000C80: 48 45 52 20 43 4F 50 59 3F A0 22 3B 57 24 00 A8 |HER COPY?.";W$..| 00000C90: 28 C0 03 8B 20 C8 28 57 24 2C 31 29 B2 22 59 22 |(... .(W$,1)."Y"| 00000CA0: 20 A7 20 89 20 39 32 30 00 AE 28 CA 03 8E 00 B4 | . . 920..(.....| 00000CB0: 28 D9 03 3A 00 D1 28 E8 03 8F 20 2D 20 52 45 41 |(..:..(... - REA| 00000CC0: 44 20 46 49 4C 45 20 49 4E 54 4F 20 54 45 4D 50 |D FILE INTO TEMP| 00000CD0: 25 00 D9 28 EA 03 49 B2 31 00 EA 28 EC 03 A0 31 |%..(..I.1..(...1| 00000CE0: 35 3A 9F 31 35 2C 38 2C 31 35 00 F1 28 ED 03 A0 |5:.15,8,15..(...| 00000CF0: 35 00 17 29 EE 03 9F 20 35 2C 38 2C 35 2C 22 30 |5..)... 5,8,5,"0| 00000D00: 3A 22 AA 46 49 4C 45 24 AA 22 2C 22 AA 54 59 50 |:".FILE$.",".TYP| 00000D10: 45 24 AA 22 2C 52 22 00 20 29 EF 03 8D 36 35 35 |E$.",R". )...655| 00000D20: 00 33 29 F0 03 8B 20 C5 28 41 24 29 B3 B1 30 20 |.3)... .(A$)..0 | 00000D30: A7 20 8E 00 49 29 F1 03 99 22 D2 45 41 44 49 4E |. ..I)...".EADIN| 00000D40: 47 20 22 46 49 4C 45 53 24 00 54 29 F2 03 A1 23 |G "FILES$.T)...#| 00000D50: 35 2C 41 24 00 6C 29 F4 03 54 45 4D 50 25 28 49 |5,A$.l)..TEMP%(I| 00000D60: 29 B2 C6 28 41 24 AA C7 28 30 29 29 00 76 29 F6 |)..(A$..(0)).v).| 00000D70: 03 49 B2 49 AA 31 00 88 29 F8 03 8B 20 53 54 B2 |.I.I.1..)... ST.| 00000D80: 30 20 A7 20 31 30 31 30 00 B6 29 FA 03 99 3A 99 |0 . 1010..)...:.| 00000D90: 22 C6 49 4C 45 20 4C 45 4E 47 54 48 20 49 53 22 |".ILE LENGTH IS"| 00000DA0: 49 22 D3 54 41 54 55 53 20 49 53 22 53 54 3A A0 |I".TATUS IS"ST:.| 00000DB0: 35 3A 89 36 35 30 00 BC 29 FC 03 8E 00 DA 29 1A |5:.650..).....).| 00000DC0: 04 8F 20 2D 20 57 52 49 54 45 20 46 49 4C 45 20 |.. - WRITE FILE | 00000DD0: 46 52 4F 4D 20 54 45 4D 50 25 00 EC 29 1C 04 A0 |FROM TEMP%..)...| 00000DE0: 31 35 3A 9F 20 31 35 2C 38 2C 31 35 00 12 2A 1E |15:. 15,8,15..*.| 00000DF0: 04 9F 20 35 2C 38 2C 35 2C 22 30 3A 22 AA 46 49 |.. 5,8,5,"0:".FI| 00000E00: 4C 45 24 AA 22 2C 22 AA 54 59 50 45 24 AA 22 2C |LE$.",".TYPE$.",| 00000E10: 57 22 00 1C 2A 1F 04 8D 20 36 35 35 00 2F 2A 20 |W"..*... 655./* | 00000E20: 04 8B 20 C5 28 41 24 29 B3 B1 30 20 A7 20 8E 00 |.. .(A$)..0 . ..| 00000E30: 43 2A 21 04 99 20 22 D7 52 49 54 49 4E 47 20 22 |C*!.. ".RITING "| 00000E40: 46 49 24 00 4B 2A 22 04 4A B2 31 00 5F 2A 24 04 |FI$.K*".J.1._*$.| 00000E50: 98 35 2C C7 28 54 45 4D 50 25 28 4A 29 29 3B 00 |.5,.(TEMP%(J));.| 00000E60: 69 2A 26 04 4A B2 4A AA 31 00 7A 2A 28 04 8B 20 |i*&.J.J.1.z*(.. | 00000E70: 4A B3 49 20 A7 20 31 30 36 30 00 9D 2A 2A 04 99 |J.I . 1060..**..| 00000E80: 3A 99 22 C6 49 4C 45 20 4C 45 4E 47 54 48 20 49 |:.".ILE LENGTH I| 00000E90: 53 22 3B 4A 3A A0 20 35 3A 89 36 35 30 00 B6 2A |S";J:. 5:.650..*| 00000EA0: 4C 04 99 3A 8F 20 20 20 2A 56 49 45 57 20 44 49 |L..:. *VIEW DI| 00000EB0: 53 4B 46 49 4C 45 00 DE 2A 60 04 99 3A 85 22 CE |SKFILE..*`..:.".| 00000EC0: 41 4D 45 20 4F 46 20 46 49 4C 45 20 54 4F 20 42 |AME OF FILE TO B| 00000ED0: 45 20 50 52 49 4E 54 45 44 22 3B 44 49 24 00 F0 |E PRINTED";DI$..| 00000EE0: 2A 62 04 8B C3 28 44 49 24 29 B2 30 20 A7 20 8E |*b...(DI$).0 . .| 00000EF0: 00 01 2B 63 04 A0 31 35 3A 9F 31 35 2C 38 2C 31 |..+c..15:.15,8,1| 00000F00: 35 00 1F 2B 64 04 A0 35 3A 9F 35 2C 38 2C 35 2C |5..+d..5:.5,8,5,| 00000F10: 22 30 3A 22 AA 44 49 24 AA 22 2C 53 2C 52 22 00 |"0:".DI$.",S,R".| 00000F20: 36 2B 66 04 8D 36 35 35 3A 8F 20 41 4E 59 20 45 |6+f..655:. ANY E| 00000F30: 52 52 4F 52 53 3F 00 47 2B 67 04 8B C5 28 41 24 |RRORS?.G+g...(A$| 00000F40: 29 B3 B1 30 A7 20 8E 00 52 2B 68 04 9F 34 2C 34 |)..0. ..R+h..4,4| 00000F50: 2C 37 00 6A 2B 6A 04 A1 23 35 2C 41 24 3A 43 4B |,7.j+j..#5,A$:CK| 00000F60: B2 53 54 3A 98 34 2C 41 24 3B 00 7E 2B 6F 04 99 |.ST:.4,A$;.~+o..| 00000F70: 41 24 3B 3A 8B 43 4B B2 30 A7 31 31 33 30 00 85 |A$;:.CK.0.1130..| 00000F80: 2B 70 04 98 34 00 95 2B 71 04 A0 35 3A A0 31 35 |+p..4..+q..5:.15| 00000F90: 3A A0 34 3A 8E 00 9B 2B AF 04 3A 00 B9 2B B0 04 |:.4:...+..:..+..| 00000FA0: 99 44 53 24 3A 8F 20 53 50 4C 49 54 20 46 49 4C |.DS$:. SPLIT FIL| 00000FB0: 45 20 52 4F 55 54 49 4E 45 00 D5 2B BA 04 85 22 |E ROUTINE..+..."| 00000FC0: D3 4F 55 52 43 45 20 46 49 4C 45 20 4E 41 4D 45 |.OURCE FILE NAME| 00000FD0: 22 3B 44 49 24 00 E8 2B BF 04 8B 20 C3 28 44 49 |";DI$..+... .(DI| 00000FE0: 24 29 B2 30 20 A7 20 8E 00 F9 2B C4 04 A0 31 35 |$).0 . ...+...15| 00000FF0: 3A 9F 31 35 2C 38 2C 31 35 00 11 2C CE 04 A0 35 |:.15,8,15..,...5| 00001000: 3A 9F 20 35 2C 38 2C 35 2C 22 30 3A 22 AA 44 49 |:. 5,8,5,"0:".DI| 00001010: 24 00 1A 2C D0 04 8D 36 35 35 00 2C 2C D2 04 8B |$..,...655.,,...| 00001020: C5 28 41 24 29 B3 B1 30 20 A7 20 8E 00 63 2C D5 |.(A$)..0 . ..c,.| 00001030: 04 53 4C B2 30 3A 85 22 C2 4C 4F 43 4B 20 4C 45 |.SL.0:.".LOCK LE| 00001040: 4E 47 54 48 20 4F 46 20 45 41 43 48 20 53 45 47 |NGTH OF EACH SEG| 00001050: 4D 45 4E 54 22 3B 53 4C 3A 8B 53 4C B2 30 A7 31 |MENT";SL:.SL.0.1| 00001060: 32 37 30 00 71 2C D6 04 53 4C B2 53 4C AC 32 35 |270.q,..SL.SL.25| 00001070: 34 00 7F 2C D8 04 41 B2 36 34 3A 99 22 93 22 00 |4..,..A.64:.".".| 00001080: 9A 2C DD 04 41 B2 41 AA 31 3A 44 4F 24 B2 44 49 |.,..A.A.1:DO$.DI| 00001090: 24 AA 22 2E 22 AA C7 28 41 29 00 BE 2C DE 04 A0 |$."."..(A)..,...| 000010A0: 36 3A 9F 20 36 2C 38 2C 36 2C 22 30 3A 22 AA 44 |6:. 6,8,6,"0:".D| 000010B0: 4F 24 AA 22 2C 53 2C 57 22 3A 43 54 B2 31 00 C7 |O$.",S,W":CT.1..| 000010C0: 2C DF 04 8D 36 35 35 00 D9 2C E0 04 8B C5 28 41 |,...655..,....(A| 000010D0: 24 29 B3 B1 30 20 A7 20 8E 00 EB 2C E1 04 99 22 |$)..0 . ...,..."| 000010E0: D3 41 56 49 4E 47 20 22 44 4F 24 00 03 2D E2 04 |.AVING "DO$..-..| 000010F0: A1 23 35 2C 41 24 3A 43 4B B2 53 54 3A 98 36 2C |.#5,A$:CK.ST:.6,| 00001100: 41 24 3B 00 1B 2D E7 04 43 54 B2 43 54 AA 31 3A |A$;..-..CT.CT.1:| 00001110: 8B 43 54 B2 53 4C A7 31 32 34 35 00 2A 2D EC 04 |.CT.SL.1245.*-..| 00001120: 8B 43 4B B2 30 A7 31 32 35 30 00 3A 2D F6 04 A0 |.CK.0.1250.:-...| 00001130: 35 3A A0 36 3A A0 31 35 3A 8E 00 53 2D 14 05 99 |5:.6:.15:..S-...| 00001140: 3A 8F 20 20 20 2A 56 49 45 57 20 44 49 53 4B 46 |:. *VIEW DISKF| 00001150: 49 4C 45 00 7A 2D 28 05 99 3A 85 22 CE 41 4D 45 |ILE.z-(..:.".AME| 00001160: 20 4F 46 20 46 49 4C 45 20 54 4F 20 42 45 20 56 | OF FILE TO BE V| 00001170: 49 45 57 45 44 22 3B 44 49 24 00 8C 2D 2A 05 8B |IEWED";DI$..-*..| 00001180: C3 28 44 49 24 29 B2 30 20 A7 20 8E 00 9D 2D 2B |.(DI$).0 . ...-+| 00001190: 05 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 00 BB 2D |..15:.15,8,15..-| 000011A0: 2C 05 A0 35 3A 9F 35 2C 38 2C 35 2C 22 30 3A 22 |,..5:.5,8,5,"0:"| 000011B0: AA 44 49 24 AA 22 2C 53 2C 52 22 00 D2 2D 2E 05 |.DI$.",S,R"..-..| 000011C0: 8D 36 35 35 3A 8F 20 41 4E 59 20 45 52 52 4F 52 |.655:. ANY ERROR| 000011D0: 53 3F 00 E3 2D 2F 05 8B C5 28 41 24 29 B3 B1 30 |S?..-/...(A$)..0| 000011E0: A7 20 8E 00 EC 2D 30 05 99 22 93 22 00 FC 2D 32 |. ...-0.."."..-2| 000011F0: 05 A1 23 35 2C 41 24 3A 99 41 24 3B 00 12 2E 33 |..#5,A$:.A$;...3| 00001200: 05 A1 57 24 3A 8B 57 24 B3 B1 22 22 A7 20 31 33 |..W$:.W$.."". 13| 00001210: 33 37 00 21 2E 37 05 8B 53 54 B2 30 A7 31 33 33 |37.!.7..ST.0.133| 00001220: 30 00 2C 2E 38 05 99 3A 8D 36 39 30 00 39 2E 39 |0.,.8..:.690.9.9| 00001230: 05 A0 35 3A A0 31 35 3A 8E 00 59 2E 0E 06 99 44 |..5:.15:..Y....D| 00001240: 53 24 3A 8F 20 43 4F 4E 56 45 52 54 20 46 49 4C |S$:. CONVERT FIL| 00001250: 45 20 52 4F 55 54 49 4E 45 00 75 2E 11 06 85 22 |E ROUTINE.u...."| 00001260: D3 4F 55 52 43 45 20 46 49 4C 45 20 4E 41 4D 45 |.OURCE FILE NAME| 00001270: 22 3B 44 49 24 00 88 2E 13 06 8B 20 C3 28 44 49 |";DI$...... .(DI| 00001280: 24 29 B2 30 20 A7 20 8E 00 99 2E 18 06 A0 31 35 |$).0 . .......15| 00001290: 3A 9F 31 35 2C 38 2C 31 35 00 B1 2E 1D 06 A0 35 |:.15,8,15......5| 000012A0: 3A 9F 20 35 2C 38 2C 35 2C 22 30 3A 22 AA 44 49 |:. 5,8,5,"0:".DI| 000012B0: 24 00 BA 2E 1F 06 8D 36 35 35 00 CC 2E 22 06 8B |$......655..."..| 000012C0: C5 28 41 24 29 B3 B1 30 20 A7 20 8E 00 ED 2E 25 |.(A$)..0 . ....%| 000012D0: 06 85 22 C4 45 53 54 49 4E 41 54 49 4F 4E 20 46 |..".ESTINATION F| 000012E0: 49 4C 45 20 4E 41 4D 45 22 3B 44 49 24 00 00 2F |ILE NAME";DI$../| 000012F0: 27 06 8B 20 C3 28 44 49 24 29 B2 30 20 A7 20 8E |'.. .(DI$).0 . .| 00001300: 00 14 2F 2B 06 44 4F 24 B2 44 49 24 AA 22 2E 43 |../+.DO$.DI$.".C| 00001310: 4F 4E 56 22 00 33 2F 2C 06 A0 36 3A 9F 20 36 2C |ONV".3/,..6:. 6,| 00001320: 38 2C 36 2C 22 30 3A 22 AA 44 4F 24 AA 22 2C 53 |8,6,"0:".DO$.",S| 00001330: 2C 57 22 00 3C 2F 31 06 8D 36 35 35 00 4E 2F 33 |,W".</1..655.N/3| 00001340: 06 8B C5 28 41 24 29 B3 B1 30 20 A7 20 8E 00 60 |...(A$)..0 . ..`| 00001350: 2F 34 06 99 22 D3 41 56 49 4E 47 20 22 44 4F 24 |/4..".AVING "DO$| 00001360: 00 77 2F 36 06 A1 23 35 2C 41 24 3A 43 4B B2 53 |.w/6..#5,A$:CK.S| 00001370: 54 3A 8D 31 36 30 30 00 8D 2F 38 06 98 36 2C 41 |T:.1600../8..6,A| 00001380: 24 3B 3A 8B 43 4B B2 30 A7 31 35 39 30 00 9D 2F |$;:.CK.0.1590../| 00001390: 3B 06 A0 35 3A A0 36 3A A0 31 35 3A 8E 00 A3 2F |;..5:.6:.15:.../| 000013A0: 3C 06 3A 00 C2 2F 40 06 3A 8F 20 41 53 43 49 49 |<.:../@.:. ASCII| 000013B0: 20 54 4F 20 43 42 4D 20 43 4F 4E 56 45 52 53 49 | TO CBM CONVERSI| 000013C0: 4F 4E 00 DC 2F 4A 06 41 B2 C6 28 41 24 AA C7 28 |ON../J.A..(A$..(| 000013D0: 30 29 29 3A 8B 41 B3 36 35 A7 20 8E 00 EC 2F 54 |0)):.A.65. .../T| 000013E0: 06 8B 41 B1 39 30 20 A7 31 36 34 30 00 05 30 5E |..A.90 .1640..0^| 000013F0: 06 41 24 B2 C7 28 41 AA 33 32 29 3A 8E 3A 8F 20 |.A$..(A.32):.:. | 00001400: 20 20 55 2F 43 00 13 30 68 06 8B 41 B3 39 37 20 | U/C..0h..A.97 | 00001410: A7 20 8E 00 21 30 72 06 8B 41 B1 31 32 32 A7 20 |. ..!0r..A.122. | 00001420: 8E 00 3A 30 7C 06 41 24 B2 C7 28 41 AB 33 32 29 |..:0|.A$..(A.32)| 00001430: 3A 8E 3A 8F 20 20 20 4C 2F 43 00 57 30 A4 06 99 |:.:. L/C.W0...| 00001440: 22 93 22 3A 8F 20 43 4F 4E 43 41 54 45 4E 41 54 |".":. CONCATENAT| 00001450: 45 20 46 49 4C 45 53 00 76 30 AE 06 85 22 D3 4F |E FILES.v0...".O| 00001460: 55 52 43 45 20 46 49 4C 45 20 4E 41 4D 45 20 23 |URCE FILE NAME #| 00001470: 31 22 3B 44 31 24 00 89 30 B8 06 8B 20 C3 28 44 |1";D1$..0... .(D| 00001480: 31 24 29 B2 30 20 A7 20 8E 00 A8 30 C2 06 85 22 |1$).0 . ...0..."| 00001490: D3 4F 55 52 43 45 20 46 49 4C 45 20 4E 41 4D 45 |.OURCE FILE NAME| 000014A0: 20 23 32 22 3B 44 32 24 00 BB 30 CC 06 8B 20 C3 | #2";D2$..0... .| 000014B0: 28 44 32 24 29 B2 30 20 A7 20 8E 00 CF 30 D1 06 |(D2$).0 . ...0..| 000014C0: 44 43 24 B2 44 31 24 AA 22 2C 22 AA 44 32 24 00 |DC$.D1$.",".D2$.| 000014D0: EE 30 D6 06 85 22 D3 4F 55 52 43 45 20 46 49 4C |.0...".OURCE FIL| 000014E0: 45 20 4E 41 4D 45 20 23 33 22 3B 44 33 24 00 04 |E NAME #3";D3$..| 000014F0: 31 E0 06 8B 20 C3 28 44 33 24 29 B2 30 20 A7 20 |1... .(D3$).0 . | 00001500: 31 38 30 30 00 18 31 E5 06 44 43 24 B2 44 43 24 |1800..1..DC$.DC$| 00001510: AA 22 2C 22 AA 44 33 24 00 37 31 EA 06 85 22 D3 |.",".D3$.71...".| 00001520: 4F 55 52 43 45 20 46 49 4C 45 20 4E 41 4D 45 20 |OURCE FILE NAME | 00001530: 23 34 22 3B 44 34 24 00 4D 31 F4 06 8B 20 C3 28 |#4";D4$.M1... .(| 00001540: 44 34 24 29 B2 30 20 A7 20 31 38 30 30 00 61 31 |D4$).0 . 1800.a1| 00001550: F9 06 44 43 24 B2 44 43 24 AA 22 2C 22 AA 44 34 |..DC$.DC$.",".D4| 00001560: 24 00 82 31 08 07 85 22 C4 45 53 54 49 4E 41 54 |$..1...".ESTINAT| 00001570: 49 4F 4E 20 46 49 4C 45 20 4E 41 4D 45 22 3B 44 |ION FILE NAME";D| 00001580: 4F 24 00 A4 31 12 07 A0 31 35 3A 9F 31 35 2C 38 |O$..1...15:.15,8| 00001590: 2C 31 35 2C 22 43 3A 22 AA 44 4F 24 AA 22 3D 22 |,15,"C:".DO$."="| 000015A0: AA 44 43 24 00 C2 31 17 07 89 36 35 35 3A 8F 20 |.DC$..1...655:. | 000015B0: 50 52 49 4E 54 20 45 52 52 4F 52 53 20 26 20 52 |PRINT ERRORS & R| 000015C0: 45 54 00 E6 31 6C 07 97 35 33 32 38 30 2C 30 3A |ET..1l..53280,0:| 000015D0: 97 35 33 32 38 31 2C 30 3A 99 C7 28 31 34 37 29 |.53281,0:..(147)| 000015E0: C7 28 31 34 32 29 00 09 32 76 07 99 A3 31 34 29 |.(142)..2v...14)| 000015F0: 22 9A 11 11 11 11 11 11 11 11 11 11 11 4C 4F 41 |"............LOA| 00001600: 44 49 4E 47 2E 2E 2E 2E 22 00 1E 32 80 07 93 22 |DING...."..2..."| 00001610: 54 41 52 47 45 54 37 22 2C 38 3A 8A 3A 80 00 00 |TARGET7",8:.:...| 00001620: 00 |. |
..,.... ** BEARBEITET DURCH 128'ER AKTUE LL**.:... 15: 5: 1.[...FR..(0):. FR.0 . FR.FR.65536.L...S.(FR.400).2.Z....TEMP%( S)......".";G(14);G(30);.......9)"...... ................".R.....9)". C-128 DISK MANAGER .".......9)".................... .."...(.....2...9)"1 DISK DIRECTORY.0.< ...9)"2 FORMAT NEW DISK.L.F...9)"3 INI TIALIZE DISK.O.P...9)"4 COPY FILE TO SA ME DISK...U...9)"5 COPY FILE TO NEW DIS K...V...9)"6 RENAME A FILE.D.W...9)"7 ERASE A FILE...X...9)"8 VALIDATE FILES. ..Y...9)"9 EXIT TO BASIC"...Z...9)"A A SCII-CBM CONVERSION.:.[...9)"C COMBINE DISK FILES.U.]...9)"P PRINT DISKFILE.Q. _...9)"S SPLIT DISK FILE...A...9)"V VI EW DISK FILE...C..:..11)"MAKE SELECTION :";...N..695:DI$."".V.S..W$."A"..W$:.155 0:.210...X..W$."C"..W$:.1700:.210......W $."P"..W$:.1100:.210.'....W$."S"..W$:.12 00:.210.B....W$."V"..W$:.1300:.210.].... W$."1" . W$."9" . 110.S.A..W$:CH.(F(W$). 48)...H.. CH . 250,300,350,400,800,450,5 00,550,700...R.. 10.P...."..":..11)"D I R E C T O R Y":.......1,8,0,"$"......#1, A$,B$......".";.. ...#1,A$,B$.. ...#1,A$ ,B$.3 ..C.F(A$.G(0)).F(B$.G(0)).256.B .. .ST..0.283.Z ....7)J(D(C),2);.11);.P ... #1,B$:. ST . 280.. ...B$..G(34) . 264.. ... #1,B$:. B$.. G(34) . . B$;:. 268.H . ..#1,B$:. B$.G(32) . 270.Y ....29);:C$." ".. ..C$.C$.B$:. #1,B$:. B$.."" . 274..! ... H(C$,3):. ID. !... ST.0. 254.9!....2 1)"BLOCKS FREE":..T!.. 1:.650:. E(A$)..0 . ..]!...690.C!..:.M!,..DS$;..!1...7)"I NSERT DISK TO BE FORMATTED"..!6.."DISK N AME";DI$..!;.. C(DI$).0 . ..N!@.."DISK I D";EX$..!E.. C(EX$).0 . ..."J. 15:. 15,8 ,15,"N:".DISK$.",".EXT$.)"T..655:. PRINT ANY ERRORS & RET.G"^..DS$;:. *** INI TIALIZE.O"H...5)"INSERT DISK TO BE INITI ALIZED".."R...7);"PRESS RETURN TO INITIA LIZE":.. "W..695.."|. 15:. 15,8,15,"I".. "...655.E"..:.."...DS$:. COPY FILE ROUTI NE.."..."SOURCE FILE NAME";DI$..#... C(D I$).0 . ..*#..."NEW FILE NAME";NW$.=#... C(NW$).0 . ..B#.. 15:.15,8,15,"C:".NWS$ ."=".DISK$..#...655:. PRINT ERRORS & RET ..#..:..#B..DS$..#L.."OLD FILE NAME";DI$ ..#Q.. C(DI$).0 . ..U#V.."NEW FILE NAME" ;NWS$..#... C(NW$).0 . ...$.. 15:. 15,8, 15,"R:".NWS$."=".DISK$.-$... 655:. PRINT ERRORS & RET.3$..:.I$... *** ERASE FIL E.C$...DS$:."FILE NAME";DI$.V$... C(DI$) .0 . ...$.. 15:.15,8,15,"S:".DI$..$...65 5:. PRINT ANY ERRORS & RET..$!.:.W$&..DS $;:. *** VALIDATE DISK..%0.." WARNING: OPEN FILES WILL BE DELETED..%:..:..8)" PRESS RETURN TO VALIDATE":.695.>%D..1,8, 15,"V".J%N. 1:.650.P%S.:.T%X.:. *** E R R O R H A N D L E R..%.. 15:.15,8,15..% ...15,A$,B$,C$,D$..%... E(A$).0 . ...%.. ER$.B$." #".A$." ON TRK ".C$." SEC ".D$: ..(40.C(ER$)).2)ER$: 15..&....7)"PRESS A NY KEY TO CONTINUE.+&..W$."":.W$:.W$."". 695.1&....7&..:.V&...".": 1: 5: 4: 15: 6 :.1900.\&..:.U& .. ".":. 2 DRIVE COPY.~& ". 15..&#.MAX..(S.256)..&$.. "MAXIMUM S IZE OF FILE WHICH CAN"..&%.. " BE COPIE D IS "MAX" BLOCKS."..'*..:. "ENTER NAME OF FILE TO BE COPIED"..'4.. FI$."'5.. C( FI$).0 . ..@'>..:. " ENTER FILE TYPE:" .W'H.. " P PROGRAM".Q'R.. " S SE QUENTIAL"..'\.. " U USER"..'F.. " R RELATIVE"..'P.. TYPE$.W'Z..:. "INSER T SOURCE DISK AND PRESS RETURN"..'...695 ..(...1000:. READ FILE INTO TEMP..(... E (A$)..0. ..D(...:. "INSERT DESTINATION D ISK AND PRESS RETURN.M(...695.N(...1050: . WRITE FILE FROM TEMP..(...:."MAKE ANOT HER COPY? ";W$..(... H(W$,1)."Y" . . 920 ..(J....(Y.:.Q(... - READ FILE INTO TEMP %.Y(..I.1..(.. 15:.15,8,15..(.. 5..)... 5,8,5,"0:".FILE$.",".TYPE$.",R". )...655 .3)... E(A$)..0 . ..I)..."READING "FILES $.T)...#5,A$.L)..TEMP%(I).F(A$.G(0)).V). .I.I.1..)... ST.0 . 1010..)...:."FILE LE NGTH IS"I"STATUS IS"ST: 5:.650..)....Z). .. - WRITE FILE FROM TEMP%..).. 15:. 15, 8,15..*... 5,8,5,"0:".FILE$.",".TYPE$.", W"..*... 655./* .. E(A$)..0 . ..C*!.. "W RITING "FI$.K*".J.1._*$..5,G(TEMP%(J));. I*&.J.J.1.Z*(.. J.I . 1060..**..:."FILE LENGTH IS";J: 5:.650..*L..:. *VIEW DI SKFILE..*`..:."NAME OF FILE TO BE PRINTE D";DI$..*B..C(DI$).0 . ...+C. 15:.15,8,1 5..+D. 5:.5,8,5,"0:".DI$.",S,R".6+F..655 :. ANY ERRORS?.G+G..E(A$)..0. ..R+H..4,4 ,7.J+J..#5,A$:CK.ST:.4,A$;.~+O..A$;:.CK. 0.1130..+P..4..+Q. 5: 15: 4:...+..:..+.. .DS$:. SPLIT FILE ROUTINE.U+..."SOURCE F ILE NAME";DI$..+... C(DI$).0 . ...+D. 15 :.15,8,15..,N. 5:. 5,8,5,"0:".DI$..,P..6 55.,,R..E(A$)..0 . ..C,U.SL.0:."BLOCK LE NGTH OF EACH SEGMENT";SL:.SL.0.1270.Q,V. SL.SL.254.,X.A.64:."."..,..A.A.1:DO$.DI $.".".G(A)..,.. 6:. 6,8,6,"0:".DO$.",S,W ":CT.1.G,...655.Y,...E(A$)..0 . ...,..." SAVING "DO$..-...#5,A$:CK.ST:.6,A$;..-.. CT.CT.1:.CT.SL.1245.*-...CK.0.1250.:-.. 5: 6: 15:..S-...:. *VIEW DISKFILE.Z-(. .:."NAME OF FILE TO BE VIEWED";DI$..-*.. C(DI$).0 . ...-+. 15:.15,8,15..-,. 5:.5, 8,5,"0:".DI$.",S,R".R-...655:. ANY ERROR S?..-/..E(A$)..0. ...-0.."."..-2..#5,A$: .A$;...3..W$:.W$.."". 1337.!.7..ST.0.133 0.,.8..:.690.9.9. 5: 15:..Y....DS$:. CON VERT FILE ROUTINE.U...."SOURCE FILE NAME ";DI$...... C(DI$).0 . ...... 15:.15,8,1 5..... 5:. 5,8,5,"0:".DI$......655.L.".. E(A$)..0 . ....%.."DESTINATION FILE NAME ";DI$../'.. C(DI$).0 . .../+.DO$.DI$.".C ONV".3/,. 6:. 6,8,6,"0:".DO$.",S,W".</1. .655.N/3..E(A$)..0 . ..`/4.."SAVING "DO$ .W/6..#5,A$:CK.ST:.1600../8..6,A$;:.CK.0 .1590../;. 5: 6: 15:.../<.:.B/@.:. ASCII TO CBM CONVERSION../J.A.F(A$.G(0)):.A.6 5. .../T..A.90 .1640..0^.A$.G(A.32):.:. U/C..0H..A.97 . ..!0R..A.122. ..:0|.A$ .G(A.32):.:. L/C.W0...".":. CONCATENAT E FILES.V0..."SOURCE FILE NAME #1";D1$.. 0... C(D1$).0 . ...0B.."SOURCE FILE NAME #2";D2$..0L.. C(D2$).0 . ..O0Q.DC$.D1$. ",".D2$..0V.."SOURCE FILE NAME #3";D3$.. 1... C(D3$).0 . 1800..1..DC$.DC$.",".D3$ .71..."SOURCE FILE NAME #4";D4$.M1... C( D4$).0 . 1800.A1..DC$.DC$.",".D4$..1..." DESTINATION FILE NAME";DO$..1.. 15:.15,8 ,15,"C:".DO$."=".DC$.B1...655:. PRINT ER RORS & RET..1L..53280,0:.53281,0:.G(147) G(142)..2V...14)"............LOADING.... "..2..."TARGET7",8:.:....
> CLICK IMAGE PREVIEW FOR FULL MODAL