DIR SORT.TXT

FILE INFORMATION

FILENAME(S): DIR SORT.TXT

FILE TYPE(S): SEQ

FILE SIZE: 2.2K

FIRST SEEN: 2025-10-20 14:30:00

APPEARS ON: 1 disk(s)

FILE HASH

2d261a91fb8c09d912f6f8c1905651af51d479fa1a9d312efdcabfc0eb2d3631

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
CMD UTILS SIDE 2	DIR SORT.TXT	SEQ	Treasure Chest - Klaus Der Suhler	15	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 0D 0D 0D C3 CD C4 20 C4  C9 D2 20 D3 CF D2 D4 20  |...... ... .... |
00000010: 31 2E 35 20 20 20 20 20  20 20 20 20 20 20 20 20  |1.5             |
00000020: 20 20 20 C3 4F 50 59 52  49 47 48 54 20 31 39 39  |   .OPYRIGHT 199|
00000030: 30 20 42 59 20 C3 52 45  41 54 49 56 45 20 CD 49  |0 BY .REATIVE .I|
00000040: 43 52 4F 20 C4 45 53 49  47 4E 53 2C 20 C9 4E 43  |CRO .ESIGNS, .NC|
00000050: 2E 0D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |..--------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000070: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000080: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000090: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000000A0: 0D 0D D4 48 49 53 20 55  54 49 4C 49 54 59 20 57  |...HIS UTILITY W|
000000B0: 41 53 20 49 4E 49 54 49  41 4C 4C 59 20 43 52 45  |AS INITIALLY CRE|
000000C0: 41 54 45 44 20 42 41 43  4B 20 49 4E 20 31 39 39  |ATED BACK IN 199|
000000D0: 30 2C 20 57 48 45 4E 20  54 48 45 52 45 20 57 45  |0, WHEN THERE WE|
000000E0: 52 45 4E 27 54 20 41 4E  59 0D 44 49 52 45 43 54  |REN'T ANY.DIRECT|
000000F0: 4F 52 59 20 53 4F 52 54  45 52 53 20 41 52 4F 55  |ORY SORTERS AROU|
00000100: 4E 44 20 54 48 41 54 20  43 4F 55 4C 44 20 48 41  |ND THAT COULD HA|
00000110: 4E 44 4C 45 20 CE 41 54  49 56 45 20 50 41 52 54  |NDLE .ATIVE PART|
00000120: 49 54 49 4F 4E 53 20 4F  52 0D 53 55 42 44 49 52  |ITIONS OR.SUBDIR|
00000130: 45 43 54 4F 52 49 45 53  2E 20 D7 49 54 48 20 54  |ECTORIES. .ITH T|
00000140: 48 45 20 41 44 56 45 4E  54 20 4F 46 20 41 20 50  |HE ADVENT OF A P|
00000150: 52 4F 47 52 41 4D 20 4C  49 4B 45 20 C4 C5 C4 C9  |ROGRAM LIKE ....|
00000160: D4 2C 20 54 48 49 53 20  50 52 4F 47 52 41 4D 20  |., THIS PROGRAM |
00000170: 49 53 0D 50 52 4F 42 41  42 4C 59 20 52 41 52 45  |IS.PROBABLY RARE|
00000180: 4C 59 20 55 53 45 44 20  41 4E 59 4D 4F 52 45 2C  |LY USED ANYMORE,|
00000190: 20 53 49 4E 43 45 20 49  54 20 53 55 46 46 45 52  | SINCE IT SUFFER|
000001A0: 53 20 46 52 4F 4D 20 53  4C 4F 57 4E 45 53 53 20  |S FROM SLOWNESS |
000001B0: 44 55 45 20 54 4F 20 42  45 49 4E 47 0D 57 52 49  |DUE TO BEING.WRI|
000001C0: 54 54 45 4E 20 45 4E 54  49 52 45 4C 59 20 49 4E  |TTEN ENTIRELY IN|
000001D0: 20 C2 C1 D3 C9 C3 2E 20  C9 54 20 44 4F 45 53 2C  | ...... .T DOES,|
000001E0: 20 48 4F 57 45 56 45 52  2C 20 53 45 52 56 45 20  | HOWEVER, SERVE |
000001F0: 54 48 45 20 50 55 52 50  4F 53 45 20 4F 46 20 50  |THE PURPOSE OF P|
00000200: 52 4F 56 49 44 49 4E 47  0D 50 52 4F 47 52 41 4D  |ROVIDING.PROGRAM|
00000210: 4D 45 52 53 20 57 49 54  48 20 53 4F 4D 45 20 49  |MERS WITH SOME I|
00000220: 4E 53 49 47 48 54 20 4F  4E 20 48 4F 57 20 54 4F  |NSIGHT ON HOW TO|
00000230: 20 52 45 43 4F 47 4E 49  5A 45 20 41 4E 44 20 44  | RECOGNIZE AND D|
00000240: 45 41 4C 20 57 49 54 48  20 56 41 52 49 4F 55 53  |EAL WITH VARIOUS|
00000250: 20 44 52 49 56 45 0D 54  59 50 45 53 2C 20 41 4E  | DRIVE.TYPES, AN|
00000260: 44 20 48 4F 57 20 54 4F  20 4C 4F 43 41 54 45 20  |D HOW TO LOCATE |
00000270: 45 58 41 43 54 4C 59 20  57 48 45 52 45 20 54 48  |EXACTLY WHERE TH|
00000280: 45 20 43 55 52 52 45 4E  54 20 44 49 52 45 43 54  |E CURRENT DIRECT|
00000290: 4F 52 59 20 45 58 49 53  54 53 20 57 48 45 4E 0D  |ORY EXISTS WHEN.|
000002A0: 57 4F 52 4B 49 4E 47 20  57 49 54 48 20 53 55 42  |WORKING WITH SUB|
000002B0: 44 49 52 45 43 54 4F 52  49 45 53 20 41 4E 44 20  |DIRECTORIES AND |
000002C0: 31 35 38 31 20 50 41 52  54 49 54 49 4F 4E 53 2E  |1581 PARTITIONS.|
000002D0: 20 C6 4F 52 20 54 48 49  53 20 52 45 41 53 4F 4E  | .OR THIS REASON|
000002E0: 2C 20 49 54 20 48 41 53  20 42 45 45 4E 0D 49 4E  |, IT HAS BEEN.IN|
000002F0: 43 4C 55 44 45 44 20 49  4E 20 54 48 49 53 20 55  |CLUDED IN THIS U|
00000300: 54 49 4C 49 54 49 45 53  20 43 4F 4C 4C 45 43 54  |TILITIES COLLECT|
00000310: 49 4F 4E 2E 20 CD 55 43  48 20 4F 46 20 54 48 45  |ION. .UCH OF THE|
00000320: 20 43 4F 44 45 20 55 53  45 44 20 48 45 52 45 20  | CODE USED HERE |
00000330: 57 41 53 20 55 53 45 44  20 41 53 0D 41 20 42 41  |WAS USED AS.A BA|
00000340: 53 49 53 20 46 4F 52 20  C4 C5 C4 C9 D4 2C 20 53  |SIS FOR ....., S|
00000350: 4F 20 57 45 27 52 45 20  53 55 52 45 20 4F 54 48  |O WE'RE SURE OTH|
00000360: 45 52 20 50 52 4F 47 52  41 4D 4D 45 52 53 20 43  |ER PROGRAMMERS C|
00000370: 41 4E 20 42 45 4E 45 46  49 54 20 42 59 20 54 48  |AN BENEFIT BY TH|
00000380: 45 0D 49 4E 43 4C 55 53  49 4F 4E 20 4F 46 20 54  |E.INCLUSION OF T|
00000390: 48 49 53 20 50 52 4F 47  52 41 4D 20 4F 4E 20 C3  |HIS PROGRAM ON .|
000003A0: CD C4 20 D5 54 49 4C 49  54 49 45 53 2E 0D 0D D4  |.. .TILITIES....|
000003B0: 4F 20 55 53 45 20 54 48  49 53 20 50 52 4F 47 52  |O USE THIS PROGR|
000003C0: 41 4D 2C 20 4C 4F 41 44  20 41 4E 44 20 52 55 4E  |AM, LOAD AND RUN|
000003D0: 20 49 54 20 46 52 4F 4D  20 41 4E 59 20 44 52 49  | IT FROM ANY DRI|
000003E0: 56 45 20 4F 4E 20 59 4F  55 52 20 53 59 53 54 45  |VE ON YOUR SYSTE|
000003F0: 4D 2E 0D 0D C1 53 20 54  48 45 20 50 52 4F 47 52  |M....S THE PROGR|
00000400: 41 4D 20 42 45 47 49 4E  53 2C 20 41 20 50 52 4F  |AM BEGINS, A PRO|
00000410: 4D 50 54 20 57 49 4C 4C  20 41 53 4B 20 59 4F 55  |MPT WILL ASK YOU|
00000420: 20 54 4F 20 53 55 50 50  4C 59 20 54 48 45 20 44  | TO SUPPLY THE D|
00000430: 45 56 49 43 45 20 4E 55  4D 42 45 52 20 4F 46 0D  |EVICE NUMBER OF.|
00000440: 54 48 45 20 44 45 56 49  43 45 20 43 4F 4E 54 41  |THE DEVICE CONTA|
00000450: 49 4E 49 4E 47 20 54 48  45 20 44 49 52 45 43 54  |INING THE DIRECT|
00000460: 4F 52 59 20 59 4F 55 20  57 49 53 48 20 54 4F 20  |ORY YOU WISH TO |
00000470: 53 4F 52 54 2E 20 D4 48  45 20 44 45 56 49 43 45  |SORT. .HE DEVICE|
00000480: 20 57 49 4C 4C 20 54 48  45 4E 20 42 45 0D 43 48  | WILL THEN BE.CH|
00000490: 45 43 4B 45 44 20 54 4F  20 53 45 45 20 57 48 41  |ECKED TO SEE WHA|
000004A0: 54 20 54 59 50 45 20 49  54 20 49 53 20 28 4C 49  |T TYPE IT IS (LI|
000004B0: 4E 45 53 20 31 39 30 20  54 48 52 4F 55 47 48 20  |NES 190 THROUGH |
000004C0: 32 38 30 29 2E 20 C9 46  20 54 48 45 20 44 45 56  |280). .F THE DEV|
000004D0: 49 43 45 20 49 53 20 41  20 C3 CD C4 0D 44 45 56  |ICE IS A ....DEV|
000004E0: 49 43 45 2C 20 41 4E 4F  54 48 45 52 20 50 52 4F  |ICE, ANOTHER PRO|
000004F0: 4D 50 54 20 41 53 4B 53  20 46 4F 52 20 54 48 45  |MPT ASKS FOR THE|
00000500: 20 50 41 52 54 49 54 49  4F 4E 20 4E 55 4D 42 45  | PARTITION NUMBE|
00000510: 52 2E 20 C1 46 54 45 52  20 4D 4F 56 49 4E 47 20  |R. .FTER MOVING |
00000520: 54 4F 20 54 48 45 0D 53  50 45 43 49 46 49 45 44  |TO THE.SPECIFIED|
00000530: 20 50 41 52 54 49 54 49  4F 4E 2C 20 49 54 20 49  | PARTITION, IT I|
00000540: 53 20 43 48 45 43 4B 45  44 20 54 4F 20 53 45 45  |S CHECKED TO SEE|
00000550: 20 49 46 20 49 54 20 49  53 20 41 20 CE 41 54 49  | IF IT IS A .ATI|
00000560: 56 45 20 54 59 50 45 2C  20 41 4E 44 20 41 20 50  |VE TYPE, AND A P|
00000570: 41 54 48 0D 49 53 20 52  45 51 45 53 54 45 44 20  |ATH.IS REQESTED |
00000580: 41 4E 44 20 4D 4F 56 45  44 20 54 4F 20 49 46 20  |AND MOVED TO IF |
00000590: 49 54 20 49 53 2E 0D 0D  CE 4F 57 20 54 48 45 20  |IT IS....OW THE |
000005A0: 50 52 4F 47 52 41 4D 20  49 53 20 53 45 54 20 54  |PROGRAM IS SET T|
000005B0: 4F 20 43 48 45 43 4B 20  57 48 45 52 45 20 54 48  |O CHECK WHERE TH|
000005C0: 45 20 42 45 47 49 4E 4E  49 4E 47 20 54 52 41 43  |E BEGINNING TRAC|
000005D0: 4B 20 41 4E 44 20 53 45  43 54 4F 52 20 4F 46 20  |K AND SECTOR OF |
000005E0: 54 48 45 0D 43 55 52 52  45 4E 54 20 44 49 52 45  |THE.CURRENT DIRE|
000005F0: 43 54 4F 52 59 20 49 53  20 4C 4F 43 41 54 45 44  |CTORY IS LOCATED|
00000600: 2E 20 C9 54 20 44 4F 45  53 20 54 48 49 53 20 49  |. .T DOES THIS I|
00000610: 4E 20 4C 49 4E 45 53 20  33 37 30 2D 33 39 30 20  |N LINES 370-390 |
00000620: 57 49 54 48 20 41 20 4D  45 4D 4F 52 59 2D 52 45  |WITH A MEMORY-RE|
00000630: 41 44 0D 4F 46 20 54 48  45 20 44 52 49 56 45 20  |AD.OF THE DRIVE |
00000640: 49 4D 4D 45 44 49 41 54  45 4C 59 20 41 46 54 45  |IMMEDIATELY AFTE|
00000650: 52 20 4F 50 45 4E 49 4E  47 20 41 4E 44 20 43 4C  |R OPENING AND CL|
00000660: 4F 53 49 4E 47 20 54 48  45 20 44 49 52 45 43 54  |OSING THE DIRECT|
00000670: 4F 52 59 20 46 49 4C 45  2E 20 D4 48 45 0D 4C 4F  |ORY FILE. .HE.LO|
00000680: 43 41 54 49 4F 4E 20 4F  46 20 54 48 45 20 4D 45  |CATION OF THE ME|
00000690: 4D 4F 52 59 2D 52 45 41  44 20 49 53 20 44 45 54  |MORY-READ IS DET|
000006A0: 45 52 4D 49 4E 45 44 20  42 59 20 54 48 45 20 44  |ERMINED BY THE D|
000006B0: 45 56 49 43 45 20 54 59  50 45 20 28 54 48 45 20  |EVICE TYPE (THE |
000006C0: 56 41 52 49 41 42 4C 45  20 CD D2 2C 0D 57 48 49  |VARIABLE ..,.WHI|
000006D0: 43 48 20 49 53 20 54 48  45 20 48 49 47 48 20 42  |CH IS THE HIGH B|
000006E0: 59 54 45 20 46 4F 52 20  54 48 45 20 4D 45 4D 4F  |YTE FOR THE MEMO|
000006F0: 52 59 2D 52 45 41 44 20  57 41 53 20 53 45 54 20  |RY-READ WAS SET |
00000700: 46 4F 52 20 54 48 49 53  20 50 55 52 50 4F 53 45  |FOR THIS PURPOSE|
00000710: 20 44 55 52 49 4E 47 20  54 48 45 0D 44 45 56 49  | DURING THE.DEVI|
00000720: 43 45 20 54 59 50 45 20  50 4F 4C 4C 49 4E 47 29  |CE TYPE POLLING)|
00000730: 2E 0D 0D C1 46 54 45 52  20 54 48 49 53 20 54 48  |....FTER THIS TH|
00000740: 45 20 50 52 4F 47 52 41  4D 20 57 49 4C 4C 20 52  |E PROGRAM WILL R|
00000750: 45 41 44 20 54 48 45 20  44 49 52 45 43 54 4F 52  |EAD THE DIRECTOR|
00000760: 59 20 45 4E 54 52 49 45  53 20 49 4E 54 4F 20 4D  |Y ENTRIES INTO M|
00000770: 45 4D 4F 52 59 2C 20 53  4F 52 54 20 54 48 45 4D  |EMORY, SORT THEM|
00000780: 2C 0D 54 48 45 4E 20 41  53 4B 20 49 46 20 59 4F  |,.THEN ASK IF YO|
00000790: 55 20 57 49 53 48 20 54  4F 20 48 41 56 45 20 54  |U WISH TO HAVE T|
000007A0: 48 45 4D 20 57 52 49 54  54 45 4E 20 42 41 43 4B  |HEM WRITTEN BACK|
000007B0: 20 54 4F 20 44 49 53 4B  2E 0D 0D C6 49 4E 41 4C  | TO DISK....INAL|
000007C0: 4C 59 2C 20 54 48 45 20  50 52 4F 47 52 41 4D 20  |LY, THE PROGRAM |
000007D0: 41 53 4B 53 20 49 46 20  59 4F 55 27 44 20 4C 49  |ASKS IF YOU'D LI|
000007E0: 4B 45 20 54 4F 20 53 4F  52 54 20 41 4E 4F 54 48  |KE TO SORT ANOTH|
000007F0: 45 52 20 44 49 52 45 43  54 4F 52 59 2C 20 41 4E  |ER DIRECTORY, AN|
00000800: 44 20 45 58 49 54 53 0D  49 46 20 59 4F 55 20 44  |D EXITS.IF YOU D|
00000810: 4F 20 4E 4F 54 2E 0D 0D  0D 0D 0D 0D 0D 0D 0D 0D  |O NOT...........|
00000820: 0D 0D 0D 0D 0D 0D 0D 0D  0D 0D 0D 0D 0D 0D 0D 0D  |................|
00000830: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000840: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000850: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000860: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000870: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 0D C3  |--------------..|
00000880: CD C4 20 C4 C9 D2 20 D3  CF D2 D4 20 31 2E 35 20  |.. ... .... 1.5 |
00000890: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 C3  |               .|
000008A0: 4F 50 59 52 49 47 48 54  20 31 39 39 30 20 42 59  |OPYRIGHT 1990 BY|
000008B0: 20 C3 52 45 41 54 49 56  45 20 CD 49 43 52 4F 20  | .REATIVE .ICRO |
000008C0: C4 45 53 49 47 4E 53 2C  20 C9 4E 43 2E 0D        |.ESIGNS, .NC..  |

