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