MONO COPY
FILE INFORMATION
FILENAME(S): MONO COPY
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-02 16:30:55
APPEARS ON: 1 disk(s)
FILE HASH
34b3e5f8436b9de2a1a35369004674580ce49ca7f7baea53cd6388117531146f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISC 2 | MONO COPY | PRG | Treasure Chest - OzzyC64 | 33 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 82 00 97 35 36 2C 33 32 3A 9C 00 29 |.......56,32:..)| 00000010: 08 8C 00 81 49 B2 36 37 39 A4 37 34 36 3A 87 41 |....I.679.746:.A| 00000020: 25 3A 97 49 2C 41 25 3A 82 00 44 08 96 00 81 49 |%:.I,A%:..D....I| 00000030: B2 38 33 32 A4 39 31 34 3A 87 41 25 3A 97 49 2C |.832.914:.A%:.I,| 00000040: 41 25 3A 82 00 61 08 A0 00 86 41 24 28 31 35 30 |A%:..a....A$(150| 00000050: 29 2C 41 25 28 31 35 30 29 2C 43 25 28 31 35 30 |),A%(150),C%(150| 00000060: 29 00 7E 08 AA 00 97 35 33 32 38 30 2C 31 35 3A |).~....53280,15:| 00000070: 97 35 33 32 38 31 2C 31 35 3A 99 22 90 22 00 87 |.53281,15:."."..| 00000080: 08 B4 00 8D 38 30 30 00 B8 08 BE 00 99 22 11 11 |....800......"..| 00000090: 1D 50 4C 41 43 45 20 54 48 45 20 53 4F 55 52 43 |.PLACE THE SOURC| 000000A0: 45 20 44 49 53 4B 20 41 4E 44 20 54 59 50 45 20 |E DISK AND TYPE | 000000B0: 27 53 50 41 43 45 27 22 00 DB 08 C8 00 97 31 39 |'SPACE'"......19| 000000C0: 38 2C 30 3A 92 31 39 38 2C 31 3A A1 43 24 3A 8B |8,0:.198,1:.C$:.| 000000D0: 43 24 B3 B1 22 20 22 A7 32 30 30 00 13 09 D2 00 |C$.." ".200.....| 000000E0: 99 22 13 11 11 11 11 11 11 11 11 20 20 20 20 20 |."......... | 000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000110: 20 20 22 00 38 09 DC 00 9F 31 35 2C 38 2C 31 35 | ".8....15,8,15| 00000120: 3A 9F 31 2C 38 2C 30 2C 22 24 30 22 3A 8B 53 54 |:.1,8,0,"$0":.ST| 00000130: B3 B1 30 A7 8D 37 36 30 00 69 09 E6 00 99 22 91 |..0..760.i....".| 00000140: 91 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 |. ONE MOMENT PLE| 00000150: 41 53 45 20 21 20 52 45 41 44 49 4E 47 20 44 49 |ASE ! READING DI| 00000160: 52 45 43 54 4F 52 59 2E 22 00 83 09 F0 00 A1 23 |RECTORY."......#| 00000170: 31 2C 41 24 2C 41 24 2C 41 24 2C 41 24 3A 42 24 |1,A$,A$,A$,A$:B$| 00000180: B2 22 22 00 9F 09 FA 00 81 49 B2 31 A4 32 34 3A |.""......I.1.24:| 00000190: A1 23 31 2C 41 24 3A 8B 41 24 B2 22 22 A7 82 00 |.#1,A$:.A$.""...| 000001A0: B8 09 04 01 8B 41 24 B2 C7 28 33 34 29 B0 41 24 |.....A$..(34).A$| 000001B0: B2 C7 28 31 38 29 A7 82 00 C8 09 0E 01 42 24 B2 |..(18).......B$.| 000001C0: 42 24 AA 41 24 3A 82 49 00 DF 09 18 01 99 22 11 |B$.A$:.I......".| 000001D0: 20 44 49 53 4B 20 4E 41 4D 45 3A 20 22 42 24 00 | DISK NAME: "B$.| 000001E0: FB 09 22 01 99 22 11 20 43 4F 52 52 45 43 54 20 |.."..". CORRECT | 000001F0: 44 49 53 4B 20 3F 20 59 2F 4E 22 00 25 0A 2C 01 |DISK ? Y/N".%.,.| 00000200: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 43 |.198,0:.198,1:.C| 00000210: 24 3A 8B 43 24 B2 22 4E 22 A7 A0 31 3A A0 31 35 |$:.C$."N"..1:.15| 00000220: 3A 89 31 37 30 00 36 0A 36 01 8B 43 24 B3 B1 22 |:.170.6.6..C$.."| 00000230: 59 22 A7 33 30 30 00 44 0A 40 01 4E B2 30 3A 42 |Y".300.D.@.N.0:B| 00000240: 24 B2 22 22 00 5B 0A 4A 01 A1 23 31 2C 41 24 3A |$."".[.J..#1,A$:| 00000250: 8B 41 24 B3 B1 22 22 A7 33 33 30 00 7F 0A 54 01 |.A$.."".330...T.| 00000260: A1 23 31 2C 41 24 2C 41 24 3A A1 23 31 2C 41 24 |.#1,A$,A$:.#1,A$| 00000270: 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 |:.A$."".A$..(0).| 00000280: A1 0A 5E 01 43 B2 C6 28 41 24 29 3A A1 23 31 2C |..^.C..(A$):.#1,| 00000290: 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 |A$:.A$."".A$..(0| 000002A0: 29 00 BB 0A 68 01 43 B2 43 AA C6 28 41 24 29 AC |)...h.C.C..(A$).| 000002B0: 32 35 36 3A 41 25 28 4E 29 B2 43 00 DA 0A 72 01 |256:A%(N).C...r.| 000002C0: 81 49 B2 31 A4 32 35 3A A1 23 31 2C 41 24 3A 8B |.I.1.25:.#1,A$:.| 000002D0: 41 24 B2 C7 28 33 34 29 A7 82 00 EC 0A 7C 01 8B |A$..(34).....|..| 000002E0: 49 B3 34 AF 41 24 B2 22 20 22 A7 82 00 01 0B 86 |I.4.A$." "......| 000002F0: 01 8B 49 B2 32 35 AF 41 24 B2 22 20 22 A7 34 31 |..I.25.A$." ".41| 00000300: 30 00 25 0B 90 01 42 24 B2 42 24 AA 41 24 3A 8B |0.%...B$.B$.A$:.| 00000310: 42 24 B2 22 42 4C 4F 43 4B 53 20 46 52 45 45 2E |B$."BLOCKS FREE.| 00000320: 22 A7 34 34 30 00 37 0B 9A 01 82 3A 8B 53 54 B3 |".440.7....:.ST.| 00000330: B1 30 A7 8D 37 36 30 00 51 0B A4 01 8B C3 28 42 |.0..760.Q.....(B| 00000340: 24 29 B1 32 30 A7 42 24 B2 C8 28 42 24 2C 32 30 |$).20.B$..(B$,20| 00000350: 29 00 9A 0B AE 01 41 24 28 4E 29 B2 42 24 3A 42 |).....A$(N).B$:B| 00000360: 24 B2 22 22 3A 99 22 11 11 1D 20 20 20 20 20 9D |$."":."... .| 00000370: 9D 9D 9D 9D 22 3B 41 25 28 4E 29 3B 22 20 22 3B |....";A%(N);" ";| 00000380: 41 24 28 4E 29 3B 22 20 20 20 20 91 91 91 22 3A |A$(N);" ...":| 00000390: 4E B2 4E AA 31 3A 89 33 33 30 00 AE 0B B8 01 41 |N.N.1:.330.....A| 000003A0: 24 28 4E 29 B2 42 24 3A A0 31 3A A0 31 35 00 B7 |$(N).B$:.1:.15..| 000003B0: 0B C2 01 8D 38 30 30 00 D6 0B CC 01 99 22 11 41 |....800......".A| 000003C0: 4E 53 57 45 52 20 59 45 53 20 4F 52 20 4E 4F 20 |NSWER YES OR NO | 000003D0: 20 20 59 2F 4E 22 00 05 0C D6 01 81 49 B2 30 A4 | Y/N"......I.0.| 000003E0: 4E AB 31 3A 8B 41 25 28 49 29 B1 32 32 35 A7 99 |N.1:.A%(I).225..| 000003F0: 22 11 1C 22 3B 41 25 28 49 29 3B 41 24 28 49 29 |"..";A%(I);A$(I)| 00000400: 3B 22 90 22 3B 00 2A 0C E0 01 8B 41 25 28 49 29 |;".";.*....A%(I)| 00000410: B3 B2 32 32 35 A7 99 22 11 22 41 25 28 49 29 3B |..225.."."A%(I);| 00000420: 41 24 28 49 29 3B 22 90 22 3B 00 5D 0C EA 01 97 |A$(I);".";.]....| 00000430: 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 43 24 |198,0:.198,1:.C$| 00000440: 3A 8B 43 24 B2 22 4E 22 A7 43 25 28 49 29 B2 30 |:.C$."N".C%(I).0| 00000450: 3A 99 A3 33 30 29 43 24 3A 89 35 32 30 00 7E 0C |:..30)C$:.520.~.| 00000460: F4 01 8B 43 24 B2 22 59 22 A7 43 25 28 49 29 B2 |...C$."Y".C%(I).| 00000470: 31 3A 99 A3 33 30 29 43 24 3A 89 35 32 30 00 87 |1:..30)C$:.520..| 00000480: 0C FE 01 89 34 39 30 00 95 0C 08 02 82 3A 49 B2 |....490......:I.| 00000490: 30 3A 43 B2 30 00 A0 0C 12 02 8D 38 30 30 3A 99 |0:C.0......800:.| 000004A0: 00 C5 0C 1C 02 8B 43 25 28 49 29 B2 31 AF 41 25 |......C%(I).1.A%| 000004B0: 28 49 29 B3 B2 32 32 35 A7 43 B2 43 AA 31 3A 8D |(I)..225.C.C.1:.| 000004C0: 36 30 30 3A 99 00 CF 0C 26 02 49 B2 49 AA 31 00 |600:....&.I.I.1.| 000004D0: E1 0C 30 02 8B 43 B2 39 A7 43 B2 30 3A 89 35 33 |..0..C.9.C.0:.53| 000004E0: 30 00 EF 0C 3A 02 8B 49 B3 B2 4E A7 35 34 30 00 |0...:..I..N.540.| 000004F0: 13 0D 44 02 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D |..D.."..........| 00000500: 1D 1D 1D 1D 1D 1D 1D 1D 1C 46 49 4E 49 53 48 45 |.........FINISHE| 00000510: 44 90 22 00 30 0D 4E 02 97 31 39 38 2C 30 3A 92 |D.".0.N..198,0:.| 00000520: 31 39 38 2C 31 3A A1 43 24 3A 9C 3A 8A 31 36 30 |198,1:.C$:.:.160| 00000530: 00 69 0D 58 02 81 58 B2 C3 28 41 24 28 49 29 29 |.i.X..X..(A$(I))| 00000540: AB 34 A4 31 A9 AB 31 3A 8B CA 28 41 24 28 49 29 |.4.1..1:..(A$(I)| 00000550: 2C 58 2C 31 29 B2 22 20 22 A7 58 24 B2 C8 28 41 |,X,1)." ".X$..(A| 00000560: 24 28 49 29 2C 58 AB 31 29 00 94 0D 62 02 8B CA |$(I),X.1)...b...| 00000570: 28 41 24 28 49 29 2C 58 2C 31 29 B1 C7 28 33 32 |(A$(I),X,1)..(32| 00000580: 29 A7 58 24 B2 C8 28 41 24 28 49 29 2C 58 29 3A |).X$..(A$(I),X):| 00000590: 89 36 33 30 00 9A 0D 6C 02 82 00 CA 0D 76 02 9F |.630...l.....v..| 000005A0: 31 35 2C 38 2C 31 35 3A 9F 31 2C 38 2C 32 2C 58 |15,8,15:.1,8,2,X| 000005B0: 24 AA 22 2C 22 AA C9 28 41 24 28 49 29 2C 33 29 |$.","..(A$(I),3)| 000005C0: AA 22 2C 52 22 3A 8D 37 36 30 00 E6 0D 80 02 99 |.",R":.760......| 000005D0: 22 1C 20 52 45 41 44 49 4E 47 20 22 3B 41 24 28 |". READING ";A$(| 000005E0: 49 29 3B 22 90 22 00 F7 0D 8A 02 9E 36 37 39 3A |I);"."......679:| 000005F0: 8D 37 36 30 3A A0 31 00 38 0E 94 02 99 22 50 4C |.760:.1.8...."PL| 00000600: 41 43 45 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 |ACE DESTINATION | 00000610: 44 49 53 4B 2C 54 48 45 4E 20 54 59 50 45 20 53 |DISK,THEN TYPE S| 00000620: 50 41 43 45 91 22 3A 97 31 39 38 2C 30 3A 92 31 |PACE.":.198,0:.1| 00000630: 39 38 2C 31 3A A1 43 24 00 49 0E 9E 02 8B 43 24 |98,1:.C$.I....C$| 00000640: B3 B1 22 20 22 A7 36 36 30 00 78 0E A8 02 99 22 |.." ".660.x...."| 00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000670: 20 20 20 20 20 20 91 22 00 9F 0E B2 02 9F 31 2C | ."......1,| 00000680: 38 2C 32 2C 58 24 AA 22 2C 22 AA C9 28 41 24 28 |8,2,X$.","..(A$(| 00000690: 49 29 2C 33 29 AA 22 2C 57 22 3A 8D 37 36 30 00 |I),3).",W":.760.| 000006A0: BC 0E BC 02 99 22 91 1C 20 57 52 49 54 49 4E 47 |.....".. WRITING| 000006B0: 20 22 3B 41 24 28 49 29 3B 22 90 22 00 CA 0E C6 | ";A$(I);"."....| 000006C0: 02 9E 38 33 32 3A 8D 37 36 30 00 F8 0E D0 02 99 |..832:.760......| 000006D0: 22 91 20 43 4F 50 49 45 44 20 22 3B 41 24 28 49 |". COPIED ";A$(I| 000006E0: 29 3B 22 20 20 22 3A A0 31 35 3A A0 31 3A 8B 49 |);" ":.15:.1:.I| 000006F0: B2 4E AB 31 A7 37 35 30 00 36 0F DA 02 99 22 50 |.N.1.750.6...."P| 00000700: 4C 41 43 45 20 53 4F 55 52 43 45 20 44 49 53 4B |LACE SOURCE DISK| 00000710: 2C 54 48 45 4E 20 54 59 50 45 20 27 53 50 41 43 |,THEN TYPE 'SPAC| 00000720: 45 27 91 22 3A 97 31 39 38 2C 30 3A 92 31 39 38 |E'.":.198,0:.198| 00000730: 2C 31 3A A1 43 24 00 64 0F E4 02 99 22 20 20 20 |,1:.C$.d...." | 00000740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000760: 20 20 91 22 00 6A 0F EE 02 8E 00 88 0F F8 02 84 | .".j..........| 00000770: 31 35 2C 45 4E 2C 45 52 24 2C 45 54 2C 45 53 3A |15,EN,ER$,ET,ES:| 00000780: 8B 45 4E B3 32 30 A7 8E 00 B8 0F 02 03 99 22 12 |.EN.20........".| 00000790: 44 49 53 4B 20 45 52 52 4F 52 20 23 22 3B 45 4E |DISK ERROR #";EN| 000007A0: 3B 22 9D 20 20 9D 22 3B 45 52 24 3B 45 54 3B 22 |;". .";ER$;ET;"| 000007B0: 9D 22 45 53 3B 22 92 22 00 CE 0F 0C 03 97 31 39 |."ES;"."......19| 000007C0: 38 2C 30 3A 92 31 39 38 2C 31 3A A1 43 24 00 E0 |8,0:.198,1:.C$..| 000007D0: 0F 16 03 A0 31 3A A0 31 35 3A 9C 3A 8A 31 36 30 |....1:.15:.:.160| 000007E0: 00 05 10 20 03 99 22 93 11 1D 1D 1D 1D 1D 1D 1D |... ..".........| 000007F0: 1D 1D 1D 1D 1D 4D 4F 4E 4F 20 44 52 49 56 45 20 |.....MONO DRIVE | 00000800: 43 4F 50 59 22 00 2E 10 2A 03 99 22 11 1D 1D 1D |COPY"...*.."....| 00000810: 1D 1D 1D 1D 20 2E 2E 2E 2E 2E 2E 2E 20 56 43 2D |.... ....... VC-| 00000820: 31 35 34 31 20 2E 2E 2E 2E 2E 2E 2E 20 22 00 5B |1541 ....... ".[| 00000830: 10 34 03 99 22 11 1D 1D 1D 4D 41 58 2E 20 46 49 |.4.."....MAX. FI| 00000840: 4C 45 20 4C 45 4E 47 48 54 20 32 32 35 20 42 4C |LE LENGHT 225 BL| 00000850: 4F 43 4B 53 20 3D 20 35 36 4B 22 00 61 10 3E 03 |OCKS = 56K".a.>.| 00000860: 8E 00 AA 10 48 03 83 31 36 32 2C 31 2C 33 32 2C |....H..162,1,32,| 00000870: 31 39 38 2C 32 35 35 2C 31 36 39 2C 30 2C 31 33 |198,255,169,0,13| 00000880: 33 2C 32 35 31 2C 31 36 39 2C 33 32 2C 31 33 33 |3,251,169,32,133| 00000890: 2C 32 35 32 2C 31 36 32 2C 30 2C 31 36 39 2C 31 |,252,162,0,169,1| 000008A0: 35 39 2C 31 39 37 2C 32 35 32 00 F0 10 52 03 83 |59,197,252...R..| 000008B0: 31 34 34 2C 32 33 2C 33 32 2C 31 36 35 2C 32 35 |144,23,32,165,25| 000008C0: 35 2C 31 32 39 2C 32 35 31 2C 33 32 2C 31 38 33 |5,129,251,32,183| 000008D0: 2C 32 35 35 2C 32 30 38 2C 39 2C 32 33 30 2C 32 |,255,208,9,230,2| 000008E0: 35 31 2C 32 30 38 2C 32 2C 32 33 30 2C 32 35 32 |51,208,2,230,252| 000008F0: 00 3A 11 5C 03 83 37 36 2C 31 38 30 2C 32 2C 33 |.:.\..76,180,2,3| 00000900: 32 2C 32 30 34 2C 32 35 35 2C 39 36 2C 33 32 2C |2,204,255,96,32,| 00000910: 31 36 35 2C 32 35 35 2C 31 34 31 2C 36 30 2C 33 |165,255,141,60,3| 00000920: 2C 31 32 30 2C 31 36 39 2C 35 32 2C 31 33 33 2C |,120,169,52,133,| 00000930: 31 2C 31 37 33 2C 36 30 2C 33 00 60 11 66 03 83 |1,173,60,3.`.f..| 00000940: 31 32 39 2C 32 35 31 2C 31 36 39 2C 35 35 2C 31 |129,251,169,55,1| 00000950: 33 33 2C 31 2C 38 38 2C 37 36 2C 31 39 33 2C 32 |33,1,88,76,193,2| 00000960: 00 A9 11 70 03 83 31 36 32 2C 31 2C 33 32 2C 32 |...p..162,1,32,2| 00000970: 30 31 2C 32 35 35 2C 31 36 39 2C 30 2C 31 33 33 |01,255,169,0,133| 00000980: 2C 32 35 33 2C 31 36 39 2C 33 32 2C 31 33 33 2C |,253,169,32,133,| 00000990: 32 35 34 2C 31 36 32 2C 30 2C 31 36 39 2C 31 35 |254,162,0,169,15| 000009A0: 39 2C 31 39 37 2C 32 35 34 00 F1 11 7A 03 83 31 |9,197,254...z..1| 000009B0: 34 34 2C 33 38 2C 31 36 31 2C 32 35 33 2C 33 32 |44,38,161,253,32| 000009C0: 2C 31 36 38 2C 32 35 35 2C 33 32 2C 31 38 33 2C |,168,255,32,183,| 000009D0: 32 35 35 2C 32 30 38 2C 31 35 2C 31 36 35 2C 32 |255,208,15,165,2| 000009E0: 35 34 2C 31 39 37 2C 32 35 32 2C 32 34 30 2C 31 |54,197,252,240,1| 000009F0: 33 00 3A 12 84 03 83 32 33 30 2C 32 35 33 2C 32 |3.:....230,253,2| 00000A00: 30 38 2C 32 2C 32 33 30 2C 32 35 34 2C 37 36 2C |08,2,230,254,76,| 00000A10: 37 37 2C 33 2C 33 32 2C 32 30 34 2C 32 35 35 2C |77,3,32,204,255,| 00000A20: 39 36 2C 31 36 35 2C 32 35 33 2C 31 39 37 2C 32 |96,165,253,197,2| 00000A30: 35 31 2C 32 30 38 2C 32 33 37 00 80 12 8E 03 83 |51,208,237......| 00000A40: 37 36 2C 31 31 30 2C 33 2C 31 32 30 2C 31 36 39 |76,110,3,120,169| 00000A50: 2C 35 32 2C 31 33 33 2C 31 2C 31 36 31 2C 32 35 |,52,133,1,161,25| 00000A60: 33 2C 31 34 31 2C 36 30 2C 33 2C 31 36 39 2C 35 |3,141,60,3,169,5| 00000A70: 35 2C 31 33 33 2C 31 2C 31 37 33 2C 36 30 2C 33 |5,133,1,173,60,3| 00000A80: 00 9B 12 98 03 83 38 38 2C 33 32 2C 31 36 38 2C |......88,32,168,| 00000A90: 32 35 35 2C 37 36 2C 39 30 2C 33 00 00 00 F8 5D |255,76,90,3....]| 00000AA0: 50 00 FF FF 00 FF CC 2A 81 00 FF |P......*... |
.......56,32:..)....I.679.746:.A%:.I,A%:
..D....I.832.914:.A%:.I,A%:..A. ..A$(150
),A%(150),C%(150).~....53280,15:.53281,1
5:."."......800......"...PLACE THE SOURC
E DISK AND TYPE 'SPACE'"...H..198,0:.198
,1:.C$:.C$.." ".200...R..".........
".8...
.15,8,15:.1,8,0,"$0":.ST..0..760.I....".
. ONE MOMENT PLEASE ! READING DIRECTORY.
"......#1,A$,A$,A$,A$:B$.""......I.1.24:
.#1,A$:.A$.""........A$.G(34).A$.G(18)..
.H...B$.B$.A$:.I......". DISK NAME: "B$.
.."..". CORRECT DISK ? Y/N".%.,..198,0:.
198,1:.C$:.C$."N". 1: 15:.170.6.6..C$.."
Y".300.D.@.N.0:B$."".[.J..#1,A$:.A$.."".
330..T..#1,A$,A$:.#1,A$:.A$."".A$.G(0).
..^.C.F(A$):.#1,A$:.A$."".A$.G(0)...H.C.
C.F(A$).256:A%(N).C.Z.R..I.1.25:.#1,A$:.
A$.G(34).....|..I.4.A$." "........I.25.A
$." ".410.%...B$.B$.A$:.B$."BLOCKS FREE.
".440.7....:.ST..0..760.Q....C(B$).20.B$
.H(B$,20).....A$(N).B$:B$."":."... .
....";A%(N);" ";A$(N);" ...":N.N.1:.3
30.....A$(N).B$: 1: 15...B..800.V.L..".A
NSWER YES OR NO Y/N"...V..I.0.N.1:.A%(
I).225.."..";A%(I);A$(I);".";.*....A%(I)
..225.."."A%(I);A$(I);".";.]....198,0:.1
98,1:.C$:.C$."N".C%(I).0:..30)C$:.520.~.
...C$."Y".C%(I).1:..30)C$:.520......490.
.....:I.0:C.0. ....800:..E....C%(I).1.A%
(I)..225.C.C.1:.600:..O.&.I.I.1...0..C.9
.C.0:.530...:..I..N.540...D.."..........
.........FINISHED.".0.N..198,0:.198,1:.C
$:.:.160.I.X..X.C(A$(I)).4.1..1:.J(A$(I)
,X,1)." ".X$.H(A$(I),X.1)...B..J(A$(I),X
,1).G(32).X$.H(A$(I),X):.630...L...J.V..
15,8,15:.1,8,2,X$.",".I(A$(I),3).",R":.7
60......". READING ";A$(I);"."......679:
.760: 1.8...."PLACE DESTINATION DISK,THE
N TYPE SPACE.":.198,0:.198,1:.C$.I....C$
.." ".660.X...."
."......1,8,2,X$.",".I(A$(
I),3).",W":.760......".. WRITING ";A$(I)
;".".J.F..832:.760...P..". COPIED ";A$(I
);" ": 15: 1:.I.N.1.750.6.Z.."PLACE SOU
RCE DISK,THEN TYPE 'SPACE'.":.198,0:.198
,1:.C$.D...."
.".J..........15,EN,ER$,ET,ES:
.EN.20........".DISK ERROR #";EN;". .";
ER$;ET;"."ES;".".N....198,0:.198,1:.C$..
... 1: 15:.:.160... .."..............MON
O DRIVE COPY"...*.."........ ....... VC-
1541 ....... ".[.4.."....MAX. FILE LENGH
T 225 BLOCKS = 56K".A.>.....H..162,1,32,
198,255,169,0,133,251,169,32,133,252,162
,0,169,159,197,252...R..144,23,32,165,25
5,129,251,32,183,255,208,9,230,251,208,2
,230,252.:.\..76,180,2,32,204,255,96,32,
165,255,141,60,3,120,169,52,133,1,173,60
,3.`.F..129,251,169,55,133,1,88,76,193,2
...P..162,1,32,201,255,169,0,133,253,169
,32,133,254,162,0,169,159,197,254...Z..1
44,38,161,253,32,168,255,32,183,255,208,
15,165,254,197,252,240,13.:....230,253,2
08,2,230,254,76,77,3,32,204,255,96,165,2
53,197,251,208,237......76,110,3,120,169
,52,133,1,161,253,141,60,3,169,55,133,1,
173,60,3......88,32,168,255,76,90,3....]
P.....L*...
> CLICK IMAGE PREVIEW FOR FULL MODAL