...CMD DIR SORT 1.5                COPYR
IGHT 1990 BY CREATIVE MICRO DESIGNS, INC
..--------------------------------------
----------------------------------------
..THIS UTILITY WAS INITIALLY CREATED BAC
K IN 1990, WHEN THERE WEREN'T ANY.DIRECT
ORY SORTERS AROUND THAT COULD HANDLE NAT
IVE PARTITIONS OR.SUBDIRECTORIES. WITH T
HE ADVENT OF A PROGRAM LIKE DEDIT, THIS 
PROGRAM IS.PROBABLY RARELY USED ANYMORE,
 SINCE IT SUFFERS FROM SLOWNESS DUE TO B
EING.WRITTEN ENTIRELY IN BASIC. IT DOES,
 HOWEVER, SERVE THE PURPOSE OF PROVIDING
.PROGRAMMERS WITH SOME INSIGHT ON HOW TO
 RECOGNIZE AND DEAL WITH VARIOUS DRIVE.T
YPES, AND HOW TO LOCATE EXACTLY WHERE TH
E CURRENT DIRECTORY EXISTS WHEN.WORKING 
WITH SUBDIRECTORIES AND 1581 PARTITIONS.
 FOR THIS REASON, IT HAS BEEN.INCLUDED I
N THIS UTILITIES COLLECTION. MUCH OF THE
 CODE USED HERE WAS USED AS.A BASIS FOR 
