FILE MANAGER
FILE INFORMATION
FILENAME(S): FILE MANAGER
FILE TYPE(S): PRG
FILE SIZE: 13.2K
FIRST SEEN: 2025-10-19 22:48:40
APPEARS ON: 1 disk(s)
FILE HASH
c064794d327a7d572cef37d97ba2cdcb1cdd2500153c2859d347dbd9871275d4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| QL APPLICATIONS | FILE MANAGER | PRG | Radd Maxx | 9 | 20 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..(.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 02 00 8F 20 2A |********.O.... *|
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 20 20 2A 00 | *.|
00000050: 76 08 03 00 8F 20 2A 20 20 20 20 20 20 20 20 20 |v.... * |
00000060: 46 49 4C 45 4D 41 4E 41 47 45 52 20 20 20 20 20 |FILEMANAGER |
00000070: 20 20 20 20 20 2A 00 9D 08 04 00 8F 20 2A 20 20 | *...... * |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 C4 08 | *...|
000000A0: 05 00 8F 20 2A 20 20 20 42 59 3A 47 55 49 44 4F |... * BY:GUIDO|
000000B0: 20 53 54 49 45 4C 44 4F 52 46 2F 36 2D 36 2D 38 | STIELDORF/6-6-8|
000000C0: 36 20 20 2A 00 EB 08 06 00 8F 20 2A 20 20 20 20 |6 *...... * |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 20 20 20 20 20 20 2A 00 12 09 07 00 | *.....|
000000F0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 00 35 09 0A 00 97 35 33 32 38 30 2C 30 3A |**.5....53280,0:|
00000120: 97 35 33 32 38 31 2C 30 3A 99 22 93 1E 22 3A 99 |.53281,0:."..":.|
00000130: C7 28 31 34 29 00 69 09 14 00 99 22 9F 93 9E 12 |.(14).i...."....|
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C6 49 | .I|
00000150: 4C 45 20 CD 41 4E 41 47 45 52 20 20 20 20 20 20 |LE .ANAGER |
00000160: 20 20 20 20 20 20 20 20 92 00 87 09 19 00 51 31 | ......Q1|
00000170: 24 B2 22 D3 C8 C9 C6 D4 2B 22 3A 51 32 24 B2 22 |$.".....+":Q2$."|
00000180: 20 20 20 20 20 20 22 00 BA 09 1E 00 99 22 1C 13 | "......"..|
00000190: 11 11 20 20 D3 C8 C1 D2 C5 D7 C1 D2 C5 20 42 59 |.. ......... BY|
000001A0: 20 C7 55 49 44 4F 20 D3 54 49 45 4C 44 4F 52 46 | .UIDO .TIELDORF|
000001B0: 20 36 2F 31 39 38 36 20 20 92 00 C5 09 20 00 99 | 6/1986 .... ..|
000001C0: 3A 99 22 81 22 00 E7 09 23 00 99 51 32 24 22 30 |:."."...#..Q2$"0|
000001D0: 29 20 D3 C3 D2 C1 D4 C3 C8 20 C1 CC CC 20 27 2C |) ....... ... ',|
000001E0: 27 2D C6 C9 CC C5 D3 00 06 0A 28 00 99 51 32 24 |'-........(..Q2$|
000001F0: 22 31 29 20 D0 D2 C9 CE D4 20 C1 20 C2 C1 D3 C9 |"1) ..... . ....|
00000200: C3 2D C6 C9 CC C5 00 1F 0A 2D 00 99 51 32 24 22 |.-.......-..Q2$"|
00000210: 32 29 20 C4 CF D3 2D C3 CF CD CD C1 CE C4 D3 00 |2) ...-.........|
00000220: 47 0A 32 00 99 51 32 24 22 33 29 20 D4 C5 D3 D4 |G.2..Q2$"3) ....|
00000230: 20 C2 CC CF C3 CB D3 20 28 C4 CF CE 27 D4 20 D3 | ...... (...'. .|
00000240: C3 D2 C1 D4 C3 C8 29 00 66 0A 37 00 99 51 32 24 |......).f.7..Q2$|
00000250: 22 34 29 20 D0 D2 CF D4 C5 C3 D4 20 D7 C8 CF CC |"4) ....... ....|
00000260: C5 20 C4 C9 D3 CB 00 8A 0A 3C 00 99 51 32 24 22 |. .......<..Q2$"|
00000270: 35 29 20 C3 C8 C1 CE C7 C5 20 C4 C9 D3 CB 2D CE |5) ...... ....-.|
00000280: C1 CD C5 20 C1 CE C4 20 C9 C4 00 B2 0A 41 00 99 |... ... .....A..|
00000290: 51 32 24 22 36 29 20 D3 C3 D2 C1 D4 C3 C8 C5 C4 |Q2$"6) .........|
000002A0: 20 C6 C9 CC C5 20 D3 C1 CC D6 C1 C7 C5 C1 C2 CC | .... ..........|
000002B0: C5 3F 00 D0 0A 46 00 99 51 32 24 22 37 29 20 D0 |.?...F..Q2$"7) .|
000002C0: D2 C9 CE D4 20 C6 C9 CC C5 20 C9 CE 20 C8 C5 D8 |.... .... .. ...|
000002D0: 00 EB 0A 4B 00 99 51 32 24 22 38 29 20 D5 CE D0 |...K..Q2$"8) ...|
000002E0: D2 CF D4 C5 C3 D4 20 C6 C9 CC C5 00 0E 0B 50 00 |...... .......P.|
000002F0: 99 51 32 24 22 39 29 20 D3 C1 CC D6 C1 C7 C5 20 |.Q2$"9) ....... |
00000300: D3 C3 D2 C1 D4 C3 C8 C5 C4 20 C6 C9 CC C5 00 37 |......... .....7|
00000310: 0B 55 00 99 51 31 24 22 31 29 20 D0 D2 CF D4 C5 |.U..Q1$"1) .....|
00000320: C3 D4 20 C6 C9 CC C5 20 C6 D2 CF CD 20 D3 C3 D2 |.. .... .... ...|
00000330: C1 D4 C3 C8 C9 CE C7 00 57 0B 5A 00 99 51 31 24 |........W.Z..Q1$|
00000340: 22 32 29 20 D3 C8 CF D7 20 C6 C9 CC C5 2D D0 C1 |"2) .... ....-..|
00000350: D2 C1 CD C5 D4 C5 D2 00 74 0B 5F 00 99 51 31 24 |........t._..Q1$|
00000360: 22 33 29 20 C3 C8 C1 CE C7 C5 20 C6 C9 CC C5 2D |"3) ...... ....-|
00000370: D4 D9 D0 C5 00 90 0B 64 00 99 51 31 24 22 34 29 |.......d..Q1$"4)|
00000380: 20 D0 D2 C9 CE D4 20 C4 C9 D2 C5 C3 D4 CF D2 D9 | ..... .........|
00000390: 00 AB 0B 69 00 99 51 31 24 22 35 29 20 D3 C8 CF |...i..Q1$"5) ...|
000003A0: D7 20 C4 C9 D2 C5 C3 D4 CF D2 D9 00 CA 0B 6E 00 |. ............n.|
000003B0: 99 51 31 24 22 36 29 20 C3 CC CF D3 C5 20 C1 CE |.Q1$"6) ..... ..|
000003C0: 20 CF D0 C5 CE 20 C6 C9 CC C5 00 D4 0B 70 00 99 | .... .......p..|
000003D0: 3A 99 3A 99 00 14 0C 78 00 99 22 9F 12 D0 D2 C9 |:.:....x..".....|
000003E0: CE D4 C5 D2 3A 20 CD D0 D3 20 38 30 31 2C 20 D3 |....: ... 801, .|
000003F0: C5 C3 CF CE C4 2E C1 C4 C4 D2 C5 D3 D3 20 34 20 |............. 4 |
00000400: 20 20 20 20 13 22 3A 4D B2 30 3A 97 32 30 32 33 | .":M.0:.2023|
00000410: 2C 31 36 30 00 2C 0C 96 00 A1 41 24 3A 4D B2 4D |,160.,....A$:M.M|
00000420: AA 31 3A 8B 4D B2 31 30 A7 4D B2 30 00 42 0C 98 |.1:.M.10.M.0.B..|
00000430: 00 99 CA 28 22 12 92 22 2C 4D AD 35 AA 31 2C 31 |...("..",M.5.1,1|
00000440: 29 3B 00 76 0C 9B 00 99 22 1C 13 11 11 20 20 D3 |);.v....".... .|
00000450: C8 C1 D2 C5 D7 C1 D2 C5 20 42 59 20 C7 55 49 44 |........ BY .UID|
00000460: 4F 20 D3 54 49 45 4C 44 4F 52 46 20 36 2F 31 39 |O .TIELDORF 6/19|
00000470: 38 36 20 20 20 92 00 A6 0C A0 00 8B 28 41 24 B3 |86 .......(A$.|
00000480: 22 30 22 20 B0 20 41 24 B1 22 39 22 29 20 AF 20 |"0" . A$."9") . |
00000490: 28 41 24 B3 22 21 22 20 B0 20 41 24 B1 22 26 22 |(A$."!" . A$."&"|
000004A0: 29 20 89 31 35 30 00 BD 0C C8 00 99 22 1E 22 3B |) .150......".";|
000004B0: 3A 8B 41 24 B1 B2 22 30 22 89 32 32 30 00 F1 0C |:.A$.."0".220...|
000004C0: D2 00 91 C6 28 41 24 29 AB C6 28 22 21 22 29 AA |....(A$)..("!").|
000004D0: 31 89 31 31 30 30 30 2C 39 30 30 30 2C 34 30 30 |1.11000,9000,400|
000004E0: 30 2C 32 30 30 30 2C 31 32 30 30 30 2C 31 30 30 |0,2000,12000,100|
000004F0: 30 00 35 0D DC 00 91 C5 28 41 24 29 AA 31 89 31 |0.5.....(A$).1.1|
00000500: 30 30 30 30 2C 31 33 30 30 30 2C 33 30 30 30 2C |0000,13000,3000,|
00000510: 31 34 30 30 30 2C 31 35 30 30 30 2C 35 30 30 30 |14000,15000,5000|
00000520: 2C 36 30 30 30 2C 31 36 30 30 30 2C 38 30 30 30 |,6000,16000,8000|
00000530: 2C 37 30 30 30 00 4D 0D 2B 01 3A 3A 3A 3A 3A 3A |,7000.M.+.::::::|
00000540: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 63 0D |:::::::::::::.c.|
00000550: 2C 01 8F 20 43 48 45 43 4B 20 46 4F 52 20 45 52 |,.. CHECK FOR ER|
00000560: 52 4F 52 00 7B 0D 2D 01 3A 3A 3A 3A 3A 3A 3A 3A |ROR.{.-.::::::::|
00000570: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 93 0D 36 01 |:::::::::::...6.|
00000580: 84 31 35 2C 41 31 24 2C 41 32 24 2C 41 33 24 2C |.15,A1$,A2$,A3$,|
00000590: 41 34 24 00 B8 0D 40 01 44 53 24 B2 41 31 24 AA |A4$...@.DS$.A1$.|
000005A0: 22 2C 20 22 AA 41 32 24 AA 22 2C 22 AA 41 33 24 |", ".A2$.",".A3$|
000005B0: AA 22 2C 22 AA 41 34 24 00 CF 0D 4A 01 44 53 B2 |.",".A4$...J.DS.|
000005C0: C5 28 41 31 24 29 3A 8B 44 53 B3 31 39 A7 8E 00 |.(A1$):.DS.19...|
000005D0: EE 0D 54 01 99 22 93 11 11 11 11 11 11 11 1D 1D |..T.."..........|
000005E0: D3 54 41 54 55 53 20 3A 20 22 3B 44 53 24 00 0C |.TATUS : ";DS$..|
000005F0: 0E 5E 01 99 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |.^.."...........|
00000600: 1D C3 4F 4E 54 49 4E 55 45 20 3F 22 00 1E 0E 68 |..ONTINUE ?"...h|
00000610: 01 A1 41 24 3A 8B 41 24 B2 22 59 22 A7 8E 00 2F |..A$:.A$."Y".../|
00000620: 0E 72 01 8B 41 24 B3 B1 22 4E 22 89 33 36 30 00 |.r..A$.."N".360.|
00000630: 39 0E 7C 01 A0 31 35 3A 8A 00 4D 0E 8F 01 3A 3A |9.|..15:..M...::|
00000640: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 5F 0E |:::::::::::::._.|
00000650: 90 01 8F 20 53 45 41 52 43 48 20 46 49 4C 45 00 |... SEARCH FILE.|
00000660: 73 0E 91 01 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |s...::::::::::::|
00000670: 3A 3A 3A 00 99 0E 9A 01 54 B2 31 38 3A 53 B2 31 |:::.....T.18:S.1|
00000680: 3A 4D 4F B2 30 3A 8F 20 2A 2A 2A 46 24 3D 46 49 |:MO.0:. ***F$=FI|
00000690: 4C 45 4E 41 4D 45 2A 2A 2A 00 C4 0E 9F 01 51 57 |LENAME***.....QW|
000006A0: 24 B2 46 24 AA C8 28 22 20 20 20 20 20 20 20 20 |$.F$..(" |
000006B0: 20 20 20 20 20 20 20 20 20 22 2C 31 36 AB C3 28 | ",16..(|
000006C0: 46 24 29 29 00 D7 0E A4 01 8F 20 2A 2A 2A 20 4C |F$))...... *** L|
000006D0: 4F 4F 50 20 2A 2A 2A 00 FB 0E AE 01 98 31 35 2C |OOP ***......15,|
000006E0: 22 55 31 20 34 20 30 22 3B 54 3B 53 3A 8D 33 30 |"U1 4 0";T;S:.30|
000006F0: 30 3A 54 37 B2 54 3A 53 37 B2 53 00 12 0F B8 01 |0:T7.T:S7.S.....|
00000700: 98 31 35 2C 22 42 2D 50 20 34 20 30 22 3A 8D 33 |.15,"B-P 4 0":.3|
00000710: 30 30 00 20 0F C2 01 A1 23 34 2C 54 24 2C 53 24 |00. ....#4,T$,S$|
00000720: 00 3E 0F CC 01 53 B2 C6 28 53 24 AA C7 28 30 29 |.>...S..(S$..(0)|
00000730: 29 3A 54 B2 C6 28 54 24 AA C7 28 30 29 29 00 4A |):T..(T$..(0)).J|
00000740: 0F D6 01 81 51 57 B2 30 A4 37 00 59 0F E0 01 41 |....QW.0.7.Y...A|
00000750: 44 B2 33 32 AC 51 57 AA 32 00 73 0F EA 01 98 31 |D.32.QW.2.s....1|
00000760: 35 2C 22 42 2D 50 20 34 22 3B 41 44 AA 33 3A 8D |5,"B-P 4";AD.3:.|
00000770: 33 30 30 00 A2 0F F4 01 44 4E 24 B2 22 22 3A 81 |300.....DN$."":.|
00000780: 4C 4B B2 30 A4 31 35 3A A1 23 34 2C 4C 24 3A 8B |LK.0.15:.#4,L$:.|
00000790: 4C 24 B2 C7 28 31 36 30 29 A7 4C 24 B2 C7 28 33 |L$..(160).L$..(3|
000007A0: 32 29 00 CC 0F FE 01 44 4E 24 B2 44 4E 24 AA 4C |2).....DN$.DN$.L|
000007B0: 24 3A 82 3A 8B 44 4E 24 B2 51 57 24 A7 51 57 B2 |$:.:.DN$.QW$.QW.|
000007C0: 39 3A 82 51 57 3A 4D 4F B2 31 3A 8E 00 D2 0F 08 |9:.QW:MO.1:.....|
000007D0: 02 82 00 F2 0F 12 02 8B 54 B1 30 89 34 33 30 3A |........T.0.430:|
000007E0: 8F 20 2A 2A 2A 20 45 4E 44 20 4C 4F 4F 50 20 2A |. *** END LOOP *|
000007F0: 2A 2A 00 14 10 1C 02 8E 3A 8F 20 2A 2A 20 4D 4F |**......:. ** MO|
00000800: 3D 31 2C 20 57 48 45 4E 20 46 4F 55 4E 44 20 2A |=1, WHEN FOUND *|
00000810: 2A 2A 2A 2A 00 3A 10 26 02 8F 20 2A 41 44 3D 42 |****.:.&.. *AD=B|
00000820: 59 54 45 2C 20 54 2B 53 20 41 52 45 20 44 45 46 |YTE, T+S ARE DEF|
00000830: 41 55 4C 54 20 2A 2A 2A 2A 2A 00 63 10 58 02 99 |AULT *****.c.X..|
00000840: 22 11 11 11 11 D4 48 49 53 20 46 49 4C 45 20 49 |".....HIS FILE I|
00000850: 53 20 4E 4F 54 20 4F 4E 20 54 48 45 20 44 49 53 |S NOT ON THE DIS|
00000860: 4B 2E 22 00 69 10 62 02 99 00 7C 10 6C 02 99 22 |K.".i.b...|.l.."|
00000870: 11 11 12 1C D2 C5 D4 D5 D2 CE 92 1E 00 93 10 76 |...............v|
00000880: 02 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 89 |..A$:.A$...(13).|
00000890: 36 33 30 00 9D 10 80 02 A0 31 35 3A 8A 00 E9 10 |630......15:....|
000008A0: 20 03 54 24 28 30 29 B2 22 C4 C5 CC 22 3A 54 24 | .T$(0)."...":T$|
000008B0: 28 31 29 B2 22 D3 C5 D1 22 3A 54 24 28 32 29 B2 |(1)."...":T$(2).|
000008C0: 22 D0 D2 C7 22 3A 54 24 28 33 29 B2 22 D5 D3 D2 |"...":T$(3)."...|
000008D0: 22 3A 54 24 28 34 29 B2 22 D2 C5 CC 22 3A 54 24 |":T$(4)."...":T$|
000008E0: 28 35 29 B2 22 C9 CC CC 22 00 07 11 2A 03 54 24 |(5)."..."...*.T$|
000008F0: 28 36 29 B2 22 C9 CC CC 22 3A 54 24 28 37 29 B2 |(6)."...":T$(7).|
00000900: 22 C9 CC CC 22 3A 8E 00 22 11 E7 03 3A 3A 3A 3A |"...":.."...::::|
00000910: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000920: 3A 3A 00 3B 11 E8 03 8F 20 43 4C 4F 53 45 20 41 |::.;.... CLOSE A|
00000930: 4E 20 4F 50 45 4E 20 46 49 4C 45 00 56 11 E9 03 |N OPEN FILE.V...|
00000940: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000950: 3A 3A 3A 3A 3A 3A 00 7F 11 F2 03 85 22 93 11 11 |::::::......"...|
00000960: 1D 1D C6 49 4C 45 4E 41 4D 45 20 20 22 3B 46 24 |...ILENAME ";F$|
00000970: 3A 8B C3 28 46 24 29 B1 31 36 89 31 30 31 30 00 |:..(F$).16.1010.|
00000980: 8C 11 FC 03 9F 31 35 2C 38 2C 31 35 00 9A 11 06 |.....15,8,15....|
00000990: 04 9F 34 2C 38 2C 34 2C 22 23 00 AD 11 10 04 8D |..4,8,4,"#......|
000009A0: 34 30 30 3A 8B 4D 4F B2 30 89 36 30 30 00 C0 11 |400:.MO.0.600...|
000009B0: 1A 04 98 31 35 2C 22 42 2D 50 20 34 22 3B 41 44 |...15,"B-P 4";AD|
000009C0: 00 D8 11 24 04 A1 23 34 2C 41 24 3A 41 B2 C6 28 |...$..#4,A$:A..(|
000009D0: 41 24 AA C7 28 30 29 29 00 E4 11 2E 04 41 B2 41 |A$..(0)).....A.A|
000009E0: B0 31 32 38 00 F7 11 38 04 98 31 35 2C 22 42 2D |.128...8..15,"B-|
000009F0: 50 20 34 22 3B 41 44 00 04 12 42 04 98 34 2C C7 |P 4";AD...B..4,.|
00000A00: 28 41 29 3B 00 0C 12 4C 04 A0 31 35 00 2C 12 56 |(A);...L..15.,.V|
00000A10: 04 99 22 11 11 11 1D 1D 1D C6 49 4C 45 20 49 53 |..".......ILE IS|
00000A20: 20 4E 4F 57 20 43 4C 4F 53 45 44 2E 00 51 12 60 | NOW CLOSED..Q.`|
00000A30: 04 99 22 11 11 11 1D 1D 1D 20 C8 C9 D4 20 20 1C |.."...... ... .|
00000A40: 12 D2 C5 D4 D5 D2 CE 92 1E 20 D0 CC C5 C1 D3 C5 |......... ......|
00000A50: 2E 00 69 12 6A 04 A1 41 24 3A 8B 41 24 B3 B1 C7 |..i.j..A$:.A$...|
00000A60: 28 31 33 29 89 31 31 33 30 00 6F 12 74 04 8A 00 |(13).1130.o.t...|
00000A70: 8A 12 CF 07 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |....::::::::::::|
00000A80: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 A3 12 D0 07 8F |::::::::::......|
00000A90: 20 44 49 52 45 43 54 4F 52 59 2D 48 41 52 44 43 | DIRECTORY-HARDC|
00000AA0: 4F 50 59 00 BE 12 D1 07 3A 3A 3A 3A 3A 3A 3A 3A |OPY.....::::::::|
00000AB0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 C9 |::::::::::::::..|
00000AC0: 12 DA 07 9F 33 2C 34 2C 37 00 D2 12 E4 07 8D 38 |....3,4,7......8|
00000AD0: 30 30 00 D9 12 EE 07 98 33 00 EF 12 F8 07 9F 31 |00......3......1|
00000AE0: 35 2C 38 2C 31 35 2C 22 49 22 3A 8D 33 30 30 00 |5,8,15,"I":.300.|
00000AF0: 03 13 02 08 9F 34 2C 38 2C 34 2C 22 23 22 3A 8D |.....4,8,4,"#":.|
00000B00: 33 30 30 00 1E 13 0C 08 98 31 35 2C 22 55 31 20 |300......15,"U1 |
00000B10: 34 20 30 20 31 38 20 30 22 3A 8D 33 30 30 00 35 |4 0 18 0":.300.5|
00000B20: 13 16 08 98 31 35 2C 22 42 2D 50 20 34 20 32 22 |....15,"B-P 4 2"|
00000B30: 3A 8D 33 30 30 00 43 13 20 08 A1 23 34 2C 41 24 |:.300.C. ..#4,A$|
00000B40: 2C 42 24 00 58 13 2A 08 98 33 2C 22 12 C4 C9 D2 |,B$.X.*..3,"....|
00000B50: C5 C3 D4 CF D2 D9 20 3A 00 6F 13 34 08 98 33 2C |...... :.o.4..3,|
00000B60: 22 C6 4F 52 4D 41 54 20 3A 20 32 22 3B 41 24 00 |".ORMAT : 2";A$.|
00000B70: 93 13 3E 08 98 33 2C 22 C4 CF D3 2D D5 53 45 52 |..>..3,"...-.SER|
00000B80: 20 C6 4C 41 47 20 3A 22 3B C6 28 42 24 AA C7 28 | .LAG :";.(B$..(|
00000B90: 30 29 29 00 A7 13 48 08 98 31 35 2C 22 42 2D 50 |0))...H..15,"B-P|
00000BA0: 20 34 20 31 34 34 22 00 B1 13 52 08 89 32 31 37 | 4 144"...R..217|
00000BB0: 30 00 C4 13 5C 08 44 4E 24 B2 22 22 3A 81 4E B2 |0...\.DN$."":.N.|
00000BC0: 31 A4 41 43 00 DD 13 66 08 A1 23 34 2C 41 24 3A |1.AC...f..#4,A$:|
00000BD0: 8B 41 24 B2 22 22 A7 41 24 B2 22 20 22 00 EC 13 |.A$."".A$." "...|
00000BE0: 6B 08 44 4E 24 B2 44 4E 24 AA 41 24 00 F4 13 70 |k.DN$.DN$.A$...p|
00000BF0: 08 82 3A 8E 00 04 14 7A 08 41 43 B2 31 38 3A 8D |..:....z.AC.18:.|
00000C00: 32 31 34 30 00 28 14 84 08 98 33 2C 22 C4 49 53 |2140.(....3,".IS|
00000C10: 4B 2D 4E 41 4D 45 20 3A 22 3B 44 4E 24 3A 41 43 |K-NAME :";DN$:AC|
00000C20: B2 33 3A 8D 32 31 34 30 00 45 14 8E 08 98 33 2C |.3:.2140.E....3,|
00000C30: 22 C9 C4 20 3A 20 20 20 20 20 20 20 20 20 20 20 |".. : |
00000C40: 22 3B 44 4E 24 00 78 14 8F 08 98 31 35 2C 22 4D |";DN$.x....15,"M|
00000C50: 2D 52 22 C7 28 32 35 30 29 C7 28 32 29 C7 28 31 |-R".(250).(2).(1|
00000C60: 29 3A A1 23 31 35 2C 41 24 3A 8B 41 24 B2 22 22 |):.#15,A$:.A$.""|
00000C70: A7 41 24 B2 C7 28 30 29 00 AB 14 90 08 98 31 35 |.A$..(0)......15|
00000C80: 2C 22 4D 2D 52 22 C7 28 32 35 32 29 C7 28 32 29 |,"M-R".(252).(2)|
00000C90: C7 28 31 29 3A A1 23 31 35 2C 42 24 3A 8B 42 24 |.(1):.#15,B$:.B$|
00000CA0: B2 22 22 A7 42 24 B2 C7 28 30 29 00 D2 14 91 08 |."".B$..(0).....|
00000CB0: 98 33 2C 22 46 52 45 45 20 42 4C 4F 43 4B 53 20 |.3,"FREE BLOCKS |
00000CC0: 3A 22 3B C6 28 41 24 29 AA 32 35 36 AC C6 28 42 |:";.(A$).256..(B|
00000CD0: 24 29 00 D9 14 98 08 98 33 00 1A 15 A2 08 98 33 |$)......3......3|
00000CE0: 2C 22 46 49 4C 45 4E 41 4D 45 20 20 20 20 20 20 |,"FILENAME |
00000CF0: 20 20 46 49 4C 45 54 59 50 45 20 4C 45 4E 47 54 | FILETYPE LENGT|
00000D00: 48 20 43 4C 4F 53 45 44 20 20 20 20 20 20 20 50 |H CLOSED P|
00000D10: 52 4F 54 45 43 54 45 44 22 3B 00 30 15 AC 08 98 |ROTECTED";.0....|
00000D20: 33 2C 22 20 D2 45 43 4F 52 44 4C 45 4E 47 54 48 |3," .ECORDLENGTH|
00000D30: 00 72 15 B6 08 98 33 2C 22 3D 3D 3D 3D 3D 3D 3D |.r....3,"=======|
00000D40: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D50: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D60: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D70: 22 3B 00 8C 15 C0 08 98 33 2C 22 3D 3D 3D 3D 3D |";......3,"=====|
00000D80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 99 15 CA |============....|
00000D90: 08 54 B2 31 38 3A 53 B2 31 00 BD 15 D4 08 8F 20 |.T.18:S.1...... |
00000DA0: 4C 4F 4F 50 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |LOOP ***********|
00000DB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D7 15 |*************...|
00000DC0: DE 08 98 31 35 2C 22 55 31 20 34 20 30 22 3B 54 |...15,"U1 4 0";T|
00000DD0: 3B 53 3A 8D 33 30 30 00 EE 15 E8 08 98 31 35 2C |;S:.300......15,|
00000DE0: 22 42 2D 50 20 34 20 30 22 3A 8D 33 30 30 00 FC |"B-P 4 0":.300..|
00000DF0: 15 F2 08 A1 23 34 2C 54 24 2C 53 24 00 1A 16 FC |....#4,T$,S$....|
00000E00: 08 53 B2 C6 28 53 24 AA C7 28 30 29 29 3A 54 B2 |.S..(S$..(0)):T.|
00000E10: C6 28 54 24 AA C7 28 30 29 29 00 26 16 06 09 81 |.(T$..(0)).&....|
00000E20: 51 57 B2 30 A4 37 00 35 16 10 09 41 44 B2 33 32 |QW.0.7.5...AD.32|
00000E30: AC 51 57 AA 32 00 4F 16 1A 09 98 31 35 2C 22 42 |.QW.2.O....15,"B|
00000E40: 2D 50 20 34 22 3B 41 44 AA 33 3A 8D 33 30 30 00 |-P 4";AD.3:.300.|
00000E50: 7A 16 24 09 41 43 B2 31 36 3A 8D 32 31 34 30 3A |z.$.AC.16:.2140:|
00000E60: 8B 44 4E 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.DN$." |
00000E70: 20 20 20 20 22 89 32 34 39 30 00 8B 16 29 09 98 | ".2490...)..|
00000E80: 33 2C 44 4E 24 3B 22 20 20 22 3B 00 A3 16 2E 09 |3,DN$;" ";.....|
00000E90: 98 31 35 2C 22 42 2D 50 20 34 22 3B 41 44 3A 8D |.15,"B-P 4";AD:.|
00000EA0: 33 30 30 00 C1 16 38 09 A1 23 34 2C 41 24 3A 46 |300...8..#4,A$:F|
00000EB0: 54 B2 C6 28 41 24 AA C7 28 30 29 29 3A 8D 33 30 |T..(A$..(0)):.30|
00000EC0: 30 00 08 17 42 09 98 33 2C 54 24 28 46 54 20 AF |0...B..3,T$(FT .|
00000ED0: 37 29 3B 22 20 20 20 20 22 3B 3A 8F 20 41 54 54 |7);" ";:. ATT|
00000EE0: 45 4E 54 49 4F 4E 21 27 46 54 20 41 4E 44 27 20 |ENTION!'FT AND' |
00000EF0: 41 4E 44 20 20 4E 4F 54 20 20 27 46 54 41 4E 44 |AND NOT 'FTAND|
00000F00: 27 43 4C 4F 53 45 21 21 00 1E 17 4C 09 98 31 35 |'CLOSE!!...L..15|
00000F10: 2C 22 42 2D 50 20 34 22 3B 41 44 AA 32 38 00 2C |,"B-P 4";AD.28.,|
00000F20: 17 56 09 A1 23 34 2C 41 24 2C 42 24 00 4D 17 60 |.V..#4,A$,B$.M.`|
00000F30: 09 41 42 B2 C6 28 41 24 AA C7 28 30 29 29 AA 32 |.AB..(A$..(0)).2|
00000F40: 35 36 AC C6 28 42 24 AA C7 28 30 29 29 00 63 17 |56..(B$..(0)).c.|
00000F50: 6A 09 98 33 2C 41 42 3B C7 28 31 36 29 3B 22 33 |j..3,AB;.(16);"3|
00000F60: 36 22 3B 00 7F 17 74 09 45 24 28 30 29 B2 22 CE |6";...t.E$(0).".|
00000F70: 4F 22 3A 45 24 28 31 29 B2 22 D9 45 53 20 22 00 |O":E$(1).".ES ".|
00000F80: B8 17 7E 09 98 33 2C 45 24 28 46 54 AD 31 32 38 |..~..3,E$(FT.128|
00000F90: 29 3B 22 20 20 20 20 20 20 20 20 22 3B 45 24 28 |);" ";E$(|
00000FA0: 28 46 54 20 AF 36 34 29 AD 36 34 29 3B 22 20 20 |(FT .64).64);" |
00000FB0: 20 20 20 20 20 20 22 3B 00 CD 17 88 09 8B 28 46 | ";......(F|
00000FC0: 54 20 AF 37 29 B3 B1 34 89 32 34 38 30 00 E3 17 |T .7)..4.2480...|
00000FD0: 92 09 98 31 35 2C 22 42 2D 50 20 34 22 3B 41 44 |...15,"B-P 4";AD|
00000FE0: AA 32 31 00 FB 17 9C 09 A1 23 34 2C 41 24 3A 41 |.21......#4,A$:A|
00000FF0: B2 C6 28 41 24 AA C7 28 30 29 29 00 05 18 A6 09 |..(A$..(0)).....|
00001000: 98 33 2C 41 3B 00 0C 18 B0 09 98 33 00 12 18 BA |.3,A;......3....|
00001010: 09 82 00 20 18 C4 09 8B 54 B1 30 89 32 32 37 30 |... ....T.0.2270|
00001020: 00 62 18 CE 09 98 33 2C 22 3D 3D 3D 3D 3D 3D 3D |.b....3,"=======|
00001030: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001040: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001060: 22 3B 00 7C 18 D8 09 98 33 2C 22 3D 3D 3D 3D 3D |";.|....3,"=====|
00001070: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 B5 18 E2 |============....|
00001080: 09 98 33 2C 22 C6 49 4C 45 4D 41 4E 41 47 45 52 |..3,".ILEMANAGER|
00001090: 2C 20 D3 C8 C1 D2 C5 D7 C1 D2 C5 20 42 59 20 C7 |, ......... BY .|
000010A0: 55 49 44 4F 20 D3 54 49 45 4C 44 4F 52 46 20 36 |UIDO .TIELDORF 6|
000010B0: 2F 31 39 38 36 00 D6 18 EC 09 98 33 2C C7 28 31 |/1986......3,.(1|
000010C0: 30 29 C7 28 31 30 29 C7 28 31 30 29 C7 28 31 30 |0).(10).(10).(10|
000010D0: 29 C7 28 31 30 29 00 DD 18 F6 09 A0 33 00 E4 18 |).(10)......3...|
000010E0: 00 0A A0 34 00 EC 18 0A 0A A0 31 35 00 F2 18 14 |...4......15....|
000010F0: 0A 8A 00 07 19 B7 0B 3A 3A 3A 3A 3A 3A 3A 3A 3A |.......:::::::::|
00001100: 3A 3A 3A 3A 3A 3A 3A 00 1A 19 B8 0B 8F 20 44 4F |:::::::...... DO|
00001110: 53 2D 43 4F 4D 4D 41 4E 44 53 00 2F 19 B9 0B 3A |S-COMMANDS./...:|
00001120: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 |:::::::::::::::.|
00001130: 48 19 C2 0B 99 22 93 11 11 1D 1D C4 CF D3 2D 43 |H...."........-C|
00001140: 4F 4D 4D 41 4E 44 53 22 00 65 19 CC 0B 97 31 39 |OMMANDS".e....19|
00001150: 38 2C 31 3A 97 36 33 31 2C 33 34 3A 99 22 11 11 |8,1:.631,34:."..|
00001160: 1D 1D 3E 22 3B 00 78 19 D6 0B 9F 31 2C 30 3A 84 |..>";.x....1,0:.|
00001170: 31 2C 42 45 24 3A A0 31 00 8F 19 E0 0B 8B C8 28 |1,BE$:.1.......(|
00001180: 42 45 24 2C 31 29 B2 22 53 22 89 33 31 32 30 00 |BE$,1)."S".3120.|
00001190: A6 19 EA 0B 8B C8 28 42 45 24 2C 31 29 B2 22 4E |......(BE$,1)."N|
000011A0: 22 89 33 31 32 30 00 B6 19 F4 0B 9F 34 2C 38 2C |".3120......4,8,|
000011B0: 31 35 2C 42 45 24 00 DC 19 FE 0B A1 23 34 2C 41 |15,BE$......#4,A|
000011C0: 24 3A 44 4E 24 B2 44 4E 24 AA 41 24 3A 8B 41 24 |$:DN$.DN$.A$:.A$|
000011D0: B3 B1 C7 28 31 33 29 89 33 30 37 30 00 FB 19 08 |...(13).3070....|
000011E0: 0C 99 C7 28 31 33 29 22 11 11 11 1D 1D D3 54 41 |...(13)"......TA|
000011F0: 54 55 53 20 3A 20 22 3B 44 4E 24 00 1C 1A 12 0C |TUS : ";DN$.....|
00001200: 99 22 11 11 11 1D 1D 20 C8 C9 D4 20 20 12 D2 C5 |."..... ... ...|
00001210: D4 D5 D2 CE 92 20 D0 CC C5 C1 D3 C5 00 34 1A 1C |..... .......4..|
00001220: 0C A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 89 |..A$:.A$...(13).|
00001230: 33 31 30 30 00 3A 1A 26 0C 8A 00 5E 1A 30 0C 99 |3100.:.&...^.0..|
00001240: C7 28 31 33 29 22 11 11 1D 1D C1 52 45 20 D9 4F |.(13)".....RE .O|
00001250: 55 20 D3 55 52 45 20 28 D9 2F CE 29 20 3F 00 70 |U .URE (./.) ?.p|
00001260: 1A 3A 0C A1 41 24 3A 8B 41 24 B2 22 4E 22 A7 8E |.:..A$:.A$."N"..|
00001270: 00 82 1A 44 0C 8B 41 24 B3 B1 22 59 22 89 33 31 |...D..A$.."Y".31|
00001280: 33 30 00 8C 1A 4E 0C 89 33 30 36 30 00 A5 1A 9F |30...N..3060....|
00001290: 0F 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |.:::::::::::::::|
000012A0: 3A 3A 3A 3A 3A 00 BC 1A A0 0F 8F 20 43 48 41 4E |:::::...... CHAN|
000012B0: 47 45 20 46 49 4C 45 2D 54 59 50 45 00 D5 1A A1 |GE FILE-TYPE....|
000012C0: 0F 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |.:::::::::::::::|
000012D0: 3A 3A 3A 3A 3A 00 F2 1A AA 0F 85 22 93 11 11 11 |:::::......"....|
000012E0: 11 1D 1D 1D 1D C6 49 4C 45 4E 41 4D 45 20 22 3B |......ILENAME ";|
000012F0: 46 24 00 0B 1B B4 0F 8B C3 28 46 24 29 B1 31 36 |F$.......(F$).16|
00001300: B0 46 24 B2 22 22 89 34 30 31 30 00 14 1B B5 0F |.F$."".4010.....|
00001310: 59 4A B2 30 00 24 1B B9 0F 9F 31 35 2C 38 2C 31 |YJ.0.$....15,8,1|
00001320: 35 2C 22 49 00 32 1B BA 0F 9F 34 2C 38 2C 34 2C |5,"I.2....4,8,4,|
00001330: 22 23 00 45 1B BE 0F 8D 34 30 30 3A 8B 4D 4F B2 |"#.E....400:.MO.|
00001340: 30 89 36 30 30 00 58 1B C8 0F 98 31 35 2C 22 42 |0.600.X....15,"B|
00001350: 2D 50 20 34 22 3B 41 44 00 70 1B D2 0F A1 23 34 |-P 4";AD.p....#4|
00001360: 2C 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 |,A$:A..(A$..(0))|
00001370: 00 83 1B DC 0F 99 22 93 C6 49 4C 45 54 59 50 45 |......"..ILETYPE|
00001380: 20 3A 22 00 99 1B E6 0F 8D 38 30 30 3A 99 22 11 | :"......800:.".|
00001390: 22 3B 54 24 28 41 AF 37 29 00 D3 1B F0 0F 45 24 |";T$(A.7).....E$|
000013A0: 28 31 29 B2 22 C3 4C 4F 53 45 44 22 3A 45 24 28 |(1).".LOSED":E$(|
000013B0: 30 29 B2 22 CF 50 45 4E 22 3A 57 24 28 31 29 B2 |0).".PEN":W$(1).|
000013C0: 22 D3 C3 D2 C1 D4 C3 C8 2D D0 52 4F 54 45 43 54 |".......-.ROTECT|
000013D0: 45 44 22 00 EB 1B FA 0F 57 24 28 30 29 B2 22 D5 |ED".....W$(0).".|
000013E0: 4E 50 52 4F 54 45 43 54 45 44 22 00 FE 1B 04 10 |NPROTECTED".....|
000013F0: 99 22 11 22 3B 45 24 28 41 AD 31 32 38 29 00 15 |.".";E$(A.128)..|
00001400: 1C 0E 10 99 22 11 22 3B 57 24 28 28 41 AF 36 34 |....".";W$((A.64|
00001410: 29 AD 36 34 29 00 2C 1C 18 10 99 22 11 CE 45 57 |).64).,...."..EW|
00001420: 20 C6 49 4C 45 54 59 50 45 20 3A 11 00 37 1C 22 | .ILETYPE :..7."|
00001430: 10 81 4E B2 30 A4 37 00 4A 1C 2C 10 99 4E 3B 22 |..N.0.7.J.,..N;"|
00001440: 9D 3E 20 22 3B 54 24 28 4E 29 00 50 1C 36 10 82 |.> ";T$(N).P.6..|
00001450: 00 6C 1C 40 10 A1 41 24 3A 8B 41 24 B3 22 30 22 |.l.@..A$:.A$."0"|
00001460: B0 41 24 B1 22 37 22 89 34 31 36 30 00 7C 1C 4A |.A$."7".4160.|.J|
00001470: 10 41 B2 31 32 38 AA C5 28 41 24 29 00 8F 1C 54 |.A.128..(A$)...T|
00001480: 10 98 31 35 2C 22 42 2D 50 20 34 22 3B 41 44 00 |..15,"B-P 4";AD.|
00001490: 9C 1C 5E 10 98 34 2C C7 28 41 29 3B 00 B3 1C 68 |..^..4,.(A);...h|
000014A0: 10 98 31 35 2C 22 55 32 20 34 20 30 22 3B 54 37 |..15,"U2 4 0";T7|
000014B0: 2C 53 37 00 C9 1C 72 10 A0 34 2C 38 2C 34 3A 8B |,S7...r..4,8,4:.|
000014C0: 59 4A A7 98 31 35 2C 22 56 00 D6 1C 7C 10 A0 31 |YJ..15,"V...|..1|
000014D0: 35 2C 38 2C 31 35 00 DC 1C 86 10 8A 00 FC 1C 87 |5,8,15..........|
000014E0: 13 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |.:::::::::::::::|
000014F0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 1A 1D 88 |::::::::::::....|
00001500: 13 8F 20 43 48 41 4E 47 45 20 44 49 53 4B 2D 4E |.. CHANGE DISK-N|
00001510: 41 4D 45 20 41 4E 44 20 49 44 00 3A 1D 89 13 3A |AME AND ID.:...:|
00001520: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00001530: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 4A 1D 92 13 9F |::::::::::.J....|
00001540: 31 35 2C 38 2C 31 35 2C 22 49 00 58 1D 9C 13 9F |15,8,15,"I.X....|
00001550: 34 2C 38 2C 34 2C 22 23 00 6D 1D A6 13 98 31 35 |4,8,4,"#.m....15|
00001560: 2C 22 55 31 20 34 20 30 20 31 38 20 30 00 80 1D |,"U1 4 0 18 0...|
00001570: B0 13 98 31 35 2C 22 42 2D 50 20 34 20 31 34 34 |...15,"B-P 4 144|
00001580: 00 8F 1D BA 13 81 4E B2 31 34 34 A4 31 36 31 00 |......N.144.161.|
00001590: B1 1D C4 13 A1 23 34 2C 41 24 3A 8B 41 24 B3 B1 |.....#4,A$:.A$..|
000015A0: C7 28 31 36 30 29 A7 44 4E 24 B2 44 4E 24 AA 41 |.(160).DN$.DN$.A|
000015B0: 24 00 B7 1D CE 13 82 00 DD 1D D8 13 99 22 93 11 |$............"..|
000015C0: 11 11 C4 49 53 4B 4E 41 4D 45 20 3A 22 3B C7 28 |...ISKNAME :";.(|
000015D0: 33 34 29 3B 44 4E 24 3B C7 28 33 34 29 00 00 1E |34);DN$;.(34)...|
000015E0: E2 13 81 4E B2 31 36 32 A4 31 36 36 3A A1 23 34 |...N.162.166:.#4|
000015F0: 2C 41 24 3A 57 45 24 B2 57 45 24 AA 41 24 3A 82 |,A$:WE$.WE$.A$:.|
00001600: 00 1E 1E EC 13 99 22 11 11 11 C9 C4 20 41 4E 44 |......"..... AND|
00001610: 20 C6 4F 52 4D 41 54 20 3A 22 3B 57 45 24 00 3C | .ORMAT :";WE$.<|
00001620: 1E F6 13 99 22 11 57 48 41 54 20 49 53 20 54 48 |....".WHAT IS TH|
00001630: 45 20 4E 45 57 20 4E 41 4D 45 20 3F 00 45 1E 00 |E NEW NAME ?.E..|
00001640: 14 9F 31 2C 30 00 58 1E 0A 14 97 36 33 31 2C 33 |..1,0.X....631,3|
00001650: 34 3A 97 31 39 38 2C 31 00 63 1E 14 14 84 31 2C |4:.198,1.c....1,|
00001660: 44 4E 24 00 69 1E 1E 14 99 00 70 1E 28 14 A0 31 |DN$.i.....p.(..1|
00001670: 00 76 1E 32 14 99 00 91 1E 3C 14 8B 44 4E 24 B2 |.v.2.....<..DN$.|
00001680: 22 22 B0 C3 28 44 4E 24 29 B1 31 36 89 35 31 32 |""..(DN$).16.512|
00001690: 30 00 A4 1E 46 14 98 31 35 2C 22 42 2D 50 20 34 |0...F..15,"B-P 4|
000016A0: 20 31 34 34 00 B9 1E 5A 14 98 34 2C 44 4E 24 3B | 144...Z..4,DN$;|
000016B0: 3A 4E B2 C3 28 44 4E 24 29 00 DA 1E 64 14 8B 4E |:N..(DN$)...d..N|
000016C0: B3 31 36 A7 81 4E B2 4E AA 31 A4 31 38 3A 98 34 |.16..N.N.1.18:.4|
000016D0: 2C C7 28 31 36 30 29 3B 3A 82 00 FB 1E 6E 14 85 |,.(160);:....n..|
000016E0: 22 11 11 11 57 48 41 54 20 49 53 20 54 48 45 20 |"...WHAT IS THE |
000016F0: 4E 45 57 20 C9 C4 20 22 3B 41 24 00 2C 1F 78 14 |NEW .. ";A$.,.x.|
00001700: 8B C3 28 41 24 29 B3 B1 32 A7 99 22 11 11 32 20 |..(A$)..2.."..2 |
00001710: 43 48 41 52 41 43 54 45 52 53 20 50 4C 45 41 53 |CHARACTERS PLEAS|
00001720: 45 20 21 11 11 22 3A 89 35 32 34 30 00 49 1F 82 |E !..":.5240.I..|
00001730: 14 98 34 2C 41 24 3B 3A 98 31 35 2C 22 55 32 20 |..4,A$;:.15,"U2 |
00001740: 34 20 30 20 31 38 20 30 22 00 51 1F 8C 14 A0 31 |4 0 18 0".Q....1|
00001750: 35 00 57 1F 96 14 8A 00 7E 1F 6F 17 3A 3A 3A 3A |5.W.....~.o.::::|
00001760: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00001770: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 A3 |::::::::::::::..|
00001780: 1F 70 17 8F 20 43 48 45 43 4B 20 46 49 4C 45 20 |.p.. CHECK FILE |
00001790: 46 4F 52 20 50 4F 53 53 49 42 4C 45 20 52 45 53 |FOR POSSIBLE RES|
000017A0: 43 55 45 00 CA 1F 71 17 3A 3A 3A 3A 3A 3A 3A 3A |CUE...q.::::::::|
000017B0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
000017C0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 E6 1F 7A 17 85 |::::::::::...z..|
000017D0: 22 93 11 11 11 1D 1D 1D C6 49 4C 45 4E 41 4D 45 |"........ILENAME|
000017E0: 20 3A 22 3B 46 24 00 FF 1F 84 17 8B 46 24 B2 22 | :";F$......F$."|
000017F0: 22 B0 C3 28 46 24 29 B1 31 36 89 36 30 31 30 00 |"..(F$).16.6010.|
00001800: 0F 20 8E 17 9F 31 35 2C 38 2C 31 35 2C 22 49 00 |. ...15,8,15,"I.|
00001810: 1D 20 98 17 9F 34 2C 38 2C 34 2C 22 23 00 30 20 |. ...4,8,4,"#.0 |
00001820: A2 17 8D 34 30 30 3A 8B 4D 4F B2 30 89 36 30 30 |...400:.MO.0.600|
00001830: 00 46 20 AC 17 98 31 35 2C 22 42 2D 50 20 34 22 |.F ...15,"B-P 4"|
00001840: 3B 41 44 AA 32 38 00 54 20 B6 17 A1 23 34 2C 41 |;AD.28.T ...#4,A|
00001850: 24 2C 42 24 00 80 20 C0 17 41 42 B2 C6 28 41 24 |$,B$.. ..AB..(A$|
00001860: AA C7 28 30 29 29 AA 32 35 36 AC C6 28 42 24 AA |..(0)).256..(B$.|
00001870: C7 28 30 29 29 3A 8B 41 42 B2 30 89 36 32 39 30 |.(0)):.AB.0.6290|
00001880: 00 89 20 CA 17 41 53 B2 30 00 9E 20 D4 17 98 31 |.. ..AS.0.. ...1|
00001890: 35 2C 22 42 2D 50 20 34 22 3B 41 44 AA 31 00 AC |5,"B-P 4";AD.1..|
000018A0: 20 DE 17 A1 23 34 2C 41 24 2C 42 24 00 BD 20 E8 | ...#4,A$,B$.. .|
000018B0: 17 54 B2 C6 28 41 24 AA C7 28 30 29 29 00 CE 20 |.T..(A$..(0)).. |
000018C0: F2 17 53 B2 C6 28 42 24 AA C7 28 30 29 29 00 DD |..S..(B$..(0))..|
000018D0: 20 FB 17 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 EA 20 | ..::::::::::.. |
000018E0: FC 17 8F 20 52 45 50 45 41 54 00 F9 20 FD 17 3A |... REPEAT.. ..:|
000018F0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 0E 21 06 18 98 31 |:::::::::..!...1|
00001900: 35 2C 22 55 31 20 34 20 30 22 3B 54 3B 53 00 20 |5,"U1 4 0";T;S. |
00001910: 21 10 18 98 31 35 2C 22 42 2D 50 20 34 20 30 22 |!...15,"B-P 4 0"|
00001920: 00 2E 21 1A 18 A1 23 34 2C 41 24 2C 42 24 00 3F |..!...#4,A$,B$.?|
00001930: 21 24 18 54 B2 C6 28 41 24 AA C7 28 30 29 29 00 |!$.T..(A$..(0)).|
00001940: 50 21 2E 18 53 B2 C6 28 42 24 AA C7 28 30 29 29 |P!..S..(B$..(0))|
00001950: 00 5C 21 38 18 41 53 B2 41 53 AA 31 00 6A 21 42 |.\!8.AS.AS.1.j!B|
00001960: 18 8B 54 B1 30 89 36 31 34 30 00 7A 21 4C 18 8B |..T.0.6140.z!L..|
00001970: 41 53 B2 41 42 89 36 32 37 30 00 97 21 56 18 99 |AS.AB.6270..!V..|
00001980: 22 11 11 11 11 D4 48 49 53 20 46 49 4C 45 20 49 |".....HIS FILE I|
00001990: 53 20 4C 4F 53 54 21 00 B4 21 60 18 99 22 11 D0 |S LOST!..!`.."..|
000019A0: 4C 45 41 53 45 20 48 49 54 20 12 D2 C5 D4 D5 D2 |LEASE HIT ......|
000019B0: CE 92 2E 22 00 CC 21 6A 18 A1 41 24 3A 8B 41 24 |..."..!j..A$:.A$|
000019C0: B3 B1 C7 28 31 33 29 89 36 32 35 30 00 D6 21 74 |...(13).6250..!t|
000019D0: 18 A0 31 35 3A 8A 00 07 22 7E 18 99 22 11 11 11 |..15:..."~.."...|
000019E0: 11 D4 48 49 53 20 46 49 4C 45 20 49 53 20 1C 45 |..HIS FILE IS .E|
000019F0: 56 45 4E 54 55 41 4C 4C 59 1E 20 53 41 4C 56 41 |VENTUALLY. SALVA|
00001A00: 47 45 41 42 4C 45 2E 00 11 22 88 18 89 36 32 34 |GEABLE..."...624|
00001A10: 30 00 50 22 92 18 99 22 11 11 11 11 CE 4F 20 4E |0.P"...".....O N|
00001A20: 45 45 44 20 54 4F 20 52 45 53 43 55 45 20 54 48 |EED TO RESCUE TH|
00001A30: 49 53 20 46 49 4C 45 2C 42 45 43 41 55 53 45 20 |IS FILE,BECAUSE |
00001A40: 49 54 20 48 41 53 20 4E 4F 20 44 41 54 41 22 3B |IT HAS NO DATA";|
00001A50: 00 65 22 9C 18 99 22 20 49 4E 20 49 54 2E 22 3A |.e"..." IN IT.":|
00001A60: 89 36 32 34 30 00 79 22 57 1B 3A 3A 3A 3A 3A 3A |.6240.y"W.::::::|
00001A70: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 8B 22 58 1B 8F 20 |:::::::::.."X.. |
00001A80: 52 45 53 43 55 45 20 46 49 4C 45 00 9F 22 59 1B |RESCUE FILE.."Y.|
00001A90: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 |:::::::::::::::.|
00001AA0: BB 22 62 1B 85 22 93 11 11 11 1D 1D 1D C6 49 4C |."b.."........IL|
00001AB0: 45 4E 41 4D 45 20 3A 22 3B 46 24 00 D4 22 6C 1B |ENAME :";F$.."l.|
00001AC0: 8B 46 24 B2 22 22 B0 C3 28 46 24 29 B1 31 35 89 |.F$.""..(F$).15.|
00001AD0: 37 30 31 30 00 E3 22 BC 1B 59 4A B2 31 3A 89 34 |7010.."..YJ.1:.4|
00001AE0: 30 32 35 00 F9 22 3F 1F 3A 3A 3A 3A 3A 3A 3A 3A |025.."?.::::::::|
00001AF0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 0D 23 40 1F 8F 20 |:::::::::..#@.. |
00001B00: 52 45 46 49 4C 45 50 52 4F 54 45 43 54 00 23 23 |REFILEPROTECT.##|
00001B10: 41 1F 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |A.::::::::::::::|
00001B20: 3A 3A 3A 00 3D 23 4A 1F 85 22 93 11 11 1D 1D C6 |:::.=#J.."......|
00001B30: 49 4C 45 4E 41 4D 45 20 3A 22 3B 46 24 00 56 23 |ILENAME :";F$.V#|
00001B40: 54 1F 8B 46 24 B2 22 22 B0 C3 28 46 24 29 B1 31 |T..F$.""..(F$).1|
00001B50: 36 89 38 30 31 30 00 6C 23 5E 1F 9F 31 35 2C 38 |6.8010.l#^..15,8|
00001B60: 2C 31 35 2C 22 49 22 3A 44 45 B2 30 00 7A 23 68 |,15,"I":DE.0.z#h|
00001B70: 1F 9F 34 2C 38 2C 34 2C 22 23 00 8D 23 72 1F 8D |..4,8,4,"#..#r..|
00001B80: 34 30 30 3A 8B 4D 4F B2 30 89 36 30 30 00 A0 23 |400:.MO.0.600..#|
00001B90: 7C 1F 98 31 35 2C 22 42 2D 50 20 34 22 3B 41 44 ||..15,"B-P 4";AD|
00001BA0: 00 B8 23 86 1F A1 23 34 2C 41 24 3A 41 B2 C6 28 |..#...#4,A$:A..(|
00001BB0: 41 24 AA C7 28 30 29 29 00 CB 23 90 1F 98 31 35 |A$..(0))..#...15|
00001BC0: 2C 22 42 2D 50 20 34 22 3B 41 44 00 E1 23 9A 1F |,"B-P 4";AD..#..|
00001BD0: 98 34 2C C7 28 28 41 AF 31 39 31 29 AA 44 45 29 |.4,.((A.191).DE)|
00001BE0: 3B 00 F8 23 A4 1F 98 31 35 2C 22 55 32 20 34 20 |;..#...15,"U2 4 |
00001BF0: 30 22 3B 54 37 3B 53 37 00 FF 23 AE 1F A0 34 00 |0";T7;S7..#...4.|
00001C00: 07 24 B8 1F A0 31 35 00 3A 24 C2 1F 99 22 11 11 |.$...15.:$..."..|
00001C10: 11 1D 1D 1D C6 49 4C 45 20 43 41 4E 20 46 52 4F |.....ILE CAN FRO|
00001C20: 4D 20 4E 4F 57 20 4F 4E 22 3B 3A 8B 44 45 B2 36 |M NOW ON";:.DE.6|
00001C30: 34 A7 99 22 20 4E 4F 54 22 3B 00 75 24 CC 1F 99 |4.." NOT";.u$...|
00001C40: 22 20 42 45 22 3A 99 22 20 53 43 52 41 54 43 48 |" BE":." SCRATCH|
00001C50: 45 44 2E 22 3A 99 22 11 11 1D 1D 1D 1D 1D 20 20 |ED.":."....... |
00001C60: C8 C9 D4 20 20 12 D2 C5 D4 D5 D2 CE 92 20 D0 CC |... ........ ..|
00001C70: C5 C1 D3 C5 2E 00 8D 24 D6 1F A1 41 24 3A 8B 41 |.......$...A$:.A|
00001C80: 24 B3 B1 C7 28 31 33 29 89 38 31 35 30 00 93 24 |$...(13).8150..$|
00001C90: E0 1F 8A 00 AE 24 27 23 3A 3A 3A 3A 3A 3A 3A 3A |.....$'#::::::::|
00001CA0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 EF |::::::::::::::..|
00001CB0: 24 28 23 8F 20 53 48 4F 57 20 46 49 4C 45 50 41 |$(#. SHOW FILEPA|
00001CC0: 52 41 4D 45 54 45 52 20 20 20 20 20 20 20 20 20 |RAMETER |
00001CD0: 20 20 20 20 39 30 30 31 20 3A 3A 3A 3A 3A 3A 3A | 9001 :::::::|
00001CE0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 |:::::::::::::::.|
00001CF0: 0A 25 32 23 85 22 93 11 11 11 1D 1D 1D C6 49 4C |.%2#."........IL|
00001D00: 45 4E 41 4D 45 20 22 3B 46 24 00 23 25 3C 23 8B |ENAME ";F$.#%<#.|
00001D10: 46 24 B2 22 22 B0 C3 28 46 24 29 B1 31 35 89 39 |F$.""..(F$).15.9|
00001D20: 30 31 30 00 33 25 46 23 9F 31 35 2C 38 2C 31 35 |010.3%F#.15,8,15|
00001D30: 2C 22 49 00 41 25 50 23 9F 34 2C 38 2C 34 2C 22 |,"I.A%P#.4,8,4,"|
00001D40: 23 00 54 25 5A 23 8D 34 30 30 3A 8B 4D 4F B2 30 |#.T%Z#.400:.MO.0|
00001D50: 89 36 30 30 00 67 25 64 23 98 31 35 2C 22 42 2D |.600.g%d#.15,"B-|
00001D60: 50 20 34 22 3B 41 44 00 84 25 6E 23 A1 23 34 2C |P 4";AD..%n#.#4,|
00001D70: 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 3A |A$:A..(A$..(0)):|
00001D80: 8D 38 30 30 00 A6 25 78 23 99 22 93 11 11 C6 49 |.800..%x#."....I|
00001D90: 4C 45 54 59 50 45 20 3A 22 3B 54 24 28 41 AF 37 |LETYPE :";T$(A.7|
00001DA0: 29 3A 41 37 B2 41 00 CF 25 82 23 99 22 11 D4 48 |):A7.A..%.#."..H|
00001DB0: 49 53 20 46 49 4C 45 20 49 53 22 3B 3A 8B 28 41 |IS FILE IS";:.(A|
00001DC0: AF 36 34 29 B2 30 A7 99 22 20 4E 4F 54 22 3B 00 |.64).0.." NOT";.|
00001DD0: F3 25 8C 23 99 22 20 50 52 4F 54 45 43 54 45 44 |.%.#." PROTECTED|
00001DE0: 22 3A 99 22 41 47 41 49 4E 53 54 20 D3 C3 D2 C1 |":."AGAINST ....|
00001DF0: D4 C3 C8 00 1D 26 96 23 99 22 11 D4 48 45 20 46 |.....&.#."..HE F|
00001E00: 49 4C 45 20 49 53 22 3B 3A 8B B5 28 41 AD 31 32 |ILE IS";:..(A.12|
00001E10: 38 29 B2 30 A7 99 22 20 4E 4F 54 22 3B 00 2C 26 |8).0.." NOT";.,&|
00001E20: A0 23 99 22 20 43 4C 4F 53 45 44 22 00 3A 26 AA |.#." CLOSED".:&.|
00001E30: 23 A1 23 34 2C 41 24 2C 42 24 00 58 26 B4 23 54 |#.#4,A$,B$.X&.#T|
00001E40: B2 C6 28 41 24 AA C7 28 30 29 29 3A 53 B2 C6 28 |..(A$..(0)):S..(|
00001E50: 42 24 AA C7 28 30 29 29 00 86 26 BE 23 99 22 11 |B$..(0))..&.#.".|
00001E60: D4 48 45 20 46 49 4C 45 20 53 54 41 52 54 53 20 |.HE FILE STARTS |
00001E70: 41 54 22 3B 54 3B 22 2F 22 3B 53 3B 3A 53 37 B2 |AT";T;"/";S;:S7.|
00001E80: 53 3A 54 37 B2 54 00 9C 26 C8 23 98 31 35 2C 22 |S:T7.T..&.#.15,"|
00001E90: 42 2D 50 20 34 22 3B 41 44 AA 31 39 00 B9 26 D2 |B-P 4";AD.19..&.|
00001EA0: 23 8B 28 41 37 AF 37 29 B3 B1 34 AF 28 41 37 AF |#.(A7.7)..4.(A7.|
00001EB0: 37 29 B1 30 89 39 32 33 30 00 C7 26 DC 23 A1 23 |7).0.9230..&.#.#|
00001EC0: 34 2C 42 24 2C 41 24 00 E5 26 E6 23 54 B2 C6 28 |4,B$,A$..&.#T..(|
00001ED0: 41 24 AA C7 28 30 29 29 3A 53 B2 C6 28 42 24 AA |A$..(0)):S..(B$.|
00001EE0: C7 28 30 29 29 00 17 27 F0 23 99 22 11 D3 54 41 |.(0))..'.#."..TA|
00001EF0: 52 54 20 4F 46 20 54 48 45 20 D3 C9 C4 C5 20 D3 |RT OF THE .... .|
00001F00: C5 C3 D4 CF D2 20 C2 4C 4F 43 4B 53 20 3A 22 3B |..... .LOCKS :";|
00001F10: 54 3B 22 2F 22 3B 53 00 2F 27 FA 23 A1 23 34 2C |T;"/";S./'.#.#4,|
00001F20: 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 00 |A$:A..(A$..(0)).|
00001F30: 49 27 04 24 99 22 11 D2 45 43 4F 52 44 2D 4C 45 |I'.$."..ECORD-LE|
00001F40: 4E 47 54 48 20 3A 22 3B 41 00 5F 27 0E 24 98 31 |NGTH :";A._'.$.1|
00001F50: 35 2C 22 42 2D 50 20 34 22 3B 41 44 AA 32 38 00 |5,"B-P 4";AD.28.|
00001F60: 6D 27 18 24 A1 23 34 2C 41 24 2C 42 24 00 8E 27 |m'.$.#4,A$,B$..'|
00001F70: 22 24 41 42 B2 C6 28 41 24 AA C7 28 30 29 29 AA |"$AB..(A$..(0)).|
00001F80: 32 35 36 AC C6 28 42 24 AA C7 28 30 29 29 00 94 |256..(B$..(0))..|
00001F90: 27 23 24 99 00 B2 27 2C 24 99 22 11 CE 55 4D 42 |'#$...',$."..UMB|
00001FA0: 45 52 20 4F 46 20 C2 4C 4F 43 4B 53 20 3A 22 3B |ER OF .LOCKS :";|
00001FB0: 41 42 00 D7 27 36 24 98 31 35 2C 22 55 31 20 34 |AB..'6$.15,"U1 4|
00001FC0: 20 30 22 3B 54 37 3B 53 37 3A 98 31 35 2C 22 42 | 0";T7;S7:.15,"B|
00001FD0: 2D 50 20 34 20 32 22 00 E5 27 40 24 A1 23 34 2C |-P 4 2"..'@$.#4,|
00001FE0: 41 24 2C 42 24 00 06 28 4A 24 50 53 B2 C6 28 41 |A$,B$..(J$PS..(A|
00001FF0: 24 AA C7 28 30 29 29 AA 32 35 36 AC C6 28 42 24 |$..(0)).256..(B$|
00002000: AA C7 28 30 29 29 00 3D 28 54 24 8B 28 41 37 AF |..(0)).=(T$.(A7.|
00002010: 37 29 B2 32 B0 28 41 37 AF 37 29 B2 30 A7 99 22 |7).2.(A7.7).0.."|
00002020: 11 D4 48 45 20 50 52 4F 47 52 41 4D 20 53 54 41 |..HE PROGRAM STA|
00002030: 52 54 53 20 57 49 54 48 22 3B 50 53 3B 00 43 28 |RTS WITH";PS;.C(|
00002040: 59 24 99 00 5F 28 5E 24 99 22 11 D0 CC C5 C1 D3 |Y$.._(^$."......|
00002050: C5 20 C8 C9 D4 20 12 D2 C5 D4 D5 D2 CE 92 2E 00 |. ... ..........|
00002060: 77 28 68 24 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 |w(h$.A$:.A$...(1|
00002070: 33 29 89 39 33 32 30 00 84 28 72 24 A0 34 3A A0 |3).9320..(r$.4:.|
00002080: 31 35 3A 8A 00 9E 28 0F 27 3A 3A 3A 3A 3A 3A 3A |15:...(.':::::::|
00002090: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 B6 |::::::::::::::..|
000020A0: 28 10 27 8F 20 53 43 52 41 54 43 48 20 27 2C 27 |(.'. SCRATCH ','|
000020B0: 2D 46 49 4C 45 53 00 D0 28 11 27 3A 3A 3A 3A 3A |-FILES..(.':::::|
000020C0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
000020D0: 00 ED 28 15 27 99 22 93 11 11 11 1D 1D 1D 12 D0 |..(.'.".........|
000020E0: CC C5 C1 D3 C5 20 D7 C1 C9 D4 20 21 92 00 FD 28 |..... .... !...(|
000020F0: 1A 27 9F 31 35 2C 38 2C 31 35 2C 22 49 00 0B 29 |.'.15,8,15,"I..)|
00002100: 24 27 9F 34 2C 38 2C 34 2C 22 23 00 2F 29 2E 27 |$'.4,8,4,"#./).'|
00002110: 46 24 B2 22 2C 22 3A 8D 34 30 30 3A 8B 4D 4F B2 |F$.",":.400:.MO.|
00002120: 30 A7 98 31 35 2C 22 56 22 3A A0 31 35 3A 8A 00 |0..15,"V":.15:..|
00002130: 42 29 38 27 98 31 35 2C 22 42 2D 50 20 34 22 3B |B)8'.15,"B-P 4";|
00002140: 41 44 00 5D 29 42 27 98 34 2C C7 28 30 29 C7 28 |AD.])B'.4,.(0).(|
00002150: 30 29 C7 28 30 29 C7 28 31 36 30 29 3B 00 74 29 |0).(0).(160);.t)|
00002160: 4C 27 98 31 35 2C 22 55 32 20 34 20 30 22 3B 54 |L'.15,"U2 4 0";T|
00002170: 37 3B 53 37 00 7F 29 56 27 89 31 30 30 33 30 00 |7;S7..)V'.10030.|
00002180: 93 29 F7 2A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |.).*::::::::::::|
00002190: 3A 3A 3A 00 A5 29 F8 2A 8F 20 46 49 4C 45 50 52 |:::..).*. FILEPR|
000021A0: 4F 54 45 43 54 00 B9 29 F9 2A 3A 3A 3A 3A 3A 3A |OTECT..).*::::::|
000021B0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 D3 29 02 2B 85 22 |:::::::::..).+."|
000021C0: 93 11 11 1D 1D C6 49 4C 45 4E 41 4D 45 20 3A 22 |......ILENAME :"|
000021D0: 3B 46 24 00 ED 29 0C 2B 8B 46 24 B2 22 22 B0 C3 |;F$..).+.F$.""..|
000021E0: 28 46 24 29 B1 31 36 89 31 31 30 31 30 00 0A 2A |(F$).16.11010..*|
000021F0: 16 2B 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A 44 |.+.15,8,15,"I":D|
00002200: 45 B2 36 34 3A 89 38 30 34 30 00 10 2A 20 2B 3A |E.64:.8040..* +:|
00002210: 00 27 2A DF 2E 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |.'*..:::::::::::|
00002220: 3A 3A 3A 3A 3A 3A 3A 00 3C 2A E0 2E 8F 20 53 48 |:::::::.<*... SH|
00002230: 4F 57 20 44 49 52 45 43 54 4F 52 59 00 53 2A E1 |OW DIRECTORY.S*.|
00002240: 2E 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |.:::::::::::::::|
00002250: 3A 3A 3A 00 7D 2A EA 2E 99 22 93 12 9E 20 20 20 |:::.}*..."... |
00002260: 20 20 20 20 20 D3 48 4F 57 20 C4 C9 D2 C5 C3 D4 | .HOW ......|
00002270: CF D2 D9 20 20 20 20 20 20 20 92 22 3B 00 93 2A |... .";..*|
00002280: F4 2E 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A 8D |...15,8,15,"I":.|
00002290: 33 30 30 00 A7 2A FE 2E 9F 34 2C 38 2C 34 2C 22 |300..*...4,8,4,"|
000022A0: 23 22 3A 8D 33 30 30 00 C4 2A FF 2E 98 31 35 2C |#":.300..*...15,|
000022B0: 22 4D 2D 52 22 C7 28 31 34 34 29 C7 28 37 29 C7 |"M-R".(144).(7).|
000022C0: 28 32 33 29 00 D0 2A 00 2F 84 31 35 2C 44 4E 24 |(23)..*./.15,DN$|
000022D0: 00 FF 2A 01 2F 99 22 12 81 20 20 20 20 20 20 20 |..*./.".. |
000022E0: 20 20 20 20 4E 41 4D 45 20 3A 22 3B 44 4E 24 3B | NAME :";DN$;|
000022F0: 22 20 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 |" .";.|
00002300: 1B 2B 08 2F 98 31 35 2C 22 4D 2D 52 22 C7 28 32 |.+./.15,"M-R".(2|
00002310: 35 30 29 C7 28 32 29 C7 28 33 29 00 2D 2B 12 2F |50).(2).(3).-+./|
00002320: A1 23 31 35 2C 41 24 2C 42 24 2C 42 24 00 4E 2B |.#15,A$,B$,B$.N+|
00002330: 1C 2F 41 42 B2 C6 28 41 24 AA C7 28 30 29 29 AA |./AB..(A$..(0)).|
00002340: 32 35 36 AC C6 28 42 24 AA C7 28 30 29 29 00 88 |256..(B$..(0))..|
00002350: 2B 26 2F 99 22 13 11 11 12 1C 20 20 20 CE 55 4D |+&/."..... .UM|
00002360: 42 45 52 20 4F 46 20 46 52 45 45 20 42 4C 4F 43 |BER OF FREE BLOC|
00002370: 4B 53 3A 22 3B 41 42 3B 22 9D 20 20 20 20 20 20 |KS:";AB;". |
00002380: 20 20 20 20 20 20 20 22 00 BE 2B 30 2F 99 22 13 | "..+0/.".|
00002390: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
000023A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023B0: 20 20 20 20 20 20 20 20 20 20 20 91 22 3B 00 00 | .";..|
000023C0: 2C 3A 2F 99 22 12 97 20 92 1F 3D C4 C5 CC 2C 12 |,:/.".. ..=...,.|
000023D0: 9F 20 92 1F 3D D3 C5 D1 2C 12 9E 20 92 1F 3D D0 |. ..=...,.. ..=.|
000023E0: D2 C7 2C 12 9C 20 92 1F 3D D5 D3 D2 2C 1C 12 20 |..,.. ..=...,.. |
000023F0: 92 1F 3D D2 C5 CC 2C 12 81 20 92 1F 3D C9 CC CC |..=...,.. ..=...|
00002400: 00 12 2C 44 2F 46 24 B2 22 97 9F 9E 9C 1C 81 81 |..,D/F$.".......|
00002410: 81 22 00 22 2C 4E 2F 50 24 B2 22 13 11 11 11 11 |.".",N/P$.".....|
00002420: 11 22 00 2F 2C 58 2F 54 B2 31 38 3A 53 B2 31 00 |."./,X/T.18:S.1.|
00002430: 52 2C 62 2F 8F 20 4C 4F 4F 50 20 2A 2A 2A 2A 2A |R,b/. LOOP *****|
00002440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002450: 2A 2A 00 6C 2C 6C 2F 98 31 35 2C 22 55 31 20 34 |**.l,l/.15,"U1 4|
00002460: 20 30 22 3B 54 3B 53 3A 8D 33 30 30 00 83 2C 76 | 0";T;S:.300..,v|
00002470: 2F 98 31 35 2C 22 42 2D 50 20 34 20 30 22 3A 8D |/.15,"B-P 4 0":.|
00002480: 33 30 30 00 91 2C 80 2F A1 23 34 2C 54 24 2C 53 |300..,./.#4,T$,S|
00002490: 24 00 A2 2C 8A 2F 53 B2 C6 28 53 24 AA C7 28 30 |$..,./S..(S$..(0|
000024A0: 29 29 00 B3 2C 94 2F 54 B2 C6 28 54 24 AA C7 28 |))..,./T..(T$..(|
000024B0: 30 29 29 00 BC 2C 9E 2F 99 50 24 3B 00 C7 2C A8 |0))..,./.P$;..,.|
000024C0: 2F 81 4E B2 30 A4 37 00 F9 2C AD 2F 99 22 20 20 |/.N.0.7..,./." |
000024D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024F0: 20 20 20 20 20 91 1D 22 3B 00 07 2D B2 2F 41 44 | ..";..-./AD|
00002500: B2 33 32 AC 4E AA 32 00 1A 2D BC 2F 98 31 35 2C |.32.N.2..-./.15,|
00002510: 22 42 2D 50 20 34 22 3B 41 44 00 33 2D C6 2F A1 |"B-P 4";AD.3-./.|
00002520: 23 34 2C 41 24 3A 46 54 B2 C6 28 41 24 AA C7 28 |#4,A$:FT..(A$..(|
00002530: 30 29 29 00 4B 2D D0 2F 8B B5 28 46 54 AD 31 32 |0)).K-./..(FT.12|
00002540: 38 29 B2 30 A7 99 22 1F 2A 22 3B 00 59 2D DA 2F |8).0..".*";.Y-./|
00002550: A1 23 34 2C 41 24 2C 41 24 00 79 2D E4 2F 99 CA |.#4,A$,A$.y-./..|
00002560: 28 46 24 2C 28 46 54 20 AF 37 29 AA 31 2C 31 29 |(F$,(FT .7).1,1)|
00002570: 3B A3 31 29 3B 22 12 22 3B 00 9D 2D EE 2F 81 4D |;.1);".";..-./.M|
00002580: 4E B2 30 A4 31 35 3A A1 23 34 2C 41 24 3A 8B 41 |N.0.15:.#4,A$:.A|
00002590: 24 B2 C7 28 30 29 A7 41 24 B2 22 20 22 00 A8 2D |$..(0).A$." "..-|
000025A0: F8 2F 99 41 24 3B 3A 82 00 CE 2D 02 30 8B 28 46 |./.A$;:...-.0.(F|
000025B0: 54 20 AF 36 34 29 B2 36 34 A7 99 A3 32 30 29 3B |T .64).64...20);|
000025C0: 20 20 20 20 20 20 20 20 22 1F 92 3C 22 3B 00 E4 | "..<";..|
000025D0: 2D 0C 30 98 31 35 2C 22 42 2D 50 20 34 22 3B 41 |-.0.15,"B-P 4";A|
000025E0: 44 AA 32 38 00 F2 2D 16 30 A1 23 34 2C 41 24 2C |D.28..-.0.#4,A$,|
000025F0: 42 24 00 13 2E 20 30 41 42 B2 C6 28 41 24 AA C7 |B$... 0AB..(A$..|
00002600: 28 30 29 29 AA 32 35 36 AC C6 28 42 24 AA C7 28 |(0)).256..(B$..(|
00002610: 30 29 29 00 25 2E 2A 30 99 A3 32 35 29 3B 22 1F |0)).%.*0..25);".|
00002620: 92 22 3B 41 42 00 2B 2E 34 30 82 00 4C 2E 3E 30 |.";AB.+.40..L.>0|
00002630: 99 22 11 11 C3 CF CE D4 C9 CE D5 C5 20 28 D9 2F |.".......... (./|
00002640: CE 29 20 3F 22 3A 97 31 39 38 2C 30 00 62 2E 48 |.) ?":.198,0.b.H|
00002650: 30 A1 41 24 3A 8B 41 24 B2 22 4E 22 89 31 32 34 |0.A$:.A$."N".124|
00002660: 31 30 00 73 2E 52 30 8B 41 24 B2 22 22 89 31 32 |10.s.R0.A$."".12|
00002670: 33 36 30 00 82 2E 5C 30 8B 54 B1 30 89 31 32 31 |360...\0.T.0.121|
00002680: 34 30 00 89 2E 66 30 A0 34 00 91 2E 70 30 A0 31 |40...f0.4...p0.1|
00002690: 35 00 97 2E 7A 30 8A 00 AE 2E C7 32 3A 3A 3A 3A |5...z0.....2::::|
000026A0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 C3 |::::::::::::::..|
000026B0: 2E C8 32 8F 20 42 41 53 49 43 2D 50 52 49 4E 54 |..2. BASIC-PRINT|
000026C0: 4F 55 54 00 DA 2E C9 32 3A 3A 3A 3A 3A 3A 3A 3A |OUT....2::::::::|
000026D0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 FB 2E D2 32 85 |::::::::::....2.|
000026E0: 22 93 11 11 1D 1D 9F C2 C1 D3 C9 C3 2D C6 49 4C |"...........-.IL|
000026F0: 45 4E 41 4D 45 20 22 3B 42 44 24 00 0B 2F DC 32 |ENAME ";BD$../.2|
00002700: 86 54 4B 45 4E 24 28 32 35 35 29 00 27 2F E6 32 |.TKEN$(255).'/.2|
00002710: 81 4E B2 33 32 A4 31 32 37 3A 54 4B 24 28 4E 29 |.N.32.127:TK$(N)|
00002720: B2 C7 28 4E 29 3A 82 00 3D 2F FA 32 9F 31 35 2C |..(N):..=/.2.15,|
00002730: 38 2C 31 35 2C 22 49 22 3A 8D 33 30 30 00 58 2F |8,15,"I":.300.X/|
00002740: 04 33 9F 34 2C 38 2C 34 2C 42 44 24 AA 22 2C 50 |.3.4,8,4,BD$.",P|
00002750: 2C 52 22 3A 8D 33 30 30 00 79 2F 0E 33 99 22 93 |,R":.300.y/.3.".|
00002760: 11 11 11 11 11 1D 1D 1D 1D 1D 95 12 D0 CC C5 C1 |................|
00002770: D3 C5 20 D7 C1 C9 D4 20 21 00 86 2F 18 33 41 44 |.. .... !../.3AD|
00002780: B2 34 31 31 31 38 00 92 2F 22 33 81 4E B2 31 A4 |.41118../"3.N.1.|
00002790: 37 36 00 9E 2F 2C 33 41 B2 C2 28 41 44 29 00 AE |76../,3A..(AD)..|
000027A0: 2F 36 33 41 24 B2 C7 28 41 AF 31 32 37 29 00 CF |/63A$..(A.127)..|
000027B0: 2F 40 33 8B 41 24 B1 B2 22 41 22 AF 41 24 B3 B2 |/@3.A$.."A".A$..|
000027C0: 22 5A 22 A7 41 24 B2 C7 28 41 B0 31 32 38 29 00 |"Z".A$..(A.128).|
000027D0: EC 2F 4A 33 54 4B 24 28 31 32 37 AA 4E 29 B2 54 |./J3TK$(127.N).T|
000027E0: 4B 24 28 31 32 37 AA 4E 29 AA 41 24 00 F8 2F 54 |K$(127.N).A$../T|
000027F0: 33 41 44 B2 41 44 AA 31 00 0D 30 5E 33 8B 28 41 |3AD.AD.1..0^3.(A|
00002800: AF 31 32 38 29 B2 30 89 31 33 31 30 30 00 20 30 |.128).0.13100. 0|
00002810: 68 33 99 54 4B 24 28 4E AA 31 32 37 29 2C 3A 82 |h3.TK$(N.127),:.|
00002820: 00 33 30 72 33 54 4B 24 28 32 35 35 29 B2 22 91 |.30r3TK$(255).".|
00002830: FF 11 22 00 58 30 7C 33 9F 33 2C 34 2C 37 3A 99 |..".X0|3.3,4,7:.|
00002840: 22 93 11 11 11 11 11 1D 1D 1D 1D 12 C8 45 52 45 |"............ERE|
00002850: 20 57 45 20 47 4F 20 21 00 5F 30 86 33 98 33 00 | WE GO !._0.3.3.|
00002860: 76 30 90 33 98 33 2C C7 28 31 30 29 C7 28 31 30 |v0.3.3,.(10).(10|
00002870: 29 C7 28 31 30 29 00 89 30 9A 33 A1 23 34 2C 41 |).(10)..0.3.#4,A|
00002880: 24 2C 41 24 3A 8D 33 30 30 00 A7 30 A4 33 98 33 |$,A$:.300..0.3.3|
00002890: 2C 22 92 C2 C1 D3 C9 C3 2D D0 52 4F 47 52 41 4D |,"......-.ROGRAM|
000028A0: 20 3A 22 3B 42 44 24 00 B2 30 AE 33 98 33 2C 22 | :";BD$..0.3.3,"|
000028B0: 11 22 00 CB 30 B8 33 A1 23 34 2C 58 24 2C 55 24 |."..0.3.#4,X$,U$|
000028C0: 2C 41 24 2C 42 24 3A 8D 33 30 30 00 FF 30 C2 33 |,A$,B$:.300..0.3|
000028D0: 4C 4E B2 C6 28 41 24 AA C7 28 30 29 29 AA 32 35 |LN..(A$..(0)).25|
000028E0: 36 AC C6 28 42 24 AA C7 28 30 29 29 3A 8B 58 24 |6..(B$..(0)):.X$|
000028F0: B2 22 22 AF 55 24 B2 22 22 89 31 33 33 37 30 00 |."".U$."".13370.|
00002900: 16 31 CC 33 98 33 2C CA 28 C4 28 4C 4E 29 2C 32 |.1.3.3,.(.(LN),2|
00002910: 29 3B 22 20 22 3B 00 1F 31 D6 33 4D 4F B2 30 00 |);" ";..1.3MO.0.|
00002920: 42 31 E0 33 8F 20 4C 4F 4F 50 20 2A 2A 2A 2A 2A |B1.3. LOOP *****|
00002930: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002940: 2A 2A 00 52 31 EA 33 A1 23 34 2C 41 24 3A 8D 33 |**.R1.3.#4,A$:.3|
00002950: 30 30 00 76 31 F4 33 8B 41 24 B2 C7 28 33 34 29 |00.v1.3.A$..(34)|
00002960: A7 98 33 2C 41 24 3B 3A 4D 4F B2 31 AB 4D 4F 3A |..3,A$;:MO.1.MO:|
00002970: 89 31 33 32 39 30 00 87 31 FE 33 8B 41 24 B2 22 |.13290..1.3.A$."|
00002980: 22 89 31 33 33 34 30 00 A7 31 08 34 8B 4D 4F B2 |".13340..1.4.MO.|
00002990: 30 A7 98 33 2C 54 4B 24 28 C6 28 41 24 29 29 3B |0..3,TK$(.(A$));|
000029A0: 3A 89 31 33 32 39 30 00 B9 31 12 34 98 33 2C 41 |:.13290..1.4.3,A|
000029B0: 24 3B 3A 89 31 33 32 39 30 00 DC 31 1C 34 8F 20 |$;:.13290..1.4. |
000029C0: 45 4E 44 20 4C 4F 4F 50 20 2A 2A 2A 2A 2A 2A 2A |END LOOP *******|
000029D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E3 31 26 |************..1&|
000029E0: 34 98 33 00 EE 31 30 34 89 31 33 32 34 30 00 F5 |4.3..104.13240..|
000029F0: 31 3A 34 98 33 00 16 32 44 34 98 33 2C C7 28 31 |1:4.3..2D4.3,.(1|
00002A00: 30 29 C7 28 31 30 29 C7 28 31 30 29 C7 28 31 30 |0).(10).(10).(10|
00002A10: 29 C7 28 31 30 29 00 1D 32 4E 34 A0 33 00 24 32 |).(10)..2N4.3.$2|
00002A20: 58 34 A0 34 00 49 32 62 34 99 22 93 11 11 1D 1D |X4.4.I2b4.".....|
00002A30: 1F C6 49 4E 49 53 48 45 44 2E 20 D0 4C 45 41 53 |..INISHED. .LEAS|
00002A40: 45 20 48 49 54 20 54 48 45 00 61 32 6C 34 99 22 |E HIT THE.a2l4."|
00002A50: 11 11 1D 1D 12 D2 C5 D4 D5 D2 CE 92 20 CB 45 59 |............ .EY|
00002A60: 2E 00 7A 32 76 34 A1 41 24 3A 8B 41 24 B3 B1 C7 |..z2v4.A$:.A$...|
00002A70: 28 31 33 29 89 31 33 34 33 30 00 80 32 80 34 8A |(13).13430..2.4.|
00002A80: 00 94 32 AF 36 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |..2.6:::::::::::|
00002A90: 3A 3A 3A 3A 00 A6 32 B0 36 8F 20 54 45 53 54 20 |::::..2.6. TEST |
00002AA0: 42 4C 4F 43 4B 53 00 BA 32 B1 36 3A 3A 3A 3A 3A |BLOCKS..2.6:::::|
00002AB0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 D0 32 B2 36 99 |::::::::::..2.6.|
00002AC0: 22 93 D0 CC C5 C1 D3 C5 20 D7 C1 C9 D4 20 21 22 |"....... .... !"|
00002AD0: 00 FB 32 B5 36 81 4E B2 30 A4 31 32 37 3A 51 31 |..2.6.N.0.127:Q1|
00002AE0: 24 B2 51 31 24 AA C7 28 32 35 35 29 3A 51 32 24 |$.Q1$..(255):Q2$|
00002AF0: B2 51 32 24 AA C7 28 30 29 3A 82 00 3B 33 B9 36 |.Q2$..(0):..;3.6|
00002B00: 99 22 93 11 11 11 1D 1D C1 D4 D4 C5 CE D4 C9 CF |."..............|
00002B10: CE 21 20 C4 CF 20 12 1C CE CF D4 92 1E 20 54 45 |.! .. ....... TE|
00002B20: 53 54 20 C2 4C 4F 43 4B 20 D4 D2 C1 C3 CB 20 31 |ST .LOCK ..... 1|
00002B30: 38 20 D3 C5 C3 D4 CF D2 20 30 2C 00 75 33 BA 36 |8 ...... 0,.u3.6|
00002B40: 99 22 1D 1D 42 45 43 41 55 53 45 20 49 54 20 4D |."..BECAUSE IT M|
00002B50: 49 47 48 54 20 57 49 50 45 20 4F 55 54 20 41 4C |IGHT WIPE OUT AL|
00002B60: 4C 20 44 41 54 41 20 4F 4E 20 59 4F 55 52 20 44 |L DATA ON YOUR D|
00002B70: 49 53 4B 21 21 00 90 33 C4 36 85 22 11 11 11 1D |ISK!!..3.6."....|
00002B80: 1D D3 54 41 52 54 2D 54 52 41 43 4B 20 22 3B 54 |..TART-TRACK ";T|
00002B90: 00 AC 33 CE 36 85 22 11 11 11 1D 1D D3 54 41 52 |..3.6."......TAR|
00002BA0: 54 2D 53 45 43 54 4F 52 20 22 3B 53 00 C9 33 D8 |T-SECTOR ";S..3.|
00002BB0: 36 85 22 11 11 11 1D 1D C5 4E 44 49 4E 47 2D 54 |6."......NDING-T|
00002BC0: 52 41 43 4B 20 22 3B 53 43 00 E7 33 E2 36 85 22 |RACK ";SC..3.6."|
00002BD0: 11 11 11 1D 1D C5 4E 44 49 4E 47 2D 53 45 43 54 |......NDING-SECT|
00002BE0: 4F 52 20 22 3B 53 53 00 0D 34 EC 36 9F 31 35 2C |OR ";SS..4.6.15,|
00002BF0: 38 2C 31 35 2C 22 49 22 3A 8D 33 30 30 3A 9F 34 |8,15,"I":.300:.4|
00002C00: 2C 38 2C 34 2C 22 23 22 3A 8D 33 30 30 00 30 34 |,8,4,"#":.300.04|
00002C10: F6 36 8F 20 4C 4F 4F 50 20 2A 2A 2A 2A 2A 2A 2A |.6. LOOP *******|
00002C20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002C30: 00 45 34 00 37 98 31 35 2C 22 55 31 20 34 20 30 |.E4.7.15,"U1 4 0|
00002C40: 22 3B 54 3B 53 00 57 34 0A 37 98 31 35 2C 22 42 |";T;S.W4.7.15,"B|
00002C50: 2D 50 20 34 20 30 22 00 6E 34 14 37 99 22 93 11 |-P 4 0".n4.7."..|
00002C60: 11 11 11 11 1D 1D 1D 1D 1D 22 3B 54 3B 53 00 91 |.........";T;S..|
00002C70: 34 1E 37 81 4E B2 30 A4 32 35 35 3A A1 23 34 2C |4.7.N.0.255:.#4,|
00002C80: 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 |A$:.A$."".A$..(0|
00002C90: 29 00 A6 34 28 37 97 34 39 31 35 32 AA 4E 2C C6 |)..4(7.49152.N,.|
00002CA0: 28 41 24 29 3A 82 00 BD 34 32 37 98 31 35 2C 22 |(A$):...427.15,"|
00002CB0: 42 2D 50 20 34 20 30 22 3A 8D 33 30 30 00 D2 34 |B-P 4 0":.300..4|
00002CC0: 3C 37 98 34 2C 51 31 24 3B 51 31 24 3B 3A 8D 33 |<7.4,Q1$;Q1$;:.3|
00002CD0: 30 30 00 EC 34 46 37 98 31 35 2C 22 55 32 20 34 |00..4F7.15,"U2 4|
00002CE0: 20 30 22 3B 54 3B 53 3A 8D 33 30 30 00 06 35 50 | 0";T;S:.300..5P|
00002CF0: 37 98 31 35 2C 22 55 31 20 34 20 30 22 3B 54 3B |7.15,"U1 4 0";T;|
00002D00: 53 3A 8D 33 30 30 00 1D 35 55 37 98 31 35 2C 22 |S:.300..5U7.15,"|
00002D10: 42 2D 50 20 34 20 30 22 3A 8D 33 30 30 00 3E 35 |B-P 4 0":.300.>5|
00002D20: 5A 37 81 4E B2 30 A4 32 35 35 3A A1 23 34 2C 41 |Z7.N.0.255:.#4,A|
00002D30: 24 3A 8B 41 24 B2 C7 28 32 35 35 29 A7 82 00 5D |$:.A$..(255)...]|
00002D40: 35 64 37 8B 4E B3 32 35 36 89 31 34 32 36 30 3A |5d7.N.256.14260:|
00002D50: 8F 20 42 41 44 20 42 4C 4F 43 4B 20 2A 00 74 35 |. BAD BLOCK *.t5|
00002D60: 6E 37 98 31 35 2C 22 42 2D 50 20 34 20 30 22 3A |n7.15,"B-P 4 0":|
00002D70: 8D 33 30 30 00 89 35 78 37 98 34 2C 51 32 24 3B |.300..5x7.4,Q2$;|
00002D80: 51 32 24 3B 3A 8D 33 30 30 00 A3 35 82 37 98 31 |Q2$;:.300..5.7.1|
00002D90: 35 2C 22 55 32 20 34 20 30 22 3B 54 3B 53 3A 8D |5,"U2 4 0";T;S:.|
00002DA0: 33 30 30 00 BD 35 8C 37 98 31 35 2C 22 55 31 20 |300..5.7.15,"U1 |
00002DB0: 34 20 30 22 3B 54 3B 53 3A 8D 33 30 30 00 D4 35 |4 0";T;S:.300..5|
00002DC0: 96 37 98 31 35 2C 22 42 2D 50 20 34 20 30 22 3A |.7.15,"B-P 4 0":|
00002DD0: 8D 33 30 30 00 F1 35 A0 37 81 4E B2 30 A4 32 35 |.300..5.7.N.0.25|
00002DE0: 35 3A A1 23 34 2C 41 24 3A 8B 41 24 B2 22 22 A7 |5:.#4,A$:.A$."".|
00002DF0: 82 00 02 36 AA 37 8B 4E B2 32 35 36 89 31 34 33 |...6.7.N.256.143|
00002E00: 37 30 00 24 36 B4 37 99 22 93 11 11 11 1D 1D 1D |70.$6.7.".......|
00002E10: CE 4F 4E 2D 46 55 4E 43 54 49 4F 4E 41 4C 20 C2 |.ON-FUNCTIONAL .|
00002E20: 4C 4F 43 4B 00 4F 36 BE 37 99 22 1D 1D 1D 46 4F |LOCK.O6.7."...FO|
00002E30: 55 4E 44 2C 20 44 4F 20 59 4F 55 20 57 41 4E 54 |UND, DO YOU WANT|
00002E40: 20 4D 45 20 54 4F 20 4D 41 52 4B 20 48 49 4D 00 | ME TO MARK HIM.|
00002E50: 7A 36 C8 37 99 22 1D 1D 1D 41 53 20 4F 43 43 55 |z6.7."...AS OCCU|
00002E60: 50 49 45 44 20 28 D9 2F CE 29 20 3F 20 41 22 3B |PIED (./.) ? A";|
00002E70: 54 3B 22 2F 22 3B 53 3B 22 55 00 90 36 D2 37 A1 |T;"/";S;"U..6.7.|
00002E80: 41 24 3A 8B 41 24 B2 22 4E 22 89 31 34 33 37 30 |A$:.A$."N".14370|
00002E90: 00 A1 36 DC 37 8B 41 24 B2 22 22 89 31 34 32 39 |..6.7.A$."".1429|
00002EA0: 30 00 B5 36 E6 37 98 31 35 2C 22 42 2D 41 20 30 |0..6.7.15,"B-A 0|
00002EB0: 22 3B 54 3B 53 00 E1 36 F0 37 99 22 11 11 11 1D |";T;S..6.7."....|
00002EC0: 1D 1D D4 48 49 53 20 42 4C 4F 43 4B 20 49 53 20 |...HIS BLOCK IS |
00002ED0: 4D 41 52 4B 45 44 20 27 4F 43 43 55 50 49 45 44 |MARKED 'OCCUPIED|
00002EE0: 27 00 FD 36 FA 37 99 22 1D 1D 1D 2C 42 55 54 20 |'..6.7."...,BUT |
00002EF0: 43 41 4E 20 42 45 20 4F 50 45 4E 45 44 00 1C 37 |CAN BE OPENED..7|
00002F00: 04 38 99 22 1D 1D 1D 57 49 54 48 20 12 D6 C1 CC |.8."...WITH ....|
00002F10: C9 C4 C1 D4 C5 92 20 21 21 21 21 21 00 3A 37 0E |...... !!!!!.:7.|
00002F20: 38 99 22 11 11 11 20 C8 C9 D4 20 12 D2 C5 D4 D5 |8."... ... .....|
00002F30: D2 CE 92 20 D0 CC C5 C1 D3 C5 00 53 37 18 38 A1 |... .......S7.8.|
00002F40: 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 89 31 34 |A$:.A$...(13).14|
00002F50: 33 36 30 00 76 37 22 38 8F 20 4C 41 42 45 4C 20 |360.v7"8. LABEL |
00002F60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002F70: 2A 2A 2A 2A 2A 2A 00 88 37 2C 38 98 31 35 2C 22 |******..7,8.15,"|
00002F80: 42 2D 50 20 34 20 30 22 00 A9 37 36 38 81 4E B2 |B-P 4 0"..768.N.|
00002F90: 30 A4 32 35 35 3A 98 34 2C C7 28 C2 28 34 39 31 |0.255:.4,.(.(491|
00002FA0: 35 32 AA 4E 29 29 3B 3A 82 00 C3 37 40 38 98 31 |52.N));:...7@8.1|
00002FB0: 35 2C 22 55 32 20 34 20 30 22 3B 54 3B 53 3A 8D |5,"U2 4 0";T;S:.|
00002FC0: 33 30 30 00 DE 37 4A 38 53 B2 53 AA 31 3A 8B 53 |300..7J8S.S.1:.S|
00002FD0: B1 53 53 AF 54 B2 53 43 89 31 34 34 37 30 00 F4 |.SS.T.SC.14470..|
00002FE0: 37 54 38 47 52 B2 32 30 3A 8B 54 B1 31 37 A7 47 |7T8GR.20:.T.17.G|
00002FF0: 52 B2 31 38 00 04 38 5E 38 8B 54 B1 32 34 A7 47 |R.18..8^8.T.24.G|
00003000: 52 B2 31 37 00 14 38 68 38 8B 54 B1 33 30 A7 47 |R.17..8h8.T.30.G|
00003010: 52 B2 31 36 00 32 38 72 38 8B 53 B1 47 52 A7 53 |R.16.28r8.S.GR.S|
00003020: B2 30 3A 54 B2 54 AA 31 3A 8B 54 B2 33 36 A7 54 |.0:T.T.1:.T.36.T|
00003030: B2 31 00 3D 38 7C 38 89 31 34 30 38 30 00 66 38 |.1.=8|8.14080.f8|
00003040: 86 38 99 22 93 11 11 11 1D 1D 1D D7 45 20 41 52 |.8."........E AR|
00003050: 45 20 54 48 52 4F 55 47 48 20 41 4C 4C 20 42 4C |E THROUGH ALL BL|
00003060: 4F 43 4B 53 20 21 00 75 38 90 38 81 4E B2 31 A4 |OCKS !.u8.8.N.1.|
00003070: 31 30 30 30 30 00 7B 38 9A 38 82 00 86 38 A4 38 |10000.{8.8...8.8|
00003080: A0 34 3A A0 31 35 00 8C 38 AE 38 8A 00 A1 38 97 |.4:.15..8.8...8.|
00003090: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
000030A0: 3A 00 B4 38 98 3A 8F 20 44 49 53 4B 2D 50 52 4F |:..8.:. DISK-PRO|
000030B0: 54 45 43 54 00 C9 38 99 3A 3A 3A 3A 3A 3A 3A 3A |TECT..8.::::::::|
000030C0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 E5 38 A2 3A 99 22 |:::::::::..8.:."|
000030D0: 93 11 11 11 1D 1D 1D 1E 12 C4 49 53 4B 2D D0 52 |..........ISK-.R|
000030E0: 4F 54 45 43 54 00 0B 39 AC 3A 99 22 11 11 11 D9 |OTECT..9.:."....|
000030F0: 4F 55 20 43 41 4E 20 4F 4E 4C 59 20 CC CF C1 C4 |OU CAN ONLY ....|
00003100: 20 54 48 45 20 46 49 4C 45 53 2C 00 34 39 B6 3A | THE FILES,.49.:|
00003110: 99 22 42 55 54 20 4E 4F 54 20 D2 C5 C1 C4 2C 4E |."BUT NOT ....,N|
00003120: 4F 52 20 D3 C1 D6 C5 20 4F 52 20 C3 CF D0 D9 20 |OR .... OR .... |
00003130: 21 21 21 21 00 3A 39 C0 3A 99 00 5E 39 C5 3A 99 |!!!!.:9.:..^9.:.|
00003140: 22 11 28 D9 4F 55 20 43 41 4E 20 43 48 41 4E 47 |".(.OU CAN CHANG|
00003150: 45 20 54 48 41 54 20 4F 4E 4C 59 20 42 59 00 81 |E THAT ONLY BY..|
00003160: 39 C6 3A 99 22 20 52 45 46 4F 52 4D 41 54 54 49 |9.:." REFORMATTI|
00003170: 4E 47 20 54 48 45 20 44 49 53 4B 20 21 21 21 21 |NG THE DISK !!!!|
00003180: 29 00 B0 39 CA 3A 99 22 1C 11 11 C1 D2 C5 20 D9 |)..9.:."...... .|
00003190: CF D5 20 C1 C2 D3 CF CC D5 D4 C5 CC D9 20 D3 D5 |.. .......... ..|
000031A0: D2 C5 2C D4 C8 C1 D4 20 D4 C8 C9 D3 20 C9 D3 2C |..,.... .... ..,|
000031B0: 00 CB 39 D4 3A 99 22 D7 C8 C1 D4 20 D9 CF D5 20 |..9.:.".... ... |
000031C0: D7 C1 CE D4 20 28 D9 2F CE 29 3F 00 DD 39 DE 3A |.... (./.)?..9.:|
000031D0: A1 41 24 3A 8B 41 24 B2 22 4E 22 A7 8A 00 F0 39 |.A$:.A$."N"....9|
000031E0: E8 3A 8B 41 24 B3 B1 22 59 22 89 31 35 30 37 30 |.:.A$.."Y".15070|
000031F0: 00 06 3A F2 3A 99 22 11 11 D2 C5 C1 CC CC D9 20 |..:.:."........ |
00003200: D3 D5 D2 C5 20 3F 00 18 3A FC 3A A1 41 24 3A 8B |.... ?..:.:.A$:.|
00003210: 41 24 B2 22 4E 22 A7 8A 00 2B 3A 06 3B 8B 41 24 |A$."N"...+:.;.A$|
00003220: B3 B1 22 59 22 89 31 35 31 30 30 00 40 3A 10 3B |.."Y".15100.@:.;|
00003230: 99 22 11 11 D3 D4 C9 CC CC 20 D3 D5 D2 C5 20 3F |."....... .... ?|
00003240: 00 52 3A 1A 3B A1 41 24 3A 8B 41 24 B2 22 4E 22 |.R:.;.A$:.A$."N"|
00003250: A7 8A 00 65 3A 24 3B 8B 41 24 B3 B1 22 59 22 89 |...e:$;.A$.."Y".|
00003260: 31 35 31 33 30 00 7B 3A 2E 3B 9F 31 35 2C 38 2C |15130.{:.;.15,8,|
00003270: 31 35 2C 22 49 22 3A 8D 33 30 30 00 8F 3A 38 3B |15,"I":.300..:8;|
00003280: 9F 34 2C 38 2C 34 2C 22 23 22 3A 8D 33 30 30 00 |.4,8,4,"#":.300.|
00003290: AA 3A 42 3B 98 31 35 2C 22 55 31 20 34 20 30 20 |.:B;.15,"U1 4 0 |
000032A0: 31 38 20 30 22 3A 8D 33 30 30 00 C1 3A 4C 3B 98 |18 0":.300..:L;.|
000032B0: 31 35 2C 22 42 2D 50 20 34 20 32 22 3A 8D 33 30 |15,"B-P 4 2":.30|
000032C0: 30 00 D9 3A 56 3B 98 34 2C 22 4E 22 AA C7 28 32 |0..:V;.4,"N"..(2|
000032D0: 35 35 29 3B 3A 8D 33 30 30 00 F4 3A 60 3B 98 31 |55);:.300..:`;.1|
000032E0: 35 2C 22 55 32 20 34 20 30 20 31 38 20 30 22 3A |5,"U2 4 0 18 0":|
000032F0: 8D 33 30 30 00 02 3B 6A 3B 99 22 11 11 11 CF 2E |.300..;j;.".....|
00003300: 4B 2E 00 13 3B 74 3B 81 4E B2 31 A4 31 30 30 30 |K...;t;.N.1.1000|
00003310: 30 3A 82 00 19 3B 7E 3B 8A 00 38 3B 7F 3E 3A 3A |0:...;~;..8;.>::|
00003320: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00003330: 3A 3A 3A 3A 3A 3A 3A 3A 00 55 3B 80 3E 8F 20 50 |::::::::.U;.>. P|
00003340: 52 49 4E 54 20 46 49 4C 45 20 48 45 58 41 44 45 |RINT FILE HEXADE|
00003350: 43 49 4D 41 4C 00 74 3B 81 3E 3A 3A 3A 3A 3A 3A |CIMAL.t;.>::::::|
00003360: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00003370: 3A 3A 3A 3A 00 8A 3B 8A 3E 99 22 93 11 11 11 1D |::::..;.>.".....|
00003380: 1D C6 49 4C 45 4E 41 4D 45 22 00 A3 3B 94 3E 85 |..ILENAME"..;.>.|
00003390: 22 11 11 1D 1D 22 3B 44 4E 24 3A 9F 31 35 2C 38 |"....";DN$:.15,8|
000033A0: 2C 31 35 00 BC 3B 9E 3E 9F 34 2C 38 2C 34 2C 44 |,15..;.>.4,8,4,D|
000033B0: 4E 24 AA 22 2C 52 22 3A 8D 33 30 30 00 C5 3B A8 |N$.",R":.300..;.|
000033C0: 3E 9F 33 2C 34 00 DD 3B B2 3E A1 23 34 2C 41 24 |>.3,4..;.>.#4,A$|
000033D0: 3A 8B 53 54 B3 B1 30 89 31 36 31 36 30 00 F0 3B |:.ST..0.16160..;|
000033E0: BC 3E 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 |.>.A$."".A$..(0)|
000033F0: 00 FC 3B C6 3E 41 B2 C6 28 41 24 29 00 13 3C D0 |..;.>A..(A$)..<.|
00003400: 3E 4C 42 B2 41 AF 31 35 3A 48 42 B2 B5 28 41 AD |>LB.A.15:HB..(A.|
00003410: 31 36 29 00 24 3C DA 3E 42 59 B2 48 42 3A 8D 31 |16).$<.>BY.HB:.1|
00003420: 36 31 33 30 00 35 3C E4 3E 42 59 B2 4C 42 3A 8D |6130.5<.>BY.LB:.|
00003430: 31 36 31 33 30 00 42 3C EE 3E 98 33 2C 22 20 20 |16130.B<.>.3," |
00003440: 22 3B 00 4D 3C F8 3E 89 31 36 30 35 30 00 64 3C |";.M<.>.16050.d<|
00003450: 02 3F 8B 42 B3 31 30 A7 43 48 24 B2 C7 28 34 38 |.?.B.10.CH$..(48|
00003460: AA 42 59 29 00 7B 3C 0C 3F 8B 42 59 B1 39 A7 43 |.BY).{<.?.BY.9.C|
00003470: 48 24 B2 C7 28 35 35 AA 42 59 29 00 89 3C 16 3F |H$..(55.BY)..<.?|
00003480: 98 33 2C 43 48 24 3B 3A 8E 00 9A 3C 20 3F A0 34 |.3,CH$;:...< ?.4|
00003490: 3A 98 33 3A A0 33 3A A0 31 35 00 A0 3C 2A 3F 8A |:.3:.3:.15..<*?.|
000034A0: 00 00 00 |... |
..(.... ********************************
.O.... * *.
V.... * FILEMANAGER *..
.... * *.D.
... * BY:GUIDO STIELDORF/6-6-86 *....
.. * *.....
. ********************************.5....
53280,0:.53281,0:."..":.G(14).I...."....
FILE MANAGER
......Q1$."SHIFT+":Q2$." "......"..
.. SHAREWARE BY GUIDO STIELDORF 6/1986
..E. ..:."."...#..Q2$"0) SCRATCH ALL ',
'-FILES...(..Q2$"1) PRINT A BASIC-FILE..
.-..Q2$"2) DOS-COMMANDS.G.2..Q2$"3) TEST
BLOCKS (DON'T SCRATCH).F.7..Q2$"4) PROT
ECT WHOLE DISK...<..Q2$"5) CHANGE DISK-N
AME AND ID...A..Q2$"6) SCRATCHED FILE SA
LVAGEABLE?.P.F..Q2$"7) PRINT FILE IN HEX
...K..Q2$"8) UNPROTECT FILE...P..Q2$"9)
SALVAGE SCRATCHED FILE.7.U..Q1$"1) PROTE
CT FILE FROM SCRATCHING.W.Z..Q1$"2) SHOW
FILE-PARAMETER.T._..Q1$"3) CHANGE FILE-
TYPE...D..Q1$"4) PRINT DIRECTORY...I..Q1
$"5) SHOW DIRECTORY.J.N..Q1$"6) CLOSE AN
OPEN FILE.T.P..:.:....X.."..PRINTER: MP
S 801, SECOND.ADDRESS 4 .":M.0:.2023
,160.,....A$:M.M.1:.M.10.M.0.B....J(".."
,M.5.1,1);.V....".... SHAREWARE BY GUID
O STIELDORF 6/1986 .... ..(A$."0" . A$
."9") . (A$."!" . A$."&") .150...H..".";
:.A$.."0".220...R..F(A$).F("!").1.11000,
9000,4000,2000,12000,1000.5....E(A$).1.1
0000,13000,3000,14000,15000,5000,6000,16
000,8000,7000.M.+.:::::::::::::::::::.C.
,.. CHECK FOR ERROR.{.-.::::::::::::::::
:::...6..15,A1$,A2$,A3$,A4$...@.DS$.A1$.
", ".A2$.",".A3$.",".A4$.O.J.DS.E(A1$):.
DS.19.....T.."..........STATUS : ";DS$..
.^.."............CONTINUE ?"...H..A$:.A$
."Y".../.R..A$.."N".360.9.|. 15:..M...::
:::::::::::::._.... SEARCH FILE.S...::::
:::::::::::.....T.18:S.1:MO.0:. ***F$=FI
LENAME***.D...QW$.F$.H("
",16.C(F$)).W.... *** LOOP ***......15,
"U1 4 0";T;S:.300:T7.T:S7.S......15,"B-P
4 0":.300. .B..#4,T$,S$.>.L.S.F(S$.G(0)
):T.F(T$.G(0)).J.V..QW.0.7.Y...AD.32.QW.
2.S....15,"B-P 4";AD.3:.300.....DN$."":.
LK.0.15:.#4,L$:.L$.G(160).L$.G(32).L...D
N$.DN$.L$:.:.DN$.QW$.QW.9:.QW:MO.1:..R..
........T.0.430:. *** END LOOP ***......
:. ** MO=1, WHEN FOUND *****.:.&.. *AD=B
YTE, T+S ARE DEFAULT *****.C.X.."....THI
S FILE IS NOT ON THE DISK.".I.B...|.L.."
....RETURN.....V..A$:.A$..G(13).630.....
15:.... .T$(0)."DEL":T$(1)."SEQ":T$(2).
"PRG":T$(3)."USR":T$(4)."REL":T$(5)."ILL
"...*.T$(6)."ILL":T$(7)."ILL":.."...::::
::::::::::::::::::.;.... CLOSE AN OPEN F
ILE.V...::::::::::::::::::::::....."...
..FILENAME ";F$:.C(F$).16.1010......15,
8,15......4,8,4,"#......400:.MO.0.600...
...15,"B-P 4";AD.X.$..#4,A$:A.F(A$.G(0))
.....A.A.128...8..15,"B-P 4";AD...B..4,G
(A);...L. 15.,.V.."......FILE IS NOW CLO
SED..Q.`.."...... HIT ..RETURN.. PLEASE
..I.J..A$:.A$..G(13).1130.O.T.....O.::::
::::::::::::::::::...P.. DIRECTORY-HARDC
OPY...Q.::::::::::::::::::::::.I.Z..3,4,
7.R....800.Y....3......15,8,15,"I":.300.
.....4,8,4,"#":.300......15,"U1 4 0 18 0
":.300.5....15,"B-P 4 2":.300.C. ..#4,A$
,B$.X.*..3,".DIRECTORY :.O.4..3,"FORMAT
: 2";A$...>..3,"DOS-USER FLAG :";F(B$.G(
0))...H..15,"B-P 4 144"...R..2170.D.\.DN
$."":.N.1.AC...F..#4,A$:.A$."".A$." "...
K.DN$.DN$.A$...P..:....Z.AC.18:.2140.(..
..3,"DISK-NAME :";DN$:AC.3:.2140.E....3,
"ID : ";DN$.X....15,"M-R"G(250
)G(2)G(1):.#15,A$:.A$."".A$.G(0)......15
,"M-R"G(252)G(2)G(1):.#15,B$:.B$."".B$.G
(0).R....3,"FREE BLOCKS :";F(A$).256.F(B
$).Y....3......3,"FILENAME FILETY
PE LENGTH CLOSED PROTECTED";.0....
3," RECORDLENGTH.R....3,"===============
========================================
";......3,"=================...J.T.18:S.
1...T.. LOOP ************************.W.
...15,"U1 4 0";T;S:.300......15,"B-P 4 0
":.300......#4,T$,S$.....S.F(S$.G(0)):T.
F(T$.G(0)).&....QW.0.7.5...AD.32.QW.2.O.
...15,"B-P 4";AD.3:.300.Z.$.AC.16:.2140:
.DN$." ".2490...)..3,DN$;"
";......15,"B-P 4";AD:.300.A.8..#4,A$:F
T.F(A$.G(0)):.300...B..3,T$(FT .7);"
";:. ATTENTION!'FT AND' AND NOT 'FTAND
'CLOSE!!...L..15,"B-P 4";AD.28.,.V..#4,A
$,B$.M.`.AB.F(A$.G(0)).256.F(B$.G(0)).C.
J..3,AB;G(16);"36";..T.E$(0)."NO":E$(1)
."YES "...~..3,E$(FT.128);" ";E$(
(FT .64).64);" ";.M....(FT .7)..4
.2480......15,"B-P 4";AD.21......#4,A$:A
.F(A$.G(0))......3,A;......3....... .D..
T.0.2270.B.N..3,"=======================
================================";.|.X..
3,"=================......3,"FILEMANAGER
, SHAREWARE BY GUIDO STIELDORF 6/1986.V.
...3,G(10)G(10)G(10)G(10)G(10)..... 3...
.. 4..... 15...........::::::::::::::::.
..... DOS-COMMANDS./...::::::::::::::::.
H.B..".....DOS-COMMANDS".E.L..198,1:.631
,34:."....>";.X.V..1,0:.1,BE$: 1......H(
BE$,1)."S".3120......H(BE$,1)."N".3120..
....4,8,15,BE$......#4,A$:DN$.DN$.A$:.A$
..G(13).3070......G(13)".....STATUS : ";
DN$......"..... HIT .RETURN. PLEASE.4..
..A$:.A$..G(13).3100.:.&...^.0..G(13)"..
..ARE YOU SURE (Y/N) ?.P.:..A$:.A$."N"..
...D..A$.."Y".3130...N..3060.....:::::::
:::::::::::::... .. CHANGE FILE-TYPE.U..
.::::::::::::::::::::......".........FIL
ENAME ";F$......C(F$).16.F$."".4010.....
YJ.0.$....15,8,15,"I.2....4,8,4,"#.E....
400:.MO.0.600.X.H..15,"B-P 4";AD.P.R..#4
,A$:A.F(A$.G(0))......".FILETYPE :".....
.800:.".";T$(A.7).S...E$(1)."CLOSED":E$(
0)."OPEN":W$(1)."SCRATCH-PROTECTED".....
W$(0)."UNPROTECTED"......".";E$(A.128)..
....".";W$((A.64).64).,....".NEW FILETYP
E :..7."..N.0.7.J.,..N;".> ";T$(N).P.6..
.L.@..A$:.A$."0".A$."7".4160.|.J.A.128.E
(A$)...T..15,"B-P 4";AD...^..4,G(A);...H
..15,"U2 4 0";T7,S7.I.R. 4,8,4:.YJ..15,"
V.V.|. 15,8,15...........:::::::::::::::
::::::::::::...... CHANGE DISK-NAME AND
ID.:...:::::::::::::::::::::::::::.J....
15,8,15,"I.X....4,8,4,"#.M....15,"U1 4 0
18 0......15,"B-P 4 144......N.144.161.
..D..#4,A$:.A$..G(160).DN$.DN$.A$...N...
..X.."....DISKNAME :";G(34);DN$;G(34)...
...N.162.166:.#4,A$:WE$.WE$.A$:.......".
..ID AND FORMAT :";WE$.<....".WHAT IS TH
E NEW NAME ?.E....1,0.X....631,34:.198,1
.C....1,DN$.I.....P.(. 1.V.2.....<..DN$.
"".C(DN$).16.5120...F..15,"B-P 4 144...Z
..4,DN$;:N.C(DN$).Z.D..N.16..N.N.1.18:.4
,G(160);:....N.."...WHAT IS THE NEW ID "
;A$.,.X..C(A$)..2.."..2 CHARACTERS PLEAS
E !..":.5240.I....4,A$;:.15,"U2 4 0 18 0
".Q... 15.W.....~.O.::::::::::::::::::::
::::::::::::::...P.. CHECK FILE FOR POSS
IBLE RESCUE.J.Q.::::::::::::::::::::::::
::::::::::...Z..".......FILENAME :";F$..
....F$."".C(F$).16.6010.. ...15,8,15,"I.
. ...4,8,4,"#.0 ...400:.MO.0.600.F ...15
,"B-P 4";AD.28.T ...#4,A$,B$.. ..AB.F(A$
.G(0)).256.F(B$.G(0)):.AB.0.6290.. J.AS.
0.. T..15,"B-P 4";AD.1.. ...#4,A$,B$.. .
.T.F(A$.G(0)).N ..S.F(B$.G(0)).. ..:::::
:::::.. ... REPEAT.. ..::::::::::..!...1
5,"U1 4 0";T;S. !...15,"B-P 4 0"..!...#4
,A$,B$.?!$.T.F(A$.G(0)).P!..S.F(B$.G(0))
.\!8.AS.AS.1.J!B..T.0.6140.Z!L..AS.AB.62
70..!V.."....THIS FILE IS LOST!..!`..".P
LEASE HIT .RETURN..".L!J..A$:.A$..G(13).
6250.V!T. 15:..."~.."....THIS FILE IS .E
VENTUALLY. SALVAGEABLE..."...6240.P"..."
....NO NEED TO RESCUE THIS FILE,BECAUSE
IT HAS NO DATA";.E"..." IN IT.":.6240.Y"
W.:::::::::::::::.."X.. RESCUE FILE.."Y.
:::::::::::::::.."B..".......FILENAME :"
;F$.T"L..F$."".C(F$).15.7010.."..YJ.1:.4
025.."?.:::::::::::::::::..#@.. REFILEPR
OTECT.##A.:::::::::::::::::.=#J..".....F
ILENAME :";F$.V#T..F$."".C(F$).16.8010.L
#^..15,8,15,"I":DE.0.Z#H..4,8,4,"#..#R..
400:.MO.0.600. #|..15,"B-P 4";AD..#...#4
,A$:A.F(A$.G(0)).K#...15,"B-P 4";AD..#..
.4,G((A.191).DE);..#...15,"U2 4 0";T7;S7
..#.. 4..$.. 15.:$B.."......FILE CAN FRO
M NOW ON";:.DE.64.." NOT";.U$L.." BE":."
SCRATCHED.":."....... HIT .RETURN. PL
EASE...$V..A$:.A$..G(13).8150..$.....$'#
::::::::::::::::::::::..$(#. SHOW FILEPA
RAMETER 9001 :::::::::::::::
:::::::..%2#.".......FILENAME ";F$.#%<#.
F$."".C(F$).15.9010.3%F#.15,8,15,"I.A%P#
.4,8,4,"#.T%Z#.400:.MO.0.600.G%D#.15,"B-
P 4";AD..%N#.#4,A$:A.F(A$.G(0)):.800..%X
#."...FILETYPE :";T$(A.7):A7.A.O%.#.".TH
IS FILE IS";:.(A.64).0.." NOT";..%.#." P
ROTECTED":."AGAINST SCRATCH..&.#.".THE F
ILE IS";:..(A.128).0.." NOT";.,& #." CLO
SED".:&.#.#4,A$,B$.X&.#T.F(A$.G(0)):S.F(
B$.G(0))..&.#.".THE FILE STARTS AT";T;"/
";S;:S7.S:T7.T..&H#.15,"B-P 4";AD.19..&R
#.(A7.7)..4.(A7.7).0.9230.G&.#.#4,B$,A$.
.&.#T.F(A$.G(0)):S.F(B$.G(0))..'.#.".STA
RT OF THE SIDE SECTOR BLOCKS :";T;"/";S.
/'.#.#4,A$:A.F(A$.G(0)).I'.$.".RECORD-LE
NGTH :";A._'.$.15,"B-P 4";AD.28.M'.$.#4,
A$,B$..'"$AB.F(A$.G(0)).256.F(B$.G(0))..
'#$...',$.".NUMBER OF BLOCKS :";AB.W'6$.
15,"U1 4 0";T7;S7:.15,"B-P 4 2"..'@$.#4,
A$,B$..(J$PS.F(A$.G(0)).256.F(B$.G(0)).=
(T$.(A7.7).2.(A7.7).0..".THE PROGRAM STA
RTS WITH";PS;.C(Y$.._(^$.".PLEASE HIT .R
ETURN...W(H$.A$:.A$..G(13).9320..(R$ 4:
15:...(.':::::::::::::::::::::..(.'. SCR
ATCH ','-FILES.P(.':::::::::::::::::::::
..(.'."........PLEASE WAIT !...(.'.15,8,
15,"I..)$'.4,8,4,"#./).'F$.",":.400:.MO.
0..15,"V": 15:..B)8'.15,"B-P 4";AD.])B'.
4,G(0)G(0)G(0)G(160);.T)L'.15,"U2 4 0";T
7;S7.)V'.10030..).*:::::::::::::::..).*
. FILEPROTECT..).*:::::::::::::::.S).+."
.....FILENAME :";F$..).+.F$."".C(F$).16.
11010..*.+.15,8,15,"I":DE.64:.8040..* +:
.'*..::::::::::::::::::.<*... SHOW DIREC
TORY.S*..::::::::::::::::::.}*..."...
SHOW DIRECTORY .";..*...15,8,
15,"I":.300..*...4,8,4,"#":.300.D*...15,
"M-R"G(144)G(7)G(23).P*./.15,DN$..*./.".
. NAME :";DN$;" .";.
.+./.15,"M-R"G(250)G(2)G(3).-+./.#15,A$,
B$,B$.N+./AB.F(A$.G(0)).256.F(B$.G(0))..
+&/."..... NUMBER OF FREE BLOCKS:";AB;
". "..+0/."....
.";..,:/."..
..=DEL,.. ..=SEQ,.. ..=PRG,.. ..=USR,..
..=REL,.. ..=ILL..,D/F$."........".",N/P
$."......"./,X/T.18:S.1.R,B/. LOOP *****
******************.L,L/.15,"U1 4 0";T;S:
.300..,V/.15,"B-P 4 0":.300..,./.#4,T$,S
$..,./S.F(S$.G(0))..,./T.F(T$.G(0))..,./
.P$;.G,./.N.0.7..,./."
..";..-./AD.32.N.2.
.-./.15,"B-P 4";AD.3-F/.#4,A$:FT.F(A$.G(
0)).K-P/..(FT.128).0..".*";.Y-Z/.#4,A$,A
$.Y-./.J(F$,(FT .7).1,1);.1);".";..-./.M
N.0.15:.#4,A$:.A$.G(0).A$." "..-./.A$;:.
.N-.0.(FT .64).64...20); "..<";..
-.0.15,"B-P 4";AD.28..-.0.#4,A$,B$... 0A
B.F(A$.G(0)).256.F(B$.G(0)).%.*0..25);".
.";AB.+.40..L.>0."..CONTINUE (Y/N) ?":.1
98,0.B.H0.A$:.A$."N".12410.S.R0.A$."".12
360...\0.T.0.12140...F0 4...P0 15...Z0..
..G2::::::::::::::::::.C.H2. BASIC-PRINT
OUT.Z.I2::::::::::::::::::...R2."......B
ASIC-FILENAME ";BD$../.2.TKEN$(255).'/.2
.N.32.127:TK$(N).G(N):..=/.2.15,8,15,"I"
:.300.X/.3.4,8,4,BD$.",P,R":.300.Y/.3.".
............PLEASE WAIT !../.3AD.41118..
/"3.N.1.76../,3A.B(AD)../63A$.G(A.127).O
/@3.A$.."A".A$.."Z".A$.G(A.128)../J3TK$(
127.N).TK$(127.N).A$../T3AD.AD.1..0^3.(A
.128).0.13100. 0H3.TK$(N.127),:..30R3TK$
(255)."...".X0|3.3,4,7:."...........HERE
WE GO !._0.3.3.V0.3.3,G(10)G(10)G(10)..
0.3.#4,A$,A$:.300..0.3.3,".BASIC-PROGRAM
:";BD$..0.3.3,".".K0.3.#4,X$,U$,A$,B$:.
300..0B3LN.F(A$.G(0)).256.F(B$.G(0)):.X$
."".U$."".13370..1L3.3,J(D(LN),2);" ";..
1V3MO.0.B1.3. LOOP *********************
**.R1.3.#4,A$:.300.V1.3.A$.G(34)..3,A$;:
MO.1.MO:.13290..1.3.A$."".13340..1.4.MO.
0..3,TK$(F(A$));:.13290..1.4.3,A$;:.1329
0..1.4. END LOOP *******************..1&
4.3..104.13240..1:4.3..2D4.3,G(10)G(10)G
(10)G(10)G(10)..2N4 3.$2X4 4.I2B4.".....
.FINISHED. PLEASE HIT THE.A2L4.".....RET
URN. KEY..Z2V4.A$:.A$..G(13).13430..2.4.
..2.6:::::::::::::::..2.6. TEST BLOCKS..
2.6:::::::::::::::.P2.6.".PLEASE WAIT !"
..2.6.N.0.127:Q1$.Q1$.G(255):Q2$.Q2$.G(0
):..;3.6."......ATTENTION! DO ..NOT.. TE
ST BLOCK TRACK 18 SECTOR 0,.U3.6."..BECA
USE IT MIGHT WIPE OUT ALL DATA ON YOUR D
ISK!!..3D6.".....START-TRACK ";T..3N6.".
....START-SECTOR ";S.I3X6.".....ENDING-T
RACK ";SC..3.6.".....ENDING-SECTOR ";SS.
.4.6.15,8,15,"I":.300:.4,8,4,"#":.300.04
.6. LOOP ***********************.E4.7.15
,"U1 4 0";T;S.W4.7.15,"B-P 4 0".N4.7."..
.........";T;S..4.7.N.0.255:.#4,A$:.A$."
".A$.G(0)..4(7.49152.N,F(A$):...427.15,"
B-P 4 0":.300.R4<7.4,Q1$;Q1$;:.300..4F7.
15,"U2 4 0";T;S:.300..5P7.15,"U1 4 0";T;
S:.300..5U7.15,"B-P 4 0":.300.>5Z7.N.0.2
55:.#4,A$:.A$.G(255)...]5D7.N.256.14260:
. BAD BLOCK *.T5N7.15,"B-P 4 0":.300..5X
7.4,Q2$;Q2$;:.300..5.7.15,"U2 4 0";T;S:.
300..5.7.15,"U1 4 0";T;S:.300.T5.7.15,"B
-P 4 0":.300..5 7.N.0.255:.#4,A$:.A$."".
...6.7.N.256.14370.$6.7.".......NON-FUNC
TIONAL BLOCK.O6.7."...FOUND, DO YOU WANT
ME TO MARK HIM.Z6H7."...AS OCCUPIED (Y/
N) ? A";T;"/";S;"U..6R7.A$:.A$."N".14370
..6.7.A$."".14290..6.7.15,"B-A 0";T;S..6
.7."......THIS BLOCK IS MARKED 'OCCUPIED
'..6.7."...,BUT CAN BE OPENED..7.8."...W
ITH .VALIDATE. !!!!!.:7.8."... HIT .RETU
RN. PLEASE.S7.8.A$:.A$..G(13).14360.V7"8
. LABEL **********************..7,8.15,"
B-P 4 0"..768.N.0.255:.4,G(B(49152.N));:
..C7@8.15,"U2 4 0";T;S:.300..7J8S.S.1:.S
.SS.T.SC.14470..7T8GR.20:.T.17.GR.18..8^
8.T.24.GR.17..8H8.T.30.GR.16.28R8.S.GR.S
.0:T.T.1:.T.36.T.1.=8|8.14080.F8.8."....
...WE ARE THROUGH ALL BLOCKS !.U8.8.N.1.
10000.{8.8...8.8 4: 15..8.8...8.::::::::
:::::::::..8.:. DISK-PROTECT.I8.::::::::
:::::::::..8.:.".........DISK-PROTECT..9
.:."...YOU CAN ONLY LOAD THE FILES,.49.:
."BUT NOT READ,NOR SAVE OR COPY !!!!.:9.
:..^9E:.".(YOU CAN CHANGE THAT ONLY BY..
9F:." REFORMATTING THE DISK !!!!)..9J:."
...ARE YOU ABSOLUTELY SURE,THAT THIS IS,
.K9T:."WHAT YOU WANT (Y/N)?..9.:.A$:.A$.
"N"....9.:.A$.."Y".15070..:.:."..REALLY
SURE ?..:.:.A$:.A$."N"...+:.;.A$.."Y".15
100.@:.;."..STILL SURE ?.R:.;.A$:.A$."N"
...E:$;.A$.."Y".15130.{:.;.15,8,15,"I":.
300..:8;.4,8,4,"#":.300..:B;.15,"U1 4 0
18 0":.300.A:L;.15,"B-P 4 2":.300.Y:V;.4
,"N".G(255);:.300..:`;.15,"U2 4 0 18 0":
.300..;J;."...O.K...;T;.N.1.10000:...;~;
..8;>::::::::::::::::::::::::::.U;.>. P
RINT FILE HEXADECIMAL.T;.>::::::::::::::
::::::::::::..;.>."......FILENAME"..;.>.
"....";DN$:.15,8,15..;.>.4,8,4,DN$.",R":
.300.E;.>.3,4..;.>.#4,A$:.ST..0.16160..;
.>.A$."".A$.G(0)..;F>A.F(A$)..<P>LB.A.15
:HB..(A.16).$<Z>BY.HB:.16130.5<.>BY.LB:.
16130.B<.>.3," ";.M<.>.16050.D<.?.B.10.
CH$.G(48.BY).{<.?.BY.9.CH$.G(55.BY)..<.?
.3,CH$;:...< ? 4:.3: 3: 15. <*?....
> CLICK IMAGE PREVIEW FOR FULL MODAL