DIRECTORY 3X EXP

FILE INFORMATION

FILENAME(S): DIRECTORY 3X EXP

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-10-20 14:31:53

APPEARS ON: 2 disk(s)

FILE HASH

e09cca61720b666ea89784125083c38d7b999236d810dba52fa0479546053a33

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
MASTERMMSOFT	DIRECTORY 3X EXP	PRG	Treasure Chest - Klaus Der Suhler	12	5	DOWNLOAD FILE
D M PD SERVICE	DIRECTORY 3X EXP	PRG	Treasure Chest - Wolfgang Rauprich	12	5	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 29 08 37 00 8F 22  8D 91 12 20 2A 2A 2A 2A  |..).7.."... ****|
00000010: 2A 20 20 57 52 49 54 54  45 4E 20 42 59 20 57 2E  |*  WRITTEN BY W.|
00000020: 54 2E 20 20 2A 2A 2A 2A  2A 00 51 08 38 00 8F 22  |T.  *****.Q.8.."|
00000030: 8D 91 12 20 2A 2A 2A 2A  2A 20 49 4D 50 52 4F 56  |... ***** IMPROV|
00000040: 45 44 20 42 59 20 48 2E  53 2E 20 20 2A 2A 2A 2A  |ED BY H.S.  ****|
00000050: 2A 00 79 08 39 00 8F 22  8D 91 12 20 2A 2A 2A 2A  |*.y.9.."... ****|
00000060: 2A 20 20 4F 4E 20 4A 55  4C 59 20 31 30 54 48 20  |*  ON JULY 10TH |
00000070: 38 34 20 20 2A 2A 2A 2A  2A 00 95 08 64 00 97 35  |84  *****...d..5|
00000080: 33 32 38 30 2C 36 3A 97  35 33 32 38 31 2C 36 3A  |3280,6:.53281,6:|
00000090: 99 22 93 9A 22 00 9F 08  6E 00 4C 50 B2 36 35 00  |.".."...n.LP.65.|
000000A0: C7 08 73 00 99 22 11 1D  50 4C 45 41 53 45 20 43  |..s.."..PLEASE C|
000000B0: 48 45 43 4B 20 50 52 49  4E 54 45 52 20 41 4E 44  |HECK PRINTER AND|
000000C0: 20 45 4E 54 45 52 22 00  03 09 78 00 85 22 11 1D  | ENTER"...x.."..|
000000D0: 4C 49 4E 45 53 20 50 45  52 20 50 41 47 45 20 28  |LINES PER PAGE (|
000000E0: 43 52 20 43 41 55 53 45  53 20 36 35 29 22 3B 4C  |CR CAUSES 65)";L|
000000F0: 50 3A 97 32 30 32 35 2C  4C 50 3A 97 32 30 32 36  |P:.2025,LP:.2026|
00000100: 2C 4C 50 00 19 09 8C 00  86 48 24 28 31 35 30 29  |,LP......H$(150)|
00000110: 2C 44 52 24 28 31 35 30  29 00 4D 09 A0 00 51 4D  |,DR$(150).M...QM|
00000120: 24 B2 C7 28 33 34 29 3A  53 50 24 B2 22 20 22 3A  |$..(34):SP$." ":|
00000130: 81 49 B2 31 A4 38 30 3A  53 24 B2 53 24 AA 53 50  |.I.1.80:S$.S$.SP|
00000140: 24 3A 82 3A 44 5A B2 30  3A 44 4D B2 30 00 63 09  |$:.:DZ.0:DM.0.c.|
00000150: B4 00 44 5A B2 44 5A AA  31 3A 8B 44 5A B1 33 A7  |..DZ.DZ.1:.DZ.3.|
00000160: 34 34 30 00 A5 09 C8 00  99 22 93 12 49 4E 53 45  |440......"..INSE|
00000170: 52 54 20 53 4F 55 52 43  45 20 44 49 53 4B 20 23  |RT SOURCE DISK #|
00000180: 22 44 5A 22 9D 20 49 4E  20 44 52 49 56 45 21 22  |"DZ". IN DRIVE!"|
00000190: 3A 99 22 54 59 50 45 20  27 50 27 20 54 4F 20 50  |:."TYPE 'P' TO P|
000001A0: 52 49 4E 54 22 00 D9 09  DC 00 99 22 11 50 52 45  |RINT"......".PRE|
000001B0: 53 53 20 4B 45 59 20 21  11 11 22 3A 97 31 39 38  |SS KEY !..":.198|
000001C0: 2C 30 3A 92 31 39 38 2C  31 3A A1 41 24 3A 8B 41  |,0:.198,1:.A$:.A|
000001D0: 24 B2 22 50 22 A7 34 34  30 00 F4 09 F0 00 99 22  |$."P".440......"|
000001E0: 13 11 11 11 50 4C 45 41  53 45 20 57 41 49 54 20  |....PLEASE WAIT |
000001F0: 21 11 11 22 00 2A 0A 04  01 8D 36 30 30 3A 99 C8  |!..".*....600:..|
00000200: 28 48 24 28 31 29 2C 33  29 22 12 22 3B CA 28 48  |(H$(1),3)".";.(H|
00000210: 24 28 31 29 2C 34 2C 32  31 29 3A 81 49 B2 32 A4  |$(1),4,21):.I.2.|
00000220: 48 3A 99 48 24 28 49 29  3A 82 00 68 0A 18 01 99  |H:.H$(I):..h....|
00000230: 22 11 53 48 41 4C 4C 20  49 20 54 41 4B 45 20 49  |".SHALL I TAKE I|
00000240: 54 20 28 59 2F 4E 29 20  3F 22 3A 97 31 39 38 2C  |T (Y/N) ?":.198,|
00000250: 30 3A 92 31 39 38 2C 31  3A A1 41 24 3A 8B 41 24  |0:.198,1:.A$:.A$|
00000260: B2 22 59 22 A7 33 36 30  00 79 0A 2C 01 8B 41 24  |."Y".360.y.,..A$|
00000270: B3 B1 22 4E 22 A7 32 38  30 00 90 0A 40 01 44 5A  |.."N".280...@.DZ|
00000280: B2 44 5A AB 31 3A 8B 44  5A B3 30 A7 44 5A B2 30  |.DZ.1:.DZ.0.DZ.0|
00000290: 00 99 0A 54 01 89 31 38  30 00 A8 0A 68 01 8B 48  |...T..180...h..H|
000002A0: B1 44 4D A7 44 4D B2 48  00 B4 0A 7C 01 81 49 B2  |.DM.DM.H...|..I.|
000002B0: 31 A4 44 4D 00 F1 0A 90  01 4C B2 C3 28 44 52 24  |1.DM.....L..(DR$|
000002C0: 28 49 29 29 3A 8B 4C B3  28 44 5A AB 31 29 AC 32  |(I)):.L.(DZ.1).2|
000002D0: 36 A7 44 52 24 28 49 29  B2 44 52 24 28 49 29 AA  |6.DR$(I).DR$(I).|
000002E0: C8 28 53 24 2C 28 44 5A  AB 31 29 AC 32 36 AB 4C  |.(S$,(DZ.1).26.L|
000002F0: 29 00 10 0B A4 01 44 52  24 28 49 29 B2 44 52 24  |).....DR$(I).DR$|
00000300: 28 49 29 AA 48 24 28 49  29 3A 82 3A 89 31 38 30  |(I).H$(I):.:.180|
00000310: 00 52 0B B8 01 8B 41 24  B2 22 50 22 A7 99 22 41  |.R....A$."P".."A|
00000320: 52 45 20 59 4F 55 20 53  55 52 45 20 28 59 2F 4E  |RE YOU SURE (Y/N|
00000330: 29 20 3F 22 3A 97 31 39  38 2C 30 3A 92 31 39 38  |) ?":.198,0:.198|
00000340: 2C 31 3A A1 42 24 3A 8B  42 24 B2 22 4E 22 A7 33  |,1:.B$:.B$."N".3|
00000350: 32 30 00 78 0B CC 01 8B  C2 28 32 30 32 35 29 AB  |20.x.....(2025).|
00000360: 49 B1 30 A7 97 32 30 32  35 2C C2 28 32 30 32 35  |I.0..2025,.(2025|
00000370: 29 AB 49 3A 89 34 38 30  00 B6 0B D6 01 99 22 11  |).I:.480......".|
00000380: 11 11 1D 4E 45 57 20 50  41 47 45 20 4E 45 43 45  |...NEW PAGE NECE|
00000390: 53 53 41 52 59 20 21 22  3A 99 22 1D 11 50 52 45  |SSARY !":."..PRE|
000003A0: 53 53 20 41 4E 59 20 4B  45 59 20 57 48 45 4E 20  |SS ANY KEY WHEN |
000003B0: 52 45 41 44 59 22 00 D6  0B DB 01 97 31 39 38 2C  |READY"......198,|
000003C0: 30 3A 92 31 39 38 2C 31  3A 97 32 30 32 35 2C C2  |0:.198,1:.2025,.|
000003D0: 28 32 30 32 36 29 00 10  0C E0 01 55 31 24 B2 C8  |(2026).....U1$..|
000003E0: 28 44 52 24 28 31 29 2C  33 29 3A 55 32 24 B2 CA  |(DR$(1),3):U2$..|
000003F0: 28 44 52 24 28 31 29 2C  34 2C 32 31 29 3A 55 33  |(DR$(1),4,21):U3|
00000400: 24 B2 CA 28 44 52 24 28  31 29 2C 32 35 2C 35 29  |$..(DR$(1),25,5)|
00000410: 00 4F 0C F4 01 55 34 24  B2 CA 28 44 52 24 28 31  |.O...U4$..(DR$(1|
00000420: 29 2C 33 30 2C 32 31 29  3A 55 35 24 B2 CA 28 44  |),30,21):U5$..(D|
00000430: 52 24 28 31 29 2C 35 31  2C 35 29 3A 55 36 24 B2  |R$(1),51,5):U6$.|
00000440: CA 28 44 52 24 28 31 29  2C 35 36 2C 32 31 29 00  |.(DR$(1),56,21).|
00000450: 61 0C 08 02 9F 31 2C 34  3A 98 31 2C C7 28 31 33  |a....1,4:.1,.(13|
00000460: 29 00 96 0C 1C 02 98 31  2C 55 31 24 C7 28 31 38  |)......1,U1$.(18|
00000470: 29 55 32 24 C7 28 31 34  36 29 55 33 24 C7 28 31  |)U2$.(146)U3$.(1|
00000480: 38 29 55 34 24 C7 28 31  34 36 29 55 35 24 C7 28  |8)U4$.(146)U5$.(|
00000490: 31 38 29 55 36 24 00 B9  0C 30 02 81 49 B2 32 A4  |18)U6$...0..I.2.|
000004A0: 44 4D 3A 98 31 2C 44 52  24 28 49 29 3A 82 3A 98  |DM:.1,DR$(I):.:.|
000004B0: 31 3A A0 31 3A 8A 31 34  30 00 BF 0C 44 02 80 00  |1:.1:.140...D...|
000004C0: CF 0C 58 02 8F 20 44 49  52 45 43 54 4F 52 59 00  |..X.. DIRECTORY.|
000004D0: FF 0C 6C 02 48 B2 30 3A  81 49 B2 31 A4 31 35 30  |..l.H.0:.I.1.150|
000004E0: 3A 48 24 28 49 29 B2 4E  24 3A 82 3A 9F 32 2C 38  |:H$(I).N$:.:.2,8|
000004F0: 2C 31 35 3A 9F 31 2C 38  2C 30 2C 22 24 30 22 00  |,15:.1,8,0,"$0".|
00000500: 0D 0D 80 02 A1 23 31 2C  41 24 2C 42 24 00 21 0D  |.....#1,A$,B$.!.|
00000510: 94 02 48 B2 48 AA 31 3A  A1 23 31 2C 41 24 2C 42  |..H.H.1:.#1,A$,B|
00000520: 24 00 2F 0D A8 02 A1 23  31 2C 41 24 2C 42 24 00  |$./....#1,A$,B$.|
00000530: 37 0D BC 02 43 B2 30 00  4B 0D D0 02 8B 41 24 B3  |7...C.0.K....A$.|
00000540: B1 4E 24 A7 43 B2 C6 28  41 24 29 00 65 0D E4 02  |.N$.C..(A$).e...|
00000550: 8B 42 24 B3 B1 4E 24 A7  43 B2 43 AA C6 28 42 24  |.B$..N$.C.C..(B$|
00000560: 29 AC 32 35 36 00 87 0D  F8 02 48 24 28 48 29 B2  |).256.....H$(H).|
00000570: CA 28 C4 28 43 29 2C 32  29 AA 53 50 24 3A 4C 4D  |.(.(C),2).SP$:LM|
00000580: B2 34 3A 8D 39 36 30 00  C6 0D 0C 03 A1 23 31 2C  |.4:.960......#1,|
00000590: 42 24 3A 8B 53 54 B3 B1  30 A7 48 24 28 48 29 B2  |B$:.ST..0.H$(H).|
000005A0: 48 24 28 48 29 AA 22 42  4C 4F 43 4B 53 20 46 52  |H$(H)."BLOCKS FR|
000005B0: 45 45 22 3A 4C 4D B2 32  36 3A 8D 39 38 30 3A A0  |EE":LM.26:.980:.|
000005C0: 31 3A A0 32 3A 8E 00 D7  0D 20 03 8B 42 24 B3 B1  |1:.2:.... ..B$..|
000005D0: 51 4D 24 A7 37 38 30 00  FF 0D 34 03 A1 23 31 2C  |QM$.780...4..#1,|
000005E0: 42 24 3A 8B 42 24 B3 B1  51 4D 24 A7 48 24 28 48  |B$:.B$..QM$.H$(H|
000005F0: 29 B2 48 24 28 48 29 AA  42 24 3A 89 38 32 30 00  |).H$(H).B$:.820.|
00000600: 16 0E 48 03 A1 23 31 2C  42 24 3A 8B 42 24 B2 53  |..H..#1,B$:.B$.S|
00000610: 50 24 A7 38 34 30 00 20  0E 5C 03 43 24 B2 4E 24  |P$.840. .\.C$.N$|
00000620: 00 40 0E 70 03 43 24 B2  43 24 AA 42 24 3A A1 23  |.@.p.C$.C$.B$:.#|
00000630: 31 2C 42 24 3A 8B 42 24  B3 B1 4E 24 A7 38 38 30  |1,B$:.B$..N$.880|
00000640: 00 6F 0E 84 03 4C 4D B2  32 30 3A 8D 39 38 30 3A  |.o...LM.20:.980:|
00000650: 48 24 28 48 29 B2 48 24  28 48 29 AA 53 50 24 AA  |H$(H).H$(H).SP$.|
00000660: C8 28 43 24 2C 33 29 AA  53 50 24 AA 53 50 24 00  |.(C$,3).SP$.SP$.|
00000670: 7D 0E 98 03 8B 53 54 B2  30 A7 36 36 30 00 83 0E  |}....ST.0.660...|
00000680: AC 03 8E 00 AB 0E C0 03  4C B2 C3 28 48 24 28 48  |........L..(H$(H|
00000690: 29 29 3A 48 24 28 48 29  B2 C8 28 53 24 2C 4C 4D  |)):H$(H)..(S$,LM|
000006A0: AB 4C 29 AA 48 24 28 48  29 3A 8E 00 D3 0E D4 03  |.L).H$(H):......|
000006B0: 4C B2 C3 28 48 24 28 48  29 29 3A 48 24 28 48 29  |L..(H$(H)):H$(H)|
000006C0: B2 48 24 28 48 29 AA C8  28 53 24 2C 4C 4D AB 4C  |.H$(H)..(S$,LM.L|
000006D0: 29 3A 8E 00 00 00                                 |):....          |