DEDIT, SO WE'RE SURE OTHER PROGRAMMERS C
AN BENEFIT BY THE.INCLUSION OF THIS PROG
RAM ON CMD UTILITIES...TO USE THIS PROGR
AM, LOAD AND RUN IT FROM ANY DRIVE ON YO
UR SYSTEM...AS THE PROGRAM BEGINS, A PRO
MPT WILL ASK YOU TO SUPPLY THE DEVICE NU
MBER OF.THE DEVICE CONTAINING THE DIRECT
ORY YOU WISH TO SORT. THE DEVICE WILL TH
EN BE.CHECKED TO SEE WHAT TYPE IT IS (LI
NES 190 THROUGH 280). IF THE DEVICE IS A
 CMD.DEVICE, ANOTHER PROMPT ASKS FOR THE
 PARTITION NUMBER. AFTER MOVING TO THE.S
PECIFIED PARTITION, IT IS CHECKED TO SEE
 IF IT IS A NATIVE TYPE, AND A PATH.IS R
EQESTED AND MOVED TO IF IT IS...NOW THE 
PROGRAM IS SET TO CHECK WHERE THE BEGINN
ING TRACK AND SECTOR OF THE.CURRENT DIRE
CTORY IS LOCATED. IT DOES THIS IN LINES 
370-390 WITH A MEMORY-READ.OF THE DRIVE 
IMMEDIATELY AFTER OPENING AND CLOSING TH
E DIRECTORY FILE. THE.LOCATION OF THE ME
MORY-READ IS DETERMINED BY THE DEVICE TY
PE (THE VARIABLE MR,.WHICH IS THE HIGH B
YTE FOR THE MEMORY-READ WAS SET FOR THIS
 PURPOSE DURING THE.DEVICE TYPE POLLING)
...AFTER THIS THE PROGRAM WILL READ THE 
DIRECTORY ENTRIES INTO MEMORY, SORT THEM
,.THEN ASK IF YOU WISH TO HAVE THEM WRIT
TEN BACK TO DISK...FINALLY, THE PROGRAM 
ASKS IF YOU'D LIKE TO SORT ANOTHER DIREC
TORY, AND EXITS.IF YOU DO NOT...........
................------------------------
----------------------------------------
--------------.CMD DIR SORT 1.5         
       COPYRIGHT 1990 BY CREATIVE MICRO 
DESIGNS, INC..

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL