FILE-KOPIERER
FILE INFORMATION
FILENAME(S): FILE-KOPIERER
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 18:06:06
APPEARS ON: 1 disk(s)
FILE HASH
ed0807d4a5715d488e3965459a92c5781e396123044dd43de399e651a3751f11
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TIGERDISK NUMMER | FILE-KOPIERER | PRG | Xii | 24 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 0A 00 97 35 35 2C 30 3A 97 35 36 2C |.......55,0:.56,|
00000010: 32 34 3A 9C 00 27 08 14 00 50 47 B2 32 34 3A 4D |24:..'...PG.24:M|
00000020: 58 B2 C2 28 35 36 29 00 3C 08 1E 00 5A 24 B2 C7 |X..(56).<...Z$..|
00000030: 28 30 29 3A 51 24 B2 C7 28 33 34 29 00 53 08 28 |(0):Q$..(34).S.(|
00000040: 00 97 35 33 32 38 30 2C 31 35 3A 97 35 33 32 38 |..53280,15:.5328|
00000050: 31 2C 31 00 63 08 32 00 99 C7 28 31 34 29 3B C7 |1,1.c.2...(14);.|
00000060: 28 38 29 00 7B 08 3C 00 86 46 24 28 4D 58 29 2C |(8).{.<..F$(MX),|
00000070: 46 28 4D 58 29 2C 54 28 4D 58 29 00 94 08 46 00 |F(MX),T(MX)...F.|
00000080: 81 49 B2 38 32 38 A4 39 30 34 3A 87 41 3A 97 49 |.I.828.904:.A:.I|
00000090: 2C 41 3A 82 00 CD 08 50 00 99 22 93 90 11 20 20 |,A:....P.."... |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 C6 C9 CC C5 | ....|
000000B0: 20 C3 CF D0 C9 C5 D2 20 20 20 20 20 20 20 20 20 | ...... |
000000C0: 20 20 20 20 20 20 22 3B 3A 44 44 B2 38 00 FE 08 | ";:DD.8...|
000000D0: 5A 00 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |Z.."............|
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 30 |............";.0|
00000100: 09 64 00 99 22 11 D0 4C 45 41 53 45 20 49 4E 53 |.d.."..LEASE INS|
00000110: 45 52 54 20 54 48 45 20 1C D3 CF D5 D2 C3 C5 90 |ERT THE ........|
00000120: 20 20 44 49 53 4B 45 54 54 45 20 49 4E 54 4F 22 | DISKETTE INTO"|
00000130: 00 65 09 6E 00 99 22 54 48 45 20 44 49 53 4B 20 |.e.n.."THE DISK |
00000140: 44 52 49 56 45 20 23 38 20 41 4E 44 20 50 52 45 |DRIVE #8 AND PRE|
00000150: 53 53 20 54 48 45 20 12 D2 C5 D4 D5 D2 CE 92 2D |SS THE ........-|
00000160: 20 4B 45 59 22 00 7C 09 78 00 A1 41 24 3A 8B 41 | KEY".|.x..A$:.A|
00000170: 24 B3 B1 C7 28 31 33 29 A7 31 32 30 00 8F 09 82 |$...(13).120....|
00000180: 00 9F 31 35 2C 44 44 2C 31 35 2C 22 49 30 22 00 |..15,DD,15,"I0".|
00000190: B5 09 8C 00 85 22 11 20 C6 49 4C 45 4E 41 4D 45 |.....". .ILENAME|
000001A0: 53 20 54 4F 20 4D 41 54 43 48 20 3F 20 2A 9D 9D |S TO MATCH ? *..|
000001B0: 9D 22 3B 46 24 00 D1 09 96 00 8B C9 28 46 24 2C |.";F$.......(F$,|
000001C0: 31 29 B3 B1 22 2A 22 A7 46 24 B2 46 24 AA 22 2A |1).."*".F$.F$."*|
000001D0: 22 00 E1 09 A0 00 8D 39 34 30 3A 8B 45 89 39 30 |"......940:.E.90|
000001E0: 30 00 FB 09 AA 00 9F 31 2C 44 44 2C 30 2C 22 24 |0......1,DD,0,"$|
000001F0: 30 3A 22 AA 46 24 3A 8D 39 34 30 00 31 0A B4 00 |0:".F$:.940.1...|
00000200: 8B 45 A7 99 22 11 1D 1D 1D 1D 12 9A 20 49 4D 50 |.E.."....... IMP|
00000210: 4F 53 53 49 42 4C 45 20 54 4F 20 52 45 41 44 20 |OSSIBLE TO READ |
00000220: 44 49 52 45 43 54 4F 52 59 20 92 22 3A 89 39 30 |DIRECTORY .":.90|
00000230: 30 00 68 0A BE 00 99 22 20 11 27 1C C3 90 27 20 |0.h...." .'...' |
00000240: C6 49 4C 45 20 4B 4F 50 49 45 52 45 4E 20 20 20 |.ILE KOPIEREN |
00000250: 27 1C D2 90 27 20 C6 49 4C 45 20 41 55 53 4C 41 |'...' .ILE AUSLA|
00000260: 53 53 45 4E 20 20 22 3B 00 9A 0A C8 00 99 22 27 |SSEN ";......"'|
00000270: 1C C2 90 27 20 C3 4F 50 59 20 42 45 47 49 4E 4E |...' .OPY BEGINN|
00000280: 45 4E 20 20 20 27 1C C1 90 27 20 41 42 42 52 45 |EN '...' ABBRE|
00000290: 43 48 45 4E 20 20 20 20 11 22 00 B6 0A D2 00 A1 |CHEN ."......|
000002A0: 23 31 2C 41 24 2C 42 24 3A 4E B2 30 3A 41 44 B2 |#1,A$,B$:N.0:AD.|
000002B0: 50 47 AC 32 35 36 00 CF 0A DC 00 A1 23 31 2C 41 |PG.256......#1,A|
000002C0: 24 2C 42 24 3A 8B 42 24 B2 22 22 89 34 33 30 00 |$,B$:.B$."".430.|
000002D0: E3 0A E6 00 A1 23 31 2C 41 24 2C 42 24 3A 46 24 |.....#1,A$,B$:F$|
000002E0: B2 22 22 00 00 0B F0 00 53 5A B2 C6 28 41 24 AA |."".....SZ..(A$.|
000002F0: 5A 24 29 AA C6 28 42 24 AA 5A 24 29 AC 32 35 36 |Z$)..(B$.Z$).256|
00000300: 00 16 0B FA 00 A1 23 31 2C 41 24 3A 8B 36 34 AF |......#1,A$:.64.|
00000310: 53 54 89 34 33 30 00 26 0B 04 01 8B 41 24 B3 B1 |ST.430.&....A$..|
00000320: 51 24 89 32 35 30 00 47 0B 0E 01 A1 23 31 2C 41 |Q$.250.G....#1,A|
00000330: 24 3A 8B 41 24 B3 B1 51 24 A7 46 24 B2 46 24 AA |$:.A$..Q$.F$.F$.|
00000340: 41 24 3A 89 32 37 30 00 5F 0B 18 01 A1 23 31 2C |A$:.270._....#1,|
00000350: 41 24 3A 8B 41 24 B3 B1 22 20 22 89 32 38 30 00 |A$:.A$.." ".280.|
00000360: 76 0B 22 01 A1 23 31 2C 54 24 3A 8B 54 24 B2 22 |v."..#1,T$:.T$."|
00000370: 20 22 89 32 39 30 00 8D 0B 2C 01 A1 23 31 2C 41 | ".290...,..#1,A|
00000380: 24 3A 8B 41 24 B3 B1 22 22 89 33 30 30 00 AD 0B |$:.A$.."".300...|
00000390: 36 01 8B 53 5A B2 30 B0 28 54 24 B3 B1 22 50 22 |6..SZ.0.(T$.."P"|
000003A0: AF 54 24 B3 B1 22 53 22 29 89 32 32 30 00 CF 0B |.T$.."S").220...|
000003B0: 40 01 99 53 5A 3B A3 35 29 3B 54 24 3B 22 20 22 |@..SZ;.5);T$;" "|
000003C0: 3B 51 24 3B 46 24 3B 51 24 3B A3 32 36 29 3B 00 |;Q$;F$;Q$;.26);.|
000003D0: F9 0B 4A 01 8B 41 44 AA 53 5A AC 32 35 36 B1 35 |..J..AD.SZ.256.5|
000003E0: 33 32 34 37 A7 99 22 1C 12 D4 CF CF 20 CC C1 D2 |3247.."..... ...|
000003F0: C7 C5 90 22 3A 89 32 32 30 00 16 0C 54 01 99 22 |...":.220...T.."|
00000400: 5F 20 12 43 3A 52 3A 42 3A 41 3F 92 9D 9D 9D 9D |_ .C:R:B:A?.....|
00000410: 9D 9D 9D 9D 22 3B 00 29 0C 5E 01 A1 41 24 3A 8B |....";.).^..A$:.|
00000420: 41 24 B2 22 22 89 33 35 30 00 4B 0C 68 01 8B 41 |A$."".350.K.h..A|
00000430: 24 B2 22 52 22 A7 99 22 9A 52 45 4A 45 43 54 20 |$."R"..".REJECT |
00000440: 46 49 4C 45 90 22 3A 89 32 32 30 00 6C 0C 72 01 |FILE.":.220.l.r.|
00000450: 8B 41 24 B2 22 42 22 A7 99 22 9A 42 45 47 49 4E |.A$."B"..".BEGIN|
00000460: 20 43 4F 50 59 90 22 3A 89 34 33 30 00 8D 0C 7C | COPY.":.430...||
00000470: 01 8B 41 24 B2 22 41 22 A7 99 22 9A 41 42 4F 52 |..A$."A"..".ABOR|
00000480: 54 20 43 4F 50 59 90 22 3A 89 38 37 30 00 9E 0C |T COPY.":.870...|
00000490: 86 01 8B 41 24 B3 B1 22 43 22 89 33 35 30 00 C8 |...A$.."C".350..|
000004A0: 0C 90 01 4E B2 4E AA 31 3A 46 24 28 4E 29 B2 46 |...N.N.1:F$(N).F|
000004B0: 24 AA 22 2C 22 AA 54 24 3A 99 22 9A 43 4F 50 59 |$.",".T$:.".COPY|
000004C0: 20 46 49 4C 45 90 20 22 00 E3 0C 9A 01 41 44 B2 | FILE. ".....AD.|
000004D0: 41 44 AA 53 5A AC 32 35 36 3A 8B 4E B3 4D 58 89 |AD.SZ.256:.N.MX.|
000004E0: 32 32 30 00 04 0D A4 01 99 22 11 20 12 CD 41 58 |220......". ..AX|
000004F0: 49 4D 55 4D 20 4F 46 22 3B 4D 58 3B 22 46 49 4C |IMUM OF";MX;"FIL|
00000500: 45 53 2E 22 00 2E 0D AE 01 A0 31 3A 99 22 11 1D |ES."......1:."..|
00000510: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 4E 3B 22 46 |..........";N;"F|
00000520: 49 4C 45 53 20 54 4F 20 52 45 41 44 11 22 00 45 |ILES TO READ.".E|
00000530: 0D B8 01 41 44 B2 50 47 AC 32 35 36 3A 8B 4E B2 |...AD.PG.256:.N.|
00000540: 30 89 39 30 30 00 50 0D C2 01 81 49 B2 31 A4 4E |0.900.P....I.1.N|
00000550: 00 6B 0D CC 01 99 22 20 22 3B 51 24 3B 46 24 28 |.k...." ";Q$;F$(|
00000560: 49 29 3B 51 24 3B A3 32 30 29 3B 00 7C 0D D6 01 |I);Q$;.20);.|...|
00000570: 53 5A B2 B5 28 41 44 AD 32 35 36 29 00 97 0D E0 |SZ..(AD.256)....|
00000580: 01 97 32 35 31 2C 41 44 AB 53 5A AC 32 35 36 3A |..251,AD.SZ.256:|
00000590: 97 32 35 32 2C 53 5A 00 B3 0D EA 01 9F 31 2C 44 |.252,SZ......1,D|
000005A0: 44 2C 32 2C 22 30 3A 22 AA 46 24 28 49 29 3A 8D |D,2,"0:".F$(I):.|
000005B0: 39 34 30 00 CB 0D F4 01 8B 45 B2 37 34 A7 A0 31 |940......E.74..1|
000005C0: 3A 4E B2 49 AB 31 3A 89 35 38 30 00 E3 0D FE 01 |:N.I.1:.580.....|
000005D0: 8B 45 A7 A0 31 3A 46 24 28 49 29 B2 22 22 3A 89 |.E..1:F$(I)."":.|
000005E0: 35 37 30 00 05 0E 08 02 9E 38 33 31 3A 8D 39 34 |570......831:.94|
000005F0: 30 3A A0 31 3A 8B 45 B2 37 34 A7 4E B2 49 AB 31 |0:.1:.E.74.N.I.1|
00000600: 3A 89 35 38 30 00 1A 0E 12 02 8B 45 A7 46 24 28 |:.580......E.F$(|
00000610: 49 29 B2 22 22 3A 89 35 37 30 00 47 0E 1C 02 8B |I)."":.570.G....|
00000620: C2 28 32 35 32 29 B2 32 30 38 A7 46 24 28 49 29 |.(252).208.F$(I)|
00000630: B2 22 22 3A 99 22 12 D4 CF CF 20 CC C1 D2 C7 C5 |."":.".... .....|
00000640: 92 22 3A 89 35 37 30 00 70 0E 26 02 46 28 49 29 |.":.570.p.&.F(I)|
00000650: B2 41 44 3A 41 44 B2 C2 28 32 35 31 29 AA C2 28 |.AD:AD..(251)..(|
00000660: 32 35 32 29 AC 32 35 36 3A 54 28 49 29 B2 41 44 |252).256:T(I).AD|
00000670: 00 9D 0E 30 02 99 C9 28 22 20 20 20 22 AA C4 28 |...0...(" "..(|
00000680: 54 28 49 29 AB 46 28 49 29 29 2C 35 29 3B 22 20 |T(I).F(I)),5);" |
00000690: 42 59 54 45 53 20 4F 46 20 4D 45 4D 22 00 A4 0E |BYTES OF MEM"...|
000006A0: 3A 02 82 49 00 B1 0E 44 02 8B 4E B2 30 89 39 30 |:..I...D..N.0.90|
000006B0: 30 00 F6 0E 4E 02 99 22 11 D0 4C 45 41 53 45 20 |0...N.."..LEASE |
000006C0: 49 4E 53 45 52 54 20 54 48 45 20 1C C4 C5 D3 D4 |INSERT THE .....|
000006D0: C9 CE C1 D4 C9 CF CE 90 20 44 49 53 4B 45 54 54 |........ DISKETT|
000006E0: 45 22 3A 99 22 49 4E 54 4F 20 44 49 53 4B 20 44 |E":."INTO DISK D|
000006F0: 52 49 56 45 2E 22 00 FE 0E 53 02 A0 31 35 00 1F |RIVE."...S..15..|
00000700: 0F 54 02 85 22 11 43 4F 50 59 20 54 4F 20 57 48 |.T..".COPY TO WH|
00000710: 49 43 48 20 44 52 49 56 45 20 22 3B 44 44 24 00 |ICH DRIVE ";DD$.|
00000720: 43 0F 55 02 44 44 B2 C5 28 44 44 24 29 3A 8B 44 |C.U.DD..(DD$):.D|
00000730: 44 B3 38 B0 44 44 B1 31 35 A7 99 22 93 22 3A 89 |D.8.DD.15..".":.|
00000740: 35 39 30 00 72 0F 58 02 85 22 11 1D 1D 1D 1D 1D |590.r.X.."......|
00000750: 1D 1D 1C C6 CF D2 CD C1 D4 90 20 54 48 49 53 20 |.......... THIS |
00000760: 44 49 53 4B 45 54 54 45 20 20 4E 9D 9D 9D 22 3B |DISKETTE N...";|
00000770: 41 24 00 82 0F 62 02 99 3A 9F 31 35 2C 44 44 2C |A$...b..:.15,DD,|
00000780: 31 35 00 93 0F 6C 02 8B 41 24 B3 B1 22 59 22 89 |15...l..A$.."Y".|
00000790: 36 36 30 00 AE 0F 76 02 85 22 20 C4 49 53 4B 20 |660...v.." .ISK |
000007A0: 4E 41 4D 45 2C 49 44 22 3B 46 24 2C 54 24 00 C6 |NAME,ID";F$,T$..|
000007B0: 0F 80 02 98 31 35 2C 22 4E 30 3A 22 AA 46 24 AA |....15,"N0:".F$.|
000007C0: 22 2C 22 AA 54 24 00 D8 0F 8A 02 99 3A 8D 39 34 |",".T$......:.94|
000007D0: 30 3A 8B 45 89 35 38 30 00 E3 0F 94 02 81 49 B2 |0:.E.580......I.|
000007E0: 31 A4 4E 00 F5 0F 9E 02 8B 46 24 28 49 29 B2 22 |1.N......F$(I)."|
000007F0: 22 89 38 34 30 00 10 10 A8 02 99 22 20 22 3B 51 |".840......" ";Q|
00000800: 24 3B 46 24 28 49 29 3B 51 24 3B A3 32 30 29 3B |$;F$(I);Q$;.20);|
00000810: 00 27 10 B2 02 9F 31 2C 44 44 2C 32 2C 46 24 28 |.'....1,DD,2,F$(|
00000820: 49 29 AA 22 2C 57 22 00 39 10 BC 02 8D 39 34 30 |I).",W".9....940|
00000830: 3A 8B 45 B2 30 89 37 37 30 00 4A 10 C6 02 A0 31 |:.E.0.770.J....1|
00000840: 3A 8B 45 B2 36 33 A7 37 33 30 00 67 10 D0 02 8F |:.E.63.730.g....|
00000850: 20 20 43 4C 4F 53 45 31 3A 49 46 45 3C 3E 36 33 | CLOSE1:IFE<>63|
00000860: 47 4F 54 4F 38 34 30 00 9A 10 DA 02 99 3A 85 22 |GOTO840......:."|
00000870: 11 1D 1D 1D 1D 1D 20 1C D2 C5 D0 CC C1 C3 C5 90 |...... .........|
00000880: 20 45 58 49 53 54 49 4E 47 20 46 49 4C 45 20 9D | EXISTING FILE .|
00000890: 3F 20 4E 9D 9D 9D 22 3B 41 24 00 A0 10 E4 02 99 |? N...";A$......|
000008A0: 00 B1 10 EE 02 8B 41 24 B3 B1 22 59 22 89 38 34 |......A$.."Y".84|
000008B0: 30 00 CA 10 F8 02 98 31 35 2C 22 53 30 3A 22 AA |0......15,"S0:".|
000008C0: 46 24 28 49 29 3A 89 36 38 30 00 DD 10 02 03 53 |F$(I):.680.....S|
000008D0: 5A B2 B5 28 46 28 49 29 AD 32 35 36 29 00 FA 10 |Z..(F(I).256)...|
000008E0: 0C 03 97 32 35 31 2C 46 28 49 29 AB 53 5A AC 32 |...251,F(I).SZ.2|
000008F0: 35 36 3A 97 32 35 32 2C 53 5A 00 0D 11 16 03 53 |56:.252,SZ.....S|
00000900: 5A B2 B5 28 54 28 49 29 AD 32 35 36 29 00 2A 11 |Z..(T(I).256).*.|
00000910: 20 03 97 32 35 33 2C 54 28 49 29 AB 53 5A AC 32 | ..253,T(I).SZ.2|
00000920: 35 36 3A 97 32 35 34 2C 53 5A 00 4A 11 2A 03 9E |56:.254,SZ.J.*..|
00000930: 38 32 38 3A 8D 39 34 30 3A A0 31 3A 8B 45 B2 37 |828:.940:.1:.E.7|
00000940: 32 B0 45 B2 37 34 89 38 35 30 00 55 11 34 03 8B |2.E.74.850.U.4..|
00000950: 45 89 38 34 30 00 82 11 3E 03 99 C9 28 22 20 20 |E.840...>...(" |
00000960: 20 22 AA C4 28 54 28 49 29 AB 46 28 49 29 29 2C | "..(T(I).F(I)),|
00000970: 35 29 3B 22 20 42 59 54 45 53 20 4F 46 20 4D 45 |5);" BYTES OF ME|
00000980: 4D 22 00 89 11 48 03 82 49 00 B9 11 52 03 85 22 |M"...H..I...R.."|
00000990: 11 1D 1D 1D 1D 1D 20 D3 41 56 45 20 53 41 4D 45 |...... .AVE SAME|
000009A0: 20 50 52 4F 47 52 41 4D 53 20 41 47 41 49 4E 3F | PROGRAMS AGAIN?|
000009B0: 20 4E 9D 9D 9D 22 3B 41 24 00 C9 11 5C 03 8B 41 | N...";A$...\..A|
000009C0: 24 B2 22 59 22 89 35 38 30 00 D4 11 66 03 A0 31 |$."Y".580...f..1|
000009D0: 35 3A A0 31 00 02 12 70 03 85 22 11 1D 1D 1D 1D |5:.1...p..".....|
000009E0: 1D 1D 20 CD 4F 52 45 20 50 52 4F 47 52 41 4D 53 |.. .ORE PROGRAMS|
000009F0: 20 54 4F 20 43 4F 50 59 3F 20 59 9D 9D 9D 22 3B | TO COPY? Y...";|
00000A00: 41 24 00 1A 12 7A 03 8B 41 24 B2 22 59 22 A7 20 |A$...z..A$."Y". |
00000A10: A0 31 35 3A A0 31 3A 89 38 30 00 32 12 84 03 99 |.15:.1:.80.2....|
00000A20: A3 31 34 29 22 11 C5 CE C4 20 CF C6 20 C3 CF D0 |.14)".... .. ...|
00000A30: D9 22 00 59 12 8E 03 99 A3 37 29 22 11 1C D0 4C |.".Y.....7)"...L|
00000A40: 45 41 53 45 20 52 45 4D 4F 56 45 20 54 48 45 20 |EASE REMOVE THE |
00000A50: 44 49 53 4B 45 54 54 45 22 00 79 12 98 03 99 A3 |DISKETTE".y.....|
00000A60: 31 31 29 22 46 52 4F 4D 20 54 48 45 20 44 49 53 |11)"FROM THE DIS|
00000A70: 4B 20 44 52 49 56 45 90 22 00 86 12 A2 03 99 C7 |K DRIVE.".......|
00000A80: 28 39 29 3B 3A 80 00 99 12 AC 03 84 31 35 2C 45 |(9);:.......15,E|
00000A90: 2C 45 24 2C 45 31 2C 45 32 00 A4 12 B6 03 8B 45 |,E$,E1,E2......E|
00000AA0: B2 30 A7 8E 00 D4 12 C0 03 45 45 24 B2 CA 28 C4 |.0.......EE$..(.|
00000AB0: 28 45 29 2C 32 29 3A 45 31 24 B2 CA 28 C4 28 45 |(E),2):E1$..(.(E|
00000AC0: 31 29 2C 32 29 3A 45 32 24 B2 CA 28 C4 28 45 32 |1),2):E2$..(.(E2|
00000AD0: 29 2C 32 29 00 E0 12 CA 03 8B 45 B2 36 33 A7 8E |),2)......E.63..|
00000AE0: 00 11 13 D4 03 99 3A 99 22 11 1D 1D 1D 1D 1D 1D |......:.".......|
00000AF0: 1D 1D 1D 1D 1C 22 3B 45 45 24 3B 22 2C 22 3B 45 |.....";EE$;",";E|
00000B00: 24 3B 22 2C 22 3B 45 31 24 3B 22 2C 22 3B 45 32 |$;",";E1$;",";E2|
00000B10: 24 00 33 13 DE 03 83 20 37 36 2C 39 36 2C 33 2C |$.3.... 76,96,3,|
00000B20: 31 36 32 2C 31 2C 33 32 2C 31 39 38 2C 32 35 35 |162,1,32,198,255|
00000B30: 2C 33 32 00 53 13 E8 03 83 20 32 32 38 2C 32 35 |,32.S.... 228,25|
00000B40: 35 2C 31 36 30 2C 30 2C 31 34 35 2C 32 35 31 2C |5,160,0,145,251,|
00000B50: 32 33 30 00 73 13 F2 03 83 20 32 35 31 2C 32 30 |230.s.... 251,20|
00000B60: 38 2C 38 2C 32 33 30 2C 32 35 32 2C 31 36 35 2C |8,8,230,252,165,|
00000B70: 32 35 32 00 95 13 FC 03 83 20 32 30 31 2C 32 30 |252...... 201,20|
00000B80: 38 2C 32 34 30 2C 36 2C 31 36 35 2C 31 34 34 2C |8,240,6,165,144,|
00000B90: 34 31 2C 36 34 00 B7 13 06 04 83 20 32 34 30 2C |41,64...... 240,|
00000BA0: 32 33 31 2C 37 36 2C 32 30 34 2C 32 35 35 2C 31 |231,76,204,255,1|
00000BB0: 36 32 2C 31 2C 33 32 00 D8 13 10 04 83 20 32 30 |62,1,32...... 20|
00000BC0: 31 2C 32 35 35 2C 31 36 32 2C 35 34 2C 31 33 34 |1,255,162,54,134|
00000BD0: 2C 31 2C 31 36 30 2C 30 00 F9 13 1A 04 83 20 31 |,1,160,0...... 1|
00000BE0: 37 37 2C 32 35 31 2C 33 32 2C 32 31 30 2C 32 35 |77,251,32,210,25|
00000BF0: 35 2C 32 33 30 2C 32 35 31 00 1D 14 24 04 83 20 |5,230,251...$.. |
00000C00: 32 30 38 2C 32 2C 32 33 30 2C 32 35 32 2C 31 36 |208,2,230,252,16|
00000C10: 35 2C 32 35 31 2C 31 39 37 2C 32 35 33 00 3F 14 |5,251,197,253.?.|
00000C20: 2E 04 83 20 32 30 38 2C 32 33 39 2C 31 36 35 2C |... 208,239,165,|
00000C30: 32 35 32 2C 31 39 37 2C 32 35 34 2C 32 30 38 00 |252,197,254,208.|
00000C40: 61 14 38 04 83 20 32 33 33 2C 31 36 32 2C 35 35 |a.8.. 233,162,55|
00000C50: 2C 31 33 34 2C 31 2C 37 36 2C 32 30 34 2C 32 35 |,134,1,76,204,25|
00000C60: 35 00 00 00 |5... |
.......55,0:.56,24:..'...PG.24:MX.B(56).
<...Z$.G(0):Q$.G(34).S.(..53280,15:.5328
1,1.C.2..G(14);G(8).{.<..F$(MX),F(MX),T(
MX)...F..I.828.904:.A:.I,A:..M.P.."...
FILE COPIER ";
:DD.8...Z.."............................
............";.0.D..".PLEASE INSERT THE
.SOURCE. DISKETTE INTO".E.N.."THE DISK
DRIVE #8 AND PRESS THE .RETURN.- KEY".|.
X..A$:.A$..G(13).120......15,DD,15,"I0".
.....". FILENAMES TO MATCH ? *...";F$.Q.
...I(F$,1).."*".F$.F$."*"... ..940:.E.90
0......1,DD,0,"$0:".F$:.940.1....E.."...
.... IMPOSSIBLE TO READ DIRECTORY .":.90
0.H...." .'.C.' FILE KOPIEREN '.R.' FI
LE AUSLASSEN ";...H.."'.B.' COPY BEGINN
EN '.A.' ABBRECHEN ."...R..#1,A$,B$
:N.0:AD.PG.256.O....#1,A$,B$:.B$."".430.
.....#1,A$,B$:F$."".....SZ.F(A$.Z$).F(B$
.Z$).256......#1,A$:.64.ST.430.&....A$..
Q$.250.G....#1,A$:.A$..Q$.F$.F$.A$:.270.
_....#1,A$:.A$.." ".280.V."..#1,T$:.T$."
".290...,..#1,A$:.A$.."".300...6..SZ.0.
(T$.."P".T$.."S").220.O.@..SZ;.5);T$;" "
;Q$;F$;Q$;.26);...J..AD.SZ.256.53247..".
.TOO LARGE.":.220...T.."_ .C:R:B:A?.....
....";.).^..A$:.A$."".350.K.H..A$."R".."
.REJECT FILE.":.220.L.R..A$."B"..".BEGIN
COPY.":.430...|..A$."A"..".ABORT COPY."
:.870......A$.."C".350.H...N.N.1:F$(N).F
$.",".T$:.".COPY FILE. ".....AD.AD.SZ.25
6:.N.MX.220......". .MAXIMUM OF";MX;"FIL
ES."..... 1:."............";N;"FILES TO
READ.".E...AD.PG.256:.N.0.900.P.B..I.1.N
.K.L.." ";Q$;F$(I);Q$;.20);.|.V.SZ..(AD.
256)......251,AD.SZ.256:.252,SZ......1,D
D,2,"0:".F$(I):.940.K....E.74. 1:N.I.1:.
580......E. 1:F$(I)."":.570......831:.94
0: 1:.E.74.N.I.1:.580......E.F$(I)."":.5
70.G....B(252).208.F$(I)."":.".TOO LARGE
.":.570.P.&.F(I).AD:AD.B(251).B(252).256
:T(I).AD...0..I(" ".D(T(I).F(I)),5);"
BYTES OF MEM"...:..I...D..N.0.900...N.."
.PLEASE INSERT THE .DESTINATION. DISKETT
E":."INTO DISK DRIVE."...S. 15...T..".CO
PY TO WHICH DRIVE ";DD$.C.U.DD.E(DD$):.D
D.8.DD.15..".":.590.R.X..".........FORMA
T. THIS DISKETTE N...";A$...B..:.15,DD,
15...L..A$.."Y".660...V.." DISK NAME,ID"
;F$,T$.F....15,"N0:".F$.",".T$.X....:.94
0:.E.580......I.1.N......F$(I)."".840...
..." ";Q$;F$(I);Q$;.20);.'....1,DD,2,F$(
I).",W".9....940:.E.0.770.J.F. 1:.E.63.7
30.G.P.. CLOSE1:IFE<>63GOTO840...Z..:."
...... .REPLACE. EXISTING FILE .? N...";
A$. ..........A$.."Y".840.J....15,"S0:".
F$(I):.680.....SZ..(F(I).256)......251,F
(I).SZ.256:.252,SZ.....SZ..(T(I).256).*.
..253,T(I).SZ.256:.254,SZ.J.*..828:.940
: 1:.E.72.E.74.850.U.4..E.840...>..I("
".D(T(I).F(I)),5);" BYTES OF MEM"...H..
I...R.."...... SAVE SAME PROGRAMS AGAIN?
N...";A$.I.\..A$."Y".580.T.F. 15: 1...P
.."....... MORE PROGRAMS TO COPY? Y...";
A$...Z..A$."Y". 15: 1:.80.2.....14)".EN
D OF COPY".Y.....7)"..PLEASE REMOVE THE
DISKETTE".Y.....11)"FROM THE DISK DRIVE.
"......G(9);:.......15,E,E$,E1,E2......E
.0...T...EE$.J(D(E),2):E1$.J(D(E1),2):E2
$.J(D(E2),2)...J..E.63.....T..:.".......
.....";EE$;",";E$;",";E1$;",";E2$.3....
76,96,3,162,1,32,198,255,32.S.... 228,25
5,160,0,145,251,230.S.... 251,208,8,230,
252,165,252...... 201,208,240,6,165,144,
41,64...... 240,231,76,204,255,162,1,32.
X.... 201,255,162,54,134,1,160,0...... 1
77,251,32,210,255,230,251...$.. 208,2,23
0,252,165,251,197,253.?.... 208,239,165,
252,197,254,208.A.8.. 233,162,55,134,1,7
6,204,255...
> CLICK IMAGE PREVIEW FOR FULL MODAL