DK
FILE INFORMATION
FILENAME(S): DK
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 19:47:33
APPEARS ON: 1 disk(s)
FILE HASH
98889a68c80faf396505b59e141613ae25dca2c5fe3908e127b054978406eaf0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK 07 2 | DK | PRG | Curtcool, Frank | 32 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 9E 32 30 36 31 00 00 00 A9 09 |.......2061.....|
00000010: 85 2C 85 2B 85 C6 A9 52 8D 77 02 A9 D5 8D 78 02 |.,.+...R.w....x.|
00000020: A9 0D 8D 79 02 60 A2 02 A4 FB 20 C6 FF 20 CF FF |...y.`.... .. ..|
00000030: 24 90 70 0F 20 70 08 91 FB 20 7C 08 C8 D0 EE E6 |$.p. p... |.....|
00000040: FC D0 EA 84 FB 4C CC FF A2 02 A4 FB 20 C9 FF 20 |.....L...... .. |
00000050: 70 08 B1 FB 20 7C 08 20 D2 FF C8 D0 02 E6 FC A5 |p... |. ........|
00000060: FC C5 FE 90 EA F0 02 B0 DC C4 FD 90 E2 F0 E0 B0 |................|
00000070: D4 48 A5 01 85 02 29 FC 78 85 01 68 60 A6 02 86 |.H....).x..h`...|
00000080: 01 58 60 A9 08 85 BA 20 B4 FF A9 6F 85 B9 20 96 |.X`.... ...o.. .|
00000090: FF 20 A5 FF 20 D2 FF C9 0D D0 F6 4C AB FF A9 24 |. .. ......L...$|
000000A0: 85 FF A9 FF 85 BB A9 00 85 BC A9 01 85 B7 A9 08 |................|
000000B0: 85 BA A9 60 85 B9 20 D5 F3 A5 BA 20 B4 FF A5 B9 |...`.. .... ....|
000000C0: 20 96 FF A9 00 85 90 A0 03 84 FB 20 A5 FF 85 FC | .......... ....|
000000D0: A4 90 D0 2F 20 A5 FF A4 90 D0 28 A4 FB 88 D0 E9 |.../ .....(.....|
000000E0: A6 FC 20 CD BD A9 20 20 D2 FF 20 A5 FF A6 90 D0 |.. ... .. .....|
000000F0: 12 AA F0 06 20 D2 FF 4C E9 08 A9 0D 20 D2 FF A0 |.... ..L.... ...|
00000100: 02 D0 C6 20 42 F6 4C 82 08 00 41 09 02 00 97 35 |... B.L...A....5|
00000110: 36 2C 32 30 3A 9C 3A 86 4E 24 28 34 30 29 2C 42 |6,20:.:.N$(40),B|
00000120: 25 28 34 30 29 2C 55 25 28 34 30 29 2C 56 25 28 |%(40),U%(40),V%(|
00000130: 34 30 29 2C 57 25 28 34 30 29 2C 54 24 28 34 30 |40),W%(40),T$(40|
00000140: 29 00 7F 09 03 00 97 35 33 32 38 30 2C 30 20 3A |)......53280,0 :|
00000150: 97 35 33 32 38 31 2C 30 20 3A 99 22 93 9A 20 20 |.53281,0 :.".. |
00000160: 20 20 20 20 4B 4F 50 49 20 53 59 53 54 45 4D 20 | KOPI SYSTEM |
00000170: 46 4F 52 20 43 36 34 20 26 20 31 35 34 31 22 00 |FOR C64 & 1541".|
00000180: AA 09 04 00 99 22 20 20 20 20 2D 2D 2D 2D 2D 2D |....." ------|
00000190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000001A0: 2D 2D 2D 2D 2D 2D 2D 2D 11 22 00 D2 09 05 00 99 |--------."......|
000001B0: 22 20 20 20 20 20 20 54 49 4C 20 20 45 4E 4B 45 |" TIL ENKE|
000001C0: 4C 2D 46 49 4C 20 20 4B 4F 50 49 45 52 49 4E 47 |L-FIL KOPIERING|
000001D0: 11 22 00 07 0A 06 00 99 22 11 11 20 20 20 20 20 |."......".. |
000001E0: 31 2E 20 20 4B 41 54 41 4C 4F 47 22 3A 99 22 11 |1. KATALOG":.".|
000001F0: 11 20 20 20 20 20 32 2E 20 20 44 49 53 4B 2D 4B |. 2. DISK-K|
00000200: 4F 4D 41 4E 44 4F 22 00 4C 0A 07 00 99 22 11 11 |OMANDO".L...."..|
00000210: 20 20 20 20 20 33 2E 20 20 46 45 4A 4C 3F 22 3A | 3. FEJL?":|
00000220: 99 22 11 11 20 20 20 20 20 05 34 2E 20 20 4B 4F |.".. .4. KO|
00000230: 50 49 45 52 49 4E 47 9A 22 3A 99 22 11 11 20 20 |PIERING.":.".. |
00000240: 20 20 20 35 2E 20 20 53 4C 55 54 22 00 74 0A 08 | 5. SLUT".t..|
00000250: 00 8D 33 37 3A 99 22 11 11 22 3A 41 B2 C5 28 41 |..37:."..":A..(A|
00000260: 24 29 3A 91 41 8D 34 37 2C 34 39 2C 35 34 2C 31 |$):.A.47,49,54,1|
00000270: 31 2C 31 30 00 7B 0A 09 00 89 32 00 86 0A 0A 00 |1,10.{....2.....|
00000280: 9E 36 34 37 33 38 00 90 0A 0B 00 8D 33 35 3A 99 |.64738......35:.|
00000290: 00 A7 0A 0C 00 8D 35 35 3A 9F 32 2C 38 2C 30 2C |......55:.2,8,0,|
000002A0: 22 24 22 3A 8D 34 32 00 C4 0A 0D 00 8D 34 32 3A |"$":.42......42:|
000002B0: 8D 34 31 3A 99 42 3B 3A 8D 34 33 3A 8D 34 32 3A |.41:.B;:.43:.42:|
000002C0: 99 22 11 22 00 E4 0A 0E 00 8D 34 31 3A 99 22 9A |."."......41:.".|
000002D0: 22 42 3B 3A 43 24 B2 22 22 3A 8D 34 33 3A 99 A3 |"B;:C$."":.43:..|
000002E0: 33 32 29 3B 00 01 0B 0F 00 8D 34 30 3A 54 B2 41 |32);......40:T.A|
000002F0: 3A 8D 34 30 3A 8B 41 AA 54 B2 30 A7 99 3A 89 32 |:.40:.A.T.0..:.2|
00000300: 32 00 29 0B 10 00 8B 42 B1 32 33 36 A7 99 3A 99 |2.)....B.236..:.|
00000310: 22 20 12 1C 5E 92 9A 20 46 49 4C 20 46 4F 52 20 |" ..^.. FIL FOR |
00000320: 4C 41 4E 47 22 3A 89 31 34 00 61 0B 11 00 99 22 |LANG":.14.a...."|
00000330: 1C 4A 41 2F 4E 45 4A 20 9D 9D 9D 9D 9D 9D 9D 22 |.JA/NEJ ......."|
00000340: 3B 3A 8D 33 37 3A 8B 41 24 B3 B1 22 4A 22 A7 99 |;:.37:.A$.."J"..|
00000350: 22 1E 12 4E 45 4A 92 20 20 20 20 20 22 3A 89 31 |"..NEJ. ":.1|
00000360: 34 00 9F 0B 12 00 54 B2 31 3A 42 25 28 52 29 B2 |4.....T.1:B%(R).|
00000370: 42 3A 8D 34 35 3A 42 B2 54 3A 8D 34 35 3A 4E 24 |B:.45:B.T:.45:N$|
00000380: 28 52 29 B2 CA 28 43 24 2C 42 2C 54 AB 42 AB 31 |(R)..(C$,B,T.B.1|
00000390: 29 3A 99 22 12 1E 4A 41 2E 92 20 20 20 20 22 00 |):."..JA.. ".|
000003A0: DE 0B 13 00 54 B2 54 AA 31 3A 91 AB 28 CA 28 43 |....T.T.1:..(.(C|
000003B0: 24 2C 54 2C 31 29 B3 B1 22 50 22 AF CA 28 43 24 |$,T,1).."P"..(C$|
000003C0: 2C 54 2C 31 29 B3 B1 22 53 22 29 89 31 39 3A 54 |,T,1).."S").19:T|
000003D0: 24 28 52 29 B2 CA 28 43 24 2C 54 2C 31 29 00 0D |$(R)..(C$,T,1)..|
000003E0: 0C 14 00 52 B2 52 AA 31 3A 8B 52 B2 34 31 A7 99 |...R.R.1:.R.41..|
000003F0: 22 11 12 1C 46 4F 52 20 4D 41 4E 47 45 20 46 49 |"...FOR MANGE FI|
00000400: 4C 45 52 92 9A 20 21 11 22 3A 89 32 32 00 15 0C |LER.. !.":.22...|
00000410: 15 00 89 31 34 00 4B 0C 16 00 A0 32 3A 8B 52 B2 |...14.K....2:.R.|
00000420: 30 A7 99 22 11 11 20 20 20 20 20 20 20 12 20 49 |0..".. . I|
00000430: 4E 47 45 4E 20 4B 4F 50 49 92 20 3F 22 3A 81 54 |NGEN KOPI. ?":.T|
00000440: B2 30 A4 32 30 30 30 3A 82 3A 8A 00 6C 0C 17 00 |.0.2000:.:..l...|
00000450: 81 54 B2 30 A4 52 AB 31 3A 55 25 28 54 29 B2 32 |.T.0.R.1:U%(T).2|
00000460: 34 3A 41 B2 30 3A 8B 54 A7 8D 33 35 00 81 0C 18 |4:A.0:.T..35....|
00000470: 00 99 22 11 4C 5B 53 45 52 20 22 4E 24 28 54 29 |..".L[SER "N$(T)|
00000480: 3B 00 B9 0C 19 00 9F 32 2C 38 2C 32 2C 4E 24 28 |;......2,8,2,N$(|
00000490: 54 29 AA 22 2C 22 AA 54 24 28 54 29 AA 22 2C 52 |T).",".T$(T).",R|
000004A0: 22 3A 97 32 35 31 2C 30 3A 97 32 35 32 2C 55 25 |":.251,0:.252,U%|
000004B0: 28 54 29 3A 9E 32 30 38 35 00 DB 0C 1A 00 56 25 |(T):.2085.....V%|
000004C0: 28 54 29 B2 C2 28 32 35 32 29 3A 57 25 28 54 29 |(T)..(252):W%(T)|
000004D0: B2 C2 28 32 35 31 29 3A 8D 34 38 00 18 0D 1B 00 |..(251):.48.....|
000004E0: 8B 54 B3 52 AB 31 AF 56 25 28 54 29 AA 42 25 28 |.T.R.1.V%(T).B%(|
000004F0: 54 AA 31 29 B3 32 35 36 A7 54 B2 54 AA 31 3A 41 |T.1).256.T.T.1:A|
00000500: B2 41 AA 31 3A 55 25 28 54 29 B2 56 25 28 54 AB |.A.1:U%(T).V%(T.|
00000510: 31 29 AA 31 3A 89 32 34 00 2B 0D 1C 00 54 B2 54 |1).1:.24.+...T.T|
00000520: AB 41 3A 41 41 B2 41 3A 8D 33 36 00 42 0D 1D 00 |.A:AA.A:.36.B...|
00000530: 99 22 11 53 4B 52 49 56 45 52 20 22 4E 24 28 54 |.".SKRIVER "N$(T|
00000540: 29 3B 00 7F 0D 1E 00 9F 32 2C 38 2C 32 2C 4E 24 |);......2,8,2,N$|
00000550: 28 54 29 AA 22 2C 22 AA 54 24 28 54 29 AA 22 2C |(T).",".T$(T).",|
00000560: 57 22 3A 97 32 35 31 2C 30 3A 97 32 35 32 2C 55 |W":.251,0:.252,U|
00000570: 25 28 54 29 3A 97 32 35 33 2C 57 25 28 54 29 00 |%(T):.253,W%(T).|
00000580: AB 0D 1F 00 97 32 35 34 2C 56 25 28 54 29 3A 9E |.....254,V%(T):.|
00000590: 32 31 31 39 3A 8D 34 38 3A 8B 41 A7 41 B2 41 AB |2119:.48:.A.A.A.|
000005A0: 31 3A 54 B2 54 AA 31 3A 89 32 39 00 E3 0D 20 00 |1:T.T.1:.29... .|
000005B0: 99 22 11 11 20 20 20 20 20 20 20 12 20 46 4C 45 |.".. . FLE|
000005C0: 52 45 20 4B 4F 50 49 45 52 3F 20 28 4A 2F 4E 29 |RE KOPIER? (J/N)|
000005D0: 20 92 22 3A 8D 33 37 3A 8B 41 24 B3 B1 22 4A 22 | .":.37:.A$.."J"|
000005E0: A7 33 34 00 F0 0D 21 00 41 B2 41 41 3A 89 32 38 |.34...!.A.AA:.28|
000005F0: 00 FC 0D 22 00 82 3A A0 31 3A 89 32 00 3B 0E 23 |..."..:.1:.2.;.#|
00000600: 00 99 22 11 49 4E 44 53 5B 54 20 12 1C 20 4B 49 |..".INDS[T .. KI|
00000610: 4C 44 45 20 92 9A 20 44 49 53 4B 20 2A 1C 1D 46 |LDE .. DISK *..F|
00000620: 37 3D 53 54 41 52 54 20 4B 4F 50 49 45 52 49 4E |7=START KOPIERIN|
00000630: 47 9A 22 3A 8D 33 37 3A 89 35 35 00 66 0E 24 00 |G.":.37:.55.f.$.|
00000640: 99 22 11 49 4E 44 53 5B 54 20 12 1C 20 4D 4F 44 |.".INDS[T .. MOD|
00000650: 54 41 47 45 52 20 92 9A 20 44 49 53 4B 22 3A 8D |TAGER .. DISK":.|
00000660: 33 37 3A 89 35 35 00 78 0E 25 00 A1 41 24 3A 8B |37:.55.x.%..A$:.|
00000670: 41 24 B2 22 22 A7 33 37 00 8D 0E 26 00 8B 41 24 |A$."".37...&..A$|
00000680: B2 22 88 22 A7 99 22 05 22 3A 89 32 32 00 93 0E |."."..".":.22...|
00000690: 27 00 8E 00 B8 0E 28 00 A1 23 32 2C 41 24 3A 41 |'.....(..#2,A$:A|
000006A0: 24 B2 C8 28 41 24 AA C7 28 30 29 2C 31 29 3A 41 |$..(A$..(0),1):A|
000006B0: B2 C6 28 41 24 29 3A 8E 00 D4 0E 29 00 8D 34 30 |..(A$):....)..40|
000006C0: 3A 42 B2 41 3A 8D 34 30 3A 42 B2 42 AA 32 35 36 |:B.A:.40:B.B.256|
000006D0: AC 41 3A 8E 00 E8 0E 2A 00 A1 23 32 2C 41 24 3A |.A:....*..#2,A$:|
000006E0: A1 23 32 2C 41 24 3A 8E 00 05 0F 2B 00 8D 34 30 |.#2,A$:....+..40|
000006F0: 3A 8B 41 A7 99 41 24 3B 3A 43 24 B2 43 24 AA 41 |:.A..A$;:C$.C$.A|
00000700: 24 3A 89 34 33 00 0B 0F 2C 00 8E 00 2B 0F 2D 00 |$:.43...,...+.-.|
00000710: 8B CA 28 43 24 2C 54 2C 31 29 B3 B1 C7 28 33 34 |..(C$,T,1)...(34|
00000720: 29 A7 54 B2 54 AA 31 3A 89 34 35 00 37 0F 2E 00 |).T.T.1:.45.7...|
00000730: 54 B2 54 AA 31 3A 8E 00 45 0F 2F 00 9E 32 32 30 |T.T.1:..E./..220|
00000740: 35 3A 89 33 37 00 5B 0F 30 00 A0 32 3A 99 A3 32 |5:.37.[.0..2:..2|
00000750: 37 29 3B 3A 9E 32 31 37 38 3A 8E 00 81 0F 31 00 |7);:.2178:....1.|
00000760: 99 22 11 11 20 20 20 20 53 4B 52 49 56 20 56 45 |.".. SKRIV VE|
00000770: 4E 4C 49 47 53 54 20 4B 4F 4D 41 4E 44 4F 22 3A |NLIGST KOMANDO":|
00000780: 99 00 9F 0F 32 00 A0 31 3A 9F 31 2C 38 2C 31 35 |....2..1:.1,8,15|
00000790: 3A 97 36 33 31 2C 33 34 3A 97 31 39 38 2C 31 00 |:.631,34:.198,1.|
000007A0: B0 0F 33 00 85 22 20 20 20 20 20 20 22 3B 41 24 |..3.." ";A$|
000007B0: 00 BA 0F 34 00 98 31 2C 41 24 00 CB 0F 35 00 99 |...4..1,A$...5..|
000007C0: 22 11 11 20 20 20 20 20 20 22 3B 00 D9 0F 36 00 |".. ";...6.|
000007D0: 9E 32 31 37 38 3A 89 33 37 00 EE 0F 37 00 A0 31 |.2178:.37...7..1|
000007E0: 3A 9F 31 2C 38 2C 31 35 2C 22 49 22 3A 8E 00 00 |:.1,8,15,"I":...|
000007F0: 00 41 80 01 FF 13 00 00 4E 80 82 00 01 00 29 00 |.A......N.....).|
00000800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000820: 00 00 |.. |
.......2061......,.+.F.R.W..U.X....Y.`..
.. F. O.$.P. P... |.HP...P...LL..... I.
P... |. R.HP.....E.......D......TH....).
X..H`....X`.... ...O.. .. .. R.I.P.L...$
...................`.. U... .... ......
... ......P/ ....P(...P... M.. R. ....P
.... R.L.... R. .PF B.L...A....56,20:.:.
N$(40),B%(40),U%(40),V%(40),W%(40),T$(40
).....53280,0 :.53281,0 :.".. KOPI
SYSTEM FOR C64 & 1541"......" ------
------------------------.".R...." T
IL ENKEL-FIL KOPIERING."......"..
1. KATALOG":.".. 2. DISK-KOMANDO".
L....".. 3. FEJL?":.".. .4. KO
PIERING.":.".. 5. SLUT".T....37:.".
.":A.E(A$):.A.47,49,54,11,10.{....2.....
.64738......35:.......55:.2,8,0,"$":.42.
D....42:.41:.B;:.43:.42:."."......41:.".
"B;:C$."":.43:..32);......40:T.A:.40:.A.
T.0..:.22.)....B.236..:." ..^.. FIL FOR
LANG":.14.A....".JA/NEJ .......";:.37:.A
$.."J".."..NEJ. ":.14.....T.1:B%(R).
B:.45:B.T:.45:N$(R).J(C$,B,T.B.1):."..JA
.. ".....T.T.1:..(J(C$,T,1).."P".J(C$
,T,1).."S").19:T$(R).J(C$,T,1).....R.R.1
:.R.41.."...FOR MANGE FILER.. !.":.22...
...14.K... 2:.R.0..".. . INGEN KOP
I. ?":.T.0.2000:.:..L....T.0.R.1:U%(T).2
4:A.0:.T..35......".L[SER "N$(T);......2
,8,2,N$(T).",".T$(T).",R":.251,0:.252,U%
(T):.2085.....V%(T).B(252):W%(T).B(251):
.48......T.R.1.V%(T).B%(T.1).256.T.T.1:A
.A.1:U%(T).V%(T.1).1:.24.+...T.T.A:AA.A:
.36.B....".SKRIVER "N$(T);.....2,8,2,N$
(T).",".T$(T).",W":.251,0:.252,U%(T):.25
3,W%(T)......254,V%(T):.2119:.48:.A.A.A.
1:T.T.1:.29... ..".. . FLERE KOPIE
R? (J/N) .":.37:.A$.."J".34...!.A.AA:.28
..."..: 1:.2.;.#..".INDS[T .. KILDE .. D
ISK *..F7=START KOPIERING.":.37:.55.F.$.
.".INDS[T .. MODTAGER .. DISK":.37:.55.X
.%..A$:.A$."".37...&..A$."."..".":.22...
'.....(..#2,A$:A$.H(A$.G(0),1):A.F(A$):.
.T.)..40:B.A:.40:B.B.256.A:....*..#2,A$:
.#2,A$:....+..40:.A..A$;:C$.C$.A$:.43...
,...+.-..J(C$,T,1)..G(34).T.T.1:.45.7...
T.T.1:..E./..2205:.37.[.0. 2:..27);:.217
8:....1..".. SKRIV VENLIGST KOMANDO":
....2. 1:.1,8,15:.631,34:.198,1...3.."
";A$...4..1,A$.K.5..".. ";.Y.6.
.2178:.37...7. 1:.1,8,15,"I":....A......
N.....).................................
..
> CLICK IMAGE PREVIEW FOR FULL MODAL