MCOPY
FILE INFORMATION
FILENAME(S): MCOPY
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 19:36:54
APPEARS ON: 1 disk(s)
FILE HASH
8f90988c70e57a7d83fb981c28146a87dea0e1a707b17165e64200e3f4c5d527
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C 64 UTILITIES 2 | MCOPY | PRG | Curtcool, Bo | 13 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 14 00 8F 20 43 2D 36 34 20 51 55 49 |....... C-64 QUI| 00000010: 43 4B 20 43 4F 50 59 20 50 52 4F 47 52 41 4D 00 |CK COPY PROGRAM.| 00000020: 3F 08 1E 00 8F 20 43 4F 4D 4D 41 4E 44 45 52 20 |?.... COMMANDER | 00000030: 31 32 2D 38 33 20 20 20 50 50 35 34 2D 36 30 00 |12-83 PP54-60.| 00000040: 8B 08 28 00 8F 20 4C 4F 41 44 53 20 22 4D 4C 20 |..(.. LOADS "ML | 00000050: 44 41 54 41 22 20 46 52 4F 4D 20 53 41 4D 45 20 |DATA" FROM SAME | 00000060: 41 52 54 49 43 4C 45 35 30 20 50 4F 4B 45 20 35 |ARTICLE50 POKE 5| 00000070: 33 32 38 30 2C 36 3A 50 4F 4B 45 35 33 32 38 31 |3280,6:POKE53281| 00000080: 2C 36 3A 50 52 49 4E 54 22 05 22 00 C8 08 64 00 |,6:PRINT"."...d.| 00000090: 8B 58 B2 30 20 A7 20 58 B2 31 3A 99 22 93 20 20 |.X.0 . X.1:.". | 000000A0: 20 20 20 20 12 4C 4F 41 44 49 4E 47 20 4D 4C 20 | .LOADING ML | 000000B0: 50 52 4F 47 52 41 4D 22 3A 93 22 4D 43 4F 50 59 |PROGRAM":."MCOPY| 000000C0: 2E 4D 4C 22 2C 38 2C 31 00 F0 08 6E 00 99 22 93 |.ML",8,1...n..".| 000000D0: 20 20 20 20 20 20 20 20 20 50 52 4F 47 52 41 4D | PROGRAM| 000000E0: 20 43 4F 50 49 45 52 20 55 54 49 4C 49 54 59 22 | COPIER UTILITY"| 000000F0: 00 18 09 73 00 99 22 11 11 20 20 20 20 20 20 20 |...s..".. | 00000100: 20 43 4F 4D 4D 41 4E 44 45 52 20 20 20 20 20 44 | COMMANDER D| 00000110: 45 43 20 31 39 38 33 22 00 52 09 82 00 9C 3A 54 |EC 1983".R....:T| 00000120: 50 B2 C2 28 35 35 29 AA 32 35 36 AC C2 28 35 36 |P..(55).256..(56| 00000130: 29 3A 42 54 B2 C2 28 34 35 29 AA 32 35 36 AC C2 |):BT..(45).256..| 00000140: 28 34 36 29 AA 32 30 30 30 3A 53 5A B2 54 50 AB |(46).2000:SZ.TP.| 00000150: 42 54 00 7D 09 8C 00 99 22 11 42 55 46 46 45 52 |BT.}....".BUFFER| 00000160: 20 53 49 5A 45 20 22 3B 53 5A 3B 22 2D 22 3B 42 | SIZE ";SZ;"-";B| 00000170: 54 3B 22 20 54 48 52 55 20 22 3B 54 50 00 AB 09 |T;" THRU ";TP...| 00000180: 96 00 8B 20 53 5A B3 32 30 30 30 20 A7 20 99 22 |... SZ.2000 . ."| 00000190: 11 4E 4F 54 20 45 4E 4F 55 47 48 20 42 55 46 46 |.NOT ENOUGH BUFF| 000001A0: 45 52 20 53 50 41 43 45 22 3A 80 00 D2 09 A0 00 |ER SPACE":......| 000001B0: 99 22 11 41 50 50 52 4F 58 49 4D 41 54 45 20 42 |.".APPROXIMATE B| 000001C0: 4C 4F 43 4B 53 3A 20 22 3B B5 28 53 5A AD 32 35 |LOCKS: ";.(SZ.25| 000001D0: 34 29 00 04 0A AA 00 48 49 B2 B5 28 42 54 AD 32 |4).....HI..(BT.2| 000001E0: 35 36 29 3A 4C 4F B2 42 54 AB 32 35 36 AC 48 49 |56):LO.BT.256.HI| 000001F0: 3A 97 34 39 32 31 30 2C 4C 4F 3A 97 34 39 32 31 |:.49210,LO:.4921| 00000200: 31 2C 48 49 00 36 0A AF 00 48 49 B2 B5 28 54 50 |1,HI.6...HI..(TP| 00000210: AD 32 35 36 29 3A 4C 4F B2 54 50 AB 32 35 36 AC |.256):LO.TP.256.| 00000220: 48 49 3A 97 34 39 32 31 32 2C 4C 4F 3A 97 34 39 |HI:.49212,LO:.49| 00000230: 32 31 33 2C 48 49 00 68 0A B4 00 48 49 B2 B5 28 |213,HI.h...HI..(| 00000240: 53 5A AD 32 35 36 29 3A 4C 4F B2 53 5A AB 32 35 |SZ.256):LO.SZ.25| 00000250: 36 AC 48 49 3A 97 34 39 32 31 34 2C 4C 4F 3A 97 |6.HI:.49214,LO:.| 00000260: 34 39 32 31 35 2C 48 49 00 A4 0A B9 00 48 49 B2 |49215,HI.....HI.| 00000270: B5 28 42 54 AD 32 35 36 29 3A 4C 4F B2 42 54 AB |.(BT.256):LO.BT.| 00000280: 32 35 36 AC 48 49 3A 97 35 31 2C 4C 4F 3A 97 35 |256.HI:.51,LO:.5| 00000290: 32 2C 48 49 3A 97 35 35 2C 4C 4F 3A 97 35 36 2C |2,HI:.55,LO:.56,| 000002A0: 48 49 3A 9C 00 E0 0A BE 00 96 20 A5 41 28 58 29 |HI:....... .A(X)| 000002B0: B2 C2 28 58 29 AA 32 35 36 AC C2 28 58 AA 31 29 |..(X).256..(X.1)| 000002C0: 3A 86 20 42 54 28 32 35 29 2C 4E 42 28 32 35 29 |:. BT(25),NB(25)| 000002D0: 2C 4E 49 24 28 32 35 29 2C 50 47 24 28 32 35 29 |,NI$(25),PG$(25)| 000002E0: 00 0E 0B C8 00 99 22 11 11 11 12 49 4E 53 45 52 |......"....INSER| 000002F0: 54 20 53 4F 55 52 43 45 20 44 49 53 4B 20 54 48 |T SOURCE DISK TH| 00000300: 45 4E 20 48 49 54 20 52 45 54 55 52 4E 22 00 24 |EN HIT RETURN".$| 00000310: 0B CD 00 A1 20 58 24 3A 8B 20 58 24 B2 22 22 A7 |.... X$:. X$."".| 00000320: 20 32 30 35 00 57 0B D2 00 46 5A B2 31 3A 42 54 | 205.W...FZ.1:BT| 00000330: 28 31 29 B2 A5 41 28 34 39 32 31 30 29 3A 54 50 |(1)..A(49210):TP| 00000340: B2 A5 41 28 34 39 32 31 32 29 3A 53 5A B2 A5 41 |..A(49212):SZ..A| 00000350: 28 34 39 32 31 34 29 00 96 0B DC 00 97 34 39 32 |(49214)......492| 00000360: 30 31 2C 42 54 28 46 5A 29 AD 32 35 36 3A 97 34 |01,BT(FZ).256:.4| 00000370: 39 32 30 30 2C 42 54 28 46 5A 29 AB 32 35 36 AC |9200,BT(FZ).256.| 00000380: C2 28 34 39 32 30 31 29 3A 97 34 39 32 30 33 2C |.(49201):.49203,| 00000390: 54 50 AD 32 35 36 00 D7 0B E1 00 97 20 34 39 32 |TP.256...... 492| 000003A0: 30 32 2C 54 50 AB 32 35 36 AC C2 28 34 39 32 30 |02,TP.256..(4920| 000003B0: 33 29 3A 97 34 39 32 30 35 2C 53 5A AD 32 35 36 |3):.49205,SZ.256| 000003C0: 3A 97 34 39 32 30 34 2C 53 5A AB 32 35 36 AC C2 |:.49204,SZ.256..| 000003D0: 28 34 39 32 30 35 29 00 06 0C E6 00 4E 49 24 28 |(49205).....NI$(| 000003E0: 46 5A 29 B2 22 22 3A 85 22 11 11 4E 41 4D 45 20 |FZ)."":."..NAME | 000003F0: 4F 46 20 49 4E 50 55 54 20 46 49 4C 45 22 3B 4E |OF INPUT FILE";N| 00000400: 49 24 28 46 5A 29 00 27 0C E9 00 8B 20 4E 49 24 |I$(FZ).'.... NI$| 00000410: 28 46 5A 29 B2 22 22 20 A7 20 46 5A B2 46 5A AB |(FZ)."" . FZ.FZ.| 00000420: 31 3A 89 20 34 30 30 00 59 0C EB 00 8B 20 C3 28 |1:. 400.Y.... .(| 00000430: 4E 49 24 28 46 5A 29 29 B1 31 36 20 A7 20 99 22 |NI$(FZ)).16 . ."| 00000440: 46 49 4C 45 20 4E 41 4D 45 20 54 4F 4F 20 4C 4F |FILE NAME TOO LO| 00000450: 4E 47 22 3A 89 20 32 33 30 00 A0 0C F0 00 43 4C |NG":. 230.....CL| 00000460: 24 B2 C7 28 31 35 37 29 3A 99 22 50 52 4F 47 52 |$..(157):."PROGR| 00000470: 41 4D 2C 20 55 53 45 52 20 4F 52 20 53 45 51 55 |AM, USER OR SEQU| 00000480: 45 4E 54 49 41 4C 20 28 50 2F 55 2F 53 29 20 20 |ENTIAL (P/U/S) | 00000490: 20 50 22 3B 43 4C 24 3B 43 4C 24 3B 43 4C 24 3B | P";CL$;CL$;CL$;| 000004A0: 00 E0 0C F5 00 85 20 50 47 24 28 46 5A 29 3A 8B |...... PG$(FZ):.| 000004B0: 50 47 24 28 46 5A 29 B3 B1 22 50 22 20 AF 20 50 |PG$(FZ).."P" . P| 000004C0: 47 24 28 46 5A 29 B3 B1 22 55 22 20 AF 20 50 47 |G$(FZ).."U" . PG| 000004D0: 24 28 46 5A 29 B3 B1 22 53 22 20 89 20 32 34 35 |$(FZ).."S" . 245| 000004E0: 00 EB 0C F7 00 8D 20 31 30 30 30 00 2E 0D FA 00 |...... 1000.....| 000004F0: 43 49 24 B2 22 30 3A 22 AA 4E 49 24 28 46 5A 29 |CI$."0:".NI$(FZ)| 00000500: AA 22 2C 22 AA 50 47 24 28 46 5A 29 AA 22 2C 52 |.",".PG$(FZ).",R| 00000510: 22 3A 43 49 B2 C3 28 43 49 24 29 3A 97 34 39 31 |":CI..(CI$):.491| 00000520: 35 32 2C 43 49 3A 81 20 49 B2 31 A4 43 49 00 66 |52,CI:. I.1.CI.f| 00000530: 0D FF 00 97 20 34 39 31 35 32 AA 49 2C C6 28 CA |.... 49152.I,.(.| 00000540: 28 43 49 24 2C 49 2C 31 29 29 3A 82 3A 9E 34 39 |(CI$,I,1)):.:.49| 00000550: 34 30 38 3A 8B 20 C2 28 34 39 31 39 38 29 B2 30 |408:. .(49198).0| 00000560: 20 89 20 32 36 35 00 A3 0D 04 01 99 22 11 12 45 | . 265......"..E| 00000570: 52 52 4F 52 20 49 4E 20 46 49 4C 45 20 52 45 41 |RROR IN FILE REA| 00000580: 44 2C 20 52 45 2D 52 55 4E 20 50 52 4F 47 52 41 |D, RE-RUN PROGRA| 00000590: 4D 20 46 52 4F 4D 20 53 54 41 52 54 22 3A 89 20 |M FROM START":. | 000005A0: 35 36 30 00 DC 0D 09 01 4E 42 28 46 5A 29 B2 A5 |560.....NB(FZ)..| 000005B0: 41 28 34 39 32 30 36 29 3A 42 54 28 46 5A AA 31 |A(49206):BT(FZ.1| 000005C0: 29 B2 42 54 28 46 5A 29 AA 4E 42 28 46 5A 29 3A |).BT(FZ).NB(FZ):| 000005D0: 53 5A B2 53 5A AB 4E 42 28 46 5A 29 00 FA 0D 0E |SZ.SZ.NB(FZ)....| 000005E0: 01 99 22 11 42 59 54 45 53 20 43 4F 50 49 45 44 |..".BYTES COPIED| 000005F0: 3A 20 22 3B 4E 42 28 46 5A 29 00 30 0E 13 01 99 |: ";NB(FZ).0....| 00000600: 22 53 50 41 43 45 20 4C 45 46 54 3A 20 22 3B 53 |"SPACE LEFT: ";S| 00000610: 5A 3B 22 20 42 59 54 45 53 20 2D 22 3B B5 28 53 |Z;" BYTES -";.(S| 00000620: 5A AD 32 35 34 29 3B 22 20 42 4C 4F 43 4B 53 22 |Z.254);" BLOCKS"| 00000630: 00 65 0E 15 01 8B 20 46 5A B2 32 34 20 A7 20 99 |.e.... FZ.24 . .| 00000640: 22 11 4D 41 58 49 4D 55 4D 20 32 34 20 46 49 4C |".MAXIMUM 24 FIL| 00000650: 45 20 4C 49 4D 49 54 20 52 45 41 43 48 45 44 22 |E LIMIT REACHED"| 00000660: 3A 89 34 30 30 00 89 0E 18 01 99 22 11 41 4E 4F |:.400......".ANO| 00000670: 54 48 45 52 20 49 4E 50 55 54 20 46 49 4C 45 3F |THER INPUT FILE?| 00000680: 20 28 59 2F 4E 29 20 22 3B 00 AB 0E 1D 01 A1 58 | (Y/N) ";......X| 00000690: 24 3A 8B 20 58 24 B3 B1 22 4E 22 20 AF 20 58 24 |$:. X$.."N" . X$| 000006A0: B3 B1 22 59 22 20 89 20 32 38 35 00 CD 0E 22 01 |.."Y" . 285...".| 000006B0: 99 20 58 24 3A 8B 20 58 24 B2 22 59 22 20 A7 20 |. X$:. X$."Y" . | 000006C0: 46 5A B2 46 5A AA 31 3A 89 20 32 32 30 00 FC 0E |FZ.FZ.1:. 220...| 000006D0: 90 01 99 22 11 11 12 49 4E 53 45 52 54 20 4F 55 |..."...INSERT OU| 000006E0: 54 50 55 54 20 44 49 53 4B 20 54 48 45 4E 20 48 |TPUT DISK THEN H| 000006F0: 49 54 20 52 45 54 55 52 4E 92 11 22 00 0F 0F 95 |IT RETURN.."....| 00000700: 01 A1 58 24 3A 8B 58 24 B2 22 22 89 34 30 35 00 |..X$:.X$."".405.| 00000710: 48 0F 9A 01 81 20 46 B2 31 20 A4 20 46 5A 3A 43 |H.... F.1 . FZ:C| 00000720: 4F 24 B2 22 30 3A 22 AA 4E 49 24 28 46 29 AA 22 |O$."0:".NI$(F)."| 00000730: 2C 22 AA 50 47 24 28 46 29 AA 22 2C 57 22 3A 43 |,".PG$(F).",W":C| 00000740: 4F B2 C3 28 43 4F 24 29 00 78 0F 9F 01 97 20 34 |O..(CO$).x.... 4| 00000750: 39 32 30 31 2C 42 54 28 46 29 AD 32 35 36 3A 97 |9201,BT(F).256:.| 00000760: 34 39 32 30 30 2C 42 54 28 46 29 AB C2 28 34 39 |49200,BT(F)..(49| 00000770: 32 30 31 29 AC 32 35 36 00 B2 0F A4 01 97 20 34 |201).256...... 4| 00000780: 39 32 30 37 2C 4E 42 28 46 29 AD 32 35 36 3A 97 |9207,NB(F).256:.| 00000790: 34 39 32 30 36 2C 4E 42 28 46 29 AB C2 28 34 39 |49206,NB(F)..(49| 000007A0: 32 30 37 29 AC 32 35 36 3A 97 34 39 31 37 35 2C |207).256:.49175,| 000007B0: 43 4F 00 D9 0F A9 01 81 20 49 B2 31 A4 20 43 4F |CO...... I.1. CO| 000007C0: 3A 97 34 39 31 37 35 AA 49 2C C6 28 CA 28 43 4F |:.49175.I,.(.(CO| 000007D0: 24 2C 49 2C 31 29 29 3A 82 00 F8 0F AE 01 9E 20 |$,I,1)):....... | 000007E0: 34 39 36 36 34 3A 8B 20 C2 28 34 39 31 39 38 29 |49664:. .(49198)| 000007F0: B2 30 20 89 20 34 34 30 00 32 10 B3 01 99 22 11 |.0 . 440.2....".| 00000800: 12 45 52 52 4F 52 20 49 4E 20 4F 55 54 50 55 54 |.ERROR IN OUTPUT| 00000810: 2C 20 52 45 2D 52 55 4E 20 50 52 4F 47 52 41 4D |, RE-RUN PROGRAM| 00000820: 20 46 52 4F 4D 20 53 54 41 52 54 22 3A 89 20 35 | FROM START":. 5| 00000830: 36 30 00 58 10 B8 01 99 20 4E 49 24 28 46 29 3B |60.X.... NI$(F);| 00000840: 22 20 53 55 43 43 45 53 53 46 55 4C 4C 59 20 43 |" SUCCESSFULLY C| 00000850: 4F 50 49 45 44 22 3A 82 00 89 10 F4 01 99 22 11 |OPIED":.......".| 00000860: 41 4E 4F 54 48 45 52 20 43 4F 50 59 20 4F 46 20 |ANOTHER COPY OF | 00000870: 54 48 45 53 45 20 53 41 4D 45 20 46 49 4C 45 53 |THESE SAME FILES| 00000880: 3F 20 28 59 2F 4E 29 22 3B 00 AB 10 FE 01 A1 20 |? (Y/N)";...... | 00000890: 58 24 3A 8B 58 24 B3 B1 22 59 22 20 AF 20 58 24 |X$:.X$.."Y" . X$| 000008A0: B3 B1 22 4E 22 20 89 20 35 31 30 00 C2 10 08 02 |.."N" . 510.....| 000008B0: 99 20 58 24 3A 8B 20 58 24 B2 22 59 22 20 89 34 |. X$:. X$."Y" .4| 000008C0: 30 30 00 E2 10 12 02 99 22 11 43 4F 50 59 20 4D |00......".COPY M| 000008D0: 4F 52 45 20 46 49 4C 45 53 3F 20 28 59 2F 4E 29 |ORE FILES? (Y/N)| 000008E0: 22 3B 00 04 11 1C 02 A1 20 58 24 3A 8B 58 24 B3 |";...... X$:.X$.| 000008F0: B1 22 59 22 20 AF 20 58 24 B3 B1 22 4E 22 20 89 |."Y" . X$.."N" .| 00000900: 20 35 34 30 00 1B 11 26 02 99 20 58 24 3A 8B 20 | 540...&.. X$:. | 00000910: 58 24 B2 22 59 22 20 89 32 30 30 00 37 11 30 02 |X$."Y" .200.7.0.| 00000920: 4C 4F B2 C2 28 34 39 32 31 32 29 3A 48 49 B2 C2 |LO..(49212):HI..| 00000930: 28 34 39 32 31 33 29 00 5C 11 3A 02 97 20 35 31 |(49213).\.:.. 51| 00000940: 2C 4C 4F 3A 97 35 32 2C 48 49 3A 97 35 35 2C 4C |,LO:.52,HI:.55,L| 00000950: 4F 3A 97 35 36 2C 48 49 3A 9C 3A 80 00 8A 11 E8 |O:.56,HI:.:.....| 00000960: 03 9F 31 35 2C 38 2C 31 35 3A 9F 32 2C 38 2C 32 |..15,8,15:.2,8,2| 00000970: 2C 4E 49 24 28 46 5A 29 3A 84 31 35 2C 41 41 2C |,NI$(FZ):.15,AA,| 00000980: 41 41 24 3A A0 32 3A A0 31 35 00 99 11 F2 03 8B |AA$:.2:.15......| 00000990: 20 41 41 B2 30 20 A7 20 8E 00 CC 11 FC 03 8B 20 | AA.0 . ....... | 000009A0: 41 41 B2 36 32 20 A7 20 99 22 11 46 49 4C 45 20 |AA.62 . .".FILE | 000009B0: 22 3B 4E 49 24 28 46 5A 29 3B 22 20 4E 4F 54 20 |";NI$(FZ);" NOT | 000009C0: 46 4F 55 4E 44 22 3A 89 20 32 33 30 00 EA 11 06 |FOUND":. 230....| 000009D0: 04 99 22 11 44 49 53 4B 20 45 52 52 4F 52 2C 20 |..".DISK ERROR, | 000009E0: 22 3B 41 41 24 3A 89 32 36 30 00 00 00 |";AA$:.260... |
....... C-64 QUICK COPY PROGRAM.?.... CO
MMANDER 12-83 PP54-60...(.. LOADS "ML
DATA" FROM SAME ARTICLE50 POKE 53280,6:P
OKE53281,6:PRINT".".H.D..X.0 . X.1:.".
.LOADING ML PROGRAM":."MCOPY.ML",8,1
...N..". PROGRAM COPIER UTILITY"
...S..".. COMMANDER DEC 1983"
.R....:TP.B(55).256.B(56):BT.B(45).256.B
(46).2000:SZ.TP.BT.}....".BUFFER SIZE ";
SZ;"-";BT;" THRU ";TP...... SZ.2000 . ."
.NOT ENOUGH BUFFER SPACE":..R. ..".APPRO
XIMATE BLOCKS: ";.(SZ.254).....HI..(BT.2
56):LO.BT.256.HI:.49210,LO:.49211,HI.6..
.HI..(TP.256):LO.TP.256.HI:.49212,LO:.49
213,HI.H...HI..(SZ.256):LO.SZ.256.HI:.49
214,LO:.49215,HI.....HI..(BT.256):LO.BT.
256.HI:.51,LO:.52,HI:.55,LO:.56,HI:.....
.. .A(X).B(X).256.B(X.1):. BT(25),NB(25)
,NI$(25),PG$(25)...H.."....INSERT SOURCE
DISK THEN HIT RETURN".$.M.. X$:. X$."".
205.W.R.FZ.1:BT(1)..A(49210):TP..A(4921
2):SZ..A(49214)......49201,BT(FZ).256:.4
9200,BT(FZ).256.B(49201):.49203,TP.256.W
.... 49202,TP.256.B(49203):.49205,SZ.256
:.49204,SZ.256.B(49205).....NI$(FZ)."":.
"..NAME OF INPUT FILE";NI$(FZ).'.... NI$
(FZ)."" . FZ.FZ.1:. 400.Y.... C(NI$(FZ))
.16 . ."FILE NAME TOO LONG":. 230. ...CL
$.G(157):."PROGRAM, USER OR SEQUENTIAL (
P/U/S) P";CL$;CL$;CL$;...... PG$(FZ):.
PG$(FZ).."P" . PG$(FZ).."U" . PG$(FZ).."
S" . 245...... 1000.....CI$."0:".NI$(FZ)
.",".PG$(FZ).",R":CI.C(CI$):.49152,CI:.
I.1.CI.F.... 49152.I,F(J(CI$,I,1)):.:.49
408:. B(49198).0 . 265......"..ERROR IN
FILE READ, RE-RUN PROGRAM FROM START":.
560.....NB(FZ)..A(49206):BT(FZ.1).BT(FZ)
.NB(FZ):SZ.SZ.NB(FZ)......".BYTES COPIED
: ";NB(FZ).0...."SPACE LEFT: ";SZ;" BYTE
S -";.(SZ.254);" BLOCKS".E.... FZ.24 . .
".MAXIMUM 24 FILE LIMIT REACHED":.400...
...".ANOTHER INPUT FILE? (Y/N) ";......X
$:. X$.."N" . X$.."Y" . 285.M.".. X$:. X
$."Y" . FZ.FZ.1:. 220......"...INSERT OU
TPUT DISK THEN HIT RETURN.."......X$:.X$
."".405.H.... F.1 . FZ:CO$."0:".NI$(F)."
,".PG$(F).",W":CO.C(CO$).X.... 49201,BT(
F).256:.49200,BT(F).B(49201).256...... 4
9207,NB(F).256:.49206,NB(F).B(49207).256
:.49175,CO.Y.... I.1. CO:.49175.I,F(J(CO
$,I,1)):....... 49664:. B(49198).0 . 440
.2...."..ERROR IN OUTPUT, RE-RUN PROGRAM
FROM START":. 560.X.... NI$(F);" SUCCES
SFULLY COPIED":.......".ANOTHER COPY OF
THESE SAME FILES? (Y/N)";...... X$:.X$..
"Y" . X$.."N" . 510.B.... X$:. X$."Y" .4
00......".COPY MORE FILES? (Y/N)";......
X$:.X$.."Y" . X$.."N" . 540...&.. X$:.
X$."Y" .200.7.0.LO.B(49212):HI.B(49213).
\.:.. 51,LO:.52,HI:.55,LO:.56,HI:.:.....
..15,8,15:.2,8,2,NI$(FZ):.15,AA,AA$: 2:
15...... AA.0 . ..L.... AA.62 . .".FILE
";NI$(FZ);" NOT FOUND":. 230......".DISK
ERROR, ";AA$:.260...
> CLICK IMAGE PREVIEW FOR FULL MODAL