DISKSORT
FILE INFORMATION
FILENAME(S): DISKSORT
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-02 16:30:33
APPEARS ON: 1 disk(s)
FILE HASH
9650f9f766fcd967a3073679e16d2f948529604c6957076a616947445e7c2513
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES 2 A | DISKSORT | PRG | Treasure Chest - OzzyC64 | 30 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 78 00 99 22 93 20 20 20 20 20 20 20 |..#.x..". | 00000010: 20 20 20 20 54 49 44 59 20 44 49 52 45 43 54 4F | TIDY DIRECTO| 00000020: 52 59 22 00 54 08 82 00 99 22 11 4C 4F 41 44 20 |RY".T....".LOAD | 00000030: 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 41 4E |DISK IN DRIVE AN| 00000040: 44 20 27 52 45 54 55 52 4E 27 20 49 46 20 52 45 |D 'RETURN' IF RE| 00000050: 41 44 59 22 00 6B 08 8C 00 A1 5A 24 3A 8B 5A 24 |ADY".k....Z$:.Z$| 00000060: B3 B1 C7 28 31 33 29 A7 31 34 30 00 93 08 A0 00 |...(13).140.....| 00000070: 44 4E B2 38 3A 44 B2 30 3A 43 32 B2 32 3A 43 43 |DN.8:D.0:C2.2:CC| 00000080: B2 31 35 3A 54 B2 31 38 3A 53 B2 30 3A 42 50 B2 |.15:T.18:S.0:BP.| 00000090: 31 34 34 00 AC 08 AA 00 9F 43 43 2C 44 4E 2C 43 |144......CC,DN,C| 000000A0: 43 2C 22 49 30 22 3A 8D 31 30 31 30 00 C4 08 B4 |C,"I0":.1010....| 000000B0: 00 9F 43 32 2C 44 4E 2C 43 32 2C 22 23 22 3A 8D |..C2,DN,C2,"#":.| 000000C0: 31 30 31 30 00 E0 08 D2 00 98 43 43 2C 22 56 31 |1010......CC,"V1| 000000D0: 3A 22 43 32 3B 44 3B 54 3B 53 3A 8D 31 30 31 30 |:"C2;D;T;S:.1010| 000000E0: 00 F4 08 DC 00 98 43 43 2C 22 42 2D 50 3A 22 43 |......CC,"B-P:"C| 000000F0: 32 3B 42 50 00 11 09 E6 00 49 44 24 B2 22 22 3A |2;BP.....ID$."":| 00000100: 4E B2 32 30 3A 8D 31 30 34 30 3A 49 44 24 B2 5A |N.20:.1040:ID$.Z| 00000110: 24 00 2C 09 F0 00 99 22 20 44 49 53 4B 20 4C 4F |$.,...." DISK LO| 00000120: 41 44 45 44 20 22 49 44 24 22 20 22 00 38 09 36 |ADED "ID$" ".8.6| 00000130: 01 86 53 25 28 31 39 29 00 46 09 37 01 86 46 54 |..S%(19).F.7..FT| 00000140: 24 28 31 39 32 29 00 54 09 38 01 86 54 53 24 28 |$(192).T.8..TS$(| 00000150: 31 39 32 29 00 62 09 39 01 86 4E 46 24 28 31 39 |192).b.9..NF$(19| 00000160: 32 29 00 70 09 3A 01 86 46 45 24 28 31 39 32 29 |2).p.:..FE$(192)| 00000170: 00 7E 09 3B 01 86 53 4B 24 28 31 39 32 29 00 89 |.~.;..SK$(192)..| 00000180: 09 40 01 86 54 24 28 34 29 00 BD 09 41 01 54 24 |.@..T$(4)...A.T$| 00000190: 28 31 29 B2 22 53 45 51 22 3A 54 24 28 32 29 B2 |(1)."SEQ":T$(2).| 000001A0: 22 50 52 47 22 3A 54 24 28 33 29 B2 22 55 53 52 |"PRG":T$(3)."USR| 000001B0: 22 3A 54 24 28 34 29 B2 22 52 45 4C 22 00 D8 09 |":T$(4)."REL"...| 000001C0: 4A 01 81 49 B2 31 A4 33 30 3A 5A 30 24 B2 5A 30 |J..I.1.30:Z0$.Z0| 000001D0: 24 AA C7 28 30 29 3A 82 00 E0 09 68 01 53 B2 31 |$..(0):....h.S.1| 000001E0: 00 E8 09 72 01 45 B2 31 00 09 0A 7C 01 98 43 43 |...r.E.1...|..CC| 000001F0: 2C 22 55 31 3A 22 43 32 3B 44 3B 54 3B 53 3A 8D |,"U1:"C2;D;T;S:.| 00000200: 31 30 31 30 3A 42 50 B2 31 00 2C 0A 86 01 98 43 |1010:BP.1.,....C| 00000210: 43 2C 22 42 2D 50 3A 22 3B 43 32 3B 42 50 3A 8D |C,"B-P:";C2;BP:.| 00000220: 31 31 31 30 3A 53 25 28 53 29 B2 41 00 4B 0A 90 |1110:S%(S).A.K..| 00000230: 01 98 43 43 2C 22 42 2D 50 3A 22 43 32 3B 42 50 |..CC,"B-P:"C2;BP| 00000240: 3A 8D 31 31 31 30 3A 46 54 B2 41 00 6A 0A 9A 01 |:.1110:FT.A.j...| 00000250: 8B 46 54 B2 30 B0 46 54 B2 31 32 38 A7 42 50 B2 |.FT.0.FT.128.BP.| 00000260: 42 50 AA 33 31 3A 89 35 30 30 00 96 0A A4 01 8B |BP.31:.500......| 00000270: 46 54 B3 31 32 38 A7 99 22 46 49 4C 45 20 45 52 |FT.128.."FILE ER| 00000280: 52 4F 52 20 3C 4E 4F 54 20 43 4C 4F 53 45 44 3E |ROR <NOT CLOSED>| 00000290: 22 3A 89 39 39 39 00 A4 0A AE 01 46 54 24 28 45 |":.999.....FT$(E| 000002A0: 29 B2 41 24 00 BC 0A B8 01 4E B2 32 3A 8D 31 30 |).A$.....N.2:.10| 000002B0: 34 30 3A 54 53 24 28 45 29 B2 5A 24 00 D5 0A C2 |40:TS$(E).Z$....| 000002C0: 01 4E B2 31 36 3A 8D 31 30 34 30 3A 4E 46 24 28 |.N.16:.1040:NF$(| 000002D0: 45 29 B2 5A 24 00 EE 0A CC 01 4E B2 31 31 3A 8D |E).Z$.....N.11:.| 000002E0: 31 30 34 30 3A 46 45 24 28 45 29 B2 5A 24 00 11 |1040:FE$(E).Z$..| 000002F0: 0B E0 01 99 2C 22 20 20 20 20 20 22 4E 46 24 28 |....," "NF$(| 00000300: 45 29 22 20 3A 20 22 54 24 28 46 54 AB 31 32 38 |E)" : "T$(FT.128| 00000310: 29 00 23 0B EA 01 42 50 B2 42 50 AA 32 3A 45 B2 |).#...BP.BP.2:E.| 00000320: 45 AA 31 00 33 0B F4 01 8B 42 50 B3 32 35 36 A7 |E.1.3....BP.256.| 00000330: 34 30 30 00 50 0B FE 01 8B 53 25 28 53 29 B3 B1 |400.P....S%(S)..| 00000340: 32 35 35 A7 53 B2 53 25 28 53 29 3A 89 33 38 30 |255.S.S%(S):.380| 00000350: 00 5A 0B 08 02 8D 31 31 34 30 00 6D 0B 12 02 45 |.Z....1140.m...E| 00000360: B2 45 AB 31 3A 8B 45 B2 30 A7 37 34 30 00 8B 0B |.E.1:.E.0.740...| 00000370: 1C 02 99 22 47 52 4F 55 50 20 42 59 20 46 49 4C |..."GROUP BY FIL| 00000380: 45 54 59 50 45 3F 20 59 2F 4E 22 00 A6 0B 26 02 |ETYPE? Y/N"...&.| 00000390: A1 5A 24 3A 46 54 24 B2 5A 24 3A 8B 5A 24 B2 22 |.Z$:FT$.Z$:.Z$."| 000003A0: 59 22 A7 35 38 30 00 B7 0B 30 02 8B 5A 24 B3 B1 |Y".580...0..Z$..| 000003B0: 22 4E 22 A7 35 35 30 00 C9 0B 44 02 99 22 53 4F |"N".550...D.."SO| 000003C0: 52 54 49 4E 47 2E 2E 2E 22 00 D9 0B 4E 02 81 49 |RTING..."...N..I| 000003D0: B2 31 A4 45 3A 4B B2 31 36 00 06 0C 58 02 81 4A |.1.E:K.16...X..J| 000003E0: B2 31 A4 31 36 3A 8B CA 28 4E 46 24 28 49 29 2C |.1.16:..(NF$(I),| 000003F0: 4A 2C 31 29 B2 C7 28 31 36 30 29 A7 4B B2 4A AB |J,1)..(160).K.J.| 00000400: 31 3A 4A B2 31 36 00 20 0C 62 02 82 4A 3A 53 4B |1:J.16. .b..J:SK| 00000410: 24 28 49 29 B2 C8 28 4E 46 24 28 49 29 2C 4B 29 |$(I)..(NF$(I),K)| 00000420: 00 42 0C 6C 02 8B 46 54 24 B2 22 59 22 A7 53 4B |.B.l..FT$."Y".SK| 00000430: 24 28 49 29 B2 46 54 24 28 49 29 AA 53 4B 24 28 |$(I).FT$(I).SK$(| 00000440: 49 29 00 4D 0C 76 02 82 49 3A 4D B2 45 00 63 0C |I).M.v..I:M.E.c.| 00000450: 80 02 4D B2 B5 28 4D AD 32 29 3A 8B 4D B2 30 A7 |..M..(M.2):.M.0.| 00000460: 37 34 30 00 71 0C 8A 02 4B B2 45 AB 4D 3A 4A B2 |740.q...K.E.M:J.| 00000470: 30 00 7E 0C 94 02 8B 4A B1 4B A7 36 34 30 00 86 |0.~....J.K.640..| 00000480: 0C 9E 02 49 B2 4A 00 93 0C A8 02 8B 49 B3 30 A7 |...I.J......I.0.| 00000490: 37 30 30 00 AC 0C B2 02 8B 53 4B 24 28 49 AA 4D |700......SK$(I.M| 000004A0: 29 B3 53 4B 24 28 49 29 A7 37 31 30 00 BB 0C BC |).SK$(I).710....| 000004B0: 02 4A B2 4A AA 31 3A 89 36 36 30 00 E5 0C C6 02 |.J.J.1:.660.....| 000004C0: 41 24 B2 46 54 24 28 49 29 3A 46 54 24 28 49 29 |A$.FT$(I):FT$(I)| 000004D0: B2 46 54 24 28 49 AA 4D 29 3A 46 54 24 28 49 AA |.FT$(I.M):FT$(I.| 000004E0: 4D 29 B2 41 24 00 0F 0D C7 02 41 24 B2 54 53 24 |M).A$.....A$.TS$| 000004F0: 28 49 29 3A 54 53 24 28 49 29 B2 54 53 24 28 49 |(I):TS$(I).TS$(I| 00000500: AA 4D 29 3A 54 53 24 28 49 AA 4D 29 B2 41 24 00 |.M):TS$(I.M).A$.| 00000510: 39 0D C8 02 41 24 B2 4E 46 24 28 49 29 3A 4E 46 |9...A$.NF$(I):NF| 00000520: 24 28 49 29 B2 4E 46 24 28 49 AA 4D 29 3A 4E 46 |$(I).NF$(I.M):NF| 00000530: 24 28 49 AA 4D 29 B2 41 24 00 63 0D C9 02 41 24 |$(I.M).A$.c...A$| 00000540: B2 46 45 24 28 49 29 3A 46 45 24 28 49 29 B2 46 |.FE$(I):FE$(I).F| 00000550: 45 24 28 49 AA 4D 29 3A 46 45 24 28 49 AA 4D 29 |E$(I.M):FE$(I.M)| 00000560: B2 41 24 00 8D 0D CA 02 41 24 B2 53 4B 24 28 49 |.A$.....A$.SK$(I| 00000570: 29 3A 53 4B 24 28 49 29 B2 53 4B 24 28 49 AA 4D |):SK$(I).SK$(I.M| 00000580: 29 3A 53 4B 24 28 49 AA 4D 29 B2 41 24 00 9C 0D |):SK$(I.M).A$...| 00000590: D0 02 49 B2 49 AB 4D 3A 89 36 38 30 00 B4 0D E4 |..I.I.M:.680....| 000005A0: 02 99 22 57 52 49 54 49 4E 47 3A 20 20 22 49 44 |.."WRITING: "ID| 000005B0: 24 22 20 22 00 C7 0D EE 02 5A 24 B2 C7 28 30 29 |$" ".....Z$..(0)| 000005C0: AA C7 28 32 35 35 29 00 D3 0D F8 02 53 B2 31 3A |..(255).....S.1:| 000005D0: 4E B2 31 00 EF 0D 02 03 98 43 43 2C 22 55 31 3A |N.1......CC,"U1:| 000005E0: 22 43 32 3B 44 3B 54 3B 53 3A 8D 31 30 31 30 00 |"C2;D;T;S:.1010.| 000005F0: F8 0D 0C 03 42 50 B2 32 00 05 0E 16 03 8B 4E B1 |....BP.2......N.| 00000600: 45 A7 38 39 30 00 15 0E 20 03 8B 42 50 B3 32 35 |E.890... ..BP.25| 00000610: 36 A7 38 34 30 00 31 0E 34 03 98 43 43 2C 22 55 |6.840.1.4..CC,"U| 00000620: 32 3A 22 43 32 3B 44 3B 54 3B 53 3A 8D 31 30 31 |2:"C2;D;T;S:.101| 00000630: 30 00 42 0E 3E 03 53 B2 53 25 28 53 29 3A 89 37 |0.B.>.S.S%(S):.7| 00000640: 37 30 00 57 0E 48 03 98 43 43 2C 22 42 2D 50 3A |70.W.H..CC,"B-P:| 00000650: 22 3B 43 32 3B 42 50 00 81 0E 52 03 99 2C 22 20 |";C2;BP...R..," | 00000660: 20 20 20 20 22 4E 46 24 28 4E 29 22 20 3A 20 22 | "NF$(N)" : "| 00000670: 54 24 28 C6 28 46 54 24 28 4E 29 29 AB 31 32 38 |T$(.(FT$(N)).128| 00000680: 29 00 A6 0E 5C 03 98 43 32 2C 46 54 24 28 4E 29 |)...\..C2,FT$(N)| 00000690: 3B 54 53 24 28 4E 29 3B 4E 46 24 28 4E 29 3B 46 |;TS$(N);NF$(N);F| 000006A0: 45 24 28 4E 29 3B 00 BE 0E 66 03 42 50 B2 42 50 |E$(N);...f.BP.BP| 000006B0: AA 33 32 3A 4E B2 4E AA 31 3A 89 37 39 30 00 CE |.32:N.N.1:.790..| 000006C0: 0E 7A 03 8B 42 50 B1 32 35 35 A7 39 33 30 00 E3 |.z..BP.255.930..| 000006D0: 0E 84 03 98 43 43 2C 22 42 2D 50 3A 22 3B 43 32 |....CC,"B-P:";C2| 000006E0: 3B 42 50 00 F0 0E 8E 03 98 43 32 2C 5A 30 24 3B |;BP......C2,Z0$;| 000006F0: 00 02 0F 98 03 42 50 B2 42 50 AA 33 32 3A 89 38 |.....BP.BP.32:.8| 00000700: 39 30 00 1C 0F A2 03 42 50 B2 30 3A 98 43 43 2C |90.....BP.0:.CC,| 00000710: 22 42 2D 50 3A 22 3B 43 32 3B 42 50 00 28 0F AC |"B-P:";C2;BP.(..| 00000720: 03 98 43 32 2C 5A 24 3B 00 44 0F B6 03 98 43 43 |..C2,Z$;.D....CC| 00000730: 2C 22 55 32 3A 22 43 32 3B 44 3B 54 3B 53 3A 8D |,"U2:"C2;D;T;S:.| 00000740: 31 30 31 30 00 54 0F C0 03 5A 24 B2 C8 28 5A 30 |1010.T...Z$..(Z0| 00000750: 24 2C 32 29 00 6B 0F CA 03 53 B2 53 25 28 53 29 |$,2).k...S.S%(S)| 00000760: 3A 8B 53 B2 32 35 35 A7 39 39 39 00 87 0F D4 03 |:.S.255.999.....| 00000770: 98 43 43 2C 22 55 31 3A 22 43 32 3B 44 3B 54 3B |.CC,"U1:"C2;D;T;| 00000780: 53 3A 8D 31 30 31 30 00 95 0F DE 03 42 50 B2 32 |S:.1010.....BP.2| 00000790: 3A 89 39 30 30 00 A3 0F E7 03 A0 43 32 3A A0 43 |:.900......C2:.C| 000007A0: 43 3A 80 00 C0 0F F2 03 84 43 43 2C 45 4D 2C 45 |C:.......CC,EM,E| 000007B0: 4D 24 2C 45 54 2C 45 53 3A 8B 45 4E B2 30 A7 8E |M$,ET,ES:.EN.0..| 000007C0: 00 E6 0F FC 03 99 22 93 20 44 49 53 4B 20 45 52 |......". DISK ER| 000007D0: 52 4F 52 20 22 45 4E 3B 45 4D 24 3B 45 54 3B 45 |ROR "EN;EM$;ET;E| 000007E0: 53 3A 89 39 39 39 00 F0 0F 10 04 5A 24 B2 22 22 |S:.999.....Z$.""| 000007F0: 00 01 10 1A 04 81 49 B2 31 A4 4E 3A 8D 31 31 31 |......I.1.N:.111| 00000800: 30 00 12 10 24 04 5A 24 B2 5A 24 AA 41 24 3A 82 |0...$.Z$.Z$.A$:.| 00000810: 3A 8E 00 2D 10 56 04 A1 23 43 32 2C 41 24 3A 8B |:..-.V..#C2,A$:.| 00000820: 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 43 10 |A$."".A$..(0).C.| 00000830: 60 04 41 B2 C6 28 41 24 29 3A 42 50 B2 42 50 AA |`.A..(A$):BP.BP.| 00000840: 31 3A 8E 00 5B 10 74 04 99 22 20 4F 4B 20 54 4F |1:..[.t.." OK TO| 00000850: 20 43 4F 4E 54 2E 20 59 2F 4E 22 00 6F 10 7E 04 | CONT. Y/N".o.~.| 00000860: A1 5A 24 3A 8B 5A 24 B2 22 4E 22 A7 39 39 39 00 |.Z$:.Z$."N".999.| 00000870: 81 10 88 04 8B 5A 24 B3 B1 22 59 22 A7 31 31 35 |.....Z$.."Y".115| 00000880: 30 00 A1 10 92 04 99 22 20 20 20 20 20 20 20 20 |0......" | 00000890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":| 000008A0: 8E 00 00 00 20 F0 55 00 |.... .U. |
..#.X..". TIDY DIRECTORY".T...
.".LOAD DISK IN DRIVE AND 'RETURN' IF RE
ADY".K....Z$:.Z$..G(13).140... .DN.8:D.0
:C2.2:CC.15:T.18:S.0:BP.144......CC,DN,C
C,"I0":.1010.D....C2,DN,C2,"#":.1010...R
..CC,"V1:"C2;D;T;S:.1010......CC,"B-P:"C
2;BP.....ID$."":N.20:.1040:ID$.Z$.,...."
DISK LOADED "ID$" ".8.6..S%(19).F.7..FT
$(192).T.8..TS$(192).B.9..NF$(192).P.:..
FE$(192).~.;..SK$(192)...@..T$(4)...A.T$
(1)."SEQ":T$(2)."PRG":T$(3)."USR":T$(4).
"REL".X.J..I.1.30:Z0$.Z0$.G(0):....H.S.1
...R.E.1...|..CC,"U1:"C2;D;T;S:.1010:BP.
1.,....CC,"B-P:";C2;BP:.1110:S%(S).A.K..
..CC,"B-P:"C2;BP:.1110:FT.A.J....FT.0.FT
.128.BP.BP.31:.500......FT.128.."FILE ER
ROR <NOT CLOSED>":.999.....FT$(E).A$....
.N.2:.1040:TS$(E).Z$.U.B.N.16:.1040:NF$(
E).Z$...L.N.11:.1040:FE$(E).Z$......,"
"NF$(E)" : "T$(FT.128).#...BP.BP.2:E.
E.1.3....BP.256.400.P....S%(S)..255.S.S%
(S):.380.Z....1140.M...E.E.1:.E.0.740...
..."GROUP BY FILETYPE? Y/N"...&..Z$:FT$.
Z$:.Z$."Y".580...0..Z$.."N".550.I.D.."SO
RTING...".Y.N..I.1.E:K.16...X..J.1.16:.J
(NF$(I),J,1).G(160).K.J.1:J.16. .B..J:SK
$(I).H(NF$(I),K).B.L..FT$."Y".SK$(I).FT$
(I).SK$(I).M.V..I:M.E.C...M..(M.2):.M.0.
740.Q...K.E.M:J.0.~....J.K.640.....I.J..
....I.0.700......SK$(I.M).SK$(I).710....
.J.J.1:.660...F.A$.FT$(I):FT$(I).FT$(I.M
):FT$(I.M).A$...G.A$.TS$(I):TS$(I).TS$(I
.M):TS$(I.M).A$.9.H.A$.NF$(I):NF$(I).NF$
(I.M):NF$(I.M).A$.C.I.A$.FE$(I):FE$(I).F
E$(I.M):FE$(I.M).A$...J.A$.SK$(I):SK$(I)
.SK$(I.M):SK$(I.M).A$...P.I.I.M:.680....
.."WRITING: "ID$" ".G...Z$.G(0).G(255).
S...S.1:N.1......CC,"U1:"C2;D;T;S:.1010.
....BP.2......N.E.890... ..BP.256.840.1.
4..CC,"U2:"C2;D;T;S:.1010.B.>.S.S%(S):.7
70.W.H..CC,"B-P:";C2;BP...R..," "NF$
(N)" : "T$(F(FT$(N)).128)...\..C2,FT$(N)
;TS$(N);NF$(N);FE$(N);...F.BP.BP.32:N.N.
1:.790.N.Z..BP.255.930......CC,"B-P:";C2
;BP......C2,Z0$;.....BP.BP.32:.890.....B
P.0:.CC,"B-P:";C2;BP.(....C2,Z$;.D....CC
,"U2:"C2;D;T;S:.1010.T...Z$.H(Z0$,2).K.J
.S.S%(S):.S.255.999...T..CC,"U1:"C2;D;T;
S:.1010.....BP.2:.900..... C2: CC:......
.CC,EM,EM$,ET,ES:.EN.0........". DISK ER
ROR "EN;EM$;ET;ES:.999.....Z$.""......I.
1.N:.1110...$.Z$.Z$.A$:.:..-.V..#C2,A$:.
A$."".A$.G(0).C.`.A.F(A$):BP.BP.1:..[.T.
." OK TO CONT. Y/N".O.~..Z$:.Z$."N".999.
.....Z$.."Y".1150......"
":.... .U.
> CLICK IMAGE PREVIEW FOR FULL MODAL