COPY DISK D
FILE INFORMATION
FILENAME(S): COPY DISK D
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 16:59:36
APPEARS ON: 1 disk(s)
FILE HASH
f839ea2ea0666bc6aa17cd0895e111a2417481a7836eb0cf073a0a185ad1d779
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GHETTO COPIERS | COPY DISK D | PRG | High Voltage Complete C64 Collection | 9 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 0A 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |..).... --------| 00000010: 20 43 4F 50 59 20 44 49 53 4B 20 44 20 2D 2D 2D | COPY DISK D ---| 00000020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 51 08 0F 00 8B C2 |---------.Q.....| 00000030: 28 38 33 34 29 B3 B1 31 36 32 B0 C2 28 38 33 35 |(834)..162..(835| 00000040: 29 B3 B1 32 A7 93 22 43 50 2E 4D 4C 22 2C 38 2C |)..2.."CP.ML",8,| 00000050: 31 00 6E 08 10 00 86 42 4C 28 33 35 2C 32 31 29 |1.n....BL(35,21)| 00000060: 3A 42 46 B2 38 32 39 3A 97 34 2C 31 39 32 00 9D |:BF.829:.4,192..| 00000070: 08 11 00 81 54 B2 31 A4 31 37 3A 42 4C 28 54 2C |....T.1.17:BL(T,| 00000080: 32 31 29 B2 32 3A 82 3A 81 54 B2 31 38 A4 32 34 |21).2:.:.T.18.24| 00000090: 3A 42 4C 28 54 2C 31 39 29 B2 32 3A 82 00 CD 08 |:BL(T,19).2:....| 000000A0: 12 00 81 54 B2 32 35 A4 33 30 3A 42 4C 28 54 2C |...T.25.30:BL(T,| 000000B0: 31 38 29 B2 32 3A 82 3A 81 54 B2 33 31 A4 33 35 |18).2:.:.T.31.35| 000000C0: 3A 42 4C 28 54 2C 31 37 29 B2 32 3A 82 00 DF 08 |:BL(T,17).2:....| 000000D0: 14 00 A0 32 3A A0 34 3A A0 31 34 3A A0 31 35 00 |...2:.4:.14:.15.| 000000E0: EF 08 1E 00 99 C7 28 31 34 32 29 C7 28 38 29 00 |......(142).(8).| 000000F0: 33 09 28 00 4A 24 B2 22 13 11 11 11 11 11 11 11 |3.(.J$."........| 00000100: 11 11 11 11 11 11 11 11 11 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 20 20 20 20 20 20 | | 00000130: 20 91 22 00 5D 09 32 00 8D 31 30 30 3A 85 22 11 | .".].2..100:.".| 00000140: 43 4F 50 59 20 46 52 4F 4D 20 44 45 56 49 43 45 |COPY FROM DEVICE| 00000150: 20 1D 1D 1D 38 9D 9D 9D 22 3B 44 31 24 00 81 09 | ...8...";D1$...| 00000160: 34 00 85 22 20 20 20 20 20 20 20 20 20 20 20 44 |4.." D| 00000170: 52 49 56 45 20 1D 1D 1D 30 9D 9D 9D 22 3B 52 31 |RIVE ...0...";R1| 00000180: 24 00 A5 09 3C 00 85 22 20 20 20 20 20 20 20 54 |$...<.." T| 00000190: 4F 20 44 45 56 49 43 45 20 1D 1D 1D 39 9D 9D 9D |O DEVICE ...9...| 000001A0: 22 3B 44 32 24 00 C9 09 3E 00 85 22 20 20 20 20 |";D2$...>.." | 000001B0: 20 20 20 20 20 20 20 44 52 49 56 45 20 1D 1D 1D | DRIVE ...| 000001C0: 30 9D 9D 9D 22 3B 52 32 24 00 F5 09 46 00 44 31 |0...";R2$...F.D1| 000001D0: B2 C5 28 44 31 24 29 3A 44 32 B2 C5 28 44 32 24 |..(D1$):D2..(D2$| 000001E0: 29 3A 52 31 B2 C5 28 52 31 24 29 3A 52 32 B2 C5 |):R1..(R1$):R2..| 000001F0: 28 52 32 24 29 00 13 0A 50 00 8B 44 31 B3 38 B0 |(R2$)...P..D1.8.| 00000200: 44 31 B1 31 32 B0 44 32 B3 38 B0 44 32 B1 31 32 |D1.12.D2.8.D2.12| 00000210: A7 35 30 00 1C 0A 5A 00 89 32 30 30 00 49 0A 64 |.50...Z..200.I.d| 00000220: 00 99 22 93 20 20 20 20 20 11 11 11 20 20 D5 C3 |..". ... ..| 00000230: C3 C3 C3 C3 12 43 4F 50 59 20 44 49 53 4B 20 44 |.....COPY DISK D| 00000240: 92 C3 C3 C3 C3 C3 C3 C3 C9 00 70 0A 6E 00 99 22 |..........p.n.."| 00000250: 20 20 20 20 20 20 20 C2 20 20 20 20 20 20 20 20 | . | 00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 | .| 00000270: 00 97 0A 78 00 99 22 20 20 20 20 20 20 20 C2 20 |...x.." . | 00000280: 46 4F 52 20 54 57 4F 20 31 35 34 31 20 44 52 49 |FOR TWO 1541 DRI| 00000290: 56 45 53 20 20 20 C2 00 BE 0A 82 00 99 22 20 20 |VES ......." | 000002A0: 20 20 20 20 20 C2 20 42 59 20 43 45 4E 54 53 49 | . BY CENTSI| 000002B0: 42 4C 45 20 53 4F 46 54 57 41 52 45 20 C2 00 E5 |BLE SOFTWARE ...| 000002C0: 0A 8C 00 99 22 20 20 20 20 20 20 20 C2 20 34 2F |...." . 4/| 000002D0: 31 2F 38 34 20 20 20 20 20 20 20 20 20 20 20 20 |1/84 | 000002E0: 20 20 20 20 C2 00 0C 0B 96 00 99 22 20 20 20 20 | ......." | 000002F0: 20 20 20 C2 20 43 4F 50 59 52 49 47 48 54 20 31 | . COPYRIGHT 1| 00000300: 39 38 34 20 20 20 20 20 20 20 20 C2 00 39 0B A0 |984 ..9..| 00000310: 00 99 22 20 20 20 20 20 20 20 C2 22 44 31 22 9D |.." ."D1".| 00000320: 3A 22 52 31 24 22 20 54 4F 22 44 32 22 9D 3A 22 |:"R1$" TO"D2".:"| 00000330: 52 32 24 A3 33 31 29 22 C2 00 60 0B AA 00 99 22 |R2$.31)"..`...."| 00000340: 20 20 20 20 20 20 20 CA C3 C3 C3 C3 C3 C3 C3 C3 | .........| 00000350: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB |................| 00000360: 00 A8 0B BE 00 99 22 55 53 45 20 41 20 57 52 49 |......"USE A WRI| 00000370: 54 45 20 50 52 4F 54 45 43 54 20 54 41 42 20 4F |TE PROTECT TAB O| 00000380: 4E 20 54 48 45 20 4F 52 49 47 49 4E 41 4C 20 44 |N THE ORIGINAL D| 00000390: 49 53 4B 20 46 4F 52 20 59 4F 55 52 20 50 52 4F |ISK FOR YOUR PRO| 000003A0: 54 45 43 54 49 4F 4E 21 00 AE 0B C3 00 8E 00 B7 |TECTION!........| 000003B0: 0B C8 00 8D 31 30 30 00 02 0C D2 00 99 22 11 11 |....100......"..| 000003C0: 45 4E 54 45 52 20 54 48 45 20 53 45 43 54 4F 52 |ENTER THE SECTOR| 000003D0: 53 20 59 4F 55 20 57 4F 55 4C 44 20 4C 49 4B 45 |S YOU WOULD LIKE| 000003E0: 20 54 4F 20 53 4B 49 50 4F 52 20 43 2C 43 20 54 | TO SKIPOR C,C T| 000003F0: 4F 20 43 4F 4E 54 49 4E 55 45 2E 20 59 4F 55 20 |O CONTINUE. YOU | 00000400: 22 3B 00 3A 0C D4 00 99 22 43 41 4E 20 55 53 45 |";.:...."CAN USE| 00000410: 20 22 C7 28 33 34 29 22 41 22 C7 28 33 34 29 22 | ".(34)"A".(34)"| 00000420: 20 46 4F 52 20 41 4C 4C 20 53 45 43 54 4F 52 53 | FOR ALL SECTORS| 00000430: 2E 20 45 47 2E 20 33 34 2C 41 00 5A 0C D7 00 85 |. EG. 34,A.Z....| 00000440: 22 11 53 4B 49 50 20 54 52 41 43 4B 2C 53 45 43 |".SKIP TRACK,SEC| 00000450: 54 4F 52 22 3B 54 24 2C 53 24 00 80 0C DC 00 54 |TOR";T$,S$.....T| 00000460: B2 B5 28 C5 28 54 24 29 29 3A 53 B2 B5 28 C5 28 |..(.(T$)):S..(.(| 00000470: 53 24 29 29 3A 8B 54 24 B2 22 43 22 A7 32 39 30 |S$)):.T$."C".290| 00000480: 00 B3 0C E6 00 8B 54 B3 31 B0 54 B1 33 35 B0 53 |......T.1.T.35.S| 00000490: B3 30 B0 53 B1 32 30 B0 42 4C 28 54 2C 53 29 B2 |.0.S.20.BL(T,S).| 000004A0: 32 A7 99 22 12 45 52 52 4F 52 2C 20 22 3B 3A 89 |2..".ERROR, ";:.| 000004B0: 32 34 35 00 D3 0C EB 00 8B 53 24 B2 22 41 22 A7 |245......S$."A".| 000004C0: 99 22 53 4B 49 50 20 54 52 41 43 4B 22 54 3A 89 |."SKIP TRACK"T:.| 000004D0: 32 34 35 00 EF 0C F0 00 99 22 53 4B 49 50 20 54 |245......"SKIP T| 000004E0: 52 41 43 4B 22 54 22 53 45 43 54 4F 52 22 53 00 |RACK"T"SECTOR"S.| 000004F0: 0D 0D F5 00 99 22 49 53 20 54 48 49 53 20 43 4F |....."IS THIS CO| 00000500: 52 52 45 43 54 3F 20 28 59 2F 4E 29 22 00 20 0D |RRECT? (Y/N)". .| 00000510: F6 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 34 36 |...A$:.A$."".246| 00000520: 00 3D 0D F8 00 8B 53 24 B2 22 41 22 AF 41 24 B2 |.=....S$."A".A$.| 00000530: 22 59 22 A7 49 B2 31 30 3A 89 32 36 35 00 73 0D |"Y".I.10:.265.s.| 00000540: FA 00 8B 41 24 B2 22 59 22 A7 99 22 12 56 45 52 |...A$."Y"..".VER| 00000550: 49 46 49 45 44 20 41 4E 44 20 53 45 54 92 22 3A |IFIED AND SET.":| 00000560: 42 4C 28 54 2C 53 29 B2 31 3A 8D 34 31 30 3A 89 |BL(T,S).1:.410:.| 00000570: 32 30 30 00 99 0D FF 00 99 22 12 4C 41 53 54 20 |200......".LAST | 00000580: 45 4E 54 52 59 20 44 45 4C 45 54 45 44 92 22 3A |ENTRY DELETED.":| 00000590: 8D 34 31 30 3A 89 32 30 30 00 B3 0D 09 01 49 B2 |.410:.200.....I.| 000005A0: 49 AA 31 3A 8B 42 4C 28 54 2C 49 29 B3 B1 32 A7 |I.1:.BL(T,I)..2.| 000005B0: 32 36 35 00 D5 0D 0E 01 81 53 B2 4F A4 49 AB 31 |265......S.O.I.1| 000005C0: 3A 42 4C 28 54 2C 53 29 B2 31 3A 82 3A 53 B2 30 |:BL(T,S).1:.:S.0| 000005D0: 3A 89 32 35 30 00 FE 0D 22 01 8D 31 30 30 3A 99 |:.250..."..100:.| 000005E0: 22 11 4E 45 57 20 54 48 45 20 42 41 43 4B 55 50 |".NEW THE BACKUP| 000005F0: 20 44 49 53 4B 20 3F 20 28 59 2F 4E 29 22 00 1B | DISK ? (Y/N)"..| 00000600: 0E 2C 01 A1 41 24 3A 8B 41 24 B3 B1 22 59 22 AF |.,..A$:.A$.."Y".| 00000610: 41 24 B3 B1 22 4E 22 A7 33 30 30 00 2B 0E 36 01 |A$.."N".300.+.6.| 00000620: 8B 41 24 B2 22 4E 22 A7 33 32 35 00 6C 0E 3B 01 |.A$."N".325.l.;.| 00000630: 99 22 11 54 48 45 20 44 49 53 4B 20 49 4E 20 44 |.".THE DISK IN D| 00000640: 45 56 49 43 45 22 44 32 22 44 52 49 56 45 20 22 |EVICE"D2"DRIVE "| 00000650: 52 32 24 3A 99 22 57 49 4C 4C 20 42 45 20 46 4F |R2$:."WILL BE FO| 00000660: 52 4D 41 54 45 44 22 3A 8D 33 36 30 00 88 0E 3C |RMATED":.360...<| 00000670: 01 85 22 11 45 4E 54 45 52 20 4E 41 4D 45 2C 49 |..".ENTER NAME,I| 00000680: 44 22 3B 41 24 2C 42 24 00 B8 0E 40 01 98 31 35 |D";A$,B$...@..15| 00000690: 2C 22 4E 22 AA 52 32 24 AA 22 3A 22 AA 41 24 AA |,"N".R2$.":".A$.| 000006A0: 22 2C 22 AA 42 24 3A 99 22 46 4F 52 4D 41 54 49 |",".B$:."FORMATI| 000006B0: 4E 47 20 44 49 53 4B 22 00 F8 0E 45 01 85 22 11 |NG DISK"...E..".| 000006C0: 53 54 41 52 54 20 41 54 20 54 52 41 43 4B 20 1D |START AT TRACK .| 000006D0: 1D 1D 31 9D 9D 9D 22 3B 54 24 3A 54 B2 B5 28 C5 |..1...";T$:T..(.| 000006E0: 28 54 24 29 29 3A 53 B2 AB 31 3A 8B 54 B3 31 B0 |(T$)):S..1:.T.1.| 000006F0: 54 B1 33 35 A7 33 32 35 00 07 0F 46 01 8B 54 B2 |T.35.325...F..T.| 00000700: 31 38 A7 53 B2 31 39 00 3E 0F 4A 01 8D 31 30 30 |18.S.19.>.J..100| 00000710: 3A 99 22 11 53 45 54 20 53 4B 49 50 20 4F 56 45 |:.".SET SKIP OVE| 00000720: 52 20 45 4D 50 54 59 20 53 45 43 54 4F 52 53 3F |R EMPTY SECTORS?| 00000730: 20 28 59 2F 4E 29 22 3A 97 38 32 38 2C 30 00 51 | (Y/N)":.828,0.Q| 00000740: 0F 4F 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 33 33 |.O..A$:.A$."".33| 00000750: 35 00 8A 0F 52 01 8B 41 24 B2 22 59 22 A7 97 38 |5...R..A$."Y"..8| 00000760: 32 38 2C 31 3A 99 22 53 4B 49 50 20 4F 56 45 52 |28,1:."SKIP OVER| 00000770: 20 45 4D 50 54 59 20 53 45 43 54 4F 52 53 20 12 | EMPTY SECTORS .| 00000780: 53 45 54 92 22 3A 8D 34 31 30 00 9D 0F 54 01 8D |SET.":.410...T..| 00000790: 31 30 30 3A 8D 33 38 30 3A 89 34 35 30 00 A8 0F |100:.380:.450...| 000007A0: 5E 01 A0 32 3A A0 31 35 00 C9 0F 60 01 9F 31 35 |^..2:.15...`..15| 000007B0: 2C 44 31 2C 31 35 3A 9F 32 2C 44 31 2C 32 2C 22 |,D1,15:.2,D1,2,"| 000007C0: 23 22 3A 8D 36 35 30 3A 8E 00 D4 0F 68 01 A0 32 |#":.650:....h..2| 000007D0: 3A A0 31 35 00 F5 0F 6A 01 9F 31 35 2C 44 32 2C |:.15...j..15,D2,| 000007E0: 31 35 3A 9F 32 2C 44 32 2C 32 2C 22 23 22 3A 8D |15:.2,D2,2,"#":.| 000007F0: 36 35 30 3A 8E 00 12 10 7C 01 8F 20 49 4E 49 54 |650:....|.. INIT| 00000800: 49 41 4C 49 5A 45 20 42 4F 54 48 20 44 52 49 56 |IALIZE BOTH DRIV| 00000810: 45 53 00 23 10 7E 01 8D 33 35 30 3A 98 31 35 2C |ES.#.~..350:.15,| 00000820: 22 49 22 00 34 10 80 01 8D 33 36 30 3A 98 31 35 |"I".4....360:.15| 00000830: 2C 22 49 22 00 3A 10 81 01 8E 00 4C 10 9A 01 81 |,"I".:.....L....| 00000840: 49 B2 30 A4 32 30 30 30 3A 82 3A 8E 00 72 10 C2 |I.0.2000:.:..r..| 00000850: 01 8F 20 52 45 41 44 2F 57 52 49 54 45 20 2D 2D |.. READ/WRITE --| 00000860: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000870: 2D 2D 00 98 10 CC 01 8D 35 34 30 3A 99 4A 24 22 |--......540:.J$"| 00000880: 54 52 41 43 4B 22 54 22 20 20 53 45 43 54 4F 52 |TRACK"T" SECTOR| 00000890: 22 53 3B 3A 8D 33 35 30 00 C2 10 DB 01 98 31 35 |"S;:.350......15| 000008A0: 2C 22 55 31 3A 22 3B 32 3B 52 31 3B 54 3B 53 3A |,"U1:";2;R1;T;S:| 000008B0: 8D 36 35 30 3A 8B 45 B2 31 A7 45 B2 30 3A 89 34 |.650:.E.1.E.0:.4| 000008C0: 35 30 00 D9 10 FE 01 98 31 35 2C 22 42 2D 50 22 |50......15,"B-P"| 000008D0: 3B 32 3B 30 3A 9E 38 33 34 00 F5 10 03 02 8B C2 |;2;0:.834.......| 000008E0: 28 42 46 29 B2 31 A7 99 22 9D 9D 53 4B 49 50 22 |(BF).1.."..SKIP"| 000008F0: 3A 89 34 36 30 00 2E 11 08 02 8D 33 36 30 3A 98 |:.460......360:.| 00000900: 31 35 2C 22 42 2D 50 22 3B 32 3B 30 3A 9E 39 31 |15,"B-P";2;0:.91| 00000910: 32 3A 98 31 35 2C 22 55 32 3A 22 3B 32 3B 52 32 |2:.15,"U2:";2;R2| 00000920: 3B 54 3B 53 3A 8D 36 35 30 3A 89 34 35 30 00 54 |;T;S:.650:.450.T| 00000930: 11 1C 02 8F 20 52 45 54 55 52 4E 53 20 4E 45 58 |.... RETURNS NEX| 00000940: 54 20 54 26 53 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |T T&S ----------| 00000950: 2D 2D 2D 2D 00 87 11 26 02 8B 54 B2 31 38 A7 53 |----...&..T.18.S| 00000960: B2 53 AB 32 3A 8B 53 B2 AB 32 A7 99 22 93 46 49 |.S.2:.S..2..".FI| 00000970: 4E 49 53 48 45 44 22 3A A0 32 3A A0 34 3A A0 31 |NISHED":.2:.4:.1| 00000980: 34 3A A0 31 35 3A 80 00 91 11 30 02 53 B2 53 AA |4:.15:....0.S.S.| 00000990: 31 00 A8 11 3A 02 91 42 4C 28 54 2C 53 29 89 35 |1...:..BL(T,S).5| 000009A0: 35 30 2C 36 32 30 3A 8E 00 C7 11 6C 02 54 B2 54 |50,620:....l.T.T| 000009B0: AA 31 3A 8B 54 B2 33 36 A7 54 B2 31 38 3A 53 B2 |.1:.T.36.T.18:S.| 000009C0: 31 39 3A 89 35 35 30 00 D5 11 76 02 8B 54 B2 31 |19:.550...v..T.1| 000009D0: 38 A7 36 32 30 00 E3 11 80 02 53 B2 AB 31 3A 89 |8.620.....S..1:.| 000009E0: 35 35 30 00 F7 11 8A 02 8F 20 45 52 52 4F 52 20 |550...... ERROR | 000009F0: 43 48 41 4E 4E 45 4C 00 1A 12 94 02 84 31 35 2C |CHANNEL......15,| 00000A00: 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B 45 4E |EN,EM$,ET,ES:.EN| 00000A10: B2 30 B0 45 4E B2 37 33 A7 8E 00 46 12 B2 02 99 |.0.EN.73...F....| 00000A20: 3A 99 22 11 11 11 11 12 44 49 53 4B 20 45 52 52 |:.".....DISK ERR| 00000A30: 4F 52 92 22 45 4E 22 20 22 45 4D 24 22 20 22 45 |OR."EN" "EM$" "E| 00000A40: 54 22 20 22 45 53 00 7F 12 B7 02 8B 45 4E B1 31 |T" "ES......EN.1| 00000A50: 39 AF 45 4E B3 32 37 A7 99 22 11 44 49 44 20 59 |9.EN.27..".DID Y| 00000A60: 4F 55 20 41 4E 41 4C 59 5A 45 20 54 48 45 20 44 |OU ANALYZE THE D| 00000A70: 49 53 4B 20 57 49 54 48 20 5A 41 50 21 20 3F 00 |ISK WITH ZAP! ?.| 00000A80: 94 12 BC 02 98 31 35 2C 22 49 22 3A A0 32 3A A0 |.....15,"I":.2:.| 00000A90: 31 35 3A 80 00 9A 12 DE 03 80 00 BB 12 E8 03 9F |15:.............| 00000AA0: 31 35 2C 38 2C 31 35 3A 98 31 35 2C 22 53 30 3A |15,8,15:.15,"S0:| 00000AB0: 43 4F 50 59 20 44 49 53 4B 20 44 00 D6 12 F2 03 |COPY DISK D.....| 00000AC0: 94 22 30 3A 43 4F 50 59 20 44 49 53 4B 20 44 22 |."0:COPY DISK D"| 00000AD0: 2C 38 3A A0 31 35 00 00 00 |,8:.15... |
..).... -------- COPY DISK D -----------
-.Q....B(834)..162.B(835)..2.."CP.ML",8,
1.N....BL(35,21):BF.829:.4,192......T.1.
17:BL(T,21).2:.:.T.18.24:BL(T,19).2:..M.
...T.25.30:BL(T,18).2:.:.T.31.35:BL(T,17
).2:...... 2: 4: 14: 15......G(142)G(8).
3.(.J$.".................
.".].2..100:.".
COPY FROM DEVICE ...8...";D1$...4.."
DRIVE ...0...";R1$...<.." T
O DEVICE ...9...";D2$.I.>.." D
RIVE ...0...";R2$...F.D1.E(D1$):D2.E(D2$
):R1.E(R1$):R2.E(R2$)...P..D1.8.D1.12.D2
.8.D2.12.50...Z..200.I.D..". ... UC
CCCC.COPY DISK D.CCCCCCCI.P.N.." B
B...X.." B
FOR TWO 1541 DRIVES B......" B B
Y CENTSIBLE SOFTWARE B......" B 4/
1/84 B......" B COP
YRIGHT 1984 B.9. .." B"D1".
:"R1$" TO"D2".:"R2$.31)"B.`...." J
CCCCCCCCCCCCCCCCCCCCCCCK......"USE A WRI
TE PROTECT TAB ON THE ORIGINAL DISK FOR
YOUR PROTECTION!...C.....H..100...R.."..
ENTER THE SECTORS YOU WOULD LIKE TO SKIP
OR C,C TO CONTINUE. YOU ";.:.T.."CAN USE
"G(34)"A"G(34)" FOR ALL SECTORS. EG. 34
,A.Z.W..".SKIP TRACK,SECTOR";T$,S$.....T
..(E(T$)):S..(E(S$)):.T$."C".290......T.
1.T.35.S.0.S.20.BL(T,S).2..".ERROR, ";:.
245.S....S$."A".."SKIP TRACK"T:.245.....
."SKIP TRACK"T"SECTOR"S......"IS THIS CO
RRECT? (Y/N)". ....A$:.A$."".246.=....S$
."A".A$."Y".I.10:.265.S....A$."Y"..".VER
IFIED AND SET.":BL(T,S).1:.410:.200.....
.".LAST ENTRY DELETED.":.410:.200.....I.
I.1:.BL(T,I)..2.265.U....S.O.I.1:BL(T,S)
.1:.:S.0:.250..."..100:.".NEW THE BACKUP
DISK ? (Y/N)"...,..A$:.A$.."Y".A$.."N".
300.+.6..A$."N".325.L.;..".THE DISK IN D
EVICE"D2"DRIVE "R2$:."WILL BE FORMATED":
.360...<..".ENTER NAME,ID";A$,B$...@..15
,"N".R2$.":".A$.",".B$:."FORMATING DISK"
...E..".START AT TRACK ...1...";T$:T..(E
(T$)):S..1:.T.1.T.35.325...F..T.18.S.19.
>.J..100:.".SET SKIP OVER EMPTY SECTORS?
(Y/N)":.828,0.Q.O..A$:.A$."".335...R..A
$."Y"..828,1:."SKIP OVER EMPTY SECTORS .
SET.":.410...T..100:.380:.450...^. 2: 15
.I.`..15,D1,15:.2,D1,2,"#":.650:..T.H. 2
: 15...J..15,D2,15:.2,D2,2,"#":.650:....
|.. INITIALIZE BOTH DRIVES.#.~..350:.15,
"I".4....360:.15,"I".:.....L....I.0.2000
:.:..R.B.. READ/WRITE ------------------
--...L..540:.J$"TRACK"T" SECTOR"S;:.350
.B....15,"U1:";2;R1;T;S:.650:.E.1.E.0:.4
50.Y....15,"B-P";2;0:.834......B(BF).1..
"..SKIP":.460......360:.15,"B-P";2;0:.91
2:.15,"U2:";2;R2;T;S:.650:.450.T.... RET
URNS NEXT T&S --------------...&..T.18.S
.S.2:.S..2..".FINISHED": 2: 4: 14: 15:..
..0.S.S.1...:..BL(T,S).550,620:..G.L.T.T
.1:.T.36.T.18:S.19:.550.U.V..T.18.620...
..S..1:.550...... ERROR CHANNEL......15,
EN,EM$,ET,ES:.EN.0.EN.73...F....:.".....
DISK ERROR."EN" "EM$" "ET" "ES.....EN.1
9.EN.27..".DID YOU ANALYZE THE DISK WITH
ZAP! ?......15,"I": 2: 15:.............
15,8,15:.15,"S0:COPY DISK D.V...."0:COPY
DISK D",8: 15...
> CLICK IMAGE PREVIEW FOR FULL MODAL