..).7.."... *****  WRITTEN BY W.T.  ****
*.Q.8.."... ***** IMPROVED BY H.S.  ****
*.Y.9.."... *****  ON JULY 10TH 84  ****
*...D..53280,6:.53281,6:.".."...N.LP.65.
G.S.."..PLEASE CHECK PRINTER AND ENTER".
..X.."..LINES PER PAGE (CR CAUSES 65)";L
P:.2025,LP:.2026,LP......H$(150),DR$(150
).M. .QM$.G(34):SP$." ":.I.1.80:S$.S$.SP
$:.:DZ.0:DM.0.C...DZ.DZ.1:.DZ.3.440...H.
."..INSERT SOURCE DISK #"DZ". IN DRIVE!"
:."TYPE 'P' TO PRINT".Y....".PRESS KEY !
..":.198,0:.198,1:.A$:.A$."P".440......"
....PLEASE WAIT !..".*....600:.H(H$(1),3
)".";J(H$(1),4,21):.I.2.H:.H$(I):..H....
".SHALL I TAKE IT (Y/N) ?":.198,0:.198,1
:.A$:.A$."Y".360.Y.,..A$.."N".280...@.DZ
.DZ.1:.DZ.0.DZ.0...T..180...H..H.DM.DM.H
...|..I.1.DM.....L.C(DR$(I)):.L.(DZ.1).2
6.DR$(I).DR$(I).H(S$,(DZ.1).26.L).....DR
$(I).DR$(I).H$(I):.:.180.R....A$."P".."A
RE YOU SURE (Y/N) ?":.198,0:.198,1:.B$:.
B$."N".320.X.L..B(2025).I.0..2025,B(2025
).I:.480...V.."....NEW PAGE NECESSARY !"
:."..PRESS ANY KEY WHEN READY".V....198,
0:.198,1:.2025,B(2026).....U1$.H(DR$(1),
3):U2$.J(DR$(1),4,21):U3$.J(DR$(1),25,5)
.O...U4$.J(DR$(1),30,21):U5$.J(DR$(1),51
,5):U6$.J(DR$(1),56,21).A....1,4:.1,G(13
)......1,U1$G(18)U2$G(146)U3$G(18)U4$G(1
46)U5$G(18)U6$...0..I.2.DM:.1,DR$(I):.:.
1: 1:.140...D...O.X.. DIRECTORY...L.H.0:
.I.1.150:H$(I).N$:.:.2,8,15:.1,8,0,"$0".
.....#1,A$,B$.!...H.H.1:.#1,A$,B$./....#
1,A$,B$.7...C.0.K.P..A$..N$.C.F(A$).E...
.B$..N$.C.C.F(B$).256.....H$(H).J(D(C),2
).SP$:LM.4:.960.F....#1,B$:.ST..0.H$(H).
H$(H)."BLOCKS FREE":LM.26:.980: 1: 2:..W
. ..B$..QM$.780...4..#1,B$:.B$..QM$.H$(H
).H$(H).B$:.820...H..#1,B$:.B$.SP$.840. 
.\.C$.N$.@.P.C$.C$.B$:.#1,B$:.B$..N$.880
.O...LM.20:.980:H$(H).H$(H).SP$.H(C$,3).
SP$.SP$.}....ST.0.660...........L.C(H$(H
)):H$(H).H(S$,LM.L).H$(H):..S.T.L.C(H$(H
)):H$(H).H$(H).H(S$,LM.L):....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL