MULTIPLE COPIER
FILE INFORMATION
FILENAME(S): MULTIPLE COPIER
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 21:23:29
APPEARS ON: 1 disk(s)
FILE HASH
e3196049ccedf20677de066ac132326a5e808c8cd7f70133c3a6e5e4c76d8d10
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 20 2 | MULTIPLE COPIER | PRG | DuncanTwain | 8 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 64 00 97 35 35 2C 30 3A 97 35 36 2C |....d..55,0:.56,|
00000010: 32 35 00 2B 08 6E 00 50 47 B2 32 35 3A 4D 58 B2 |25.+.n.PG.25:MX.|
00000020: C2 28 35 36 29 3A 52 4F 42 B2 30 00 40 08 78 00 |.(56):ROB.0.@.x.|
00000030: 5A 24 B2 C7 28 30 29 3A 51 24 B2 C7 28 33 34 29 |Z$..(0):Q$..(34)|
00000040: 00 58 08 82 00 97 35 33 32 38 30 2C 32 35 31 3A |.X....53280,251:|
00000050: 97 35 33 32 38 31 2C 30 00 76 08 96 00 86 46 24 |.53281,0.v....F$|
00000060: 28 4D 58 29 2C 46 28 4D 58 29 2C 54 28 4D 58 29 |(MX),F(MX),T(MX)|
00000070: 2C 4C 28 52 45 29 00 8F 08 A0 00 81 49 B2 38 32 |,L(RE)......I.82|
00000080: 38 A4 39 30 34 3A 87 41 3A 97 49 2C 41 3A 82 00 |8.904:.A:.I,A:..|
00000090: B4 08 AF 00 99 22 93 20 20 20 20 20 20 20 20 20 |.....". |
000000A0: 20 20 20 05 4D 55 4C 54 49 50 4C 45 20 43 4F 50 | .MULTIPLE COP|
000000B0: 49 45 52 22 00 D7 08 B4 00 99 22 11 20 20 20 20 |IER"......". |
000000C0: 20 20 20 20 20 20 20 9A 20 42 59 20 52 4F 42 45 | . BY ROBE|
000000D0: 52 54 20 43 48 41 4E 00 F6 08 C0 00 99 22 11 11 |RT CHAN......"..|
000000E0: 11 11 9B 50 55 54 20 49 4E 20 53 4F 55 52 43 45 |...PUT IN SOURCE|
000000F0: 20 44 49 53 4B 22 00 11 09 C3 00 99 22 11 54 4F | DISK"......".TO|
00000100: 20 43 41 54 41 4C 4F 47 20 55 53 45 20 20 20 2A | CATALOG USE *|
00000110: 22 00 21 09 C5 00 81 41 B2 31 A4 32 30 30 30 3A |".!....A.1.2000:|
00000120: 82 00 4A 09 C6 00 99 22 93 11 11 20 50 52 45 53 |..J...."... PRES|
00000130: 53 20 27 1E 5F 9B 27 20 54 4F 20 43 4F 50 59 20 |S '._.' TO COPY |
00000140: 41 4C 4C 20 46 49 4C 45 53 22 00 61 09 C8 00 8B |ALL FILES".a....|
00000150: 52 4F 42 B2 31 A7 8D 34 30 30 30 3A 89 36 30 30 |ROB.1..4000:.600|
00000160: 30 00 87 09 C9 00 85 22 11 20 46 49 4C 45 4E 41 |0......". FILENA|
00000170: 4D 45 53 20 54 4F 20 43 4F 50 59 20 92 3F 20 2A |MES TO COPY .? *|
00000180: 9D 9D 9D 22 3B 46 24 00 B7 09 CD 00 8B C3 28 46 |...";F$.......(F|
00000190: 24 29 B1 31 36 A7 99 22 46 49 54 4C 45 20 54 4F |$).16.."FITLE TO|
000001A0: 20 4C 4F 4E 47 22 3A 81 41 B2 31 A4 31 30 30 30 | LONG":.A.1.1000|
000001B0: 3A 82 3A 89 32 30 30 00 D2 09 D2 00 8B 46 24 B2 |:.:.200......F$.|
000001C0: 22 5F 22 A7 51 41 24 B2 22 43 22 3A 46 24 B2 22 |"_".QA$."C":F$."|
000001D0: 2A 22 00 F4 09 DC 00 A0 31 35 3A 9F 31 35 2C 38 |*"......15:.15,8|
000001E0: 2C 31 35 2C 22 49 30 22 3A 8D 38 38 30 3A 8B 45 |,15,"I0":.880:.E|
000001F0: 89 38 37 30 00 10 0A E6 00 A0 31 3A 9F 31 2C 38 |.870......1:.1,8|
00000200: 2C 30 2C 22 24 30 3A 22 AA 46 24 3A 8D 38 38 30 |,0,"$0:".F$:.880|
00000210: 00 3F 0A F0 00 8B 45 A7 99 22 11 12 20 49 4D 50 |.?....E..".. IMP|
00000220: 4F 53 53 49 42 4C 45 20 54 4F 20 52 45 41 44 20 |OSSIBLE TO READ |
00000230: 44 49 52 45 43 54 4F 52 59 22 3A 89 38 37 30 00 |DIRECTORY":.870.|
00000240: 4E 0A F1 00 8B 52 4F 42 B2 31 A7 32 35 30 00 65 |N....ROB.1.250.e|
00000250: 0A F2 00 99 22 11 20 43 2D 43 4F 50 59 2C 20 4E |....". C-COPY, N|
00000260: 2D 4E 4F 54 22 00 80 0A F5 00 99 22 11 20 51 2D |-NOT"......". Q-|
00000270: 51 55 49 54 2C 20 42 2D 42 45 47 49 4E 2E 11 22 |QUIT, B-BEGIN.."|
00000280: 00 9C 0A FA 00 A1 23 31 2C 41 24 2C 42 24 3A 4E |......#1,A$,B$:N|
00000290: B2 30 3A 41 44 B2 50 47 AC 32 35 36 00 B5 0A 04 |.0:AD.PG.256....|
000002A0: 01 A1 23 31 2C 41 24 2C 42 24 3A 8B 42 24 B2 22 |..#1,A$,B$:.B$."|
000002B0: 22 89 34 35 34 00 C9 0A 0E 01 A1 23 31 2C 41 24 |".454......#1,A$|
000002C0: 2C 42 24 3A 46 24 B2 22 22 00 E6 0A 18 01 53 5A |,B$:F$."".....SZ|
000002D0: B2 C6 28 41 24 AA 5A 24 29 AA C6 28 42 24 AA 5A |..(A$.Z$)..(B$.Z|
000002E0: 24 29 AC 32 35 36 00 FC 0A 22 01 A1 23 31 2C 41 |$).256..."..#1,A|
000002F0: 24 3A 8B 36 34 AF 53 54 89 34 35 34 00 0C 0B 2C |$:.64.ST.454...,|
00000300: 01 8B 41 24 B3 B1 51 24 89 32 39 30 00 2D 0B 36 |..A$..Q$.290.-.6|
00000310: 01 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 51 24 A7 |..#1,A$:.A$..Q$.|
00000320: 46 24 B2 46 24 AA 41 24 3A 89 33 31 30 00 45 0B |F$.F$.A$:.310.E.|
00000330: 40 01 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 20 |@..#1,A$:.A$.." |
00000340: 22 89 33 32 30 00 5C 0B 4A 01 A1 23 31 2C 54 24 |".320.\.J..#1,T$|
00000350: 3A 8B 54 24 B2 22 20 22 89 33 33 30 00 73 0B 54 |:.T$." ".330.s.T|
00000360: 01 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 22 89 |..#1,A$:.A$.."".|
00000370: 33 34 30 00 93 0B 5E 01 8B 53 5A B2 30 B0 28 54 |340...^..SZ.0.(T|
00000380: 24 B3 B1 22 50 22 AF 54 24 B3 B1 22 53 22 29 89 |$.."P".T$.."S").|
00000390: 32 36 30 00 B5 0B 68 01 99 53 5A 3B A3 35 29 3B |260...h..SZ;.5);|
000003A0: 54 24 3B 22 20 22 3B 51 24 3B 46 24 3B 51 24 3B |T$;" ";Q$;F$;Q$;|
000003B0: A3 32 36 29 3B 00 F9 0B 72 01 8B 41 44 AA 53 5A |.26);...r..AD.SZ|
000003C0: AC 32 35 36 B1 35 33 32 34 37 A7 99 22 12 54 4F |.256.53247..".TO|
000003D0: 4F 20 42 49 47 22 3A 8B 51 41 24 B2 22 43 22 A7 |O BIG":.QA$."C".|
000003E0: 52 4F 42 B2 31 3A 50 50 24 B2 46 24 3A 8B 51 41 |ROB.1:PP$.F$:.QA|
000003F0: 24 B2 22 43 22 A7 34 36 30 00 12 0C 77 01 8B 41 |$."C".460...w..A|
00000400: 44 AA 53 5A AC 32 35 36 B1 35 33 32 34 37 A7 32 |D.SZ.256.53247.2|
00000410: 36 30 00 2A 0C 7C 01 99 22 43 2F 4E 2F 42 2F 51 |60.*.|.."C/N/B/Q|
00000420: 3F 92 9D 9D 9D 9D 9D 9D 22 3B 00 42 0C 85 01 8B |?.......";.B....|
00000430: 52 4F 42 B2 32 A7 51 41 24 B2 22 43 22 3A 89 33 |ROB.2.QA$."C":.3|
00000440: 39 35 00 53 0C 86 01 8B 52 4F 42 B2 31 A7 8D 37 |95.S....ROB.1..7|
00000450: 30 30 30 00 5B 0C 87 01 A1 41 24 00 74 0C 88 01 |000.[....A$.t...|
00000460: 8B 51 41 24 B2 22 4E 22 A7 41 24 B2 22 4E 22 3A |.QA$."N".A$."N":|
00000470: 89 34 30 30 00 8D 0C 8B 01 8B 51 41 24 B2 22 43 |.400......QA$."C|
00000480: 22 A7 41 24 B2 22 43 22 3A 89 34 33 30 00 9C 0C |".A$."C":.430...|
00000490: 8C 01 8B 41 24 B2 22 22 A7 33 39 30 00 BD 0C 90 |...A$."".390....|
000004A0: 01 8B 41 24 B2 22 4E 22 A7 99 22 9D 9D 20 20 12 |..A$."N"..".. .|
000004B0: 4E 4F 92 20 20 20 20 22 3A 89 32 36 30 00 E0 0C |NO. ":.260...|
000004C0: 93 01 8B 41 24 B2 22 42 22 A7 99 22 9D 9D 20 20 |...A$."B"..".. |
000004D0: 12 42 45 47 49 4E 92 20 20 20 22 3A 89 34 35 34 |.BEGIN. ":.454|
000004E0: 00 02 0D 9A 01 8B 41 24 B2 22 51 22 A7 99 22 9D |......A$."Q"..".|
000004F0: 9D 20 20 12 51 55 49 54 92 20 20 20 22 3A 89 38 |. .QUIT. ":.8|
00000500: 36 34 00 13 0D A4 01 8B 41 24 B3 B1 22 43 22 89 |64......A$.."C".|
00000510: 33 39 30 00 3F 0D AE 01 4E B2 4E AA 31 3A 46 24 |390.?...N.N.1:F$|
00000520: 28 4E 29 B2 46 24 AA 22 2C 22 AA 54 24 3A 99 22 |(N).F$.",".T$:."|
00000530: 9D 9D 20 20 12 43 4F 50 59 92 20 20 20 20 22 00 |.. .COPY. ".|
00000540: 5A 0D B8 01 41 44 B2 41 44 AA 53 5A AC 32 35 36 |Z...AD.AD.SZ.256|
00000550: 3A 8B 4E B3 4D 58 89 32 36 30 00 7B 0D C2 01 99 |:.N.MX.260.{....|
00000560: 22 11 20 12 4D 41 58 49 4D 55 4D 20 4F 46 22 3B |". .MAXIMUM OF";|
00000570: 4D 58 3B 22 46 49 4C 45 53 2E 22 00 89 0D C6 01 |MX;"FILES.".....|
00000580: 8B 4E B3 31 A7 31 36 30 30 00 97 0D C7 01 8B 4E |.N.1.1600......N|
00000590: B2 31 A7 20 34 36 31 00 BD 0D CC 01 A0 31 3A 99 |.1. 461......1:.|
000005A0: 22 11 4E 4F 57 20 4C 4F 41 44 49 4E 47 22 3B 4E |".NOW LOADING";N|
000005B0: 3B 22 46 49 4C 45 53 22 3A 89 34 37 30 00 DB 0D |;"FILES":.470...|
000005C0: CD 01 A0 31 3A 99 22 11 4E 4F 57 20 4C 4F 41 44 |...1:.".NOW LOAD|
000005D0: 49 4E 47 20 31 20 46 49 4C 45 22 00 F3 0D D6 01 |ING 1 FILE".....|
000005E0: 41 44 B2 50 47 AC 32 35 36 3A 8B 4E B2 30 89 31 |AD.PG.256:.N.0.1|
000005F0: 36 30 30 00 FE 0D E0 01 81 49 B2 31 A4 4E 00 19 |600......I.1.N..|
00000600: 0E EA 01 99 22 20 22 3B 51 24 3B 46 24 28 49 29 |...." ";Q$;F$(I)|
00000610: 3B 51 24 3B A3 32 30 29 3B 00 2A 0E F4 01 53 5A |;Q$;.20);.*...SZ|
00000620: B2 B5 28 41 44 AD 32 35 36 29 00 45 0E FE 01 97 |..(AD.256).E....|
00000630: 32 35 31 2C 41 44 AB 53 5A AC 32 35 36 3A 97 32 |251,AD.SZ.256:.2|
00000640: 35 32 2C 53 5A 00 60 0E 08 02 9F 31 2C 38 2C 32 |52,SZ.`....1,8,2|
00000650: 2C 22 30 3A 22 AA 46 24 28 49 29 3A 8D 38 38 30 |,"0:".F$(I):.880|
00000660: 00 78 0E 12 02 8B 45 B2 37 34 A7 A0 31 3A 4E B2 |.x....E.74..1:N.|
00000670: 49 AB 31 3A 89 36 31 30 00 90 0E 1C 02 8B 45 A7 |I.1:.610......E.|
00000680: A0 31 3A 46 24 28 49 29 B2 22 22 3A 89 36 30 30 |.1:F$(I)."":.600|
00000690: 00 B2 0E 26 02 9E 38 33 31 3A 8D 38 38 30 3A A0 |...&..831:.880:.|
000006A0: 31 3A 8B 45 B2 37 34 A7 4E B2 49 AB 31 3A 89 36 |1:.E.74.N.I.1:.6|
000006B0: 31 30 00 C7 0E 30 02 8B 45 A7 46 24 28 49 29 B2 |10...0..E.F$(I).|
000006C0: 22 22 3A 89 36 30 30 00 F1 0E 3A 02 8B C2 28 32 |"":.600...:...(2|
000006D0: 35 32 29 B2 32 30 38 A7 46 24 28 49 29 B2 22 22 |52).208.F$(I).""|
000006E0: 3A 99 22 12 54 4F 4F 20 42 49 47 22 3A 89 36 30 |:.".TOO BIG":.60|
000006F0: 30 00 1A 0F 44 02 46 28 49 29 B2 41 44 3A 41 44 |0...D.F(I).AD:AD|
00000700: B2 C2 28 32 35 31 29 AA C2 28 32 35 32 29 AC 32 |..(251)..(252).2|
00000710: 35 36 3A 54 28 49 29 B2 41 44 00 40 0F 4E 02 99 |56:T(I).AD.@.N..|
00000720: C9 28 22 20 20 20 22 AA C4 28 54 28 49 29 AB 46 |.(" "..(T(I).F|
00000730: 28 49 29 29 2C 35 29 3B 22 20 42 59 54 45 53 22 |(I)),5);" BYTES"|
00000740: 00 47 0F 58 02 82 49 00 55 0F 62 02 8B 4E B2 30 |.G.X..I.U.b..N.0|
00000750: 89 31 36 30 30 00 77 0F 6C 02 99 22 11 20 12 50 |.1600.w.l..". .P|
00000760: 55 54 20 49 4E 20 44 45 53 54 49 4E 41 54 49 4F |UT IN DESTINATIO|
00000770: 4E 20 44 49 53 4B 22 00 94 0F 76 02 85 22 20 46 |N DISK"...v.." F|
00000780: 4F 52 4D 41 54 20 44 49 53 4B 3F 20 4E 9D 9D 9D |ORMAT DISK? N...|
00000790: 22 3B 41 24 00 A5 0F 80 02 8B 41 24 B3 B1 22 59 |";A$......A$.."Y|
000007A0: 22 89 36 38 30 00 BE 0F 8A 02 85 22 20 44 49 53 |".680......" DIS|
000007B0: 4B 20 4E 41 4D 45 2C 22 3B 46 24 2C 54 24 00 D6 |K NAME,";F$,T$..|
000007C0: 0F 94 02 98 31 35 2C 22 4E 30 3A 22 AA 46 24 AA |....15,"N0:".F$.|
000007D0: 22 2C 22 AA 54 24 00 E8 0F 9E 02 99 3A 8D 38 38 |",".T$......:.88|
000007E0: 30 3A 8B 45 89 36 31 30 00 F3 0F A8 02 81 49 B2 |0:.E.610......I.|
000007F0: 31 A4 4E 00 05 10 B2 02 8B 46 24 28 49 29 B2 22 |1.N......F$(I)."|
00000800: 22 89 38 34 30 00 20 10 BC 02 99 22 20 22 3B 51 |".840. ...." ";Q|
00000810: 24 3B 46 24 28 49 29 3B 51 24 3B A3 32 30 29 3B |$;F$(I);Q$;.20);|
00000820: 00 36 10 C6 02 9F 31 2C 38 2C 32 2C 46 24 28 49 |.6....1,8,2,F$(I|
00000830: 29 AA 22 2C 57 22 00 48 10 D0 02 8D 38 38 30 3A |).",W".H....880:|
00000840: 8B 45 B2 30 89 37 37 30 00 5A 10 DA 02 A0 31 3A |.E.0.770.Z....1:|
00000850: 8B 45 B3 B1 36 33 89 38 34 30 00 74 10 E4 02 85 |.E..63.840.t....|
00000860: 22 20 12 52 45 43 4F 50 59 92 3F 20 59 9D 9D 9D |" .RECOPY.? Y...|
00000870: 22 3B 41 24 00 85 10 EE 02 8B 41 24 B3 B1 22 59 |";A$......A$.."Y|
00000880: 22 89 38 34 30 00 9E 10 F8 02 98 31 35 2C 22 53 |".840......15,"S|
00000890: 30 3A 22 AA 46 24 28 49 29 3A 89 37 30 30 00 B1 |0:".F$(I):.700..|
000008A0: 10 02 03 53 5A B2 B5 28 46 28 49 29 AD 32 35 36 |...SZ..(F(I).256|
000008B0: 29 00 CE 10 0C 03 97 32 35 31 2C 46 28 49 29 AB |)......251,F(I).|
000008C0: 53 5A AC 32 35 36 3A 97 32 35 32 2C 53 5A 00 E1 |SZ.256:.252,SZ..|
000008D0: 10 16 03 53 5A B2 B5 28 54 28 49 29 AD 32 35 36 |...SZ..(T(I).256|
000008E0: 29 00 FE 10 20 03 97 32 35 33 2C 54 28 49 29 AB |)... ..253,T(I).|
000008F0: 53 5A AC 32 35 36 3A 97 32 35 34 2C 53 5A 00 1E |SZ.256:.254,SZ..|
00000900: 11 2A 03 9E 38 32 38 3A 8D 38 38 30 3A A0 31 3A |.*..828:.880:.1:|
00000910: 8B 45 B2 37 32 B0 45 B2 37 34 89 38 35 30 00 29 |.E.72.E.74.850.)|
00000920: 11 34 03 8B 45 89 38 34 30 00 4F 11 3E 03 99 C9 |.4..E.840.O.>...|
00000930: 28 22 20 20 20 22 AA C4 28 54 28 49 29 AB 46 28 |(" "..(T(I).F(|
00000940: 49 29 29 2C 35 29 3B 22 20 42 59 54 45 53 22 00 |I)),5);" BYTES".|
00000950: 56 11 48 03 82 49 00 85 11 52 03 85 22 11 20 12 |V.H..I...R..". .|
00000960: 52 45 43 4F 50 59 20 53 41 4D 45 20 50 52 4F 47 |RECOPY SAME PROG|
00000970: 52 41 4D 53 20 41 47 41 49 4E 92 3F 20 4E 9D 9D |RAMS AGAIN.? N..|
00000980: 9D 22 3B 41 24 00 95 11 5C 03 8B 41 24 B2 22 59 |.";A$...\..A$."Y|
00000990: 22 89 36 31 30 00 AE 11 5D 03 8B 52 4F 42 B2 31 |".610...]..ROB.1|
000009A0: A7 99 22 11 20 22 50 50 24 3A 89 32 30 30 00 B6 |..". "PP$:.200..|
000009B0: 11 5E 03 A0 31 35 00 E2 11 60 03 85 22 11 20 41 |.^..15...`..". A|
000009C0: 4E 59 20 4D 4F 52 45 20 50 52 4F 47 52 41 4D 53 |NY MORE PROGRAMS|
000009D0: 20 54 4F 20 43 4F 50 59 3F 20 59 9D 9D 9D 22 3B | TO COPY? Y...";|
000009E0: 41 24 00 F9 11 62 03 8B 41 24 B2 22 59 22 A7 52 |A$...b..A$."Y".R|
000009F0: 4F 42 B2 30 3A A0 31 3A 8A 00 09 12 63 03 8B 41 |OB.0:.1:....c..A|
00000A00: 24 B2 22 4E 22 A7 38 37 30 00 26 12 66 03 99 22 |$."N".870.&.f.."|
00000A10: 11 20 12 43 4F 50 59 49 4E 47 20 46 49 4E 49 53 |. .COPYING FINIS|
00000A20: 48 45 44 22 3A 80 00 39 12 70 03 84 31 35 2C 45 |HED":..9.p..15,E|
00000A30: 2C 45 24 2C 45 31 2C 45 32 00 44 12 7A 03 8B 45 |,E$,E1,E2.D.z..E|
00000A40: B2 30 A7 8E 00 60 12 84 03 99 22 12 22 3B CA 28 |.0...`....".";.(|
00000A50: C4 28 45 29 2C 32 29 3B 22 2C 22 3B 45 24 3A 8E |.(E),2);",";E$:.|
00000A60: 00 81 12 8E 03 83 37 36 2C 39 36 2C 33 2C 31 36 |......76,96,3,16|
00000A70: 32 2C 31 2C 33 32 2C 31 39 38 2C 32 35 35 2C 33 |2,1,32,198,255,3|
00000A80: 32 00 A0 12 98 03 83 32 32 38 2C 32 35 35 2C 31 |2......228,255,1|
00000A90: 36 30 2C 30 2C 31 34 35 2C 32 35 31 2C 32 33 30 |60,0,145,251,230|
00000AA0: 00 BF 12 A2 03 83 32 35 31 2C 32 30 38 2C 38 2C |......251,208,8,|
00000AB0: 32 33 30 2C 32 35 32 2C 31 36 35 2C 32 35 32 00 |230,252,165,252.|
00000AC0: E0 12 AC 03 83 32 30 31 2C 32 30 38 2C 32 34 30 |.....201,208,240|
00000AD0: 2C 36 2C 31 36 35 2C 31 34 34 2C 34 31 2C 36 34 |,6,165,144,41,64|
00000AE0: 00 01 13 B6 03 83 32 34 30 2C 32 33 31 2C 37 36 |......240,231,76|
00000AF0: 2C 32 30 34 2C 32 35 35 2C 31 36 32 2C 31 2C 33 |,204,255,162,1,3|
00000B00: 32 00 21 13 C0 03 83 32 30 31 2C 32 35 35 2C 31 |2.!....201,255,1|
00000B10: 36 32 2C 35 34 2C 31 33 34 2C 31 2C 31 36 30 2C |62,54,134,1,160,|
00000B20: 30 00 41 13 CA 03 83 31 37 37 2C 32 35 31 2C 33 |0.A....177,251,3|
00000B30: 32 2C 32 31 30 2C 32 35 35 2C 32 33 30 2C 32 35 |2,210,255,230,25|
00000B40: 31 00 64 13 D4 03 83 32 30 38 2C 32 2C 32 33 30 |1.d....208,2,230|
00000B50: 2C 32 35 32 2C 31 36 35 2C 32 35 31 2C 31 39 37 |,252,165,251,197|
00000B60: 2C 32 35 33 00 85 13 DE 03 83 32 30 38 2C 32 33 |,253......208,23|
00000B70: 39 2C 31 36 35 2C 32 35 32 2C 31 39 37 2C 32 35 |9,165,252,197,25|
00000B80: 34 2C 32 30 38 00 A6 13 E8 03 83 32 33 33 2C 31 |4,208......233,1|
00000B90: 36 32 2C 35 35 2C 31 33 34 2C 31 2C 37 36 2C 32 |62,55,134,1,76,2|
00000BA0: 30 34 2C 32 35 35 00 C7 13 40 06 99 22 4E 4F 20 |04,255...@.."NO |
00000BB0: 50 52 4F 47 52 41 4D 53 20 54 4F 20 4C 4F 41 44 |PROGRAMS TO LOAD|
00000BC0: 11 22 3A 89 38 36 34 00 E9 13 A0 0F 99 22 11 20 |.":.864......". |
00000BD0: 50 55 54 20 53 4F 55 52 43 45 20 44 49 53 4B 20 |PUT SOURCE DISK |
00000BE0: 49 4E 20 44 52 49 56 45 22 00 07 14 EC 13 99 22 |IN DRIVE"......"|
00000BF0: 20 20 20 20 20 41 4E 44 20 1E 50 52 45 53 53 9B | AND .PRESS.|
00000C00: 20 52 45 54 55 52 4E 00 21 14 50 14 A1 51 51 24 | RETURN.!.P..QQ$|
00000C10: 3A 8B 51 51 24 B3 B1 C7 28 31 33 29 A7 35 32 30 |:.QQ$...(13).520|
00000C20: 30 00 27 14 B4 14 8E 00 3F 14 70 17 51 41 24 B2 |0.'.....?.p.QA$.|
00000C30: 22 4E 22 3A 46 24 B2 22 2A 22 3A 89 32 32 30 00 |"N":F$."*":.220.|
00000C40: 59 14 58 1B 8B 50 50 24 B2 46 24 A7 51 41 24 B2 |Y.X..PP$.F$.QA$.|
00000C50: 22 43 22 3A 52 4F 42 B2 32 00 6E 14 BC 1B 8B 50 |"C":ROB.2.n....P|
00000C60: 50 24 B3 B1 46 24 A7 51 41 24 B2 22 4E 22 00 74 |P$..F$.QA$."N".t|
00000C70: 14 84 1C 8E 00 00 00 |....... |
....D..55,0:.56,25.+.N.PG.25:MX.B(56):RO
B.0.@.X.Z$.G(0):Q$.G(34).X....53280,251:
.53281,0.V....F$(MX),F(MX),T(MX),L(RE)..
. ..I.828.904:.A:.I,A:.......".
.MULTIPLE COPIER".W....". .
BY ROBERT CHAN......".....PUT IN SOURCE
DISK"...C..".TO CATALOG USE *".!.E..A
.1.2000:..J.F.."... PRESS '._.' TO COPY
ALL FILES".A.H..ROB.1..4000:.6000...I.."
. FILENAMES TO COPY .? *...";F$...M..C(F
$).16.."FITLE TO LONG":.A.1.1000:.:.200.
R.R..F$."_".QA$."C":F$."*"..... 15:.15,8
,15,"I0":.880:.E.870..... 1:.1,8,0,"$0:"
.F$:.880.?....E..".. IMPOSSIBLE TO READ
DIRECTORY":.870.N....ROB.1.250.E....". C
-COPY, N-NOT"......". Q-QUIT, B-BEGIN.."
......#1,A$,B$:N.0:AD.PG.256......#1,A$,
B$:.B$."".454.I....#1,A$,B$:F$."".....SZ
.F(A$.Z$).F(B$.Z$).256..."..#1,A$:.64.ST
.454...,..A$..Q$.290.-.6..#1,A$:.A$..Q$.
F$.F$.A$:.310.E.@..#1,A$:.A$.." ".320.\.
J..#1,T$:.T$." ".330.S.T..#1,A$:.A$.."".
340...^..SZ.0.(T$.."P".T$.."S").260...H.
.SZ;.5);T$;" ";Q$;F$;Q$;.26);...R..AD.SZ
.256.53247..".TOO BIG":.QA$."C".ROB.1:PP
$.F$:.QA$."C".460...W..AD.SZ.256.53247.2
60.*.|.."C/N/B/Q?.......";.B....ROB.2.QA
$."C":.395.S....ROB.1..7000.[....A$.T...
.QA$."N".A$."N":.400......QA$."C".A$."C"
:.430......A$."".390......A$."N"..".. .
NO. ":.260......A$."B"..".. .BEGIN.
":.454......A$."Q"..".. .QUIT. ":.8
64......A$.."C".390.?...N.N.1:F$(N).F$."
,".T$:.".. .COPY. ".Z...AD.AD.SZ.256
:.N.MX.260.{.B..". .MAXIMUM OF";MX;"FILE
S."...F..N.1.1600...G..N.1. 461...L. 1:.
".NOW LOADING";N;"FILES":.470...M. 1:.".
NOW LOADING 1 FILE"...V.AD.PG.256:.N.0.1
600......I.1.N......" ";Q$;F$(I);Q$;.20)
;.*...SZ..(AD.256).E....251,AD.SZ.256:.2
52,SZ.`....1,8,2,"0:".F$(I):.880.X....E.
74. 1:N.I.1:.610......E. 1:F$(I)."":.600
...&..831:.880: 1:.E.74.N.I.1:.610.G.0..
E.F$(I)."":.600...:..B(252).208.F$(I).""
:.".TOO BIG":.600...D.F(I).AD:AD.B(251).
B(252).256:T(I).AD.@.N..I(" ".D(T(I).F
(I)),5);" BYTES".G.X..I.U.B..N.0.1600.W.
L..". .PUT IN DESTINATION DISK"...V.." F
ORMAT DISK? N...";A$......A$.."Y".680...
..." DISK NAME,";F$,T$.V....15,"N0:".F$.
",".T$......:.880:.E.610......I.1.N.....
.F$(I)."".840. ...." ";Q$;F$(I);Q$;.20);
.6.F..1,8,2,F$(I).",W".H.P..880:.E.0.770
.Z.Z. 1:.E..63.840.T...." .RECOPY.? Y...
";A$......A$.."Y".840......15,"S0:".F$(I
):.700.....SZ..(F(I).256).N....251,F(I).
SZ.256:.252,SZ.....SZ..(T(I).256)... ..2
53,T(I).SZ.256:.254,SZ...*..828:.880: 1:
.E.72.E.74.850.).4..E.840.O.>..I(" ".D
(T(I).F(I)),5);" BYTES".V.H..I...R..". .
RECOPY SAME PROGRAMS AGAIN.? N...";A$...
\..A$."Y".610...]..ROB.1..". "PP$:.200..
.^. 15...`..". ANY MORE PROGRAMS TO COPY
? Y...";A$...B..A$."Y".ROB.0: 1:....C..A
$."N".870.&.F..". .COPYING FINISHED":..9
.P..15,E,E$,E1,E2.D.Z..E.0...`....".";J(
D(E),2);",";E$:.......76,96,3,162,1,32,1
98,255,32. ....228,255,160,0,145,251,230
......251,208,8,230,252,165,252......201
,208,240,6,165,144,41,64......240,231,76
,204,255,162,1,32.!....201,255,162,54,13
4,1,160,0.A.J..177,251,32,210,255,230,25
1.D.T..208,2,230,252,165,251,197,253....
..208,239,165,252,197,254,208......233,1
62,55,134,1,76,204,255.G.@.."NO PROGRAMS
TO LOAD.":.864... ..". PUT SOURCE DISK
IN DRIVE"......" AND .PRESS. RETURN.
!.P..QQ$:.QQ$..G(13).5200.'.....?.P.QA$.
"N":F$."*":.220.Y.X..PP$.F$.QA$."C":ROB.
2.N....PP$..F$.QA$."N".T.......
> CLICK IMAGE PREVIEW FOR FULL MODAL