KOPI
FILE INFORMATION
FILENAME(S): KOPI
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 19:47:30
APPEARS ON: 2 disk(s)
FILE HASH
584df6ec69a76c19264dc84d3fa5a3e67f485f15eee76189d3378a4822a291b6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KOPIDISK 09 1 | KOPI | PRG | Curtcool, Frank | 13 | 11 | DOWNLOAD FILE |
| HJ LPEDISK 07 2 | KOPI | PRG | Curtcool, Frank | 8 | 17 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 64 00 97 35 35 2C 30 3A 97 35 36 2C |....d..55,0:.56,|
00000010: 32 34 3A 9C 00 27 08 65 00 50 47 B2 32 34 3A 4D |24:..'.e.PG.24:M|
00000020: 58 B2 C2 28 35 36 29 00 3C 08 66 00 5A 24 B2 C7 |X..(56).<.f.Z$..|
00000030: 28 30 29 3A 51 24 B2 C7 28 33 34 29 00 54 08 67 |(0):Q$..(34).T.g|
00000040: 00 97 35 33 32 38 30 2C 39 20 3A 97 35 33 32 38 |..53280,9 :.5328|
00000050: 31 2C 31 31 00 64 08 68 00 99 C7 28 31 34 29 3B |1,11.d.h...(14);|
00000060: C7 28 38 29 00 7C 08 69 00 86 46 24 28 4D 58 29 |.(8).|.i..F$(MX)|
00000070: 2C 46 28 4D 58 29 2C 54 28 4D 58 29 00 95 08 6A |,F(MX),T(MX)...j|
00000080: 00 81 49 B2 38 32 38 A4 39 30 34 3A 87 41 3A 97 |..I.828.904:.A:.|
00000090: 49 2C 41 3A 82 00 CD 08 6B 00 99 22 93 90 11 9E |I,A:....k.."....|
000000A0: C3 C2 CD 36 34 90 20 20 20 20 D3 C5 CC C5 CB D4 |...64. ......|
000000B0: C9 D6 A0 A0 C6 C9 CC CB CF D0 C9 C5 D2 C9 CE C7 |................|
000000C0: 20 20 20 20 9E C3 C2 CD 36 34 90 22 3B 00 FE 08 | ....64.";...|
000000D0: 6C 00 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |l.."............|
000000E0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000000F0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3B 00 2E |............";..|
00000100: 09 6D 00 99 22 11 C9 4E 44 53 5B 54 20 56 45 4E |.m.."..NDS[T VEN|
00000110: 4C 49 47 53 54 20 20 9E CB C9 CC C4 C5 90 20 20 |LIGST ....... |
00000120: 44 49 53 4B 45 54 54 45 4E 20 49 20 20 22 00 5B |DISKETTEN I ".[|
00000130: 09 6E 00 99 22 44 52 45 56 45 54 2C 20 4F 47 20 |.n.."DREVET, OG |
00000140: 54 52 59 4B 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |TRYK............|
00000150: 2E 20 12 D2 C5 D4 D5 D2 CE 92 22 00 9C 09 6F 00 |. ........"...o.|
00000160: 99 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |.:."............|
00000170: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000180: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3B 3A 9F |............";:.|
00000190: 31 35 2C 38 2C 31 35 2C 22 49 30 22 00 B3 09 70 |15,8,15,"I0"...p|
000001A0: 00 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 |..A$:.A$...(13).|
000001B0: 31 31 32 00 D9 09 71 00 85 22 11 20 C9 4E 44 54 |112...q..". .NDT|
000001C0: 41 53 54 20 46 49 4C 4D 59 4E 53 54 45 52 20 3F |AST FILMYNSTER ?|
000001D0: 20 2A 9D 9D 9D 22 3B 46 24 00 F5 09 72 00 8B C9 | *...";F$...r...|
000001E0: 28 46 24 2C 31 29 B3 B1 22 2A 22 A7 46 24 B2 46 |(F$,1).."*".F$.F|
000001F0: 24 AA 22 2A 22 00 05 0A 73 00 8D 31 39 33 3A 8B |$."*"...s..193:.|
00000200: 45 89 31 38 39 00 1E 0A 74 00 9F 31 2C 38 2C 30 |E.189...t..1,8,0|
00000210: 2C 22 24 30 3A 22 AA 46 24 3A 8D 31 39 33 00 51 |,"$0:".F$:.193.Q|
00000220: 0A 75 00 8B 45 A7 99 22 11 1D 1D 1D 1D 12 9A 20 |.u..E.."....... |
00000230: C4 49 53 4B 45 54 54 45 4E 53 20 4B 41 4E 20 49 |.ISKETTENS KAN I|
00000240: 4B 4B 45 20 4C 5B 53 45 53 20 92 22 3A 89 31 38 |KKE L[SES .":.18|
00000250: 39 00 8B 0A 76 00 99 22 20 11 27 12 9E 2B 90 92 |9...v.." .'..+..|
00000260: 27 20 4B 4F 50 49 45 52 20 46 49 4C 45 4E 20 20 |' KOPIER FILEN |
00000270: 1D 20 20 27 12 9E 2D 90 92 27 20 53 50 52 49 4E |. '..-..' SPRIN|
00000280: 47 20 4F 56 45 52 20 20 20 22 3B 00 C3 0A 77 00 |G OVER ";...w.|
00000290: 99 22 20 27 12 9E C2 90 92 27 20 42 45 47 59 4E |." '.....' BEGYN|
000002A0: 44 20 4B 4F 50 49 45 52 49 4E 47 20 27 12 9E D3 |D KOPIERING '...|
000002B0: 90 92 27 20 53 54 4F 50 20 20 20 20 20 20 20 20 |..' STOP |
000002C0: 20 11 22 00 DF 0A 78 00 A1 23 31 2C 41 24 2C 42 | ."...x..#1,A$,B|
000002D0: 24 3A 4E B2 30 3A 41 44 B2 50 47 AC 32 35 36 00 |$:N.0:AD.PG.256.|
000002E0: F8 0A 79 00 A1 23 31 2C 41 24 2C 42 24 3A 8B 42 |..y..#1,A$,B$:.B|
000002F0: 24 B2 22 22 89 31 34 32 00 0C 0B 7A 00 A1 23 31 |$."".142...z..#1|
00000300: 2C 41 24 2C 42 24 3A 46 24 B2 22 22 00 29 0B 7B |,A$,B$:F$."".).{|
00000310: 00 53 5A B2 C6 28 41 24 AA 5A 24 29 AA C6 28 42 |.SZ..(A$.Z$)..(B|
00000320: 24 AA 5A 24 29 AC 32 35 36 00 3F 0B 7C 00 A1 23 |$.Z$).256.?.|..#|
00000330: 31 2C 41 24 3A 8B 36 34 AF 53 54 89 31 34 32 00 |1,A$:.64.ST.142.|
00000340: 4F 0B 7D 00 8B 41 24 B3 B1 51 24 89 31 32 34 00 |O.}..A$..Q$.124.|
00000350: 70 0B 7E 00 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 |p.~..#1,A$:.A$..|
00000360: 51 24 A7 46 24 B2 46 24 AA 41 24 3A 89 31 32 36 |Q$.F$.F$.A$:.126|
00000370: 00 88 0B 7F 00 A1 23 31 2C 41 24 3A 8B 41 24 B3 |......#1,A$:.A$.|
00000380: B1 22 20 22 89 31 32 37 00 9F 0B 80 00 A1 23 31 |." ".127......#1|
00000390: 2C 54 24 3A 8B 54 24 B2 22 20 22 89 31 32 38 00 |,T$:.T$." ".128.|
000003A0: B6 0B 81 00 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 |.....#1,A$:.A$..|
000003B0: 22 22 89 31 32 39 00 D6 0B 82 00 8B 53 5A B2 30 |"".129......SZ.0|
000003C0: B0 28 54 24 B3 B1 22 50 22 AF 54 24 B3 B1 22 53 |.(T$.."P".T$.."S|
000003D0: 22 29 89 31 32 31 00 F8 0B 83 00 99 53 5A 3B A3 |").121......SZ;.|
000003E0: 35 29 3B 54 24 3B 22 20 22 3B 51 24 3B 46 24 3B |5);T$;" ";Q$;F$;|
000003F0: 51 24 3B A3 32 36 29 3B 00 23 0C 84 00 8B 41 44 |Q$;.26);.#....AD|
00000400: AA 53 5A AC 32 35 36 B1 35 33 32 34 37 A7 99 22 |.SZ.256.53247.."|
00000410: 5F 1D 9E 12 46 4F 52 20 53 54 4F 52 90 22 3A 89 |_...FOR STOR.":.|
00000420: 31 32 31 00 40 0C 85 00 99 22 5F 20 12 2B 3A 2D |121.@...."_ .+:-|
00000430: 3A 42 3A 53 3F 92 9D 9D 9D 9D 9D 9D 9D 9D 22 3B |:B:S?.........";|
00000440: 00 53 0C 86 00 A1 41 24 3A 8B 41 24 B2 22 22 89 |.S....A$:.A$."".|
00000450: 31 33 34 00 75 0C 87 00 8B 41 24 B2 22 2D 22 A7 |134.u....A$."-".|
00000460: 99 22 90 53 50 52 49 4E 47 20 4F 56 45 52 90 22 |.".SPRING OVER."|
00000470: 3A 89 31 32 31 00 96 0C 88 00 8B 41 24 B2 22 42 |:.121......A$."B|
00000480: 22 A7 99 22 9A 42 45 47 59 4E 44 20 20 20 20 90 |"..".BEGYND .|
00000490: 22 3A 89 31 34 32 00 B7 0C 89 00 8B 41 24 B2 22 |":.142......A$."|
000004A0: 53 22 A7 99 22 9A 53 54 4F 50 20 20 20 20 20 20 |S"..".STOP |
000004B0: 90 22 3A 89 31 38 36 00 C8 0C 8A 00 8B 41 24 B3 |.":.186......A$.|
000004C0: B1 22 2B 22 89 31 33 34 00 F1 0C 8B 00 4E B2 4E |."+".134.....N.N|
000004D0: AA 31 3A 46 24 28 4E 29 B2 46 24 AA 22 2C 22 AA |.1:F$(N).F$.",".|
000004E0: 54 24 3A 99 22 9A 4B 4F 50 49 45 52 45 53 90 20 |T$:.".KOPIERES. |
000004F0: 22 00 0C 0D 8C 00 41 44 B2 41 44 AA 53 5A AC 32 |".....AD.AD.SZ.2|
00000500: 35 36 3A 8B 4E B3 4D 58 89 31 32 31 00 2F 0D 8D |56:.N.MX.121./..|
00000510: 00 99 22 11 20 12 CD 41 58 49 4D 55 4D 20 50 5D |..". ..AXIMUM P]|
00000520: 22 3B 4D 58 3B 22 46 49 4C 28 45 52 29 2E 22 00 |";MX;"FIL(ER).".|
00000530: 59 0D 8E 00 A0 31 3A 99 22 11 1D 1D 1D 1D 1D 1D |Y....1:.".......|
00000540: 1D 1D 1D 1D 1D 22 3B 4E 3B 22 46 49 4C 28 45 52 |.....";N;"FIL(ER|
00000550: 29 20 4C 5B 53 45 53 11 22 00 70 0D 8F 00 41 44 |) L[SES.".p...AD|
00000560: B2 50 47 AC 32 35 36 3A 8B 4E B2 30 89 31 38 39 |.PG.256:.N.0.189|
00000570: 00 7B 0D 90 00 81 49 B2 31 A4 4E 00 96 0D 91 00 |.{....I.1.N.....|
00000580: 99 22 20 22 3B 51 24 3B 46 24 28 49 29 3B 51 24 |." ";Q$;F$(I);Q$|
00000590: 3B A3 32 30 29 3B 00 A7 0D 92 00 53 5A B2 B5 28 |;.20);.....SZ..(|
000005A0: 41 44 AD 32 35 36 29 00 C2 0D 93 00 97 32 35 31 |AD.256)......251|
000005B0: 2C 41 44 AB 53 5A AC 32 35 36 3A 97 32 35 32 2C |,AD.SZ.256:.252,|
000005C0: 53 5A 00 DD 0D 94 00 9F 31 2C 38 2C 32 2C 22 30 |SZ......1,8,2,"0|
000005D0: 3A 22 AA 46 24 28 49 29 3A 8D 31 39 33 00 F5 0D |:".F$(I):.193...|
000005E0: 95 00 8B 45 B2 37 34 A7 A0 31 3A 4E B2 49 AB 31 |...E.74..1:N.I.1|
000005F0: 3A 89 31 35 37 00 0D 0E 96 00 8B 45 A7 A0 31 3A |:.157......E..1:|
00000600: 46 24 28 49 29 B2 22 22 3A 89 31 35 36 00 2F 0E |F$(I)."":.156./.|
00000610: 97 00 9E 38 33 31 3A 8D 31 39 33 3A A0 31 3A 8B |...831:.193:.1:.|
00000620: 45 B2 37 34 A7 4E B2 49 AB 31 3A 89 31 35 37 00 |E.74.N.I.1:.157.|
00000630: 44 0E 98 00 8B 45 A7 46 24 28 49 29 B2 22 22 3A |D....E.F$(I)."":|
00000640: 89 31 35 36 00 71 0E 99 00 8B C2 28 32 35 32 29 |.156.q.....(252)|
00000650: B2 32 30 38 A7 46 24 28 49 29 B2 22 22 3A 99 22 |.208.F$(I)."":."|
00000660: 12 C6 CF D2 A0 D3 D4 CF D2 A0 92 22 3A 89 31 35 |...........":.15|
00000670: 36 00 9A 0E 9A 00 46 28 49 29 B2 41 44 3A 41 44 |6.....F(I).AD:AD|
00000680: B2 C2 28 32 35 31 29 AA C2 28 32 35 32 29 AC 32 |..(251)..(252).2|
00000690: 35 36 3A 54 28 49 29 B2 41 44 00 C6 0E 9B 00 99 |56:T(I).AD......|
000006A0: C9 28 22 20 20 20 22 AA C4 28 54 28 49 29 AB 46 |.(" "..(T(I).F|
000006B0: 28 49 29 29 2C 35 29 3B 22 20 42 59 54 45 53 20 |(I)),5);" BYTES |
000006C0: 4C 41 4E 47 20 22 00 CD 0E 9C 00 82 49 00 DA 0E |LANG "......I...|
000006D0: 9D 00 8B 4E B2 30 89 31 38 39 00 06 0F 9E 00 99 |...N.0.189......|
000006E0: 22 11 C9 4E 44 53 5B 54 20 56 45 4E 4C 49 47 54 |"..NDS[T VENLIGT|
000006F0: 20 9E CD CF C4 D4 C1 C7 C5 D2 90 20 44 49 53 4B | .......... DISK|
00000700: 45 54 54 45 4E 22 00 3F 0F 9F 00 85 22 11 1D 1D |ETTEN".?...."...|
00000710: 1D 1D 1D 1D 1D D3 4B 41 4C 1D 44 49 53 4B 45 54 |......KAL.DISKET|
00000720: 54 45 4E 1D 9E C6 CF D2 CD C1 D4 D4 C5 D2 C5 D3 |TEN.............|
00000730: 3F 90 20 12 9E 4E 9D 9D 9D 90 92 22 3B 41 24 00 |?. ..N.....";A$.|
00000740: 45 0F A0 00 99 00 56 0F A1 00 8B 41 24 B3 B1 22 |E.....V....A$.."|
00000750: 4A 22 89 31 36 35 00 74 0F A2 00 85 22 20 C4 49 |J".165.t...." .I|
00000760: 53 4B 45 54 54 45 4E 41 56 4E 2C 49 44 22 3B 46 |SKETTENAVN,ID";F|
00000770: 24 2C 54 24 00 8C 0F A3 00 98 31 35 2C 22 4E 30 |$,T$......15,"N0|
00000780: 3A 22 AA 46 24 AA 22 2C 22 AA 54 24 00 9E 0F A4 |:".F$.",".T$....|
00000790: 00 99 3A 8D 31 39 33 3A 8B 45 89 31 35 37 00 A9 |..:.193:.E.157..|
000007A0: 0F A5 00 81 49 B2 31 A4 4E 00 BB 0F A6 00 8B 46 |....I.1.N......F|
000007B0: 24 28 49 29 B2 22 22 89 31 38 33 00 D6 0F A7 00 |$(I)."".183.....|
000007C0: 99 22 20 22 3B 51 24 3B 46 24 28 49 29 3B 51 24 |." ";Q$;F$(I);Q$|
000007D0: 3B A3 32 30 29 3B 00 EC 0F A8 00 9F 31 2C 38 2C |;.20);......1,8,|
000007E0: 32 2C 46 24 28 49 29 AA 22 2C 57 22 00 FE 0F A9 |2,F$(I).",W"....|
000007F0: 00 8D 31 39 33 3A 8B 45 B2 30 89 31 37 36 00 0F |..193:.E.0.176..|
00000800: 10 AA 00 A0 31 3A 8B 45 B2 36 33 A7 31 37 32 00 |....1:.E.63.172.|
00000810: 2C 10 AB 00 8F 20 20 43 4C 4F 53 45 31 3A 49 46 |,.... CLOSE1:IF|
00000820: 45 3C 3E 36 33 47 4F 54 4F 38 34 30 00 69 10 AC |E<>63GOTO840.i..|
00000830: 00 99 3A 85 22 11 1D 1D 1D 1D 1D 20 9E CF D6 C5 |..:."...... ....|
00000840: D2 D3 CB D2 C9 D6 C5 90 20 45 4B 53 49 53 54 45 |........ EKSISTE|
00000850: 52 45 4E 44 45 20 46 49 4C 20 9D 3F 20 9E 12 4E |RENDE FIL .? ..N|
00000860: 90 92 9D 9D 9D 22 3B 41 24 00 6F 10 AD 00 99 00 |.....";A$.o.....|
00000870: 80 10 AE 00 8B 41 24 B3 B1 22 4A 22 89 31 38 33 |.....A$.."J".183|
00000880: 00 99 10 AF 00 98 31 35 2C 22 53 30 3A 22 AA 46 |......15,"S0:".F|
00000890: 24 28 49 29 3A 89 31 36 37 00 AC 10 B0 00 53 5A |$(I):.167.....SZ|
000008A0: B2 B5 28 46 28 49 29 AD 32 35 36 29 00 C9 10 B1 |..(F(I).256)....|
000008B0: 00 97 32 35 31 2C 46 28 49 29 AB 53 5A AC 32 35 |..251,F(I).SZ.25|
000008C0: 36 3A 97 32 35 32 2C 53 5A 00 DC 10 B2 00 53 5A |6:.252,SZ.....SZ|
000008D0: B2 B5 28 54 28 49 29 AD 32 35 36 29 00 F9 10 B3 |..(T(I).256)....|
000008E0: 00 97 32 35 33 2C 54 28 49 29 AB 53 5A AC 32 35 |..253,T(I).SZ.25|
000008F0: 36 3A 97 32 35 34 2C 53 5A 00 19 11 B4 00 9E 38 |6:.254,SZ......8|
00000900: 32 38 3A 8D 31 39 33 3A A0 31 3A 8B 45 B2 37 32 |28:.193:.1:.E.72|
00000910: B0 45 B2 37 34 89 31 38 34 00 24 11 B5 00 8B 45 |.E.74.184.$....E|
00000920: 89 31 38 33 00 4F 11 B6 00 99 C9 28 22 20 20 20 |.183.O.....(" |
00000930: 22 AA C4 28 54 28 49 29 AB 46 28 49 29 29 2C 35 |"..(T(I).F(I)),5|
00000940: 29 3B 22 20 42 59 54 45 53 20 4C 41 4E 47 22 00 |);" BYTES LANG".|
00000950: 56 11 B7 00 82 49 00 92 11 B8 00 99 3A 85 22 D3 |V....I......:.".|
00000960: 4B 41 4C 20 44 45 52 20 4B 4F 50 49 45 52 45 53 |KAL DER KOPIERES|
00000970: 20 54 49 4C 20 46 4C 45 52 45 20 44 49 53 4B 45 | TIL FLERE DISKE|
00000980: 54 54 45 52 3F 20 9E 12 4E 90 92 9D 9D 9D 22 3B |TTER? ..N.....";|
00000990: 41 24 00 A2 11 B9 00 8B 41 24 B2 22 4A 22 89 31 |A$......A$."J".1|
000009A0: 35 38 00 DA 11 BA 00 99 22 A3 A3 A3 A3 A3 A3 A3 |58......".......|
000009B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000009C0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000009D0: A3 22 3B 3A A0 31 35 3A A0 31 00 14 12 BB 00 85 |.";:.15:.1......|
000009E0: 22 11 1D 1D 1D 1D 1D 1D 20 D3 4B 41 4C 20 44 45 |"....... .KAL DE|
000009F0: 52 20 4B 4F 50 49 45 52 45 53 20 46 4C 45 52 45 |R KOPIERES FLERE|
00000A00: 20 46 49 4C 45 52 3F 20 12 9E 4A 92 9D 9D 90 9D | FILER? ..J.....|
00000A10: 22 3B 41 24 00 2D 12 BC 00 8B 41 24 B2 22 4A 22 |";A$.-....A$."J"|
00000A20: A7 20 A0 31 35 3A A0 31 3A 89 31 30 37 00 3E 12 |. .15:.1:.107.>.|
00000A30: BD 00 99 A3 31 34 29 22 11 D3 CC D5 D4 22 00 63 |....14)".....".c|
00000A40: 12 BE 00 99 A3 37 29 22 11 9E C6 4A 45 52 4E 20 |.....7)"...JERN |
00000A50: 56 45 4E 4C 49 47 53 54 20 44 49 53 4B 45 54 54 |VENLIGST DISKETT|
00000A60: 45 4E 22 00 83 12 BF 00 99 A3 31 31 29 22 9E 46 |EN".......11)".F|
00000A70: 52 41 20 44 49 53 4B 45 54 54 45 44 52 45 56 45 |RA DISKETTEDREVE|
00000A80: 54 90 22 00 90 12 C0 00 99 C7 28 39 29 3B 3A 80 |T.".......(9);:.|
00000A90: 00 A3 12 C1 00 84 31 35 2C 45 2C 45 24 2C 45 31 |......15,E,E$,E1|
00000AA0: 2C 45 32 00 AE 12 C2 00 8B 45 B2 30 A7 8E 00 DE |,E2......E.0....|
00000AB0: 12 C3 00 45 45 24 B2 CA 28 C4 28 45 29 2C 32 29 |...EE$..(.(E),2)|
00000AC0: 3A 45 31 24 B2 CA 28 C4 28 45 31 29 2C 32 29 3A |:E1$..(.(E1),2):|
00000AD0: 45 32 24 B2 CA 28 C4 28 45 32 29 2C 32 29 00 EA |E2$..(.(E2),2)..|
00000AE0: 12 C4 00 8B 45 B2 36 33 A7 8E 00 1B 13 C5 00 99 |....E.63........|
00000AF0: 3A 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 9E 22 |:."............"|
00000B00: 3B 45 45 24 3B 22 2C 22 3B 45 24 3B 22 2C 22 3B |;EE$;",";E$;",";|
00000B10: 45 31 24 3B 22 2C 22 3B 45 32 24 00 3D 13 C6 00 |E1$;",";E2$.=...|
00000B20: 83 20 37 36 2C 39 36 2C 33 2C 31 36 32 2C 31 2C |. 76,96,3,162,1,|
00000B30: 33 32 2C 31 39 38 2C 32 35 35 2C 33 32 00 5D 13 |32,198,255,32.].|
00000B40: C7 00 83 20 32 32 38 2C 32 35 35 2C 31 36 30 2C |... 228,255,160,|
00000B50: 30 2C 31 34 35 2C 32 35 31 2C 32 33 30 00 7D 13 |0,145,251,230.}.|
00000B60: C8 00 83 20 32 35 31 2C 32 30 38 2C 38 2C 32 33 |... 251,208,8,23|
00000B70: 30 2C 32 35 32 2C 31 36 35 2C 32 35 32 00 9F 13 |0,252,165,252...|
00000B80: C9 00 83 20 32 30 31 2C 32 30 38 2C 32 34 30 2C |... 201,208,240,|
00000B90: 36 2C 31 36 35 2C 31 34 34 2C 34 31 2C 36 34 00 |6,165,144,41,64.|
00000BA0: C1 13 CA 00 83 20 32 34 30 2C 32 33 31 2C 37 36 |..... 240,231,76|
00000BB0: 2C 32 30 34 2C 32 35 35 2C 31 36 32 2C 31 2C 33 |,204,255,162,1,3|
00000BC0: 32 00 E2 13 CB 00 83 20 32 30 31 2C 32 35 35 2C |2...... 201,255,|
00000BD0: 31 36 32 2C 35 34 2C 31 33 34 2C 31 2C 31 36 30 |162,54,134,1,160|
00000BE0: 2C 30 00 03 14 CC 00 83 20 31 37 37 2C 32 35 31 |,0...... 177,251|
00000BF0: 2C 33 32 2C 32 31 30 2C 32 35 35 2C 32 33 30 2C |,32,210,255,230,|
00000C00: 32 35 31 00 27 14 CD 00 83 20 32 30 38 2C 32 2C |251.'.... 208,2,|
00000C10: 32 33 30 2C 32 35 32 2C 31 36 35 2C 32 35 31 2C |230,252,165,251,|
00000C20: 31 39 37 2C 32 35 33 00 49 14 CE 00 83 20 32 30 |197,253.I.... 20|
00000C30: 38 2C 32 33 39 2C 31 36 35 2C 32 35 32 2C 31 39 |8,239,165,252,19|
00000C40: 37 2C 32 35 34 2C 32 30 38 00 6B 14 CF 00 83 20 |7,254,208.k.... |
00000C50: 32 33 33 2C 31 36 32 2C 35 35 2C 31 33 34 2C 31 |233,162,55,134,1|
00000C60: 2C 37 36 2C 32 30 34 2C 32 35 35 00 82 14 4D 01 |,76,204,255...M.|
00000C70: A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 31 |.A$:.A$...(13).1|
00000C80: 31 31 00 00 FF |11... |
....D..55,0:.56,24:..'.E.PG.24:MX.B(56).
<.F.Z$.G(0):Q$.G(34).T.G..53280,9 :.5328
1,11.D.H..G(14);G(8).|.I..F$(MX),F(MX),T
(MX)...J..I.828.904:.A:.I,A:..M.K.."....
CBM64. SELEKTIV FILKOPIERING .CBM
64.";...L.."............................
............";...M..".INDS[T VENLIGST .
KILDE. DISKETTEN I ".[.N.."DREVET, OG
TRYK............. .RETURN."...O..:."....
....................................";:.
15,8,15,"I0"...P..A$:.A$..G(13).112.Y.Q.
.". INDTAST FILMYNSTER ? *...";F$...R..I
(F$,1).."*".F$.F$."*"...S..193:.E.189...
T..1,8,0,"$0:".F$:.193.Q.U..E..".......
DISKETTENS KAN IKKE L[SES .":.189...V.."
.'..+..' KOPIER FILEN . '..-..' SPRIN
G OVER ";.C.W.." '..B..' BEGYND KOPIER
ING '..S..' STOP ."...X..#1,A$,B
$:N.0:AD.PG.256...Y..#1,A$,B$:.B$."".142
...Z..#1,A$,B$:F$."".).{.SZ.F(A$.Z$).F(B
$.Z$).256.?.|..#1,A$:.64.ST.142.O.}..A$.
.Q$.124.P.~..#1,A$:.A$..Q$.F$.F$.A$:.126
.....#1,A$:.A$.." ".127......#1,T$:.T$.
" ".128......#1,A$:.A$.."".129.V....SZ.0
.(T$.."P".T$.."S").121......SZ;.5);T$;"
";Q$;F$;Q$;.26);.#....AD.SZ.256.53247.."
_...FOR STOR.":.121.@...."_ .+:-:B:S?...
......";.S....A$:.A$."".134.U....A$."-".
.".SPRING OVER.":.121......A$."B"..".BEG
YND .":.142......A$."S"..".STOP
.":.186.H....A$.."+".134.....N.N.1:F$(N)
.F$.",".T$:.".KOPIERES. ".....AD.AD.SZ.2
56:.N.MX.121./....". .MAXIMUM P]";MX;"FI
L(ER).".Y... 1:."............";N;"FIL(ER
) L[SES.".P...AD.PG.256:.N.0.189.{....I.
1.N......" ";Q$;F$(I);Q$;.20);.....SZ..(
AD.256).B....251,AD.SZ.256:.252,SZ......
1,8,2,"0:".F$(I):.193......E.74. 1:N.I.1
:.157......E. 1:F$(I)."":.156./....831:.
193: 1:.E.74.N.I.1:.157.D....E.F$(I)."":
.156.Q....B(252).208.F$(I)."":.".FOR STO
R .":.156.....F(I).AD:AD.B(251).B(252).2
56:T(I).AD.F....I(" ".D(T(I).F(I)),5);
" BYTES LANG ".M....I.Z....N.0.189......
".INDS[T VENLIGT .MODTAGER. DISKETTEN".?
...."........SKAL.DISKETTEN..FORMATTERES
?. ..N.....";A$.E. ...V....A$.."J".165.T
...." DISKETTENAVN,ID";F$,T$......15,"N0
:".F$.",".T$......:.193:.E.157......I.1.
N......F$(I)."".183.V...." ";Q$;F$(I);Q$
;.20);......1,8,2,F$(I).",W"......193:.E
.0.176..... 1:.E.63.172.,.... CLOSE1:IF
E<>63GOTO840.I....:."...... .OVERSKRIVE.
EKSISTERENDE FIL .? ..N.....";A$.O.....
.....A$.."J".183......15,"S0:".F$(I):.16
7.....SZ..(F(I).256).I....251,F(I).SZ.25
6:.252,SZ.....SZ..(T(I).256)......253,T(
I).SZ.256:.254,SZ......828:.193: 1:.E.72
.E.74.184.$....E.183.O....I(" ".D(T(I)
.F(I)),5);" BYTES LANG".V....I......:."S
KAL DER KOPIERES TIL FLERE DISKETTER? ..
N.....";A$......A$."J".158.Z....".......
.................................";: 15:
1......"....... SKAL DER KOPIERES FLERE
FILER? ..J.....";A$.-....A$."J". 15: 1
:.107.>.....14)".SLUT".C.....7)"..FJERN
VENLIGST DISKETTEN".......11)".FRA DISKE
TTEDREVET."......G(9);:....A..15,E,E$,E1
,E2...B..E.0.....C.EE$.J(D(E),2):E1$.J(D
(E1),2):E2$.J(D(E2),2)...D..E.63.....E..
:."............";EE$;",";E$;",";E1$;",";
E2$.=.F.. 76,96,3,162,1,32,198,255,32.].
G.. 228,255,160,0,145,251,230.}.H.. 251,
208,8,230,252,165,252...I.. 201,208,240,
6,165,144,41,64.A.J.. 240,231,76,204,255
,162,1,32...K.. 201,255,162,54,134,1,160
,0...L.. 177,251,32,210,255,230,251.'.M.
. 208,2,230,252,165,251,197,253.I.N.. 20
8,239,165,252,197,254,208.K.O.. 233,162,
55,134,1,76,204,255...M..A$:.A$..G(13).1
11...
> CLICK IMAGE PREVIEW FOR FULL MODAL