SUPER CAT
FILE INFORMATION
FILENAME(S): SUPER CAT
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-10-19 22:48:34
APPEARS ON: 1 disk(s)
FILE HASH
b0498c6f1bf2ed29179359e52bde072f2ef9ab32e86e9771bd3e5c490ea96162
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MM UTILITY | SUPER CAT | PRG | Radd Maxx | 8 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 38 04 00 00 8F 20 54 48 45 20 54 52 41 4E |..8.... THE TRAN|
00000010: 53 41 43 54 4F 52 20 56 4F 4C 55 4D 45 20 35 20 |SACTOR VOLUME 5 |
00000020: 49 53 53 55 45 20 30 36 20 20 20 20 20 20 20 20 |ISSUE 06 |
00000030: 20 50 41 47 45 20 36 36 00 57 04 0A 00 8F 20 53 | PAGE 66.W.... S|
00000040: 41 56 45 22 40 30 3A 53 55 50 45 52 20 43 41 54 |AVE"@0:SUPER CAT|
00000050: 2E 42 41 53 22 2C 38 00 9D 04 64 00 8F 20 2A 2A |.BAS",8...d.. **|
00000060: 20 52 54 45 2F 38 34 20 2D 20 41 20 53 55 50 45 | RTE/84 - A SUPE|
00000070: 52 20 43 41 54 41 4C 4F 47 20 52 4F 55 54 49 4E |R CATALOG ROUTIN|
00000080: 45 20 54 48 41 54 20 53 55 50 50 4C 49 45 53 20 |E THAT SUPPLIES |
00000090: 41 4C 4C 20 46 49 4C 45 20 49 4E 46 4F 00 C1 04 |ALL FILE INFO...|
000000A0: 6E 00 99 22 2A 2A 20 53 55 50 45 52 20 43 41 54 |n.."** SUPER CAT|
000000B0: 41 4C 4F 47 20 2D 20 52 54 45 2F 38 34 20 2A 2A |ALOG - RTE/84 **|
000000C0: 22 00 0A 05 78 00 46 54 24 28 30 29 B2 22 44 45 |"...x.FT$(0)."DE|
000000D0: 4C 22 3A 20 46 54 24 28 31 29 B2 22 53 45 51 22 |L": FT$(1)."SEQ"|
000000E0: 3A 20 46 54 24 28 32 29 B2 22 50 52 47 22 3A 20 |: FT$(2)."PRG": |
000000F0: 46 54 24 28 33 29 B2 22 55 53 52 22 3A 20 46 54 |FT$(3)."USR": FT|
00000100: 24 28 34 29 B2 22 52 45 4C 22 00 1E 05 82 00 99 |$(4)."REL"......|
00000110: 22 44 52 49 56 45 20 54 59 50 45 20 3A 22 00 61 |"DRIVE TYPE :".a|
00000120: 05 8C 00 85 22 31 29 20 31 35 34 31 2F 32 30 33 |...."1) 1541/203|
00000130: 31 2F 34 30 34 30 20 4F 52 20 32 29 20 38 30 35 |1/4040 OR 2) 805|
00000140: 30 2F 38 32 35 30 20 3A 22 3B 54 59 3A 20 8B 20 |0/8250 :";TY: . |
00000150: 54 59 B3 31 20 B0 20 54 59 B1 32 20 A7 20 31 34 |TY.1 . TY.2 . 14|
00000160: 30 00 95 05 96 00 44 54 52 4B B2 33 39 3A 20 8B |0.....DTRK.39: .|
00000170: 20 54 59 B2 31 20 A7 20 44 54 52 4B B2 31 38 3A | TY.1 . DTRK.18:|
00000180: 20 8F 20 2A 2A 20 44 49 52 45 43 54 4F 52 59 20 | . ** DIRECTORY |
00000190: 54 52 41 43 4B 00 B5 05 A0 00 85 22 44 52 49 56 |TRACK......"DRIV|
000001A0: 45 20 23 22 3B 44 52 3A 20 8B 20 44 52 B1 31 20 |E #";DR: . DR.1 |
000001B0: A7 20 31 36 30 00 D2 05 AA 00 99 22 53 45 4C 45 |. 160......"SELE|
000001C0: 43 54 49 56 45 20 44 49 52 45 43 54 4F 52 59 20 |CTIVE DIRECTORY |
000001D0: 3F 22 00 00 06 B4 00 99 22 31 29 20 53 45 51 2C |?"......"1) SEQ,|
000001E0: 20 32 29 20 50 52 47 2C 20 33 29 20 55 53 52 2C | 2) PRG, 3) USR,|
000001F0: 20 34 29 20 52 45 4C 2C 20 35 29 20 41 4C 4C 22 | 4) REL, 5) ALL"|
00000200: 00 1E 06 BE 00 85 20 53 4C 3A 20 8B 20 53 4C B3 |...... SL: . SL.|
00000210: 31 20 B0 20 53 4C B1 35 20 A7 20 31 39 30 00 42 |1 . SL.5 . 190.B|
00000220: 06 C8 00 53 4C 24 B2 22 41 4C 4C 22 3A 20 8B 20 |...SL$."ALL": . |
00000230: 53 4C B3 35 20 A7 20 53 4C 24 B2 46 54 24 28 53 |SL.5 . SL$.FT$(S|
00000240: 4C 29 00 7B 06 D2 00 85 22 33 29 20 53 43 52 45 |L).{...."3) SCRE|
00000250: 45 4E 20 4F 52 20 34 29 20 50 52 49 4E 54 45 52 |EN OR 4) PRINTER|
00000260: 20 3A 22 3B 44 56 3A 20 8B 20 44 56 B3 33 20 B0 | :";DV: . DV.3 .|
00000270: 20 44 56 B1 34 20 A7 20 32 31 30 00 A0 06 DC 00 | DV.4 . 210.....|
00000280: 9F 20 31 35 2C 38 2C 31 35 3A 20 9F 20 35 2C 38 |. 15,8,15: . 5,8|
00000290: 2C 35 2C 22 23 22 3A 20 9F 20 31 2C 28 44 56 29 |,5,"#": . 1,(DV)|
000002A0: 00 CC 06 E6 00 53 45 43 B2 31 3A 20 43 54 52 B2 |.....SEC.1: CTR.|
000002B0: 30 3A 20 42 55 B2 30 3A 20 5A 24 B2 C7 28 30 29 |0: BU.0: Z$..(0)|
000002C0: 3A 20 53 50 24 B2 22 20 20 20 20 22 00 F8 06 F0 |: SP$." "....|
000002D0: 00 98 31 35 2C 22 55 31 3A 22 35 3B 44 52 3B 44 |..15,"U1:"5;DR;D|
000002E0: 54 52 4B 3B 53 45 43 3A 20 8F 20 2A 2A 20 42 4C |TRK;SEC: . ** BL|
000002F0: 4F 43 4B 20 52 45 41 44 00 33 07 FA 00 98 31 35 |OCK READ.3....15|
00000300: 2C 22 42 2D 50 3A 22 35 3B 30 3A 20 43 54 52 B2 |,"B-P:"5;0: CTR.|
00000310: 30 3A 20 8F 20 2A 2A 20 50 4F 53 49 54 49 4F 4E |0: . ** POSITION|
00000320: 20 54 48 45 20 42 55 46 46 45 52 20 50 4F 49 4E | THE BUFFER POIN|
00000330: 54 45 52 00 61 07 04 01 A1 23 35 2C 4E 54 24 2C |TER.a....#5,NT$,|
00000340: 4E 53 24 3A 20 8F 20 2A 2A 20 4E 45 58 54 20 54 |NS$: . ** NEXT T|
00000350: 52 41 43 4B 2F 53 45 43 54 4F 52 20 4C 49 4E 4B |RACK/SECTOR LINK|
00000360: 53 00 8D 07 0E 01 A1 23 35 2C 46 54 24 3A 20 46 |S......#5,FT$: F|
00000370: 54 B2 C6 28 46 54 24 AA 5A 24 29 AF 31 35 3A 20 |T..(FT$.Z$).15: |
00000380: 8B 20 46 54 B1 34 20 A7 20 46 54 B2 30 00 B4 07 |. FT.4 . FT.0...|
00000390: 18 01 46 54 24 B2 46 54 24 28 46 54 29 3A 20 8F |..FT$.FT$(FT): .|
000003A0: 20 2A 2A 20 41 53 53 49 47 4E 20 46 49 4C 45 20 | ** ASSIGN FILE |
000003B0: 54 59 50 45 00 DE 07 22 01 A1 23 35 2C 54 24 2C |TYPE..."..#5,T$,|
000003C0: 53 24 3A 20 8F 20 2A 2A 20 46 49 52 53 54 20 44 |S$: . ** FIRST D|
000003D0: 41 54 41 20 54 52 4B 2F 53 45 43 54 4F 52 00 FD |ATA TRK/SECTOR..|
000003E0: 07 2C 01 54 52 4B B2 C6 28 54 24 AA 5A 24 29 3A |.,.TRK..(T$.Z$):|
000003F0: 20 53 4B 54 B2 C6 28 53 24 AA 5A 24 29 00 3D 08 | SKT..(S$.Z$).=.|
00000400: 36 01 46 4C 24 B2 22 22 3A 20 81 20 58 B2 31 A4 |6.FL$."": . X.1.|
00000410: 31 36 3A 20 A1 23 35 2C 41 24 3A 20 46 4C 24 B2 |16: .#5,A$: FL$.|
00000420: 46 4C 24 AA C7 28 C6 28 41 24 AA 5A 24 29 29 3A |FL$..(.(A$.Z$)):|
00000430: 20 82 3A 20 8F 20 46 49 4C 4E 41 4D 45 00 86 08 | .: . FILNAME...|
00000440: 40 01 A1 23 35 2C 53 52 24 2C 53 53 24 2C 52 4C |@..#5,SR$,SS$,RL|
00000450: 24 3A 20 8F 20 2A 2A 20 46 49 52 53 54 20 54 52 |$: . ** FIRST TR|
00000460: 4B 2F 53 45 43 20 53 49 44 45 20 53 45 43 54 4F |K/SEC SIDE SECTO|
00000470: 52 20 2B 20 4C 45 4E 47 54 48 20 49 46 20 52 45 |R + LENGTH IF RE|
00000480: 4C 20 46 49 4C 45 00 B3 08 4A 01 53 52 B2 C6 28 |L FILE...J.SR..(|
00000490: 53 52 24 AA 5A 24 29 3A 20 53 53 B2 C6 28 53 53 |SR$.Z$): SS..(SS|
000004A0: 24 AA 5A 24 29 3A 20 52 4C B2 C6 28 52 4C 24 AA |$.Z$): RL..(RL$.|
000004B0: 5A 24 29 00 EA 08 54 01 A1 23 35 2C 47 42 24 2C |Z$)...T..#5,GB$,|
000004C0: 47 42 24 2C 47 42 24 2C 47 42 24 2C 47 42 24 2C |GB$,GB$,GB$,GB$,|
000004D0: 47 42 24 3A 20 8F 20 2A 2A 20 36 20 42 59 54 45 |GB$: . ** 6 BYTE|
000004E0: 53 20 4E 4F 54 20 55 53 45 44 00 18 09 5E 01 A1 |S NOT USED...^..|
000004F0: 23 35 2C 42 4C 24 2C 42 48 24 3A 20 42 4C 4B 53 |#5,BL$,BH$: BLKS|
00000500: B2 C6 28 42 4C 24 AA 5A 24 29 AA 32 35 36 AC C6 |..(BL$.Z$).256..|
00000510: 28 42 48 24 AA 5A 24 29 00 57 09 68 01 A1 23 35 |(BH$.Z$).W.h..#5|
00000520: 2C 47 42 24 2C 47 42 24 3A 20 8F 20 2A 2A 20 54 |,GB$,GB$: . ** T|
00000530: 57 4F 20 57 41 53 54 45 44 20 42 59 54 45 53 20 |WO WASTED BYTES |
00000540: 41 54 20 53 54 41 52 54 20 4F 46 20 4E 45 58 54 |AT START OF NEXT|
00000550: 20 52 45 43 4F 52 44 00 68 09 72 01 8B 20 46 54 | RECORD.h.r.. FT|
00000560: B2 30 20 A7 20 34 37 30 00 91 09 7C 01 44 50 24 |.0 . 470...|.DP$|
00000570: B2 CA 28 C4 28 44 54 52 4B 29 2C 32 29 AA 22 3A |..(.(DTRK),2).":|
00000580: 22 AA CA 28 C4 28 53 45 43 29 2C 32 29 AA 22 3A |"..(.(SEC),2).":|
00000590: 22 00 AE 09 86 01 44 50 24 B2 44 50 24 AA CA 28 |".....DP$.DP$..(|
000005A0: C4 28 43 54 52 AC 33 32 AA 32 29 2C 32 29 00 EB |.(CTR.32.2),2)..|
000005B0: 09 90 01 44 50 24 B2 CA 28 44 50 24 AA 53 50 24 |...DP$..(DP$.SP$|
000005C0: 2C 31 2C C3 28 44 50 24 29 AA 28 31 30 AB C3 28 |,1,.(DP$).(10..(|
000005D0: 44 50 24 29 29 29 AA C9 28 53 50 24 AA C4 28 42 |DP$)))..(SP$..(B|
000005E0: 4C 4B 53 29 2C 35 29 AA 22 20 22 00 15 0A 9A 01 |LKS),5)." ".....|
000005F0: 8B 20 53 4C 24 B2 22 41 4C 4C 22 20 A7 20 34 33 |. SL$."ALL" . 43|
00000600: 30 3A 20 8F 20 2A 2A 20 45 56 45 52 59 54 48 49 |0: . ** EVERYTHI|
00000610: 4E 47 20 4F 4B 00 45 0A A4 01 8B 20 53 4C 24 B3 |NG OK.E.... SL$.|
00000620: B1 46 54 24 20 A7 20 34 36 30 20 3A 20 8F 20 2A |.FT$ . 460 : . *|
00000630: 2A 20 46 49 4C 45 20 54 59 50 45 20 49 4E 43 4F |* FILE TYPE INCO|
00000640: 52 52 45 43 54 00 6B 0A AE 01 98 31 2C 44 50 24 |RRECT.k....1,DP$|
00000650: 46 4C 24 22 20 22 46 54 24 22 20 54 52 4B 22 54 |FL$" "FT$" TRK"T|
00000660: 52 4B 22 53 45 43 22 53 4B 54 3B 00 88 0A B8 01 |RK"SEC"SKT;.....|
00000670: 8B 20 46 54 24 B3 B1 22 52 45 4C 22 20 A7 20 98 |. FT$.."REL" . .|
00000680: 31 3A 20 89 20 34 36 30 00 AA 0A C2 01 98 31 2C |1: . 460......1,|
00000690: 22 53 53 20 3A 20 54 52 4B 22 53 52 22 53 45 43 |"SS : TRK"SR"SEC|
000006A0: 22 53 53 22 4C 45 4E 22 52 4C 00 D4 0A CC 01 42 |"SS"LEN"RL.....B|
000006B0: 55 B2 42 55 AA 42 4C 4B 53 3A 20 8F 20 2A 2A 20 |U.BU.BLKS: . ** |
000006C0: 42 4C 4F 43 4B 53 20 55 53 45 44 20 49 4E 20 54 |BLOCKS USED IN T|
000006D0: 4F 54 41 4C 00 F1 0A D6 01 43 54 52 B2 43 54 52 |OTAL.....CTR.CTR|
000006E0: AA 31 3A 20 8B 20 43 54 52 B3 38 20 A7 20 32 37 |.1: . CTR.8 . 27|
000006F0: 30 00 13 0B E0 01 44 54 52 4B B2 C6 28 4E 54 24 |0.....DTRK..(NT$|
00000700: AA 5A 24 29 3A 20 53 45 43 B2 C6 28 4E 53 24 AA |.Z$): SEC..(NS$.|
00000710: 5A 24 29 00 24 0B EA 01 8B 20 44 54 52 4B 20 A7 |Z$).$.... DTRK .|
00000720: 20 32 34 30 00 4E 0B F4 01 98 31 2C 22 2E 2E 2E | 240.N....1,"...|
00000730: 20 54 4F 54 41 4C 20 23 20 42 4C 4F 43 4B 53 20 | TOTAL # BLOCKS |
00000740: 55 53 45 44 20 3A 22 42 55 22 2E 2E 2E 22 00 61 |USED :"BU"...".a|
00000750: 0B FE 01 A0 31 3A 20 A0 35 3A 20 A0 31 35 3A 20 |....1: .5: .15: |
00000760: 80 00 00 00 |.... |
..8.... THE TRANSACTOR VOLUME 5 ISSUE 06
PAGE 66.W.... SAVE"@0:SUPER CAT
.BAS",8...D.. ** RTE/84 - A SUPER CATALO
G ROUTINE THAT SUPPLIES ALL FILE INFO.A.
N.."** SUPER CATALOG - RTE/84 **"...X.FT
$(0)."DEL": FT$(1)."SEQ": FT$(2)."PRG":
FT$(3)."USR": FT$(4)."REL"......"DRIVE T
YPE :".A...."1) 1541/2031/4040 OR 2) 805
0/8250 :";TY: . TY.1 . TY.2 . 140.....DT
RK.39: . TY.1 . DTRK.18: . ** DIRECTORY
TRACK... .."DRIVE #";DR: . DR.1 . 160.R.
..."SELECTIVE DIRECTORY ?"......"1) SEQ,
2) PRG, 3) USR, 4) REL, 5) ALL"...... S
L: . SL.1 . SL.5 . 190.B.H.SL$."ALL": .
SL.5 . SL$.FT$(SL).{.R.."3) SCREEN OR 4)
PRINTER :";DV: . DV.3 . DV.4 . 210. ...
. 15,8,15: . 5,8,5,"#": . 1,(DV).L...SEC
.1: CTR.0: BU.0: Z$.G(0): SP$." "....
..15,"U1:"5;DR;DTRK;SEC: . ** BLOCK READ
.3....15,"B-P:"5;0: CTR.0: . ** POSITION
THE BUFFER POINTER.A....#5,NT$,NS$: . *
* NEXT TRACK/SECTOR LINKS......#5,FT$: F
T.F(FT$.Z$).15: . FT.4 . FT.0.....FT$.FT
$(FT): . ** ASSIGN FILE TYPE..."..#5,T$,
S$: . ** FIRST DATA TRK/SECTOR...,.TRK.F
(T$.Z$): SKT.F(S$.Z$).=.6.FL$."": . X.1.
16: .#5,A$: FL$.FL$.G(F(A$.Z$)): .: . FI
LNAME...@..#5,SR$,SS$,RL$: . ** FIRST TR
K/SEC SIDE SECTOR + LENGTH IF REL FILE..
.J.SR.F(SR$.Z$): SS.F(SS$.Z$): RL.F(RL$.
Z$)...T..#5,GB$,GB$,GB$,GB$,GB$,GB$: . *
* 6 BYTES NOT USED...^..#5,BL$,BH$: BLKS
.F(BL$.Z$).256.F(BH$.Z$).W.H..#5,GB$,GB$
: . ** TWO WASTED BYTES AT START OF NEXT
RECORD.H.R.. FT.0 . 470...|.DP$.J(D(DTR
K),2).":".J(D(SEC),2).":".....DP$.DP$.J(
D(CTR.32.2),2).....DP$.J(DP$.SP$,1,C(DP$
).(10.C(DP$))).I(SP$.D(BLKS),5)." ".....
. SL$."ALL" . 430: . ** EVERYTHING OK.E.
... SL$..FT$ . 460 : . ** FILE TYPE INCO
RRECT.K....1,DP$FL$" "FT$" TRK"TRK"SEC"S
KT;...... FT$.."REL" . .1: . 460...B..1,
"SS : TRK"SR"SEC"SS"LEN"RL.T.L.BU.BU.BLK
S: . ** BLOCKS USED IN TOTAL...V.CTR.CTR
.1: . CTR.8 . 270.....DTRK.F(NT$.Z$): SE
C.F(NS$.Z$).$.... DTRK . 240.N....1,"...
TOTAL # BLOCKS USED :"BU"...".A... 1:
5: 15: ....
> CLICK IMAGE PREVIEW FOR FULL MODAL