SUPER CAT
FILE INFORMATION
FILENAME(S): SUPER CAT
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-10-19 22:48:32
APPEARS ON: 1 disk(s)
FILE HASH
2554863ac4b984b5ad84f31f62d6021f3d940f65b6df2ee7b7bbee24382be419
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| M M UTILITY | SUPER CAT | PRG | Radd Maxx | 23 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 38 08 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 08 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 08 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 08 |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 09 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 09 82 00 99 |$(4)."REL"......| 00000110: 22 44 52 49 56 45 20 54 59 50 45 20 3A 22 00 53 |"DRIVE TYPE :".S| 00000120: 09 8C 00 85 22 28 31 29 20 31 35 34 31 2F 32 30 |...."(1) 1541/20| 00000130: 33 31 2F 34 30 34 30 29 20 3A 22 3B 54 59 3A 20 |31/4040) :";TY: | 00000140: 8B 20 54 59 B3 31 20 B0 20 54 59 B1 32 20 A7 20 |. TY.1 . TY.2 . | 00000150: 31 34 30 00 87 09 96 00 44 54 52 4B B2 33 39 3A |140.....DTRK.39:| 00000160: 20 8B 20 54 59 B2 31 20 A7 20 44 54 52 4B B2 31 | . TY.1 . DTRK.1| 00000170: 38 3A 20 8F 20 2A 2A 20 44 49 52 45 43 54 4F 52 |8: . ** DIRECTOR| 00000180: 59 20 54 52 41 43 4B 00 A7 09 A0 00 85 22 44 52 |Y TRACK......"DR| 00000190: 49 56 45 20 23 22 3B 44 52 3A 20 8B 20 44 52 B1 |IVE #";DR: . DR.| 000001A0: 31 20 A7 20 31 36 30 00 AD 09 A1 00 8F 00 B3 09 |1 . 160.........| 000001B0: A2 00 8F 00 D0 09 AA 00 99 22 53 45 4C 45 43 54 |........."SELECT| 000001C0: 49 56 45 20 44 49 52 45 43 54 4F 52 59 20 3F 22 |IVE DIRECTORY ?"| 000001D0: 00 D6 09 AB 00 8F 00 DC 09 AC 00 8F 00 0B 0A B4 |................| 000001E0: 00 99 22 28 31 29 20 53 45 51 2C 28 32 29 20 50 |.."(1) SEQ,(2) P| 000001F0: 52 47 2C 28 33 29 20 55 53 52 2C 28 34 29 20 52 |RG,(3) USR,(4) R| 00000200: 45 4C 2C 28 35 29 20 41 4C 4C 22 00 29 0A BE 00 |EL,(5) ALL".)...| 00000210: 85 20 53 4C 3A 20 8B 20 53 4C B3 31 20 B0 20 53 |. SL: . SL.1 . S| 00000220: 4C B1 35 20 A7 20 31 39 30 00 4D 0A C8 00 53 4C |L.5 . 190.M...SL| 00000230: 24 B2 22 41 4C 4C 22 3A 20 8B 20 53 4C B3 35 20 |$."ALL": . SL.5 | 00000240: A7 20 53 4C 24 B2 46 54 24 28 53 4C 29 00 8D 0A |. SL$.FT$(SL)...| 00000250: D2 00 85 22 20 20 20 20 20 28 33 29 20 53 43 52 |..." (3) SCR| 00000260: 45 45 4E 20 4F 52 20 28 34 29 20 50 52 49 4E 54 |EEN OR (4) PRINT| 00000270: 45 52 20 3A 22 3B 44 56 3A 20 8B 20 44 56 B3 33 |ER :";DV: . DV.3| 00000280: 20 B0 20 44 56 B1 34 20 A7 20 32 31 30 00 B2 0A | . DV.4 . 210...| 00000290: DC 00 9F 20 31 35 2C 38 2C 31 35 3A 20 9F 20 35 |... 15,8,15: . 5| 000002A0: 2C 38 2C 35 2C 22 23 22 3A 20 9F 20 31 2C 28 44 |,8,5,"#": . 1,(D| 000002B0: 56 29 00 DE 0A E6 00 53 45 43 B2 31 3A 20 43 54 |V).....SEC.1: CT| 000002C0: 52 B2 30 3A 20 42 55 B2 30 3A 20 5A 24 B2 C7 28 |R.0: BU.0: Z$..(| 000002D0: 30 29 3A 20 53 50 24 B2 22 20 20 20 20 22 00 0A |0): SP$." "..| 000002E0: 0B F0 00 98 31 35 2C 22 55 31 3A 22 35 3B 44 52 |....15,"U1:"5;DR| 000002F0: 3B 44 54 52 4B 3B 53 45 43 3A 20 8F 20 2A 2A 20 |;DTRK;SEC: . ** | 00000300: 42 4C 4F 43 4B 20 52 45 41 44 00 45 0B FA 00 98 |BLOCK READ.E....| 00000310: 31 35 2C 22 42 2D 50 3A 22 35 3B 30 3A 20 43 54 |15,"B-P:"5;0: CT| 00000320: 52 B2 30 3A 20 8F 20 2A 2A 20 50 4F 53 49 54 49 |R.0: . ** POSITI| 00000330: 4F 4E 20 54 48 45 20 42 55 46 46 45 52 20 50 4F |ON THE BUFFER PO| 00000340: 49 4E 54 45 52 00 73 0B 04 01 A1 23 35 2C 4E 54 |INTER.s....#5,NT| 00000350: 24 2C 4E 53 24 3A 20 8F 20 2A 2A 20 4E 45 58 54 |$,NS$: . ** NEXT| 00000360: 20 54 52 41 43 4B 2F 53 45 43 54 4F 52 20 4C 49 | TRACK/SECTOR LI| 00000370: 4E 4B 53 00 9F 0B 0E 01 A1 23 35 2C 46 54 24 3A |NKS......#5,FT$:| 00000380: 20 46 54 B2 C6 28 46 54 24 AA 5A 24 29 AF 31 35 | FT..(FT$.Z$).15| 00000390: 3A 20 8B 20 46 54 B1 34 20 A7 20 46 54 B2 30 00 |: . FT.4 . FT.0.| 000003A0: C6 0B 18 01 46 54 24 B2 46 54 24 28 46 54 29 3A |....FT$.FT$(FT):| 000003B0: 20 8F 20 2A 2A 20 41 53 53 49 47 4E 20 46 49 4C | . ** ASSIGN FIL| 000003C0: 45 20 54 59 50 45 00 F0 0B 22 01 A1 23 35 2C 54 |E TYPE..."..#5,T| 000003D0: 24 2C 53 24 3A 20 8F 20 2A 2A 20 46 49 52 53 54 |$,S$: . ** FIRST| 000003E0: 20 44 41 54 41 20 54 52 4B 2F 53 45 43 54 4F 52 | DATA TRK/SECTOR| 000003F0: 00 0F 0C 2C 01 54 52 4B B2 C6 28 54 24 AA 5A 24 |...,.TRK..(T$.Z$| 00000400: 29 3A 20 53 4B 54 B2 C6 28 53 24 AA 5A 24 29 00 |): SKT..(S$.Z$).| 00000410: 4F 0C 36 01 46 4C 24 B2 22 22 3A 20 81 20 58 B2 |O.6.FL$."": . X.| 00000420: 31 A4 31 36 3A 20 A1 23 35 2C 41 24 3A 20 46 4C |1.16: .#5,A$: FL| 00000430: 24 B2 46 4C 24 AA C7 28 C6 28 41 24 AA 5A 24 29 |$.FL$..(.(A$.Z$)| 00000440: 29 3A 20 82 3A 20 8F 20 46 49 4C 4E 41 4D 45 00 |): .: . FILNAME.| 00000450: 98 0C 40 01 A1 23 35 2C 53 52 24 2C 53 53 24 2C |..@..#5,SR$,SS$,| 00000460: 52 4C 24 3A 20 8F 20 2A 2A 20 46 49 52 53 54 20 |RL$: . ** FIRST | 00000470: 54 52 4B 2F 53 45 43 20 53 49 44 45 20 53 45 43 |TRK/SEC SIDE SEC| 00000480: 54 4F 52 20 2B 20 4C 45 4E 47 54 48 20 49 46 20 |TOR + LENGTH IF | 00000490: 52 45 4C 20 46 49 4C 45 00 C5 0C 4A 01 53 52 B2 |REL FILE...J.SR.| 000004A0: C6 28 53 52 24 AA 5A 24 29 3A 20 53 53 B2 C6 28 |.(SR$.Z$): SS..(| 000004B0: 53 53 24 AA 5A 24 29 3A 20 52 4C B2 C6 28 52 4C |SS$.Z$): RL..(RL| 000004C0: 24 AA 5A 24 29 00 FC 0C 54 01 A1 23 35 2C 47 42 |$.Z$)...T..#5,GB| 000004D0: 24 2C 47 42 24 2C 47 42 24 2C 47 42 24 2C 47 42 |$,GB$,GB$,GB$,GB| 000004E0: 24 2C 47 42 24 3A 20 8F 20 2A 2A 20 36 20 42 59 |$,GB$: . ** 6 BY| 000004F0: 54 45 53 20 4E 4F 54 20 55 53 45 44 00 2A 0D 5E |TES NOT USED.*.^| 00000500: 01 A1 23 35 2C 42 4C 24 2C 42 48 24 3A 20 42 4C |..#5,BL$,BH$: BL| 00000510: 4B 53 B2 C6 28 42 4C 24 AA 5A 24 29 AA 32 35 36 |KS..(BL$.Z$).256| 00000520: AC C6 28 42 48 24 AA 5A 24 29 00 69 0D 68 01 A1 |..(BH$.Z$).i.h..| 00000530: 23 35 2C 47 42 24 2C 47 42 24 3A 20 8F 20 2A 2A |#5,GB$,GB$: . **| 00000540: 20 54 57 4F 20 57 41 53 54 45 44 20 42 59 54 45 | TWO WASTED BYTE| 00000550: 53 20 41 54 20 53 54 41 52 54 20 4F 46 20 4E 45 |S AT START OF NE| 00000560: 58 54 20 52 45 43 4F 52 44 00 7A 0D 72 01 8B 20 |XT RECORD.z.r.. | 00000570: 46 54 B2 30 20 A7 20 34 37 30 00 A3 0D 7C 01 44 |FT.0 . 470...|.D| 00000580: 50 24 B2 CA 28 C4 28 44 54 52 4B 29 2C 32 29 AA |P$..(.(DTRK),2).| 00000590: 22 3A 22 AA CA 28 C4 28 53 45 43 29 2C 32 29 AA |":"..(.(SEC),2).| 000005A0: 22 3A 22 00 C0 0D 86 01 44 50 24 B2 44 50 24 AA |":".....DP$.DP$.| 000005B0: CA 28 C4 28 43 54 52 AC 33 32 AA 32 29 2C 32 29 |.(.(CTR.32.2),2)| 000005C0: 00 FD 0D 90 01 44 50 24 B2 CA 28 44 50 24 AA 53 |.....DP$..(DP$.S| 000005D0: 50 24 2C 31 2C C3 28 44 50 24 29 AA 28 31 30 AB |P$,1,.(DP$).(10.| 000005E0: C3 28 44 50 24 29 29 29 AA C9 28 53 50 24 AA C4 |.(DP$)))..(SP$..| 000005F0: 28 42 4C 4B 53 29 2C 35 29 AA 22 20 22 00 27 0E |(BLKS),5)." ".'.| 00000600: 9A 01 8B 20 53 4C 24 B2 22 41 4C 4C 22 20 A7 20 |... SL$."ALL" . | 00000610: 34 33 30 3A 20 8F 20 2A 2A 20 45 56 45 52 59 54 |430: . ** EVERYT| 00000620: 48 49 4E 47 20 4F 4B 00 57 0E A4 01 8B 20 53 4C |HING OK.W.... SL| 00000630: 24 B3 B1 46 54 24 20 A7 20 34 36 30 20 3A 20 8F |$..FT$ . 460 : .| 00000640: 20 2A 2A 20 46 49 4C 45 20 54 59 50 45 20 49 4E | ** FILE TYPE IN| 00000650: 43 4F 52 52 45 43 54 00 7D 0E AE 01 98 31 2C 44 |CORRECT.}....1,D| 00000660: 50 24 46 4C 24 22 20 22 46 54 24 22 20 54 52 4B |P$FL$" "FT$" TRK| 00000670: 22 54 52 4B 22 53 45 43 22 53 4B 54 3B 00 9A 0E |"TRK"SEC"SKT;...| 00000680: B8 01 8B 20 46 54 24 B3 B1 22 52 45 4C 22 20 A7 |... FT$.."REL" .| 00000690: 20 98 31 3A 20 89 20 34 36 30 00 BC 0E C2 01 98 | .1: . 460......| 000006A0: 31 2C 22 53 53 20 3A 20 54 52 4B 22 53 52 22 53 |1,"SS : TRK"SR"S| 000006B0: 45 43 22 53 53 22 4C 45 4E 22 52 4C 00 E6 0E CC |EC"SS"LEN"RL....| 000006C0: 01 42 55 B2 42 55 AA 42 4C 4B 53 3A 20 8F 20 2A |.BU.BU.BLKS: . *| 000006D0: 2A 20 42 4C 4F 43 4B 53 20 55 53 45 44 20 49 4E |* BLOCKS USED IN| 000006E0: 20 54 4F 54 41 4C 00 03 0F D6 01 43 54 52 B2 43 | TOTAL.....CTR.C| 000006F0: 54 52 AA 31 3A 20 8B 20 43 54 52 B3 38 20 A7 20 |TR.1: . CTR.8 . | 00000700: 32 37 30 00 25 0F E0 01 44 54 52 4B B2 C6 28 4E |270.%...DTRK..(N| 00000710: 54 24 AA 5A 24 29 3A 20 53 45 43 B2 C6 28 4E 53 |T$.Z$): SEC..(NS| 00000720: 24 AA 5A 24 29 00 36 0F EA 01 8B 20 44 54 52 4B |$.Z$).6.... DTRK| 00000730: 20 A7 20 32 34 30 00 60 0F F4 01 98 31 2C 22 2E | . 240.`....1,".| 00000740: 2E 2E 20 54 4F 54 41 4C 20 23 20 42 4C 4F 43 4B |.. TOTAL # BLOCK| 00000750: 53 20 55 53 45 44 20 3A 22 42 55 22 2E 2E 2E 22 |S USED :"BU"..."| 00000760: 00 73 0F FE 01 A0 31 3A 20 A0 35 3A 20 A0 31 35 |.s....1: .5: .15| 00000770: 3A 20 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 :".S...."(1) 1541/2031/4040) :";TY:
. TY.1 . TY.2 . 140.....DTRK.39: . TY.1
. DTRK.18: . ** DIRECTORY TRACK... .."DR
IVE #";DR: . DR.1 . 160.............P...
."SELECTIVE DIRECTORY ?".V..............
.."(1) SEQ,(2) PRG,(3) USR,(4) REL,(5) A
LL".).... SL: . SL.1 . SL.5 . 190.M.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).....SEC.1: CTR.0: BU.0: Z$.G(
0): SP$." "......15,"U1:"5;DR;DTRK;SE
C: . ** BLOCK READ.E....15,"B-P:"5;0: CT
R.0: . ** POSITION THE BUFFER POINTER.S.
...#5,NT$,NS$: . ** NEXT TRACK/SECTOR LI
NKS......#5,FT$: FT.F(FT$.Z$).15: . FT.4
. FT.0.F...FT$.FT$(FT): . ** ASSIGN FIL
E TYPE..."..#5,T$,S$: . ** FIRST DATA TR
K/SECTOR...,.TRK.F(T$.Z$): SKT.F(S$.Z$).
O.6.FL$."": . X.1.16: .#5,A$: FL$.FL$.G(
F(A$.Z$)): .: . FILNAME...@..#5,SR$,SS$,
RL$: . ** FIRST TRK/SEC SIDE SECTOR + LE
NGTH IF REL FILE.E.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
$).I.H..#5,GB$,GB$: . ** TWO WASTED BYTE
S AT START OF NEXT RECORD.Z.R.. FT.0 . 4
70...|.DP$.J(D(DTRK),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.W.... SL$..FT$ . 460 : .
** FILE TYPE INCORRECT.}....1,DP$FL$" "
FT$" TRK"TRK"SEC"SKT;...... FT$.."REL" .
.1: . 460...B..1,"SS : TRK"SR"SEC"SS"LE
N"RL...L.BU.BU.BLKS: . ** BLOCKS USED IN
TOTAL...V.CTR.CTR.1: . CTR.8 . 270.%...
DTRK.F(NT$.Z$): SEC.F(NS$.Z$).6.... DTRK
. 240.`....1,"... TOTAL # BLOCKS USED :
"BU"...".S... 1: 5: 15: ....
> CLICK IMAGE PREVIEW FOR FULL MODAL