DISK COMPACT
FILE INFORMATION
FILENAME(S): DISK COMPACT
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 21:29:15
APPEARS ON: 1 disk(s)
FILE HASH
ea8fc199a5e167fc2ed17f948eccc913682a47718d948a991ec252fd267f1249
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KL | DISK COMPACT | PRG | DuncanTwain | 26 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 94 08 01 00 3A 3A 9F 31 2C 38 2C 31 35 2C |......::.1,8,15,|
00000010: 22 49 22 3A 3A 3A 9F 32 2C 38 2C 32 2C 22 23 22 |"I":::.2,8,2,"#"|
00000020: 3A 3A 3A 3A 3A 86 54 28 32 35 29 3A 86 53 28 32 |:::::.T(25):.S(2|
00000030: 35 29 3A 86 45 28 32 35 29 3A 98 31 2C 22 55 31 |5):.E(25):.1,"U1|
00000040: 3A 22 32 3B 30 3B 31 38 3B 30 3A 3A 3A A1 23 32 |:"2;0;18;0:::.#2|
00000050: 2C 54 24 2C 53 24 3A 3A 3A 54 28 30 29 B2 C6 28 |,T$,S$:::T(0)..(|
00000060: 54 24 AA C7 28 30 29 29 3A 3A 3A 53 28 30 29 B2 |T$..(0)):::S(0).|
00000070: C6 28 53 24 AA C7 28 30 29 29 3A 3A 3A 54 B2 54 |.(S$..(0)):::T.T|
00000080: 28 30 29 3A 3A 3A 53 B2 53 28 30 29 3A 3A 3A 42 |(0):::S.S(0):::B|
00000090: B2 31 3A 3A 00 E6 08 02 00 98 31 2C 22 55 31 3A |.1::......1,"U1:|
000000A0: 22 32 3B 30 3B 54 3B 53 3A A1 23 32 2C 54 24 2C |"2;0;T;S:.#2,T$,|
000000B0: 53 24 3A 3A 3A 54 B2 C6 28 54 24 AA C7 28 30 29 |S$:::T..(T$..(0)|
000000C0: 29 3A 53 B2 C6 28 53 24 AA C7 28 30 29 29 3A 8B |):S..(S$..(0)):.|
000000D0: 54 B2 30 B0 54 B1 33 35 B0 53 B1 32 30 B0 42 B2 |T.0.T.35.S.20.B.|
000000E0: 32 35 A7 34 3A 3A 00 10 09 03 00 54 28 42 29 B2 |25.4::.....T(B).|
000000F0: 54 3A 53 28 42 29 B2 53 3A 3A 3A 45 28 42 AB 31 |T:S(B).S:::E(B.1|
00000100: 29 B2 38 3A 3A 3A 42 B2 42 AA 31 3A 89 32 3A 3A |).8:::B.B.1:.2::|
00000110: 00 53 09 04 00 4D B2 42 3A 3A 3A 46 B2 30 3A 3A |.S...M.B:::F.0::|
00000120: 3A 81 49 B2 32 A4 32 32 36 A9 33 32 3A 98 31 2C |:.I.2.226.32:.1,|
00000130: 22 42 2D 50 3A 22 32 2C 49 3A 3A 3A A1 23 32 2C |"B-P:"2,I:::.#2,|
00000140: 57 24 3A 3A 3A 8B 57 24 B2 22 22 A7 46 B2 46 AA |W$:::.W$."".F.F.|
00000150: 31 3A 3A 00 77 09 05 00 82 49 3A 3A 3A 45 28 42 |1::.w....I:::E(B|
00000160: AB 31 29 B2 38 AB 46 3A 3A 3A 8B 46 B2 38 AF 4D |.1).8.F:::.F.8.M|
00000170: B2 31 A7 33 32 3A 3A 00 A9 09 06 00 99 22 47 45 |.1.32::......"GE|
00000180: 4E 55 45 47 45 4E 22 3B 46 3B 22 46 52 45 49 45 |NUEGEN";F;"FREIE|
00000190: 20 44 49 52 45 43 54 4F 52 59 2D 45 49 4E 54 52 | DIRECTORY-EINTR|
000001A0: 41 45 47 45 20 3F 20 22 3B 00 BA 09 07 00 A1 41 |AEGE ? ";......A|
000001B0: 24 3A 8B 41 24 B2 22 22 A7 37 00 CE 09 08 00 8B |$:.A$."".7......|
000001C0: 41 24 B3 B1 22 4E 22 A7 41 24 B2 22 4A 22 00 54 |A$.."N".A$."J".T|
000001D0: 0A 09 00 99 41 24 3A 99 3A 99 3A 99 3A 3A 3A 98 |....A$:.:.:.:::.|
000001E0: 31 2C 22 55 31 3A 22 32 3B 30 3B 31 38 3B 30 3A |1,"U1:"2;0;18;0:|
000001F0: 3A 3A 98 31 2C 22 42 2D 50 3A 22 32 3B 37 33 3A |::.1,"B-P:"2;73:|
00000200: 3A 3A 42 B2 30 3A 3A 3A 4C B2 31 39 3A 3A 3A 86 |::B.0:::L.19:::.|
00000210: 5A 28 32 35 29 3A 3A 3A 81 4B B2 31 A4 33 3A 3A |Z(25):::.K.1.3::|
00000220: 3A A1 23 32 2C 57 24 3A 3A 3A 57 B2 C6 28 57 24 |:.#2,W$:::W..(W$|
00000230: AA C7 28 30 29 29 3A 81 4A B2 31 A4 38 3A 3A 3A |..(0)):.J.1.8:::|
00000240: 57 B2 57 AD 32 3A 8B 57 B2 B5 28 57 29 A7 5A 28 |W.W.2:.W..(W).Z(|
00000250: 42 29 B2 31 00 76 0A 0A 00 8B 5A 28 42 29 B2 30 |B).1.v....Z(B).0|
00000260: AF 41 24 B2 22 4E 22 A7 41 24 B2 22 22 3A 5A 28 |.A$."N".A$."":Z(|
00000270: 42 29 B2 31 3A 3A 00 8D 0A 0B 00 8B 5A 28 42 29 |B).1::......Z(B)|
00000280: B2 31 AF 42 B3 31 39 A7 4C B2 4C AB 31 00 AC 0A |.1.B.19.L.L.1...|
00000290: 0C 00 42 B2 42 AA 31 3A 57 B2 B5 28 57 29 3A 82 |..B.B.1:W..(W):.|
000002A0: 4A 3A 82 4B 3A 8B 4C B3 31 A7 33 33 00 EA 0A 0D |J:.K:.L.1.33....|
000002B0: 00 99 3A 99 3A 99 22 45 53 20 57 45 52 44 45 4E |..:.:."ES WERDEN|
000002C0: 20 4E 55 4E 22 3B 4C 3B 22 42 4C 4F 45 43 4B 45 | NUN";L;"BLOECKE|
000002D0: 20 46 52 45 49 47 45 53 54 45 4C 4C 54 20 21 22 | FREIGESTELLT !"|
000002E0: 3A 99 3A 3A 3A 42 B2 30 3A 3A 00 24 0B 0E 00 81 |:.:::B.0::.$....|
000002F0: 45 B2 30 A4 45 28 42 29 AB 31 3A 3A 3A 41 54 B2 |E.0.E(B).1:::AT.|
00000300: 54 28 42 29 3A 3A 3A 41 53 B2 53 28 42 29 3A 4E |T(B):::AS.S(B):N|
00000310: 53 B2 41 53 3A 3A 3A 8B 41 54 B2 30 AF 41 53 B2 |S.AS:::.AT.0.AS.|
00000320: 30 A7 33 31 00 37 0B 0F 00 49 B2 30 3A 5A B2 45 |0.31.7...I.0:Z.E|
00000330: AC 33 32 AA 33 3A 3A 00 95 0B 10 00 52 B2 30 3A |.32.3::.....R.0:|
00000340: 3A 3A 98 31 2C 22 55 31 3A 22 32 3B 30 3B 41 54 |::.1,"U1:"2;0;AT|
00000350: 3B 41 53 3A 3A 3A 98 31 2C 22 42 2D 50 3A 22 32 |;AS:::.1,"B-P:"2|
00000360: 2C 5A 3A 3A 3A A1 23 32 2C 54 24 2C 53 24 3A 3A |,Z:::.#2,T$,S$::|
00000370: 3A 54 B2 C6 28 54 24 AA C7 28 30 29 29 3A 53 B2 |:T..(T$..(0)):S.|
00000380: C6 28 53 24 AA C7 28 30 29 29 3A 8B 54 B2 31 38 |.(S$..(0)):.T.18|
00000390: A7 32 39 3A 3A 00 B2 0B 11 00 8B 54 B2 30 B0 54 |.29::......T.0.T|
000003A0: B1 33 35 B0 53 B2 32 30 A7 5A B2 31 3A 89 32 35 |.35.S.20.Z.1:.25|
000003B0: 3A 3A 00 C3 0B 12 00 81 49 B2 30 A4 31 38 A9 31 |::......I.0.18.1|
000003C0: 30 3A 3A 00 D4 0B 13 00 8B 5A 28 49 29 B2 30 A7 |0::......Z(I).0.|
000003D0: 32 34 3A 3A 00 E1 0B 14 00 8B 49 B2 39 A7 89 32 |24::......I.9..2|
000003E0: 33 00 F4 0B 15 00 8B 49 B1 38 A7 49 B2 49 AB 39 |3......I.8.I.I.9|
000003F0: 3A 89 31 39 00 FB 0B 16 00 82 49 00 0C 0C 17 00 |:.19......I.....|
00000400: 5A B2 AB 31 3A 3A 3A 89 32 35 3A 3A 00 43 0C 18 |Z..1:::.25::.C..|
00000410: 00 98 31 2C 22 42 2D 50 3A 22 32 2C 5A 3A 3A 3A |..1,"B-P:"2,Z:::|
00000420: 98 32 2C C7 28 31 38 29 3B C7 28 49 29 3B 3A 3A |.2,.(18);.(I);::|
00000430: 3A 8B 41 54 B2 31 38 AF 41 53 B2 4E 53 A7 52 B2 |:.AT.18.AS.NS.R.|
00000440: 31 3A 3A 00 9F 0C 19 00 99 22 20 20 20 20 20 20 |1::......" |
00000450: 42 4C 4F 43 4B 22 3B C9 28 22 20 20 22 AA C4 28 |BLOCK";.(" "..(|
00000460: 41 54 29 2C 33 29 3B 22 2C 22 C9 28 22 20 20 22 |AT),3);",".(" "|
00000470: AA C4 28 41 53 29 2C 33 29 3B 3A 8B 52 B2 31 A7 |..(AS),3);:.R.1.|
00000480: 99 22 20 20 5A 45 49 47 45 52 22 3B 45 AA 31 3B |." ZEIGER";E.1;|
00000490: 22 47 45 41 45 4E 44 45 52 54 22 3A 89 32 37 00 |"GEAENDERT":.27.|
000004A0: E6 0C 1A 00 99 22 20 20 2D 2D 3E 20 20 31 38 2C |....." --> 18,|
000004B0: 22 C9 28 22 20 20 22 AA C4 28 4E 53 29 2C 33 29 |".(" "..(NS),3)|
000004C0: 3A 98 31 2C 22 42 2D 41 3A 22 30 2C 31 38 2C 4E |:.1,"B-A:"0,18,N|
000004D0: 53 3A 3A 3A 98 31 2C 22 42 2D 46 3A 22 30 2C 41 |S:::.1,"B-F:"0,A|
000004E0: 54 2C 41 53 3A 3A 00 21 0D 1B 00 5A 28 49 29 B2 |T,AS::.!...Z(I).|
000004F0: 31 3A 3A 3A 98 31 2C 22 55 32 3A 22 32 3B 30 3B |1:::.1,"U2:"2;0;|
00000500: 31 38 3B 4E 53 3A 41 54 B2 54 3A 41 53 B2 53 3A |18;NS:AT.T:AS.S:|
00000510: 4E 53 B2 49 3A 3A 3A 8B 5A B2 AB 31 A7 33 34 3A |NS.I:::.Z..1.34:|
00000520: 3A 00 33 0D 1C 00 8B 5A B3 B1 31 A7 5A B2 30 3A |:.3....Z..1.Z.0:|
00000530: 89 31 36 00 48 0D 1D 00 82 45 3A 3A 3A 42 B2 42 |.16.H....E:::B.B|
00000540: AA 31 3A 89 31 34 3A 3A 00 4E 0D 1E 00 3A 00 A4 |.1:.14::.N...:..|
00000550: 0D 1F 00 99 3A 99 22 45 53 20 57 41 52 45 4E 20 |....:."ES WAREN |
00000560: 4E 49 43 48 20 47 45 4E 55 47 20 42 45 4C 45 47 |NICH GENUG BELEG|
00000570: 54 45 20 42 4C 4F 45 43 4B 45 20 44 41 2E 22 3A |TE BLOECKE DA.":|
00000580: 99 22 53 50 55 52 20 31 38 20 4E 4F 43 48 20 54 |."SPUR 18 NOCH T|
00000590: 45 49 4C 57 45 49 53 45 20 46 52 45 49 20 21 22 |EILWEISE FREI !"|
000005A0: 3A 89 33 34 00 CD 0D 20 00 99 3A 99 3A 99 22 44 |:.34... ..:.:."D|
000005B0: 49 45 20 44 49 53 4B 45 54 54 45 20 49 53 54 20 |IE DISKETTE IST |
000005C0: 12 4C 45 45 52 92 20 21 22 3A 89 33 34 00 24 0E |.LEER. !":.34.$.|
000005D0: 21 00 99 22 54 55 54 20 4D 49 52 20 4C 45 49 44 |!.."TUT MIR LEID|
000005E0: 2C 20 44 41 20 49 53 54 20 4E 49 43 48 54 53 20 |, DA IST NICHTS |
000005F0: 5A 55 20 4D 41 43 48 45 4E 2E 22 3A 99 22 44 49 |ZU MACHEN.":."DI|
00000600: 45 20 47 45 53 41 4D 54 45 20 53 50 55 52 20 31 |E GESAMTE SPUR 1|
00000610: 38 20 49 53 54 20 56 4F 4C 4C 20 42 45 4C 45 47 |8 IST VOLL BELEG|
00000620: 54 20 21 22 00 32 0E 22 00 99 3A A0 31 3A A0 32 |T !".2."..:.1:.2|
00000630: 3A 80 00 00 00 |:.... |
......::.1,8,15,"I":::.2,8,2,"#":::::.T(
25):.S(25):.E(25):.1,"U1:"2;0;18;0:::.#2
,T$,S$:::T(0).F(T$.G(0)):::S(0).F(S$.G(0
)):::T.T(0):::S.S(0):::B.1::......1,"U1:
"2;0;T;S:.#2,T$,S$:::T.F(T$.G(0)):S.F(S$
.G(0)):.T.0.T.35.S.20.B.25.4::.....T(B).
T:S(B).S:::E(B.1).8:::B.B.1:.2::.S...M.B
:::F.0:::.I.2.226.32:.1,"B-P:"2,I:::.#2,
W$:::.W$."".F.F.1::.W....I:::E(B.1).8.F:
::.F.8.M.1.32::......"GENUEGEN";F;"FREIE
DIRECTORY-EINTRAEGE ? ";......A$:.A$.""
.7.N....A$.."N".A$."J".T....A$:.:.:.:::.
1,"U1:"2;0;18;0:::.1,"B-P:"2;73:::B.0:::
L.19:::.Z(25):::.K.1.3:::.#2,W$:::W.F(W$
.G(0)):.J.1.8:::W.W.2:.W..(W).Z(B).1.V..
..Z(B).0.A$."N".A$."":Z(B).1::......Z(B)
.1.B.19.L.L.1.....B.B.1:W..(W):.J:.K:.L.
1.33......:.:."ES WERDEN NUN";L;"BLOECKE
FREIGESTELLT !":.:::B.0::.$....E.0.E(B)
.1:::AT.T(B):::AS.S(B):NS.AS:::.AT.0.AS.
0.31.7...I.0:Z.E.32.3::.....R.0:::.1,"U1
:"2;0;AT;AS:::.1,"B-P:"2,Z:::.#2,T$,S$::
:T.F(T$.G(0)):S.F(S$.G(0)):.T.18.29::...
...T.0.T.35.S.20.Z.1:.25::.C....I.0.18.1
0::.T....Z(I).0.24::......I.9..23......I
.8.I.I.9:.19......I.....Z..1:::.25::.C..
..1,"B-P:"2,Z:::.2,G(18);G(I);:::.AT.18.
AS.NS.R.1::......" BLOCK";I(" ".D(
AT),3);","I(" ".D(AS),3);:.R.1.." ZEIG
ER";E.1;"GEAENDERT":.27......" --> 18,
"I(" ".D(NS),3):.1,"B-A:"0,18,NS:::.1,"
B-F:"0,AT,AS::.!...Z(I).1:::.1,"U2:"2;0;
18;NS:AT.T:AS.S:NS.I:::.Z..1.34::.3....Z
..1.Z.0:.16.H....E:::B.B.1:.14::.N...:..
....:."ES WAREN NICH GENUG BELEGTE BLOEC
KE DA.":."SPUR 18 NOCH TEILWEISE FREI !"
:.34.M. ..:.:."DIE DISKETTE IST .LEER. !
":.34.$.!.."TUT MIR LEID, DA IST NICHTS
ZU MACHEN.":."DIE GESAMTE SPUR 18 IST VO
LL BELEGT !".2."..: 1: 2:....
> CLICK IMAGE PREVIEW FOR FULL MODAL