DOS TOOL
FILE INFORMATION
FILENAME(S): DOS TOOL
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-12-02 02:15:03
APPEARS ON: 1 disk(s)
FILE HASH
86670e2b82ab22db48f6764569cbbe205aeeeaec6e7a6c26f2f377878a2b28c4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PANS TOOLS 03 | DOS TOOL | PRG | The BAM Archive | 30 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 05 00 97 35 33 32 38 30 2C 36 00 28 |.......53280,6.(|
00000010: 08 0A 00 99 A3 31 33 29 22 11 11 11 11 11 12 44 |.....13)"......D|
00000020: 4F 53 20 54 4F 4F 4C 22 00 4A 08 0B 00 99 A3 38 |OS TOOL".J.....8|
00000030: 29 22 11 20 20 20 42 59 20 53 54 45 46 41 41 4E |)". BY STEFAAN|
00000040: 20 4A 41 4E 53 53 45 4E 53 22 00 70 08 0C 00 99 | JANSSENS".p....|
00000050: A3 38 29 22 11 4D 41 4E 59 20 54 48 41 4E 4B 53 |.8)".MANY THANKS|
00000060: 20 54 4F 20 44 41 4E 4E 59 20 44 4F 59 4C 45 22 | TO DANNY DOYLE"|
00000070: 00 8F 08 14 00 99 A3 38 29 22 11 11 20 31 2E 20 |.......8)".. 1. |
00000080: 52 45 53 54 4F 52 45 20 46 4F 52 4D 41 54 22 00 |RESTORE FORMAT".|
00000090: AC 08 15 00 99 A3 38 29 22 11 20 32 2E 20 43 48 |......8)". 2. CH|
000000A0: 41 4E 47 45 20 46 4F 52 4D 41 54 22 00 CC 08 16 |ANGE FORMAT"....|
000000B0: 00 99 A3 38 29 22 11 20 33 2E 20 43 48 41 4E 47 |...8)". 3. CHANG|
000000C0: 45 20 4E 41 4D 45 20 26 20 49 44 22 00 E7 08 17 |E NAME & ID"....|
000000D0: 00 99 A3 38 29 22 11 20 34 2E 20 56 49 45 57 20 |...8)". 4. VIEW |
000000E0: 53 45 43 54 4F 52 22 00 02 09 18 00 99 A3 38 29 |SECTOR".......8)|
000000F0: 22 11 20 35 2E 20 56 49 45 57 20 54 31 38 20 53 |". 5. VIEW T18 S|
00000100: 30 22 00 1F 09 19 00 99 A3 38 29 22 11 20 36 2E |0".......8)". 6.|
00000110: 20 43 48 41 4E 47 45 20 41 20 42 59 54 45 22 00 | CHANGE A BYTE".|
00000120: 3F 09 1A 00 99 A3 38 29 22 11 20 37 2E 20 43 48 |?.....8)". 7. CH|
00000130: 41 4E 47 45 20 42 59 54 45 53 20 41 2D 42 22 00 |ANGE BYTES A-B".|
00000140: 5C 09 1C 00 99 A3 31 32 29 22 11 59 4F 55 52 20 |\.....12)".YOUR |
00000150: 43 48 4F 49 43 45 22 3B 3A 85 43 24 00 6C 09 1D |CHOICE";:.C$.l..|
00000160: 00 8B 43 24 B2 22 31 22 A7 31 39 39 00 7C 09 1E |..C$."1".199.|..|
00000170: 00 8B 43 24 B2 22 32 22 A7 31 30 30 00 8C 09 1F |..C$."2".100....|
00000180: 00 8B 43 24 B2 22 33 22 A7 31 31 30 00 9C 09 20 |..C$."3".110... |
00000190: 00 8B 43 24 B2 22 34 22 A7 34 30 30 00 AC 09 21 |..C$."4".400...!|
000001A0: 00 8B 43 24 B2 22 35 22 A7 35 30 30 00 BC 09 22 |..C$."5".500..."|
000001B0: 00 8B 43 24 B2 22 36 22 A7 37 30 30 00 CC 09 23 |..C$."6".700...#|
000001C0: 00 8B 43 24 B2 22 37 22 A7 38 30 30 00 D4 09 24 |..C$."7".800...$|
000001D0: 00 89 31 30 00 04 0A 64 00 99 A3 37 29 22 11 11 |..10...d...7)"..|
000001E0: 57 48 49 43 48 20 46 4F 52 4D 41 54 20 5B 4F 4E |WHICH FORMAT [ON|
000001F0: 45 20 43 48 41 52 41 43 54 45 52 21 5D 22 3B 3A |E CHARACTER!]";:|
00000200: 85 44 4F 24 00 23 0A 66 00 44 4F 24 B2 C8 28 44 |.DO$.#.f.DO$..(D|
00000210: 4F 24 2C 31 29 3A 44 4F 24 B2 C7 28 C5 28 44 4F |O$,1):DO$..(.(DO|
00000220: 24 29 29 00 2C 0A 69 00 89 32 30 30 00 39 0A 6E |$)).,.i..200.9.n|
00000230: 00 9F 31 35 2C 38 2C 31 35 00 4A 0A 6F 00 9F 31 |..15,8,15.J.o..1|
00000240: 30 2C 38 2C 31 30 2C 22 23 22 00 60 0A 70 00 98 |0,8,10,"#".`.p..|
00000250: 31 35 2C 22 55 31 22 31 30 3B 30 3B 31 38 3B 30 |15,"U1"10;0;18;0|
00000260: 00 75 0A 71 00 98 31 35 2C 22 42 2D 50 3A 22 31 |.u.q..15,"B-P:"1|
00000270: 30 3B 31 34 34 00 8C 0A 73 00 81 54 B2 31 34 34 |0;144...s..T.144|
00000280: A4 31 35 39 3A A1 23 31 30 2C 41 24 00 9D 0A 74 |.159:.#10,A$...t|
00000290: 00 4E 41 24 B2 4E 41 24 AA 41 24 3A 82 00 B2 0A |.NA$.NA$.A$:....|
000002A0: 75 00 98 31 35 2C 22 42 2D 50 3A 22 31 30 3B 31 |u..15,"B-P:"10;1|
000002B0: 36 32 00 D0 0A 76 00 A1 23 31 30 2C 41 24 3A A1 |62...v..#10,A$:.|
000002C0: 23 31 30 2C 42 24 3A 49 44 24 B2 41 24 AA 42 24 |#10,B$:ID$.A$.B$|
000002D0: 00 EA 0A 78 00 99 22 11 11 50 52 45 53 45 4E 54 |...x.."..PRESENT|
000002E0: 20 4E 41 4D 45 3A 22 4E 41 24 00 03 0B 79 00 99 | NAME:"NA$...y..|
000002F0: 22 11 50 52 45 53 45 4E 54 20 49 44 20 20 3A 22 |".PRESENT ID :"|
00000300: 49 44 24 00 19 0B 7D 00 85 22 11 11 4E 45 57 20 |ID$...}.."..NEW |
00000310: 4E 41 4D 45 22 3B 4E 41 24 00 3F 0B 7E 00 8B C3 |NAME";NA$.?.~...|
00000320: 28 4E 41 24 29 B1 31 36 A7 99 22 11 4E 41 4D 45 |(NA$).16..".NAME|
00000330: 20 54 4F 4F 20 4C 4F 4E 47 22 3A 89 31 32 35 00 | TOO LONG":.125.|
00000340: 55 0B 7F 00 85 22 11 11 4E 45 57 20 49 44 20 20 |U...."..NEW ID |
00000350: 22 3B 49 44 24 00 8A 0B 80 00 8B C3 28 49 44 24 |";ID$.......(ID$|
00000360: 29 B3 B1 32 A7 99 22 11 4F 4E 4C 59 20 32 2D 43 |)..2..".ONLY 2-C|
00000370: 48 41 52 41 43 54 45 52 20 49 44 27 53 20 50 4C |HARACTER ID'S PL|
00000380: 45 41 53 45 22 3A 89 31 32 37 00 AE 0B 82 00 8B |EASE":.127......|
00000390: C3 28 4E 41 24 29 B3 B1 31 38 A7 4E 41 24 B2 4E |.(NA$)..18.NA$.N|
000003A0: 41 24 AA C7 28 31 36 30 29 3A 89 31 33 30 00 C3 |A$..(160):.130..|
000003B0: 0B 87 00 98 31 35 2C 22 42 2D 50 3A 22 31 30 3B |....15,"B-P:"10;|
000003C0: 31 34 34 00 D0 0B 8C 00 98 31 30 2C 4E 41 24 3B |144......10,NA$;|
000003D0: 00 E5 0B 8D 00 98 31 35 2C 22 42 2D 50 3A 22 31 |......15,"B-P:"1|
000003E0: 30 3B 31 36 32 00 F2 0B 8E 00 98 31 30 2C 49 44 |0;162......10,ID|
000003F0: 24 3B 00 08 0C 91 00 98 31 35 2C 22 55 32 22 31 |$;......15,"U2"1|
00000400: 30 3B 30 3B 31 38 3B 30 00 10 0C 96 00 A0 31 30 |0;0;18;0......10|
00000410: 00 18 0C 9B 00 A0 31 35 00 21 0C A0 00 89 32 39 |......15.!....29|
00000420: 30 00 2F 0C C7 00 44 4F 24 B2 C7 28 36 35 29 00 |0./...DO$..(65).|
00000430: 3C 0C C8 00 9F 31 35 2C 38 2C 31 35 00 4D 0C D2 |<....15,8,15.M..|
00000440: 00 9F 31 30 2C 38 2C 31 30 2C 22 23 22 00 63 0C |..10,8,10,"#".c.|
00000450: DC 00 98 31 35 2C 22 55 31 22 31 30 3B 30 3B 31 |...15,"U1"10;0;1|
00000460: 38 3B 30 00 76 0C E6 00 98 31 35 2C 22 42 2D 50 |8;0.v....15,"B-P|
00000470: 3A 22 31 30 3B 32 00 83 0C F0 00 98 31 30 2C 44 |:"10;2......10,D|
00000480: 4F 24 3B 00 99 0C FA 00 98 31 35 2C 22 55 32 22 |O$;......15,"U2"|
00000490: 31 30 3B 30 3B 31 38 3B 30 00 A1 0C 04 01 A0 31 |10;0;18;0......1|
000004A0: 30 00 A9 0C 18 01 A0 31 35 00 BA 0C 22 01 9F 31 |0......15..."..1|
000004B0: 35 2C 38 2C 31 35 2C 22 49 22 00 C2 0C 2C 01 A0 |5,8,15,"I"...,..|
000004C0: 31 35 00 CC 0C 36 01 89 31 30 30 30 00 D9 0C 90 |15...6..1000....|
000004D0: 01 9F 31 35 2C 38 2C 31 35 00 EA 0C 9A 01 9F 31 |..15,8,15......1|
000004E0: 30 2C 38 2C 31 30 2C 22 23 22 00 02 0D 9F 01 85 |0,8,10,"#"......|
000004F0: 22 11 11 54 52 41 43 4B 20 5B 31 2D 33 35 5D 22 |"..TRACK [1-35]"|
00000500: 3B 54 00 1C 0D A0 01 85 22 53 45 43 54 4F 52 20 |;T......"SECTOR |
00000510: 5B 30 2D 32 31 4D 41 58 5D 22 3B 53 00 2E 0D A1 |[0-21MAX]";S....|
00000520: 01 8B 54 B1 33 35 B0 54 B2 30 A7 34 31 35 00 3C |..T.35.T.0.415.<|
00000530: 0D A2 01 8B 53 B1 32 31 A7 34 31 36 00 69 0D A3 |....S.21.416.i..|
00000540: 01 8B 28 54 B1 33 30 AF 53 B1 31 37 29 B0 28 54 |..(T.30.S.17).(T|
00000550: B1 32 34 AF 53 B1 31 38 29 B0 28 54 B1 31 37 AF |.24.S.18).(T.17.|
00000560: 53 B1 31 39 29 A7 34 31 36 00 7E 0D A4 01 98 31 |S.19).416.~....1|
00000570: 35 2C 22 55 31 22 31 30 3B 30 3B 54 3B 53 00 93 |5,"U1"10;0;T;S..|
00000580: 0D A9 01 81 51 B2 30 A4 32 35 35 3A A1 23 31 30 |....Q.0.255:.#10|
00000590: 2C 41 24 00 AB 0D AE 01 99 51 3B 3A 99 A3 37 29 |,A$......Q;:..7)|
000005A0: C6 28 41 24 AA C7 28 30 29 29 3B 00 CD 0D B3 01 |.(A$..(0));.....|
000005B0: 99 A3 31 32 29 41 24 3B 3A 8B 41 24 B3 B1 C7 28 |..12)A$;:.A$...(|
000005C0: 33 34 29 A7 99 22 9A 22 3A 89 34 34 30 00 D3 0D |34)..".":.440...|
000005D0: B4 01 99 00 E6 0D B8 01 A1 41 24 3A 8B 41 24 B2 |.........A$:.A$.|
000005E0: 22 22 A7 34 34 30 00 F8 0D BA 01 8B 41 24 B2 22 |"".440......A$."|
000005F0: 2A 22 A7 51 B2 32 35 35 00 FE 0D BD 01 82 00 06 |*".Q.255........|
00000600: 0E C2 01 A0 31 30 00 14 0E C7 01 A0 31 35 3A 89 |....10......15:.|
00000610: 31 30 30 30 00 21 0E F4 01 9F 31 35 2C 38 2C 31 |1000.!....15,8,1|
00000620: 35 00 32 0E FE 01 9F 31 30 2C 38 2C 31 30 2C 22 |5.2....10,8,10,"|
00000630: 23 22 00 51 0E 03 02 99 22 42 41 4D 20 4F 52 20 |#".Q...."BAM OR |
00000640: 44 49 52 45 43 54 4F 52 59 20 48 45 41 44 45 52 |DIRECTORY HEADER|
00000650: 22 00 5F 0E 04 02 85 22 42 2F 44 22 3B 43 24 00 |"._...."B/D";C$.|
00000660: 6F 0E 05 02 8B 43 24 B2 22 42 22 A7 35 35 30 00 |o....C$."B".550.|
00000670: 7F 0E 06 02 8B 43 24 B2 22 44 22 A7 36 30 30 00 |.....C$."D".600.|
00000680: 88 0E 07 02 89 35 31 35 00 9E 0E 26 02 98 31 35 |.....515...&..15|
00000690: 2C 22 55 31 22 31 30 3B 30 3B 31 38 3B 30 00 B0 |,"U1"10;0;18;0..|
000006A0: 0E 2B 02 98 31 35 2C 22 42 2D 50 22 31 30 2C 30 |.+..15,"B-P"10,0|
000006B0: 00 BC 0E 2C 02 A1 23 31 30 2C 41 24 00 EF 0E 2D |...,..#10,A$...-|
000006C0: 02 99 30 3B A3 35 29 22 46 49 52 53 54 20 44 49 |..0;.5)"FIRST DI|
000006D0: 52 45 43 54 4F 52 59 20 42 4C 4F 43 4B 20 54 52 |RECTORY BLOCK TR|
000006E0: 41 43 4B 20 22 C6 28 41 24 AA C7 28 30 29 29 00 |ACK ".(A$..(0)).|
000006F0: FB 0E 2E 02 A1 23 31 30 2C 41 24 00 2E 0F 2F 02 |.....#10,A$.../.|
00000700: 99 31 3B A3 35 29 22 46 49 52 53 54 20 44 49 52 |.1;.5)"FIRST DIR|
00000710: 45 43 54 4F 52 59 20 42 4C 4F 43 4B 20 53 45 43 |ECTORY BLOCK SEC|
00000720: 54 4F 52 22 C6 28 41 24 AA C7 28 30 29 29 00 3A |TOR".(A$..(0)).:|
00000730: 0F 30 02 A1 23 31 30 2C 41 24 00 51 0F 31 02 99 |.0..#10,A$.Q.1..|
00000740: 32 3B A3 35 29 3B C6 28 41 24 AA C7 28 30 29 29 |2;.5);.(A$..(0))|
00000750: 3B 00 79 0F 32 02 8B C6 28 41 24 AA C7 28 30 29 |;.y.2...(A$..(0)|
00000760: 29 B2 36 35 A7 99 22 20 34 30 34 30 20 46 4F 52 |).65.." 4040 FOR|
00000770: 4D 41 54 22 3A 89 35 36 35 00 88 0F 33 02 99 22 |MAT":.565...3.."|
00000780: 20 46 4F 52 4D 41 54 22 00 9D 0F 35 02 81 54 B2 | FORMAT"...5..T.|
00000790: 33 A4 31 34 33 3A A1 23 31 30 2C 41 24 00 B5 0F |3.143:.#10,A$...|
000007A0: 36 02 99 54 3B 3A 99 A3 37 29 C6 28 41 24 AA C7 |6..T;:..7).(A$..|
000007B0: 28 30 29 29 3B 00 D7 0F 37 02 99 A3 31 32 29 41 |(0));...7...12)A|
000007C0: 24 3B 3A 8B 41 24 B3 B1 C7 28 33 34 29 A7 99 22 |$;:.A$...(34).."|
000007D0: 9A 22 3A 89 35 36 39 00 DD 0F 38 02 99 00 F1 0F |.":.569...8.....|
000007E0: 39 02 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |9..198,0:.198,1:|
000007F0: 82 00 03 10 3A 02 A0 31 30 3A A0 31 35 3A 89 31 |....:..10:.15:.1|
00000800: 30 30 30 00 19 10 58 02 98 31 35 2C 22 55 31 22 |000...X..15,"U1"|
00000810: 31 30 3B 30 3B 31 38 3B 30 00 2D 10 5D 02 98 31 |10;0;18;0.-.]..1|
00000820: 35 2C 22 42 2D 50 22 31 30 2C 31 34 34 00 3F 10 |5,"B-P"10,144.?.|
00000830: 5F 02 99 22 12 44 49 53 4B 20 4E 41 4D 45 22 00 |_..".DISK NAME".|
00000840: 56 10 62 02 81 54 B2 31 34 34 A4 31 35 39 3A A1 |V.b..T.144.159:.|
00000850: 23 31 30 2C 41 24 00 6E 10 63 02 99 54 3B 3A 99 |#10,A$.n.c..T;:.|
00000860: A3 37 29 C6 28 41 24 AA C7 28 30 29 29 3B 00 90 |.7).(A$..(0));..|
00000870: 10 64 02 99 A3 31 32 29 41 24 3B 3A 8B 41 24 B3 |.d...12)A$;:.A$.|
00000880: B1 C7 28 33 34 29 A7 99 22 9A 22 3A 89 36 31 34 |..(34)..".":.614|
00000890: 00 96 10 65 02 99 00 AA 10 66 02 97 31 39 38 2C |...e.....f..198,|
000008A0: 30 3A 92 31 39 38 2C 31 3A 82 00 C1 10 67 02 99 |0:.198,1:....g..|
000008B0: 22 12 53 48 49 46 54 45 44 20 53 50 41 43 45 53 |".SHIFTED SPACES|
000008C0: 22 00 D0 10 68 02 81 54 B2 31 36 30 A4 31 36 31 |"...h..T.160.161|
000008D0: 00 DC 10 6C 02 A1 23 31 30 2C 41 24 00 F4 10 6D |...l..#10,A$...m|
000008E0: 02 99 54 3B 3A 99 A3 37 29 C6 28 41 24 AA C7 28 |..T;:..7).(A$..(|
000008F0: 30 29 29 3B 00 16 11 6E 02 99 A3 31 32 29 41 24 |0));...n...12)A$|
00000900: 3B 3A 8B 41 24 B3 B1 C7 28 33 34 29 A7 99 22 9A |;:.A$...(34)..".|
00000910: 22 3A 89 36 32 34 00 1C 11 6F 02 99 00 22 11 70 |":.624...o...".p|
00000920: 02 82 00 32 11 71 02 99 22 12 44 49 53 4B 20 49 |...2.q..".DISK I|
00000930: 44 22 00 41 11 72 02 81 54 B2 31 36 32 A4 31 36 |D".A.r..T.162.16|
00000940: 33 00 4D 11 76 02 A1 23 31 30 2C 41 24 00 65 11 |3.M.v..#10,A$.e.|
00000950: 77 02 99 54 3B 3A 99 A3 37 29 C6 28 41 24 AA C7 |w..T;:..7).(A$..|
00000960: 28 30 29 29 3B 00 87 11 78 02 99 A3 31 32 29 41 |(0));...x...12)A|
00000970: 24 3B 3A 8B 41 24 B3 B1 C7 28 33 34 29 A7 99 22 |$;:.A$...(34).."|
00000980: 9A 22 3A 89 36 33 34 00 8D 11 79 02 99 00 93 11 |.":.634...y.....|
00000990: 7A 02 82 00 A9 11 7B 02 99 22 12 53 48 49 46 54 |z.....{..".SHIFT|
000009A0: 45 44 20 53 50 41 43 45 22 00 B5 11 80 02 A1 23 |ED SPACE"......#|
000009B0: 31 30 2C 41 24 00 CD 11 81 02 99 54 3B 3A 99 A3 |10,A$......T;:..|
000009C0: 37 29 C6 28 41 24 AA C7 28 30 29 29 3B 00 EF 11 |7).(A$..(0));...|
000009D0: 82 02 99 A3 31 32 29 41 24 3B 3A 8B 41 24 B3 B1 |....12)A$;:.A$..|
000009E0: C7 28 33 34 29 A7 99 22 9A 22 3A 89 36 34 35 00 |.(34)..".":.645.|
000009F0: F5 11 83 02 99 00 17 12 85 02 99 22 12 44 4F 53 |...........".DOS|
00000A00: 20 56 45 52 53 49 4F 4E 20 26 20 46 4F 52 4D 41 | VERSION & FORMA|
00000A10: 54 20 54 59 50 45 22 00 26 12 86 02 81 54 B2 31 |T TYPE".&....T.1|
00000A20: 36 35 A4 31 36 36 00 32 12 8A 02 A1 23 31 30 2C |65.166.2....#10,|
00000A30: 41 24 00 4A 12 8B 02 99 54 3B 3A 99 A3 37 29 C6 |A$.J....T;:..7).|
00000A40: 28 41 24 AA C7 28 30 29 29 3B 00 6C 12 8C 02 99 |(A$..(0));.l....|
00000A50: A3 31 32 29 41 24 3B 3A 8B 41 24 B3 B1 C7 28 33 |.12)A$;:.A$...(3|
00000A60: 34 29 A7 99 22 9A 22 3A 89 36 35 34 00 72 12 8D |4)..".":.654.r..|
00000A70: 02 99 00 78 12 8E 02 82 00 8F 12 8F 02 99 22 12 |...x..........".|
00000A80: 53 48 49 46 54 45 44 20 53 50 41 43 45 53 22 00 |SHIFTED SPACES".|
00000A90: 9E 12 90 02 81 54 B2 31 36 37 A4 31 37 30 00 AA |.....T.167.170..|
00000AA0: 12 94 02 A1 23 31 30 2C 41 24 00 C2 12 95 02 99 |....#10,A$......|
00000AB0: 54 3B 3A 99 A3 37 29 C6 28 41 24 AA C7 28 30 29 |T;:..7).(A$..(0)|
00000AC0: 29 3B 00 E4 12 96 02 99 A3 31 32 29 41 24 3B 3A |);.......12)A$;:|
00000AD0: 8B 41 24 B3 B1 C7 28 33 34 29 A7 99 22 9A 22 3A |.A$...(34)..".":|
00000AE0: 89 36 36 34 00 EA 12 97 02 99 00 FE 12 98 02 97 |.664............|
00000AF0: 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A 82 00 17 |198,0:.198,1:...|
00000B00: 13 99 02 99 22 12 4E 55 4C 4C 53 20 2C 20 4E 4F |....".NULLS , NO|
00000B10: 54 20 55 53 45 44 22 00 26 13 9A 02 81 54 B2 31 |T USED".&....T.1|
00000B20: 37 31 A4 32 35 35 00 32 13 9E 02 A1 23 31 30 2C |71.255.2....#10,|
00000B30: 41 24 00 4A 13 9F 02 99 54 3B 3A 99 A3 37 29 C6 |A$.J....T;:..7).|
00000B40: 28 41 24 AA C7 28 30 29 29 3B 00 6C 13 A0 02 99 |(A$..(0));.l....|
00000B50: A3 31 32 29 41 24 3B 3A 8B 41 24 B3 B1 C7 28 33 |.12)A$;:.A$...(3|
00000B60: 34 29 A7 99 22 9A 22 3A 89 36 37 34 00 72 13 A1 |4)..".":.674.r..|
00000B70: 02 99 00 86 13 A2 02 97 31 39 38 2C 30 3A 92 31 |........198,0:.1|
00000B80: 39 38 2C 31 3A 82 00 98 13 A8 02 A0 31 30 3A A0 |98,1:.......10:.|
00000B90: 31 35 3A 89 31 30 30 30 00 A5 13 BC 02 9F 31 35 |15:.1000......15|
00000BA0: 2C 38 2C 31 35 00 B6 13 C1 02 9F 31 30 2C 38 2C |,8,15......10,8,|
00000BB0: 31 30 2C 22 23 22 00 D5 13 C5 02 99 22 11 11 57 |10,"#"......"..W|
00000BC0: 48 49 43 48 20 54 52 41 43 4B 20 26 20 53 45 43 |HICH TRACK & SEC|
00000BD0: 54 4F 52 20 22 00 DE 13 C6 02 85 54 2C 53 00 07 |TOR "......T,S..|
00000BE0: 14 C7 02 99 22 11 57 48 49 43 48 20 42 59 54 45 |....".WHICH BYTE|
00000BF0: 20 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 | DO YOU WANT TO |
00000C00: 43 48 41 4E 47 45 22 00 0E 14 C8 02 85 42 00 23 |CHANGE"......B.#|
00000C10: 14 CB 02 98 31 35 2C 22 55 31 22 31 30 3B 30 3B |....15,"U1"10;0;|
00000C20: 54 3B 53 00 36 14 CD 02 98 31 35 2C 22 42 2D 50 |T;S.6....15,"B-P|
00000C30: 3A 22 31 30 3B 42 00 58 14 D0 02 99 22 41 53 43 |:"10;B.X...."ASC|
00000C40: 49 49 20 56 41 4C 55 45 20 4F 46 20 42 59 54 45 |II VALUE OF BYTE|
00000C50: 20 50 4C 45 41 53 45 22 00 60 14 D2 02 85 42 59 | PLEASE".`....BY|
00000C60: 00 6F 14 D5 02 98 31 30 2C C7 28 42 59 29 3B 00 |.o....10,.(BY);.|
00000C70: 84 14 DF 02 98 31 35 2C 22 55 32 22 31 30 3B 30 |.....15,"U2"10;0|
00000C80: 3B 54 3B 53 00 8C 14 E4 02 A0 31 30 00 94 14 E9 |;T;S......10....|
00000C90: 02 A0 31 35 00 9D 14 EE 02 89 32 39 30 00 AA 14 |..15......290...|
00000CA0: 20 03 9F 31 35 2C 38 2C 31 35 00 BB 14 25 03 9F | ..15,8,15...%..|
00000CB0: 31 30 2C 38 2C 31 30 2C 22 23 22 00 DA 14 29 03 |10,8,10,"#"...).|
00000CC0: 99 22 11 11 57 48 49 43 48 20 54 52 41 43 4B 20 |."..WHICH TRACK |
00000CD0: 26 20 53 45 43 54 4F 52 20 22 00 E3 14 2A 03 85 |& SECTOR "...*..|
00000CE0: 54 2C 53 00 0D 15 2B 03 99 22 11 57 48 49 43 48 |T,S...+..".WHICH|
00000CF0: 20 42 59 54 45 53 20 44 4F 20 59 4F 55 20 57 41 | BYTES DO YOU WA|
00000D00: 4E 54 20 54 4F 20 43 48 41 4E 47 45 22 00 15 15 |NT TO CHANGE"...|
00000D10: 2C 03 85 42 24 00 40 15 2D 03 42 B2 C3 28 42 24 |,..B$.@.-.B..(B$|
00000D20: 29 3A 81 58 B2 31 A4 42 3A 8B CA 28 42 24 2C 58 |):.X.1.B:..(B$,X|
00000D30: 2C 31 29 B2 22 2D 22 A7 54 54 B2 58 3A 58 B2 42 |,1)."-".TT.X:X.B|
00000D40: 00 46 15 2E 03 82 00 6A 15 2F 03 41 B2 C5 28 C8 |.F.....j./.A..(.|
00000D50: 28 42 24 2C 54 54 AB 31 29 29 3A 42 B2 C5 28 C9 |(B$,TT.1)):B..(.|
00000D60: 28 42 24 2C 42 AB 54 54 29 29 00 7F 15 31 03 98 |(B$,B.TT))...1..|
00000D70: 31 35 2C 22 55 31 22 31 30 3B 30 3B 54 3B 53 00 |15,"U1"10;0;T;S.|
00000D80: 9C 15 34 03 85 22 41 53 43 49 49 20 56 41 4C 55 |..4.."ASCII VALU|
00000D90: 45 20 50 4C 45 41 53 45 22 3B 42 59 00 A8 15 39 |E PLEASE";BY...9|
00000DA0: 03 81 54 54 B2 41 A4 42 00 BC 15 3E 03 98 31 35 |..TT.A.B...>..15|
00000DB0: 2C 22 42 2D 50 3A 22 31 30 3B 54 54 00 CB 15 43 |,"B-P:"10;TT...C|
00000DC0: 03 98 31 30 2C C7 28 42 59 29 3B 00 D1 15 48 03 |..10,.(BY);...H.|
00000DD0: 82 00 E6 15 4D 03 98 31 35 2C 22 55 32 22 31 30 |....M..15,"U2"10|
00000DE0: 3B 30 3B 54 3B 53 00 EE 15 52 03 A0 31 30 00 F6 |;0;T;S...R..10..|
00000DF0: 15 5C 03 A0 31 35 00 FF 15 66 03 89 32 39 30 00 |.\..15...f..290.|
00000E00: 21 16 E8 03 9F 31 35 2C 38 2C 31 35 3A 99 22 11 |!....15,8,15:.".|
00000E10: 11 11 20 44 49 53 4B 20 53 54 41 54 55 53 20 22 |.. DISK STATUS "|
00000E20: 3B 00 35 16 E9 03 84 31 35 2C 41 24 2C 42 24 2C |;.5....15,A$,B$,|
00000E30: 43 24 2C 44 24 00 4C 16 EA 03 99 41 24 22 20 22 |C$,D$.L....A$" "|
00000E40: 42 24 22 20 22 43 24 22 20 22 44 24 00 54 16 EB |B$" "C$" "D$.T..|
00000E50: 03 A0 31 35 00 00 00 FF EA EA 3B FC FF 54 20 |..15......;..T |
.......53280,6.(.....13)"......DOS TOOL"
.J.....8)". BY STEFAAN JANSSENS".P....
.8)".MANY THANKS TO DANNY DOYLE".......8
)".. 1. RESTORE FORMAT".......8)". 2. CH
ANGE FORMAT".L.....8)". 3. CHANGE NAME &
ID".......8)". 4. VIEW SECTOR".......8)
". 5. VIEW T18 S0".......8)". 6. CHANGE
A BYTE".?.....8)". 7. CHANGE BYTES A-B".
\.....12)".YOUR CHOICE";:.C$.L....C$."1"
.199.|....C$."2".100......C$."3".110...
..C$."4".400...!..C$."5".500..."..C$."6"
.700.L.#..C$."7".800.T.$..10...D...7)"..
WHICH FORMAT [ONE CHARACTER!]";:.DO$.#.F
.DO$.H(DO$,1):DO$.G(E(DO$)).,.I..200.9.N
..15,8,15.J.O..10,8,10,"#".`.P..15,"U1"1
0;0;18;0.U.Q..15,"B-P:"10;144...S..T.144
.159:.#10,A$...T.NA$.NA$.A$:....U..15,"B
-P:"10;162.P.V..#10,A$:.#10,B$:ID$.A$.B$
...X.."..PRESENT NAME:"NA$...Y..".PRESEN
T ID :"ID$...}.."..NEW NAME";NA$.?.~..C
(NA$).16..".NAME TOO LONG":.125.U..."..
NEW ID ";ID$......C(ID$)..2..".ONLY 2-C
HARACTER ID'S PLEASE":.127......C(NA$)..
18.NA$.NA$.G(160):.130.C....15,"B-P:"10;
144.P....10,NA$;......15,"B-P:"10;162...
...10,ID$;......15,"U2"10;0;18;0..... 10
..... 15.!. ..290./.G.DO$.G(65).<.H..15,
8,15.M.R..10,8,10,"#".C....15,"U1"10;0;1
8;0.V....15,"B-P:"10;2......10,DO$;.....
.15,"U2"10;0;18;0..... 10..... 15..."..1
5,8,15,"I".B.,. 15.L.6..1000.Y....15,8,1
5......10,8,10,"#"......"..TRACK [1-35]"
;T... .."SECTOR [0-21MAX]";S......T.35.T
.0.415.<....S.21.416.I....(T.30.S.17).(T
.24.S.18).(T.17.S.19).416.~....15,"U1"10
;0;T;S......Q.0.255:.#10,A$......Q;:..7)
F(A$.G(0));.M.....12)A$;:.A$..G(34).."."
:.440.S..........A$:.A$."".440......A$."
*".Q.255.........B. 10...G. 15:.1000.!..
..15,8,15.2....10,8,10,"#".Q...."BAM OR
DIRECTORY HEADER"._...."B/D";C$.O....C$.
"B".550.....C$."D".600......515...&..15
,"U1"10;0;18;0...+..15,"B-P"10,0...,..#1
0,A$...-..0;.5)"FIRST DIRECTORY BLOCK TR
ACK "F(A$.G(0))......#10,A$.../..1;.5)"F
IRST DIRECTORY BLOCK SECTOR"F(A$.G(0)).:
.0..#10,A$.Q.1..2;.5);F(A$.G(0));.Y.2..F
(A$.G(0)).65.." 4040 FORMAT":.565...3.."
FORMAT"...5..T.3.143:.#10,A$...6..T;:..
7)F(A$.G(0));.W.7...12)A$;:.A$..G(34).."
.":.569...8.....9..198,0:.198,1:....:. 1
0: 15:.1000...X..15,"U1"10;0;18;0.-.]..1
5,"B-P"10,144.?._..".DISK NAME".V.B..T.1
44.159:.#10,A$.N.C..T;:..7)F(A$.G(0));..
.D...12)A$;:.A$..G(34)..".":.614...E....
.F..198,0:.198,1:..A.G..".SHIFTED SPACES
".P.H..T.160.161...L..#10,A$...M..T;:..7
)F(A$.G(0));...N...12)A$;:.A$..G(34)..".
":.624...O...".P...2.Q..".DISK ID".A.R..
T.162.163.M.V..#10,A$.E.W..T;:..7)F(A$.G
(0));...X...12)A$;:.A$..G(34)..".":.634.
..Y.....Z.....{..".SHIFTED SPACE"......#
10,A$.M....T;:..7)F(A$.G(0));.......12)A
$;:.A$..G(34)..".":.645............".DOS
VERSION & FORMAT TYPE".&....T.165.166.2
....#10,A$.J....T;:..7)F(A$.G(0));.L....
.12)A$;:.A$..G(34)..".":.654.R.....X....
......".SHIFTED SPACES"......T.167.170..
....#10,A$.B....T;:..7)F(A$.G(0));......
.12)A$;:.A$..G(34)..".":.664............
198,0:.198,1:.......".NULLS , NOT USED".
&....T.171.255.2....#10,A$.J....T;:..7)F
(A$.G(0));.L. ...12)A$;:.A$..G(34)..".":
.674.R..........198,0:.198,1:...... 10:
15:.1000......15,8,15...A..10,8,10,"#".U
.E.."..WHICH TRACK & SECTOR "...F..T,S..
.G..".WHICH BYTE DO YOU WANT TO CHANGE".
..H..B.#.K..15,"U1"10;0;T;S.6.M..15,"B-P
:"10;B.X.P.."ASCII VALUE OF BYTE PLEASE"
.`.R..BY.O.U..10,G(BY);......15,"U2"10;0
;T;S..... 10..... 15......290... ..15,8,
15...%..10,8,10,"#".Z.).."..WHICH TRACK
& SECTOR "...*..T,S...+..".WHICH BYTES D
O YOU WANT TO CHANGE"...,..B$.@.-.B.C(B$
):.X.1.B:.J(B$,X,1)."-".TT.X:X.B.F.....J
./.A.E(H(B$,TT.1)):B.E(I(B$,B.TT))..1..
15,"U1"10;0;T;S...4.."ASCII VALUE PLEASE
";BY...9..TT.A.B...>..15,"B-P:"10;TT.K.C
..10,G(BY);.Q.H.....M..15,"U2"10;0;T;S..
.R. 10...\. 15...F..290.!....15,8,15:.".
.. DISK STATUS ";.5....15,A$,B$,C$,D$.L.
...A$" "B$" "C$" "D$.T... 15......;..T
> CLICK IMAGE PREVIEW FOR FULL MODAL