TIDY DIRECTORY
FILE INFORMATION
FILENAME(S): TIDY DIRECTORY
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-12-02 00:02:00
APPEARS ON: 1 disk(s)
FILE HASH
15e340586c2b25346c13dfb9f16a76c2c675d2ac6ba3b917725f7bb7bcdd48b5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | TIDY DIRECTORY | PRG | earthshaker | 17 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 21 08 01 00 8F 20 0E 12 31 35 34 31 20 44 |..!.... ..1541 D| 00000010: 49 52 45 43 54 4F 52 59 20 53 4F 52 54 45 52 45 |IRECTORY SORTERE| 00000020: 4E 00 3F 08 02 00 8F 20 49 4E 47 45 54 59 50 54 |N.?.... INGETYPT| 00000030: 2F 41 41 4E 47 45 50 41 53 54 20 44 4F 4F 52 00 |/AANGEPAST DOOR.| 00000040: 59 08 03 00 8F 20 4A 2E 50 4C 55 47 42 4F 45 52 |Y.... J.PLUGBOER| 00000050: 20 2C 20 42 55 53 53 55 4D 00 79 08 04 00 8F 20 | , BUSSUM.y.... | 00000060: 54 2E 42 2E 56 2E 20 12 56 2E 43 2E 47 2E 4E 2E |T.B.V. .V.C.G.N.| 00000070: 20 44 45 4E 20 48 41 41 47 00 9B 08 05 00 8F 20 | DEN HAAG...... | 00000080: 4C 45 5A 45 4E 2F 53 4F 52 54 45 52 45 4E 2F 48 |LEZEN/SORTEREN/H| 00000090: 45 52 53 43 48 52 49 4A 56 45 4E 00 A1 08 06 00 |ERSCHRIJVEN.....| 000000A0: 3A 00 BB 08 07 00 8F 20 12 56 52 49 4A 20 56 41 |:...... .VRIJ VA| 000000B0: 4E 20 43 4F 50 59 52 49 47 48 54 00 C1 08 08 00 |N COPYRIGHT.....| 000000C0: 3A 00 FE 08 09 00 97 35 33 32 38 30 2C 36 3A 97 |:......53280,6:.| 000000D0: 35 33 32 38 31 2C 31 31 3A 99 C7 28 39 29 C7 28 |53281,11:..(9).(| 000000E0: 31 34 29 22 9E 93 11 22 A3 31 33 29 22 D4 C9 C4 |14)"...".13)"...| 000000F0: D9 20 C4 C9 D2 C5 C3 D4 CF D2 D9 11 11 22 00 39 |. ...........".9| 00000100: 09 0A 00 99 22 20 CC 41 41 44 20 44 49 53 4B 20 |...." .AAD DISK | 00000110: 49 4E 20 44 52 49 56 45 2E 22 3A 8D 39 39 3A 99 |IN DRIVE.":.99:.| 00000120: 22 91 05 20 C4 D2 D5 CB A0 CF D0 A0 C5 C5 CE A0 |".. ............| 00000130: D4 CF C5 D4 D3 2E 20 9E 22 00 67 09 0B 00 97 31 |...... .".g....1| 00000140: 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 5A 24 3A |98,0:.198,1:.Z$:| 00000150: 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". | 00000160: 20 20 20 20 20 20 22 00 8F 09 0C 00 9F 31 35 2C | "......15,| 00000170: 38 2C 31 35 2C 22 49 30 22 3A 8D 39 34 3A 8F 20 |8,15,"I0":.94:. | 00000180: 43 4F 4D 4D 41 4E 44 4F 2D 4B 41 4E 41 41 4C 00 |COMMANDO-KANAAL.| 00000190: B1 09 0D 00 9F 32 2C 38 2C 32 2C 22 23 22 3A 8D |.....2,8,2,"#":.| 000001A0: 39 34 3A 8F 20 42 55 46 46 45 52 4B 41 4E 41 41 |94:. BUFFERKANAA| 000001B0: 4C 00 ED 09 0E 00 98 31 35 2C 22 55 31 3A 22 32 |L......15,"U1:"2| 000001C0: 3B 30 3B 31 38 3B 30 3A 8D 39 34 3A 8F 20 20 20 |;0;18;0:.94:. | 000001D0: 44 49 53 4B 20 49 44 20 3A 20 54 52 41 43 4B 20 |DISK ID : TRACK | 000001E0: 31 38 20 2C 20 53 45 43 54 4F 52 20 30 00 0B 0A |18 , SECTOR 0...| 000001F0: 0F 00 98 31 35 2C 22 42 2D 50 3A 22 32 3B 31 34 |...15,"B-P:"2;14| 00000200: 34 3A 8F 20 44 49 53 4B 20 49 44 00 26 0A 10 00 |4:. DISK ID.&...| 00000210: 49 44 24 B2 22 22 3A 4E B2 32 30 3A 8D 39 37 3A |ID$."":N.20:.97:| 00000220: 49 44 24 B2 5A 24 00 54 0A 11 00 99 22 91 C4 49 |ID$.Z$.T...."..I| 00000230: 53 4B 20 4E 41 41 4D 20 3A 20 22 C8 28 49 44 24 |SK NAAM : ".(ID$| 00000240: 2C 31 38 29 22 20 20 20 22 C9 28 49 44 24 2C 32 |,18)" ".(ID$,2| 00000250: 29 22 11 22 00 6F 0A 12 00 8F 20 4D 41 58 49 4D |)".".o.... MAXIM| 00000260: 41 41 4C 20 31 39 20 53 45 43 54 4F 52 45 4E 00 |AAL 19 SECTOREN.| 00000270: 8D 0A 13 00 8F 20 4D 41 58 49 4D 41 41 4C 20 31 |..... MAXIMAAL 1| 00000280: 34 34 20 46 49 4C 45 20 4E 41 4D 45 4E 00 B0 0A |44 FILE NAMEN...| 00000290: 14 00 86 20 53 25 28 31 39 29 3A 8F 20 56 4F 4C |... S%(19):. VOL| 000002A0: 47 45 4E 44 45 20 44 49 52 20 53 45 43 54 4F 52 |GENDE DIR SECTOR| 000002B0: 00 CB 0A 15 00 86 20 46 54 24 28 31 34 34 29 3A |...... FT$(144):| 000002C0: 8F 20 46 49 4C 45 20 54 59 50 45 00 ED 0A 16 00 |. FILE TYPE.....| 000002D0: 86 20 54 53 24 28 31 34 34 29 3A 8F 20 54 26 53 |. TS$(144):. T&S| 000002E0: 20 31 45 20 44 41 54 41 20 42 4C 4F 4B 00 08 0B | 1E DATA BLOK...| 000002F0: 17 00 86 20 4E 46 24 28 31 34 34 29 3A 8F 20 46 |... NF$(144):. F| 00000300: 49 4C 45 20 4E 41 41 4D 00 2C 0B 18 00 86 20 46 |ILE NAAM.,.... F| 00000310: 45 24 28 31 34 34 29 3A 8F 20 46 49 4C 45 53 54 |E$(144):. FILEST| 00000320: 52 55 43 54 55 55 52 2D 44 41 54 41 00 4C 0B 19 |RUCTUUR-DATA.L..| 00000330: 00 86 20 53 4B 24 28 31 34 34 29 3A 8F 20 53 4F |.. SK$(144):. SO| 00000340: 52 54 45 45 52 20 4C 41 42 45 4C 53 00 95 0B 1A |RTEER LABELS....| 00000350: 00 86 20 54 24 28 34 29 3A 54 24 28 31 29 B2 22 |.. T$(4):T$(1)."| 00000360: 53 45 51 22 3A 54 24 28 32 29 B2 22 50 52 47 22 |SEQ":T$(2)."PRG"| 00000370: 3A 54 24 28 33 29 B2 22 55 53 52 22 3A 54 24 28 |:T$(3)."USR":T$(| 00000380: 34 29 B2 22 52 45 4C 22 3A 8F 20 46 49 4C 45 20 |4)."REL":. FILE | 00000390: 54 59 50 45 53 00 C7 0B 1B 00 81 49 B2 31 A4 33 |TYPES......I.1.3| 000003A0: 30 3A 5A 30 24 B2 5A 30 24 AA C7 28 30 29 3A 82 |0:Z0$.Z0$..(0):.| 000003B0: 3A 8F 20 20 4C 45 45 47 20 44 49 52 45 43 54 4F |:. LEEG DIRECTO| 000003C0: 52 59 20 56 45 4C 44 00 E7 0B 1C 00 8F 20 4C 45 |RY VELD...... LE| 000003D0: 45 53 20 44 49 52 45 43 54 4F 52 59 20 50 52 47 |ES DIRECTORY PRG| 000003E0: 2E 20 4E 41 4D 45 4E 00 02 0C 1D 00 45 B2 31 3A |. NAMEN.....E.1:| 000003F0: 53 B2 31 3A 8F 20 53 54 41 52 54 20 53 45 43 54 |S.1:. START SECT| 00000400: 4F 52 00 21 0C 1E 00 98 31 35 2C 22 55 31 3A 22 |OR.!....15,"U1:"| 00000410: 32 3B 30 3B 31 38 3B 53 3A 8D 39 34 3A 42 50 B2 |2;0;18;S:.94:BP.| 00000420: 31 00 57 0C 1F 00 98 31 35 2C 22 42 2D 50 3A 22 |1.W....15,"B-P:"| 00000430: 32 3B 42 50 3A 8D 39 38 3A 53 25 28 53 29 B2 41 |2;BP:.98:S%(S).A| 00000440: 3A 8F 20 4C 45 45 53 20 56 4F 4C 47 45 4E 44 45 |:. LEES VOLGENDE| 00000450: 20 53 45 43 54 4F 52 00 84 0C 20 00 98 31 35 2C | SECTOR... ..15,| 00000460: 22 42 2D 50 3A 22 32 3B 42 50 3A 8D 39 38 3A 46 |"B-P:"2;BP:.98:F| 00000470: 54 B2 41 3A 8F 20 4C 45 45 53 20 46 49 4C 45 20 |T.A:. LEES FILE | 00000480: 54 59 50 45 00 AE 0C 21 00 8B 46 54 B2 30 B0 46 |TYPE...!..FT.0.F| 00000490: 54 B2 31 32 38 A7 42 50 B2 42 50 AA 33 31 3A 89 |T.128.BP.BP.31:.| 000004A0: 34 31 3A 8F 20 4C 45 45 47 20 56 45 4C 44 00 DB |41:. LEEG VELD..| 000004B0: 0C 22 00 8B 46 54 B3 31 32 38 A7 99 22 11 3F 46 |."..FT.128..".?F| 000004C0: 49 4C 45 20 4E 4F 54 20 43 4C 4F 53 45 44 20 20 |ILE NOT CLOSED | 000004D0: 45 52 52 4F 52 91 22 3A 89 39 32 00 E9 0C 23 00 |ERROR.":.92...#.| 000004E0: 46 54 24 28 45 29 B2 41 24 00 05 0D 24 00 4E B2 |FT$(E).A$...$.N.| 000004F0: 32 3A 8D 39 37 3A 54 53 24 28 45 29 B2 5A 24 3A |2:.97:TS$(E).Z$:| 00000500: 8F 20 54 26 53 00 23 0D 25 00 4E B2 31 36 3A 8D |. T&S.#.%.N.16:.| 00000510: 39 37 3A 4E 46 24 28 45 29 B2 5A 24 3A 8F 20 4E |97:NF$(E).Z$:. N| 00000520: 41 41 4D 00 4B 0D 26 00 4E B2 31 31 3A 8D 39 37 |AAM.K.&.N.11:.97| 00000530: 3A 46 45 24 28 45 29 B2 5A 24 3A 8F 20 53 54 52 |:FE$(E).Z$:. STR| 00000540: 55 43 54 55 55 52 20 44 41 54 41 00 87 0D 27 00 |UCTUUR DATA...'.| 00000550: 99 2C 22 20 20 22 4E 46 24 28 45 29 A3 33 30 29 |.," "NF$(E).30)| 00000560: 22 3A 20 22 54 24 28 46 54 AB 31 32 38 29 3A 8F |": "T$(FT.128):.| 00000570: 20 50 52 49 4E 54 20 46 49 4C 45 4E 41 41 4D 20 | PRINT FILENAAM | 00000580: 45 4E 20 54 59 50 45 00 99 0D 28 00 42 50 B2 42 |EN TYPE...(.BP.B| 00000590: 50 AA 32 3A 45 B2 45 AA 31 00 B8 0D 29 00 8B 42 |P.2:E.E.1...)..B| 000005A0: 50 B3 32 35 36 A7 33 32 3A 8F 20 56 4F 4C 47 45 |P.256.32:. VOLGE| 000005B0: 4E 44 45 20 46 49 4C 45 00 E8 0D 2A 00 8B 53 25 |NDE FILE...*..S%| 000005C0: 28 53 29 B3 B1 32 35 35 A7 53 B2 53 25 28 53 29 |(S)..255.S.S%(S)| 000005D0: 3A 89 33 30 3A 8F 20 20 20 56 4F 4C 47 45 4E 44 |:.30:. VOLGEND| 000005E0: 45 20 53 45 43 54 4F 52 00 13 0E 2B 00 85 22 11 |E SECTOR...+..".| 000005F0: 44 4F 4F 52 47 41 41 4E 20 28 4A 2F 4E 29 20 20 |DOORGAAN (J/N) | 00000600: 4A 9D 9D 9D 22 3B 5A 24 3A 8B 5A 24 B2 22 4E 22 |J...";Z$:.Z$."N"| 00000610: A7 39 32 00 36 0E 2C 00 45 B2 45 AB 31 3A 8B 45 |.92.6.,.E.E.1:.E| 00000620: B2 30 A7 36 37 3A 8F 20 44 49 52 45 43 54 4F 52 |.0.67:. DIRECTOR| 00000630: 59 20 4C 45 45 47 00 6A 0E 2D 00 85 22 11 53 4F |Y LEEG.j.-..".SO| 00000640: 52 54 45 52 45 4E 20 4F 50 20 46 49 4C 45 2D 54 |RTEREN OP FILE-T| 00000650: 59 50 45 20 28 4A 2F 4E 29 20 20 4A 9D 9D 9D 22 |YPE (J/N) J..."| 00000660: 3B 5A 24 3A 46 54 24 B2 5A 24 00 A2 0E 2E 00 8F |;Z$:FT$.Z$......| 00000670: 20 53 4F 52 54 45 45 52 20 44 45 20 44 49 52 45 | SORTEER DE DIRE| 00000680: 43 54 4F 52 59 20 4D 45 54 20 44 45 20 53 48 45 |CTORY MET DE SHE| 00000690: 4C 4C 20 53 4F 52 54 45 45 52 20 4D 45 54 48 4F |LL SORTEER METHO| 000006A0: 44 45 00 D6 0E 2F 00 97 35 33 32 36 35 2C 31 31 |DE.../..53265,11| 000006B0: 3A 8F 20 20 53 43 52 45 45 4E 20 42 4C 41 4E 4B |:. SCREEN BLANK| 000006C0: 20 56 4F 4F 52 20 20 48 4F 47 45 52 45 20 53 4E | VOOR HOGERE SN| 000006D0: 45 4C 48 45 49 44 00 E6 0E 30 00 81 49 B2 31 A4 |ELHEID...0..I.1.| 000006E0: 45 3A 4B B2 31 36 00 14 0F 31 00 81 4A B2 31 A4 |E:K.16...1..J.1.| 000006F0: 31 36 3A 8B 20 CA 28 4E 46 24 28 49 29 2C 4A 2C |16:. .(NF$(I),J,| 00000700: 31 29 B2 C7 28 31 36 30 29 A7 4B B2 4A AB 31 3A |1)..(160).K.J.1:| 00000710: 4A B2 31 36 00 2E 0F 32 00 82 4A 3A 53 4B 24 28 |J.16...2..J:SK$(| 00000720: 49 29 B2 C8 28 4E 46 24 28 49 29 2C 4B 29 00 50 |I)..(NF$(I),K).P| 00000730: 0F 33 00 8B 46 54 24 B2 22 4A 22 A7 53 4B 24 28 |.3..FT$."J".SK$(| 00000740: 49 29 B2 46 54 24 28 49 29 AA 53 4B 24 28 49 29 |I).FT$(I).SK$(I)| 00000750: 00 5B 0F 34 00 82 49 3A 4D B2 45 00 70 0F 35 00 |.[.4..I:M.E.p.5.| 00000760: 4D B2 B5 28 4D AD 32 29 3A 8B 4D B2 30 A7 36 37 |M..(M.2):.M.0.67| 00000770: 00 7E 0F 36 00 4B B2 45 AB 4D 3A 4A B2 30 00 8A |.~.6.K.E.M:J.0..| 00000780: 0F 37 00 8B 4A B1 4B A7 35 33 00 92 0F 38 00 49 |.7..J.K.53...8.I| 00000790: B2 4A 00 9E 0F 39 00 8B 49 B3 30 A7 35 39 00 B6 |.J...9..I.0.59..| 000007A0: 0F 3A 00 8B 53 4B 24 28 49 AA 4D 29 B3 53 4B 24 |.:..SK$(I.M).SK$| 000007B0: 28 49 29 A7 36 30 00 C4 0F 3B 00 4A B2 4A AA 31 |(I).60...;.J.J.1| 000007C0: 3A 89 35 35 00 EE 0F 3C 00 41 24 B2 46 54 24 28 |:.55...<.A$.FT$(| 000007D0: 49 29 3A 46 54 24 28 49 29 B2 46 54 24 28 49 AA |I):FT$(I).FT$(I.| 000007E0: 4D 29 3A 46 54 24 28 49 AA 4D 29 B2 41 24 00 18 |M):FT$(I.M).A$..| 000007F0: 10 3D 00 41 24 B2 54 53 24 28 49 29 3A 54 53 24 |.=.A$.TS$(I):TS$| 00000800: 28 49 29 B2 54 53 24 28 49 AA 4D 29 3A 54 53 24 |(I).TS$(I.M):TS$| 00000810: 28 49 AA 4D 29 B2 41 24 00 42 10 3E 00 41 24 B2 |(I.M).A$.B.>.A$.| 00000820: 4E 46 24 28 49 29 3A 4E 46 24 28 49 29 B2 4E 46 |NF$(I):NF$(I).NF| 00000830: 24 28 49 AA 4D 29 3A 4E 46 24 28 49 AA 4D 29 B2 |$(I.M):NF$(I.M).| 00000840: 41 24 00 6C 10 3F 00 41 24 B2 46 45 24 28 49 29 |A$.l.?.A$.FE$(I)| 00000850: 3A 46 45 24 28 49 29 B2 46 45 24 28 49 AA 4D 29 |:FE$(I).FE$(I.M)| 00000860: 3A 46 45 24 28 49 AA 4D 29 B2 41 24 00 96 10 40 |:FE$(I.M).A$...@| 00000870: 00 41 24 B2 53 4B 24 28 49 29 3A 53 4B 24 28 49 |.A$.SK$(I):SK$(I| 00000880: 29 B2 53 4B 24 28 49 AA 4D 29 3A 53 4B 24 28 49 |).SK$(I.M):SK$(I| 00000890: AA 4D 29 B2 41 24 00 A4 10 41 00 49 B2 49 AB 4D |.M).A$...A.I.I.M| 000008A0: 3A 89 35 37 00 BF 10 42 00 8F 20 48 45 52 53 43 |:.57...B.. HERSC| 000008B0: 48 52 49 4A 46 20 44 49 52 45 43 54 4F 52 59 00 |HRIJF DIRECTORY.| 000008C0: E9 10 43 00 99 22 93 11 22 A3 31 33 29 22 D4 C9 |..C.."..".13)"..| 000008D0: C4 D9 20 C4 C9 D2 C5 C3 D4 CF D2 D9 11 11 22 3A |.. ...........":| 000008E0: 97 35 33 32 36 35 2C 32 37 00 17 11 44 00 99 22 |.53265,27...D.."| 000008F0: 91 C4 49 53 4B 20 4E 41 41 4D 20 3A 20 22 C8 28 |..ISK NAAM : ".(| 00000900: 49 44 24 2C 31 38 29 22 20 20 20 22 C9 28 49 44 |ID$,18)" ".(ID| 00000910: 24 2C 32 29 22 11 22 00 4A 11 45 00 5A 24 B2 C7 |$,2)".".J.E.Z$..| 00000920: 28 30 29 AA C7 28 32 35 35 29 3A 8F 20 20 41 46 |(0)..(255):. AF| 00000930: 53 4C 55 49 54 49 4E 47 20 44 49 52 45 43 54 4F |SLUITING DIRECTO| 00000940: 52 59 20 4B 45 54 54 49 4E 47 00 65 11 46 00 53 |RY KETTING.e.F.S| 00000950: B2 31 3A 4E B2 31 3A 8F 20 53 54 41 52 54 20 53 |.1:N.1:. START S| 00000960: 45 43 54 4F 52 00 99 11 47 00 98 31 35 2C 22 55 |ECTOR...G..15,"U| 00000970: 31 3A 22 32 3B 30 3B 31 38 3B 53 3A 8D 39 34 3A |1:"2;0;18;S:.94:| 00000980: 8F 20 20 20 4C 45 45 53 20 44 49 52 45 43 54 4F |. LEES DIRECTO| 00000990: 52 59 20 53 45 43 54 4F 52 00 B0 11 48 00 42 50 |RY SECTOR...H.BP| 000009A0: B2 32 3A 8F 20 45 45 52 53 54 45 20 56 45 4C 44 |.2:. EERSTE VELD| 000009B0: 00 D3 11 49 00 8B 4E B1 45 A7 38 31 3A 8F 20 44 |...I..N.E.81:. D| 000009C0: 49 52 45 43 54 4F 52 59 20 47 45 53 43 48 52 45 |IRECTORY GESCHRE| 000009D0: 56 45 4E 00 F4 11 4A 00 8B 42 50 B3 32 35 36 A7 |VEN...J..BP.256.| 000009E0: 37 37 3A 8F 20 53 45 43 54 4F 52 20 4E 49 45 54 |77:. SECTOR NIET| 000009F0: 20 56 4F 4C 00 2B 12 4B 00 98 31 35 2C 22 55 32 | VOL.+.K..15,"U2| 00000A00: 3A 22 32 3B 30 3B 31 38 3B 53 3A 8D 39 34 3A 8F |:"2;0;18;S:.94:.| 00000A10: 20 20 20 53 43 48 52 49 4A 46 20 44 49 52 45 43 | SCHRIJF DIREC| 00000A20: 54 4F 52 59 20 53 45 43 54 4F 52 00 3B 12 4C 00 |TORY SECTOR.;.L.| 00000A30: 53 B2 53 25 28 53 29 3A 89 37 31 00 70 12 4D 00 |S.S%(S):.71.p.M.| 00000A40: 98 31 35 2C 22 42 2D 50 3A 22 3B 32 3B 42 50 3A |.15,"B-P:";2;BP:| 00000A50: 8F 20 5A 45 54 20 50 4F 49 4E 54 45 52 20 4E 41 |. ZET POINTER NA| 00000A60: 41 52 20 56 4F 4C 47 45 4E 44 45 20 56 45 4C 44 |AR VOLGENDE VELD| 00000A70: 00 9A 12 4E 00 99 2C 22 20 20 22 4E 46 24 28 4E |...N..," "NF$(N| 00000A80: 29 A3 33 30 29 22 3A 20 22 54 24 28 C6 28 46 54 |).30)": "T$(.(FT| 00000A90: 24 28 4E 29 29 AB 31 32 38 29 00 CD 12 4F 00 98 |$(N)).128)...O..| 00000AA0: 32 2C 46 54 24 28 4E 29 3B 54 53 24 28 4E 29 3B |2,FT$(N);TS$(N);| 00000AB0: 4E 46 24 28 4E 29 3B 46 45 24 28 4E 29 3B 3A 8F |NF$(N);FE$(N);:.| 00000AC0: 20 53 43 48 52 49 4A 46 20 56 45 4C 44 00 E4 12 | SCHRIJF VELD...| 00000AD0: 50 00 42 50 B2 42 50 AA 33 32 3A 4E B2 4E AA 31 |P.BP.BP.32:N.N.1| 00000AE0: 3A 89 37 33 00 00 13 51 00 8B 42 50 B1 32 35 35 |:.73...Q..BP.255| 00000AF0: A7 38 35 3A 8F 20 53 45 43 54 4F 52 20 56 4F 4C |.85:. SECTOR VOL| 00000B00: 00 14 13 52 00 98 31 35 2C 22 42 2D 50 3A 22 3B |...R..15,"B-P:";| 00000B10: 32 3B 42 50 00 2C 13 53 00 98 32 2C 5A 30 24 3B |2;BP.,.S..2,Z0$;| 00000B20: 3A 8F 20 4C 45 45 47 20 56 45 4C 44 00 3D 13 54 |:. LEEG VELD.=.T| 00000B30: 00 42 50 B2 42 50 AA 33 32 3A 89 38 31 00 55 13 |.BP.BP.32:.81.U.| 00000B40: 55 00 42 50 B2 30 3A 98 31 35 2C 22 42 2D 50 3A |U.BP.0:.15,"B-P:| 00000B50: 22 32 3B 42 50 00 7F 13 56 00 98 32 2C 5A 24 3B |"2;BP...V..2,Z$;| 00000B60: 3A 8F 20 20 45 49 4E 44 45 20 56 41 4E 20 44 49 |:. EINDE VAN DI| 00000B70: 52 45 43 54 4F 52 59 20 4B 45 54 54 49 4E 47 00 |RECTORY KETTING.| 00000B80: B6 13 57 00 98 31 35 2C 22 55 32 3A 22 32 3B 30 |..W..15,"U2:"2;0| 00000B90: 3B 31 38 3B 53 3A 8D 39 34 3A 8F 20 A0 20 53 43 |;18;S:.94:. . SC| 00000BA0: 48 52 49 4A 46 20 44 49 52 45 43 54 4F 52 59 20 |HRIJF DIRECTORY | 00000BB0: 53 45 43 54 4F 52 00 E4 13 58 00 5A 24 B2 C8 28 |SECTOR...X.Z$..(| 00000BC0: 5A 30 24 2C 32 29 3A 8F 20 56 4F 4C 47 45 4E 44 |Z0$,2):. VOLGEND| 00000BD0: 45 20 53 45 43 54 4F 52 45 4E 20 5A 49 4A 4E 20 |E SECTOREN ZIJN | 00000BE0: 4C 45 45 47 00 02 14 59 00 53 B2 53 25 28 53 29 |LEEG...Y.S.S%(S)| 00000BF0: 3A 8B 53 B2 32 35 35 A7 39 32 3A 8F 20 4B 4C 41 |:.S.255.92:. KLA| 00000C00: 41 52 00 3B 14 5A 00 98 31 35 2C 22 55 31 3A 22 |AR.;.Z..15,"U1:"| 00000C10: 32 3B 30 3B 31 38 3B 53 3A 8D 39 34 3A 8F 20 20 |2;0;18;S:.94:. | 00000C20: 20 4C 45 45 53 20 4C 45 47 45 20 44 49 52 45 43 | LEES LEGE DIREC| 00000C30: 54 4F 52 59 20 53 45 43 54 4F 52 00 5D 14 5B 00 |TORY SECTOR.].[.| 00000C40: 42 50 B2 32 3A 89 38 32 3A 8F 20 53 45 43 54 4F |BP.2:.82:. SECTO| 00000C50: 52 20 53 43 48 4F 4F 4E 4D 41 4B 45 4E 00 98 14 |R SCHOONMAKEN...| 00000C60: 5C 00 85 22 11 20 56 4F 4C 47 45 4E 44 45 20 53 |\..". VOLGENDE S| 00000C70: 43 48 49 4A 46 20 28 4A 2F 4E 29 20 20 4A 9D 9D |CHIJF (J/N) J..| 00000C80: 9D 22 3B 5A 24 3A 8B 5A 24 B2 22 4A 22 A7 A0 32 |.";Z$:.Z$."J"..2| 00000C90: 3A A0 31 35 3A 9C 3A 8A 00 AD 14 5D 00 A0 32 3A |:.15:.:....]..2:| 00000CA0: A0 31 35 3A 99 22 93 22 3B 3A 9C 3A 80 00 DE 14 |.15:.".";:.:....| 00000CB0: 5E 00 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C |^..15,EN,EM$,ET,| 00000CC0: 45 53 3A 8B 45 4E B2 30 A7 8E 3A 8F 20 4C 45 45 |ES:.EN.0..:. LEE| 00000CD0: 53 20 45 52 52 4F 52 2D 4B 41 4E 41 41 4C 00 07 |S ERROR-KANAAL..| 00000CE0: 15 5F 00 99 22 93 12 C4 C9 D3 CB A0 C5 D2 D2 CF |._.."...........| 00000CF0: D2 92 22 45 4E 3B 45 4D 24 3B 45 54 3B 45 53 3A |.."EN;EM$;ET;ES:| 00000D00: 8D 39 39 3A 89 39 32 00 2C 15 60 00 8F 20 4C 45 |.99:.92.,.`.. LE| 00000D10: 45 53 20 4E 20 4B 41 52 41 4B 54 45 52 53 20 56 |ES N KARAKTERS V| 00000D20: 41 4E 20 44 45 20 42 55 46 46 45 52 00 4E 15 61 |AN DE BUFFER.N.a| 00000D30: 00 5A 24 B2 22 22 3A 81 49 B2 31 A4 4E 3A 8D 39 |.Z$."":.I.1.N:.9| 00000D40: 38 3A 5A 24 B2 5A 24 AA 41 24 3A 82 3A 8E 00 89 |8:Z$.Z$.A$:.:...| 00000D50: 15 62 00 A1 23 32 2C 41 24 3A 41 24 B2 C8 28 41 |.b..#2,A$:A$..(A| 00000D60: 24 AA C7 28 30 29 2C 31 29 3A 41 B2 C6 28 41 24 |$..(0),1):A..(A$| 00000D70: 29 3A 42 50 B2 42 50 AA 31 3A 8E 3A 8F 20 4C 45 |):BP.BP.1:.:. LE| 00000D80: 45 53 20 42 55 46 46 45 52 00 AE 15 63 00 81 4C |ES BUFFER...c..L| 00000D90: 4F 4F 50 B2 31 A4 32 30 30 30 3A 82 4C 4F 4F 50 |OOP.1.2000:.LOOP| 00000DA0: 3A 8E 3A 8F 20 20 57 41 43 48 54 4C 55 53 00 00 |:.:. WACHTLUS..| 00000DB0: 00 AA 22 DD 33 07 B4 FF |..".3... |
..!.... ..1541 DIRECTORY SORTEREN.?.... INGETYPT/AANGEPAST DOOR.Y.... J.PLUGBOER , BUSSUM.Y.... T.B.V. .V.C.G.N. DEN HAA G...... LEZEN/SORTEREN/HERSCHRIJVEN..... :...... .VRIJ VAN COPYRIGHT.A...:......5 3280,6:.53281,11:.G(9)G(14)"...".13)"TID Y DIRECTORY..".9...." LAAD DISK IN DRIVE .":.99:.".. DRUK OP EEN TOETS. .".G....1 98,0:.198,1:.Z$:.". ". .....15,8,15,"I0":.94:. COMMANDO-KANAAL. .....2,8,2,"#":.94:. BUFFERKANAAL......1 5,"U1:"2;0;18;0:.94:. DISK ID : TRACK 18 , SECTOR 0......15,"B-P:"2;144:. DISK ID.&...ID$."":N.20:.97:ID$.Z$.T....".DI SK NAAM : "H(ID$,18)" "I(ID$,2)".".O.. .. MAXIMAAL 19 SECTOREN...... MAXIMAAL 1 44 FILE NAMEN...... S%(19):. VOLGENDE DI R SECTOR.K.... FT$(144):. FILE TYPE..... . TS$(144):. T&S 1E DATA BLOK...... NF$( 144):. FILE NAAM.,.... FE$(144):. FILEST RUCTUUR-DATA.L.... SK$(144):. SORTEER LA BELS...... T$(4):T$(1)."SEQ":T$(2)."PRG" :T$(3)."USR":T$(4)."REL":. FILE TYPES.G. ...I.1.30:Z0$.Z0$.G(0):.:. LEEG DIRECTO RY VELD...... LEES DIRECTORY PRG. NAMEN. ....E.1:S.1:. START SECTOR.!....15,"U1:" 2;0;18;S:.94:BP.1.W....15,"B-P:"2;BP:.98 :S%(S).A:. LEES VOLGENDE SECTOR... ..15, "B-P:"2;BP:.98:FT.A:. LEES FILE TYPE...! ..FT.0.FT.128.BP.BP.31:.41:. LEEG VELD.. ."..FT.128..".?FILE NOT CLOSED ERROR.": .92...#.FT$(E).A$...$.N.2:.97:TS$(E).Z$: . T&S.#.%.N.16:.97:NF$(E).Z$:. NAAM.K.&. N.11:.97:FE$(E).Z$:. STRUCTUUR DATA...'. .," "NF$(E).30)": "T$(FT.128):. PRINT F ILENAAM EN TYPE...(.BP.BP.2:E.E.1...)..B P.256.32:. VOLGENDE FILE...*..S%(S)..255 .S.S%(S):.30:. VOLGENDE SECTOR...+..". DOORGAAN (J/N) J...";Z$:.Z$."N".92.6.,. E.E.1:.E.0.67:. DIRECTORY LEEG.J.-..".SO RTEREN OP FILE-TYPE (J/N) J...";Z$:FT$. Z$...... SORTEER DE DIRECTORY MET DE SHE LL SORTEER METHODE.V./..53265,11:. SCRE EN BLANK VOOR HOGERE SNELHEID...0..I.1. E:K.16...1..J.1.16:. J(NF$(I),J,1).G(160 ).K.J.1:J.16...2..J:SK$(I).H(NF$(I),K).P .3..FT$."J".SK$(I).FT$(I).SK$(I).[.4..I: M.E.P.5.M..(M.2):.M.0.67.~.6.K.E.M:J.0.. .7..J.K.53...8.I.J...9..I.0.59...:..SK$( I.M).SK$(I).60.D.;.J.J.1:.55...<.A$.FT$( I):FT$(I).FT$(I.M):FT$(I.M).A$...=.A$.TS $(I):TS$(I).TS$(I.M):TS$(I.M).A$.B.>.A$. NF$(I):NF$(I).NF$(I.M):NF$(I.M).A$.L.?.A $.FE$(I):FE$(I).FE$(I.M):FE$(I.M).A$...@ .A$.SK$(I):SK$(I).SK$(I.M):SK$(I.M).A$.. .A.I.I.M:.57...B.. HERSCHRIJF DIRECTORY. ..C.."..".13)"TIDY DIRECTORY..":.53265,2 7...D..".DISK NAAM : "H(ID$,18)" "I(ID $,2)".".J.E.Z$.G(0).G(255):. AFSLUITING DIRECTORY KETTING.E.F.S.1:N.1:. START S ECTOR...G..15,"U1:"2;0;18;S:.94:. LEES DIRECTORY SECTOR...H.BP.2:. EERSTE VELD .S.I..N.E.81:. DIRECTORY GESCHREVEN...J. .BP.256.77:. SECTOR NIET VOL.+.K..15,"U2 :"2;0;18;S:.94:. SCHRIJF DIRECTORY SEC TOR.;.L.S.S%(S):.71.P.M..15,"B-P:";2;BP: . ZET POINTER NAAR VOLGENDE VELD...N..," "NF$(N).30)": "T$(F(FT$(N)).128).M.O.. 2,FT$(N);TS$(N);NF$(N);FE$(N);:. SCHRIJF VELD...P.BP.BP.32:N.N.1:.73...Q..BP.255 .85:. SECTOR VOL...R..15,"B-P:";2;BP.,.S ..2,Z0$;:. LEEG VELD.=.T.BP.BP.32:.81.U. U.BP.0:.15,"B-P:"2;BP..V..2,Z$;:. EIND E VAN DIRECTORY KETTING...W..15,"U2:"2;0 ;18;S:.94:. SCHRIJF DIRECTORY SECTOR.. .X.Z$.H(Z0$,2):. VOLGENDE SECTOREN ZIJN LEEG...Y.S.S%(S):.S.255.92:. KLAAR.;.Z.. 15,"U1:"2;0;18;S:.94:. LEES LEGE DIREC TORY SECTOR.].[.BP.2:.82:. SECTOR SCHOON MAKEN...\..". VOLGENDE SCHIJF (J/N) J.. .";Z$:.Z$."J". 2: 15:.:....]. 2: 15:."." ;:.:....^..15,EN,EM$,ET,ES:.EN.0..:. LEE S ERROR-KANAAL..._.."..DISK ERROR."EN;EM $;ET;ES:.99:.92.,.`.. LEES N KARAKTERS V AN DE BUFFER.N.A.Z$."":.I.1.N:.98:Z$.Z$. A$:.:....B..#2,A$:A$.H(A$.G(0),1):A.F(A$ ):BP.BP.1:.:. LEES BUFFER...C..LOOP.1.20 00:.LOOP:.:. WACHTLUS....".3...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL