PHASE1
FILE INFORMATION
FILENAME(S): PHASE1
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-11-30 19:35:20
APPEARS ON: 1 disk(s)
FILE HASH
b11915d3a6f1ca47a758144d9a5167e5b780eba595cc8537d69efad1ec90cee8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PINKY WAS HERE | PHASE1 | PRG | Curtcool, bitbear | 15 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 44 49 B3 B1 44 4F 20 A7 20 99 22 11 22 3B A6 31 |DI..DO . .".";.1|
00000010: 34 29 3B 22 4E 4F 57 20 43 4C 4F 4E 49 4E 47 3A |4);"NOW CLONING:|
00000020: 22 00 23 11 48 18 99 20 22 13 22 3B C8 28 59 59 |".#.H.. ".";.(YY|
00000030: 24 2C 33 29 3B 00 36 11 4C 18 99 20 A6 31 36 29 |$,3);.6.L.. .16)|
00000040: 3B 22 54 52 41 43 4B 22 00 49 11 51 18 99 20 A6 |;"TRACK".I.Q.. .|
00000050: 31 36 29 3B 22 42 4C 4F 43 4B 22 00 6D 11 56 18 |16);"BLOCK".m.V.|
00000060: 99 22 49 2D 4E 2D 50 2D 55 2D 54 22 3B A6 32 30 |."I-N-P-U-T";.20|
00000070: 29 3B 22 4F 2D 55 2D 54 2D 50 2D 55 2D 54 22 00 |);"O-U-T-P-U-T".|
00000080: 92 11 5B 18 99 22 20 44 49 53 4B 20 22 3B 44 49 |..[.." DISK ";DI|
00000090: 3B A6 32 32 29 3B 22 44 49 53 4B 20 22 3B 44 4F |;.22);"DISK ";DO|
000000A0: 3A 99 3A 99 00 9E 11 6A 18 97 20 36 34 36 2C 36 |:.:....j.. 646,6|
000000B0: 00 CC 11 6B 18 50 59 24 B2 22 20 20 20 20 D1 D1 |...k.PY$." ..|
000000C0: D1 D1 D1 D1 D1 D1 D1 22 3A 99 20 C8 28 50 59 24 |.......":. .(PY$|
000000D0: 2C 35 29 3A 99 20 C8 28 50 59 24 2C 35 29 00 F7 |,5):. .(PY$,5)..|
000000E0: 11 6C 18 99 20 CA 28 50 59 24 2C 32 2C 36 29 3A |.l.. .(PY$,2,6):|
000000F0: 99 20 CA 28 50 59 24 2C 33 2C 37 29 3A 99 20 CA |. .(PY$,3,7):. .|
00000100: 28 50 59 24 2C 34 2C 38 29 00 15 12 6D 18 99 20 |(PY$,4,8)...m.. |
00000110: CA 28 50 59 24 2C 35 2C 39 29 3A 99 20 CA 28 50 |.(PY$,5,9):. .(P|
00000120: 59 24 2C 35 2C 39 29 00 2B 12 72 18 8B 20 45 54 |Y$,5,9).+.r.. ET|
00000130: B3 B1 33 35 20 A7 20 8D 20 36 36 30 30 00 37 12 |..35 . . 6600.7.|
00000140: 73 18 97 20 36 34 36 2C 30 00 61 12 74 18 99 3A |s.. 646,0.a.t..:|
00000150: 99 3A 99 22 20 20 20 20 20 20 42 4C 4F 43 4B 53 |.:." BLOCKS|
00000160: 20 4F 4E 20 43 55 52 52 45 4E 54 20 54 52 41 43 | ON CURRENT TRAC|
00000170: 4B 3A 22 00 99 12 7E 18 8B 20 44 49 B2 44 4F 20 |K:"...~.. DI.DO |
00000180: A7 20 99 3A 99 3A 99 22 20 20 4F 4E 45 20 48 55 |. .:.:." ONE HU|
00000190: 4E 44 52 45 44 20 54 57 45 4E 54 59 20 42 4C 4F |NDRED TWENTY BLO|
000001A0: 43 4B 20 42 55 46 46 45 52 3A 22 00 AD 12 83 18 |CK BUFFER:".....|
000001B0: 8B 20 44 49 B3 B1 44 4F 20 89 20 36 32 38 30 00 |. DI..DO . 6280.|
000001C0: CA 12 84 18 97 20 36 34 36 2C 35 3A 8B 20 48 46 |..... 646,5:. HF|
000001D0: B2 30 20 A7 20 97 20 36 34 36 2C 36 00 E9 12 86 |.0 . . 646,6....|
000001E0: 18 81 20 49 B2 30 20 A4 20 33 39 3A 99 22 23 22 |.. I.0 . 39:."#"|
000001F0: 3B 3A 82 3A 97 20 36 34 36 2C 43 00 F4 12 88 18 |;:.:. 646,C.....|
00000200: 54 58 B2 54 AB 31 00 06 13 8A 18 8B 20 54 58 B2 |TX.T.1...... TX.|
00000210: 30 20 89 20 36 32 39 39 00 15 13 8B 18 81 20 49 |0 . 6299...... I|
00000220: B2 31 20 A4 20 54 58 00 44 13 8C 18 99 22 13 22 |.1 . TX.D...."."|
00000230: 3B C8 28 59 59 24 2C 49 59 28 49 29 29 3B C8 28 |;.(YY$,IY(I));.(|
00000240: 58 58 24 2C 49 58 28 49 29 29 3B 22 A0 22 3A 97 |XX$,IX(I));".":.|
00000250: 20 36 34 36 2C 36 00 75 13 8E 18 8B 20 49 B3 B2 | 646,6.u.... I..|
00000260: 54 57 20 A7 20 99 22 13 22 3B C8 28 59 59 24 2C |TW . .".";.(YY$,|
00000270: 4F 59 28 49 29 29 3B C8 28 58 58 24 2C 4F 58 28 |OY(I));.(XX$,OX(|
00000280: 49 29 29 3B 22 D7 22 00 7B 13 90 18 82 00 96 13 |I));".".{.......|
00000290: 92 18 8B 20 42 B2 30 20 A7 20 97 20 36 34 36 2C |... B.0 . . 646,|
000002A0: 30 3A 89 20 36 32 39 39 00 A2 13 93 18 97 20 36 |0:. 6299...... 6|
000002B0: 34 36 2C 35 00 DB 13 94 18 99 22 13 22 3B C8 28 |46,5......".";.(|
000002C0: 59 59 24 2C 32 30 29 3B 22 20 20 20 20 20 20 20 |YY$,20);" |
000002D0: 20 22 3B 3A 81 20 49 B2 30 20 A4 20 42 3A 99 22 | ";:. I.0 . B:."|
000002E0: D8 22 3B 3A 82 3A 97 20 36 34 36 2C 30 00 E1 13 |.";:.:. 646,0...|
000002F0: 9B 18 8E 00 F8 13 9C 18 54 52 B2 54 3A 42 52 B2 |........TR.T:BR.|
00000300: 42 3A 8D 20 36 35 30 30 3A 8E 00 11 14 00 19 54 |B:. 6500:......T|
00000310: 52 B2 54 31 3A 42 52 B2 42 31 3A 8D 20 36 35 30 |R.T1:BR.B1:. 650|
00000320: 30 3A 8E 00 26 14 64 19 43 B2 C2 28 36 34 36 29 |0:..&.d.C..(646)|
00000330: 3A 97 20 36 34 36 2C 35 00 49 14 69 19 99 22 13 |:. 646,5.I.i..".|
00000340: 22 3B C8 28 59 59 24 2C 32 30 29 3B C8 28 58 58 |";.(YY$,20);.(XX|
00000350: 24 2C 42 52 AA 37 29 3B 22 D8 22 00 71 14 6B 19 |$,BR.7);".".q.k.|
00000360: 97 20 36 34 36 2C 31 30 3A 99 22 13 22 3B C8 28 |. 646,10:.".";.(|
00000370: 59 59 24 2C 33 29 3B C8 28 58 58 24 2C 32 31 29 |YY$,3);.(XX$,21)|
00000380: 3B 54 52 00 90 14 6C 19 99 22 13 22 3B C8 28 59 |;TR...l..".";.(Y|
00000390: 59 24 2C 34 29 3B C8 28 58 58 24 2C 32 31 29 3B |Y$,4);.(XX$,21);|
000003A0: 42 52 00 A5 14 6E 19 8B 20 54 52 B2 54 58 20 A7 |BR...n.. TR.TX .|
000003B0: 20 89 20 36 35 39 39 00 AF 14 78 19 54 58 B2 54 | . 6599...x.TX.T|
000003C0: 52 00 D1 14 7A 19 99 22 13 22 3B C8 28 59 59 24 |R...z..".";.(YY$|
000003D0: 2C 34 29 3B C8 28 58 58 24 2C 32 31 29 3B 22 20 |,4);.(XX$,21);" |
000003E0: 30 20 22 00 E7 14 7D 19 8B 20 54 52 AB 31 20 B2 |0 "...}.. TR.1 .|
000003F0: 20 30 20 89 20 36 35 33 38 00 1C 15 82 19 99 22 | 0 . 6538......"|
00000400: 13 22 3B C8 28 59 59 24 2C 49 59 28 54 52 AB 31 |.";.(YY$,IY(TR.1|
00000410: 29 29 3B C8 28 58 58 24 2C 49 58 28 54 52 AB 31 |));.(XX$,IX(TR.1|
00000420: 29 29 3B 22 A0 22 3A 97 20 36 34 36 2C 36 00 36 |));".":. 646,6.6|
00000430: 15 86 19 8B 20 44 49 B2 44 4F 20 AF 20 48 46 B2 |.... DI.DO . HF.|
00000440: 30 20 89 20 36 35 33 38 00 63 15 87 19 99 22 13 |0 . 6538.c....".|
00000450: 22 3B C8 28 59 59 24 2C 4F 59 28 54 52 AB 31 29 |";.(YY$,OY(TR.1)|
00000460: 29 3B C8 28 58 58 24 2C 4F 58 28 54 52 AB 31 29 |);.(XX$,OX(TR.1)|
00000470: 29 3B 22 D7 22 00 7D 15 8A 19 8B 20 44 49 B2 44 |);".".}.... DI.D|
00000480: 4F 20 AF 20 48 46 B2 31 20 89 20 36 35 36 30 00 |O . HF.1 . 6560.|
00000490: AE 15 8C 19 97 20 36 34 36 2C 35 3A 99 22 13 22 |..... 646,5:."."|
000004A0: 3B C8 28 59 59 24 2C 49 59 28 54 52 29 29 3B C8 |;.(YY$,IY(TR));.|
000004B0: 28 58 58 24 2C 49 58 28 54 52 29 29 3B 22 D7 22 |(XX$,IX(TR));"."|
000004C0: 00 BA 15 A0 19 97 20 36 34 36 2C 35 00 F4 15 A2 |...... 646,5....|
000004D0: 19 99 22 13 22 3B C8 28 59 59 24 2C 32 30 29 3B |..".";.(YY$,20);|
000004E0: 22 20 20 20 20 20 20 20 D8 22 3B 3A 97 36 34 36 |" .";:.646|
000004F0: 2C 36 3A 81 20 49 B2 31 A4 53 28 54 52 29 3A 99 |,6:. I.1.S(TR):.|
00000500: 22 D8 22 3B 3A 82 00 03 16 A5 19 99 22 20 20 20 |".";:......." |
00000510: 20 20 20 22 3B 00 11 16 C7 19 97 20 36 34 36 2C | ";...... 646,|
00000520: 43 3A 8E 00 47 16 C8 19 81 49 B2 45 54 AA 31 A4 |C:..G....I.ET.1.|
00000530: 33 35 3A 99 22 13 22 3B C8 28 59 59 24 2C 49 59 |35:.".";.(YY$,IY|
00000540: 28 49 29 29 3B C8 28 58 58 24 2C 49 58 28 49 29 |(I));.(XX$,IX(I)|
00000550: 29 3B 22 20 22 3A 82 3A 8E 00 68 16 58 1B 99 22 |);" ":.:..h.X.."|
00000560: 93 11 22 3B 54 54 24 3A 99 3A 99 3A 44 53 B2 30 |..";TT$:.:.:DS.0|
00000570: 3A 44 49 B2 30 3A 44 4F B2 30 00 91 16 62 1B 99 |:DI.0:DO.0...b..|
00000580: 22 20 20 20 20 20 20 20 44 49 53 4B 20 44 52 49 |" DISK DRI|
00000590: 56 45 20 43 4F 4E 46 49 47 55 52 41 54 49 4F 4E |VE CONFIGURATION|
000005A0: 22 3A 99 00 BE 16 6C 1B 99 22 20 20 20 46 49 4C |":....l.." FIL|
000005B0: 4C 20 49 4E 20 54 48 45 20 42 4C 41 4E 4B 53 20 |L IN THE BLANKS |
000005C0: 57 49 54 48 20 44 49 53 4B 20 44 52 49 56 45 22 |WITH DISK DRIVE"|
000005D0: 00 E6 16 71 1B 99 22 20 20 20 20 20 20 20 4E 55 |...q.." NU|
000005E0: 4D 42 45 52 53 20 49 4E 20 54 48 45 20 52 41 4E |MBERS IN THE RAN|
000005F0: 47 45 20 38 2D 31 31 22 00 1E 17 76 1B 99 3A 99 |GE 8-11"...v..:.|
00000600: 22 11 11 53 49 4E 47 4C 45 20 44 52 49 56 45 20 |"..SINGLE DRIVE |
00000610: 43 4F 50 59 3A 22 3A 99 3A 99 22 20 20 20 20 20 |COPY:":.:." |
00000620: 20 20 44 52 49 56 45 20 4E 55 4D 42 45 52 3A 22 | DRIVE NUMBER:"|
00000630: 00 53 17 80 1B 99 3A 99 22 11 11 54 57 4F 20 44 |.S....:."..TWO D|
00000640: 52 49 56 45 20 43 4F 50 59 3A 22 3A 99 3A 99 22 |RIVE COPY:":.:."|
00000650: 20 20 20 20 20 20 20 49 4E 50 55 54 20 20 44 52 | INPUT DR|
00000660: 49 56 45 3A 22 00 71 17 8A 1B 99 3A 99 22 20 20 |IVE:".q....:." |
00000670: 20 20 20 20 20 4F 55 54 50 55 54 20 44 52 49 56 | OUTPUT DRIV|
00000680: 45 3A 22 00 9A 17 94 1B 99 22 13 22 3B C8 28 59 |E:"......".";.(Y|
00000690: 59 24 2C 31 33 29 3B C8 28 58 58 24 2C 32 31 29 |Y$,13);.(XX$,21)|
000006A0: 3B C7 28 31 38 29 3B 22 20 20 22 3B 00 B3 17 96 |;.(18);" ";....|
000006B0: 1B 99 22 9D 9D 22 3B C8 28 59 59 24 2C 36 29 3B |.."..";.(YY$,6);|
000006C0: 22 20 20 22 3B 00 D3 17 98 1B 99 22 9D 9D 22 3B |" ";......"..";|
000006D0: C8 28 59 59 24 2C 32 29 3B 22 20 20 22 3B C7 28 |.(YY$,2);" ";.(|
000006E0: 31 34 36 29 3B 00 FA 17 9E 1B 59 59 25 B2 31 33 |146);.....YY%.13|
000006F0: 3A 8D 20 38 38 30 30 3A 44 53 B2 41 41 3A 8B 20 |:. 8800:DS.AA:. |
00000700: 44 53 B3 B1 30 20 89 20 37 30 38 32 00 12 18 A0 |DS..0 . 7082....|
00000710: 1B 59 59 25 B2 31 39 3A 8D 20 38 38 30 30 3A 44 |.YY%.19:. 8800:D|
00000720: 49 B2 41 41 00 2A 18 A2 1B 59 59 25 B2 32 31 3A |I.AA.*...YY%.21:|
00000730: 8D 20 38 38 30 30 3A 44 4F B2 41 41 00 45 18 A8 |. 8800:DO.AA.E..|
00000740: 1B 8B 20 44 53 B2 30 20 AF 20 44 49 B3 B1 44 4F |.. DS.0 . DI..DO|
00000750: 20 89 20 37 30 39 39 00 74 18 AA 1B 8B 20 44 53 | . 7099.t.... DS|
00000760: B3 B1 30 20 AF 20 44 49 B2 30 20 AF 20 44 4F B2 |..0 . DI.0 . DO.|
00000770: 30 20 A7 20 44 49 B2 44 53 3A 44 4F B2 44 53 3A |0 . DI.DS:DO.DS:|
00000780: 89 20 37 30 39 39 00 7F 18 AC 1B 89 20 37 30 30 |. 7099...... 700|
00000790: 30 00 85 18 BB 1B 8E 00 A4 18 BC 1B 99 22 93 11 |0............"..|
000007A0: 11 22 3B 54 54 24 3A 8B 20 44 4F B3 B1 44 49 20 |.";TT$:. DO..DI |
000007B0: 89 20 37 31 35 30 00 C8 18 D0 1B 8D 20 37 39 30 |. 7150...... 790|
000007C0: 30 3A 99 22 41 20 44 49 53 4B 45 54 54 45 20 55 |0:."A DISKETTE U|
000007D0: 53 49 4E 47 20 4F 4E 4C 59 22 00 F1 18 DA 1B 99 |SING ONLY"......|
000007E0: 22 54 48 45 20 44 49 53 4B 45 54 54 45 20 44 52 |"THE DISKETTE DR|
000007F0: 49 56 45 20 22 3B 44 49 3B 22 2E 22 3A 89 20 37 |IVE ";DI;".":. 7|
00000800: 31 37 30 00 1B 19 EE 1B 8D 20 37 39 30 30 3A 99 |170...... 7900:.|
00000810: 22 46 52 4F 4D 20 41 20 44 49 53 4B 45 54 54 45 |"FROM A DISKETTE|
00000820: 20 4F 4E 20 44 52 49 56 45 22 3B 44 49 00 41 19 | ON DRIVE";DI.A.|
00000830: F8 1B 99 22 54 4F 20 41 20 44 49 53 4B 45 54 54 |..."TO A DISKETT|
00000840: 45 20 4F 4E 20 44 52 49 56 45 20 22 3B 44 4F 3B |E ON DRIVE ";DO;|
00000850: 22 2E 22 00 67 19 02 1C 99 3A 99 22 49 53 20 54 |".".g....:."IS T|
00000860: 48 41 54 20 57 48 41 54 20 59 4F 55 20 57 41 4E |HAT WHAT YOU WAN|
00000870: 54 20 28 59 2F 4E 29 3F 22 00 92 19 0C 1C 9E 20 |T (Y/N)?"...... |
00000880: 35 31 30 32 34 2C 32 39 2C 38 3A 41 41 B2 C2 28 |51024,29,8:AA..(|
00000890: 32 35 35 29 3A 8B 20 41 41 B3 B1 38 39 20 89 20 |255):. AA..89 . |
000008A0: 31 30 30 30 00 9D 19 16 1C 8D 20 37 34 30 30 00 |1000...... 7400.|
000008B0: A3 19 1F 1C 8E 00 BD 19 20 1C 8D 20 38 35 30 37 |........ .. 8507|
000008C0: 3A 8B 20 45 58 B3 B1 30 20 89 20 37 32 31 30 00 |:. EX..0 . 7210.|
000008D0: DD 19 25 1C 9E 20 34 39 39 32 30 3A 8B 20 C2 28 |..%.. 49920:. .(|
000008E0: 35 30 31 31 33 29 B2 30 20 89 20 32 30 35 35 00 |50113).0 . 2055.|
000008F0: ED 19 2A 1C 45 58 B2 30 3A 89 20 37 33 32 30 00 |..*.EX.0:. 7320.|
00000900: 07 1A 84 1C 8D 20 38 35 30 37 3A 8B 20 45 58 B3 |..... 8507:. EX.|
00000910: B1 30 20 89 20 37 33 31 30 00 28 1A 89 1C 9E 20 |.0 . 7310.(.... |
00000920: 35 30 34 33 32 3A 8B 20 C2 28 35 30 31 31 33 29 |50432:. .(50113)|
00000930: B3 B1 30 20 89 20 37 33 31 30 00 3D 1A 8C 1C 91 |..0 . 7310.=....|
00000940: 20 52 46 20 89 20 32 30 35 36 2C 33 30 35 30 00 | RF . 2056,3050.|
00000950: 47 1A 8E 1C 45 58 B2 32 39 00 63 1A 98 1C 8D 20 |G...EX.29.c.... |
00000960: 37 37 30 30 3A 99 20 C7 28 31 34 36 29 3B 3A 89 |7700:. .(146);:.|
00000970: 20 39 30 30 30 00 76 1A E8 1C 99 22 93 11 11 22 | 9000.v...."..."|
00000980: 3B 54 54 24 3A 99 3A 99 00 99 1A F2 1C 99 22 44 |;TT$:.:......."D|
00000990: 4F 20 22 3B 3A 8D 20 37 34 39 30 3A 8B 20 41 41 |O ";:. 7490:. AA|
000009A0: B3 B1 38 39 20 89 20 37 34 38 39 00 A4 1A FC 1C |..89 . 7489.....|
000009B0: 8D 20 38 35 30 30 00 B7 1A 1A 1D 99 22 93 11 11 |. 8500......"...|
000009C0: 22 3B 54 54 24 3A 99 3A 99 00 E4 1A 24 1D 99 22 |";TT$:.:....$.."|
000009D0: 41 52 45 20 59 4F 55 20 53 55 52 45 20 22 3B 3A |ARE YOU SURE ";:|
000009E0: 8D 20 37 34 39 30 3A 8B 20 41 41 B3 B1 38 39 20 |. 7490:. AA..89 |
000009F0: 89 20 37 34 38 39 00 0A 1B 2E 1D 9F 20 31 35 2C |. 7489...... 15,|
00000A00: 44 4F 2C 31 35 3A 98 31 35 2C 22 4E 30 3A 43 4C |DO,15:.15,"N0:CL|
00000A10: 4F 4E 45 2C 43 43 22 3A A0 20 31 35 00 3F 1B 33 |ONE,CC":. 15.?.3|
00000A20: 1D 9F 20 31 35 2C 44 4F 2C 31 35 3A 84 31 35 2C |.. 15,DO,15:.15,|
00000A30: 41 24 2C 42 24 2C 43 24 2C 44 24 3A A0 20 31 35 |A$,B$,C$,D$:. 15|
00000A40: 3A 8B 20 C5 28 41 24 29 B2 30 20 89 20 37 34 38 |:. .(A$).0 . 748|
00000A50: 39 00 60 1B 38 1D 99 22 93 22 3B 3A 8D 20 37 37 |9.`.8..".";:. 77|
00000A60: 30 30 3A 99 20 C7 28 31 34 36 29 3A 89 20 31 30 |00:. .(146):. 10|
00000A70: 30 30 00 66 1B 41 1D 8E 00 84 1B 42 1D 99 22 59 |00.f.A.....B.."Y|
00000A80: 4F 55 20 57 41 4E 54 20 54 4F 20 49 4E 49 54 49 |OU WANT TO INITI|
00000A90: 41 4C 49 5A 45 22 00 A6 1B 44 1D 99 22 54 48 45 |ALIZE"...D.."THE|
00000AA0: 20 4F 55 54 50 55 54 20 44 49 53 4B 45 54 54 45 | OUTPUT DISKETTE|
00000AB0: A0 28 59 2F 4E 29 3F 22 00 E1 1B 46 1D 97 20 31 |.(Y/N)?"...F.. 1|
00000AC0: 39 38 2C 30 3A 9E 20 35 31 30 32 34 2C 32 36 2C |98,0:. 51024,26,|
00000AD0: 36 3A 41 41 B2 C2 28 32 35 35 29 3A 8B 20 41 41 |6:AA..(255):. AA|
00000AE0: B2 39 32 20 B0 20 41 41 B2 31 36 39 20 89 20 31 |.92 . AA.169 . 1|
00000AF0: 30 30 30 00 E7 1B 4B 1D 8E 00 FA 1B 14 1E 52 52 |000...K.......RR|
00000B00: B2 31 38 3A 97 20 36 34 36 2C 31 30 00 33 1C 1E |.18:. 646,10.3..|
00000B10: 1E 99 20 22 13 22 3B C7 28 52 52 29 3B C8 28 59 |.. ".";.(RR);.(Y|
00000B20: 59 24 2C 38 29 3B A6 45 58 29 3B 22 45 2D 52 2D |Y$,8);.EX);"E-R-|
00000B30: 52 2D 4F 2D 52 22 3B 3A 8B 52 52 B2 31 38 A7 8D |R-O-R";:.RR.18..|
00000B40: 20 35 31 30 30 00 54 1C 28 1E 52 52 B2 28 52 52 | 5100.T.(.RR.(RR|
00000B50: B2 31 38 29 AC AB 31 34 36 AA 28 52 52 B3 B1 31 |.18)..146.(RR..1|
00000B60: 38 29 AC AB 31 38 00 88 1C 32 1E 42 24 B2 22 22 |8)..18...2.B$.""|
00000B70: 3A 81 20 49 B2 31 20 A4 20 36 30 3A A1 20 41 24 |:. I.1 . 60:. A$|
00000B80: 3A 42 24 B2 42 24 AA 41 24 3A 82 3A 8B 20 42 24 |:B$.B$.A$:.:. B$|
00000B90: B2 22 22 20 89 20 37 37 31 30 00 96 1C 77 1E 97 |."" . 7710...w..|
00000BA0: 20 36 34 36 2C 43 3A 8E 00 B8 1C DC 1E 99 3A 99 | 646,C:.......:.|
00000BB0: 22 54 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 |"THIS PROGRAM WI|
00000BC0: 4C 4C 20 43 4F 50 59 22 3A 8E 00 EE 1C A4 1F 44 |LL COPY":......D|
00000BD0: 31 B2 B5 28 49 49 AD 31 30 29 3A 44 32 B2 49 49 |1..(II.10):D2.II|
00000BE0: AB 44 31 AC 31 30 3A 97 20 4C 4C 2C 44 31 AA 34 |.D1.10:. LL,D1.4|
00000BF0: 38 3A 97 20 4C 4C AA 31 2C 44 32 AA 34 38 3A 8E |8:. LL.1,D2.48:.|
00000C00: 00 16 1D 08 20 58 58 25 B2 32 31 3A 8D 20 38 33 |.... XX%.21:. 83|
00000C10: 30 30 3A 8B 20 41 41 B2 33 32 20 A7 20 44 31 B2 |00:. AA.32 . D1.|
00000C20: 30 3A 89 20 38 32 33 30 00 31 1D 12 20 8B 20 41 |0:. 8230.1.. . A|
00000C30: 41 B3 34 38 20 B0 20 41 41 B1 35 37 20 89 20 38 |A.48 . AA.57 . 8|
00000C40: 32 30 30 00 3E 1D 1C 20 44 31 B2 41 41 AB 34 38 |200.>.. D1.AA.48|
00000C50: 00 67 1D 26 20 58 58 25 B2 32 32 3A 8D 20 38 33 |.g.& XX%.22:. 83|
00000C60: 30 30 3A 8B 20 41 41 B2 33 32 20 A7 20 41 41 B2 |00:. AA.32 . AA.|
00000C70: 44 31 3A 89 20 38 32 36 30 00 82 1D 30 20 8B 20 |D1:. 8260...0 . |
00000C80: 41 41 B3 34 38 20 B0 20 41 41 B1 35 37 20 89 20 |AA.48 . AA.57 . |
00000C90: 38 32 33 30 00 97 1D 3A 20 41 41 B2 31 30 AC 44 |8230...: AA.10.D|
00000CA0: 31 AA 28 41 41 AB 34 38 29 00 C3 1D 44 20 99 22 |1.(AA.48)...D ."|
00000CB0: 13 22 3B C8 28 59 59 24 2C 59 59 25 29 3B C8 28 |.";.(YY$,YY%);.(|
00000CC0: 58 58 24 2C 58 58 25 AB 31 29 3B 22 20 20 9D 9D |XX$,XX%.1);" ..|
00000CD0: 22 3B 41 41 3B 00 C9 1D 6B 20 8E 00 07 1E 6C 20 |";AA;...k ....l |
00000CE0: 97 20 31 39 38 2C 30 3A 9E 20 35 31 30 32 34 2C |. 198,0:. 51024,|
00000CF0: 58 58 25 2C 59 59 25 3A 41 41 B2 C2 28 32 35 35 |XX%,YY%:AA..(255|
00000D00: 29 3A 8B 20 41 41 B2 39 32 20 B0 20 41 41 B2 31 |):. AA.92 . AA.1|
00000D10: 36 39 20 89 20 31 30 30 30 00 0D 1E 76 20 8E 00 |69 . 1000...v ..|
00000D20: 3C 1E D0 20 99 22 93 11 11 22 3B 54 54 24 3A 99 |<.. ."...";TT$:.|
00000D30: 3A 99 22 49 4E 53 45 52 54 20 44 49 53 4B 45 54 |:."INSERT DISKET|
00000D40: 54 45 20 43 4F 4E 54 41 49 4E 49 4E 47 22 00 75 |TE CONTAINING".u|
00000D50: 1E D2 20 99 22 4F 52 49 47 49 4E 41 4C 20 46 49 |.. ."ORIGINAL FI|
00000D60: 4C 45 53 20 4F 4E 20 44 49 53 4B 20 44 52 49 56 |LES ON DISK DRIV|
00000D70: 45 20 22 3B 44 49 3B 22 2E 22 3A 44 46 B2 44 49 |E ";DI;".":DF.DI|
00000D80: 3A 89 20 38 35 30 34 00 A4 1E 34 21 99 22 93 11 |:. 8504...4!."..|
00000D90: 11 22 3B 54 54 24 3A 99 3A 99 22 49 4E 53 45 52 |.";TT$:.:."INSER|
00000DA0: 54 20 44 49 53 4B 45 54 54 45 20 54 4F 20 43 4F |T DISKETTE TO CO|
00000DB0: 4E 54 41 49 4E 22 00 D5 1E 36 21 99 22 43 4F 50 |NTAIN"...6!."COP|
00000DC0: 59 20 4F 46 20 46 49 4C 45 53 20 4F 4E 20 44 49 |Y OF FILES ON DI|
00000DD0: 53 4B 20 44 52 49 56 45 20 22 3B 44 4F 3B 22 2E |SK DRIVE ";DO;".|
00000DE0: 22 3A 44 46 B2 44 4F 00 FC 1E 38 21 8D 20 35 31 |":DF.DO...8!. 51|
00000DF0: 30 30 3A 99 3A 99 20 45 33 24 3A 58 58 25 B2 31 |00:.:. E3$:XX%.1|
00000E00: 39 3A 59 59 25 B2 37 3A 8D 20 38 33 30 30 00 26 |9:YY%.7:. 8300.&|
00000E10: 1F 3B 21 45 58 B2 30 3A 97 20 35 30 31 31 32 2C |.;!EX.0:. 50112,|
00000E20: 44 46 3A 97 20 35 30 31 31 33 2C 30 3A 97 20 35 |DF:. 50113,0:. 5|
00000E30: 30 31 31 34 2C 31 31 31 00 60 1F 3C 21 4C B2 35 |0114,111.`.<!L.5|
00000E40: 30 31 37 36 3A 97 20 4C 2C 31 36 32 3A 97 20 4C |0176:. L,162:. L|
00000E50: AA 31 2C 32 33 37 3A 97 20 4C AA 32 2C 33 32 3A |.1,237:. L.2,32:|
00000E60: 97 20 4C AA 33 2C 38 31 3A 97 20 4C AA 34 2C 31 |. L.3,81:. L.4,1|
00000E70: 39 35 00 8C 1F 3D 21 97 20 4C AA 35 2C 39 36 3A |95...=!. L.5,96:|
00000E80: 9E 20 35 30 31 37 36 3A 8B 20 C2 28 35 30 31 31 |. 50176:. .(5011|
00000E90: 33 29 B3 B1 30 20 A7 20 45 58 B2 32 35 35 00 92 |3)..0 . EX.255..|
00000EA0: 1F 47 21 8E 00 BE 1F 98 21 99 22 93 11 11 22 3B |.G!.....!."...";|
00000EB0: 54 54 24 3A 99 3A 99 22 44 4F 20 59 4F 55 20 57 |TT$:.:."DO YOU W|
00000EC0: 41 4E 54 20 54 4F 20 53 54 41 52 54 20 41 54 22 |ANT TO START AT"|
00000ED0: 00 E5 1F 9A 21 99 22 41 20 50 41 52 54 49 43 55 |....!."A PARTICU|
00000EE0: 4C 41 52 20 54 52 41 43 4B 2F 42 4C 4F 43 4B 20 |LAR TRACK/BLOCK |
00000EF0: 28 59 2F 4E 29 3F 22 00 F7 1F 9D 21 54 B2 31 3A |(Y/N)?"....!T.1:|
00000F00: 42 B2 30 3A 45 54 B2 33 35 00 17 20 A2 21 97 20 |B.0:ET.35.. .!. |
00000F10: 31 39 38 2C 30 3A 58 58 25 B2 33 32 3A 59 59 25 |198,0:XX%.32:YY%|
00000F20: B2 35 3A 8D 20 38 33 30 30 00 2D 20 AC 21 8B 20 |.5:. 8300.- .!. |
00000F30: 41 41 B3 B1 38 39 20 A7 20 89 20 38 36 39 39 00 |AA..89 . . 8699.|
00000F40: 55 20 B6 21 99 22 13 22 3B C8 28 59 59 24 2C 37 |U .!.".";.(YY$,7|
00000F50: 29 3B 45 31 24 3B 45 32 24 3B 3A 59 59 25 B2 37 |);E1$;E2$;:YY%.7|
00000F60: 3A 8D 20 38 32 30 30 00 6F 20 BB 21 8B 20 41 41 |:. 8200.o .!. AA|
00000F70: B3 31 20 B0 20 41 41 B1 33 35 20 89 20 38 36 33 |.1 . AA.35 . 863|
00000F80: 30 00 78 20 BF 21 54 B2 41 41 00 AA 20 C0 21 99 |0.x .!T.AA.. .!.|
00000F90: 22 13 22 3B C8 28 59 59 24 2C 39 29 3B 45 31 24 |".";.(YY$,9);E1$|
00000FA0: 3B 22 42 4C 4F 43 4B 3A 20 20 20 20 20 22 3B 3A |;"BLOCK: ";:|
00000FB0: 59 59 25 B2 39 3A 8D 20 38 32 30 30 00 C6 20 C5 |YY%.9:. 8200.. .|
00000FC0: 21 8B 20 41 41 B3 30 20 B0 20 41 41 B1 53 28 54 |!. AA.0 . AA.S(T|
00000FD0: 29 20 89 20 38 36 34 30 00 CF 20 C9 21 42 B2 41 |) . 8640.. .!B.A|
00000FE0: 41 00 DA 20 CA 21 59 59 25 B2 31 31 00 0A 21 CC |A.. .!YY%.11..!.|
00000FF0: 21 99 22 13 22 3B C8 28 59 59 24 2C 59 59 25 29 |!.".";.(YY$,YY%)|
00001000: 3B 22 45 4E 54 45 52 20 45 4E 44 49 4E 47 20 22 |;"ENTER ENDING "|
00001010: 3B 45 32 24 3B 3A 8D 20 38 32 30 30 00 26 21 CF |;E2$;:. 8200.&!.|
00001020: 21 8B 20 41 41 B3 54 20 B0 20 41 41 B1 33 35 20 |!. AA.T . AA.35 |
00001030: 20 20 89 20 38 36 35 30 00 30 21 D4 21 45 54 B2 | . 8650.0!.!ET.|
00001040: 41 41 00 36 21 FB 21 8E 00 56 21 60 22 58 58 25 |AA.6!.!..V!`"XX%|
00001050: B2 32 31 3A 8D 20 38 39 30 30 3A 8B 20 41 41 B2 |.21:. 8900:. AA.|
00001060: 30 20 89 20 38 38 39 39 00 7A 21 74 22 8B 20 41 |0 . 8899.z!t". A|
00001070: 41 B2 31 20 A7 20 58 58 25 B2 32 32 3A 8D 20 38 |A.1 . XX%.22:. 8|
00001080: 39 30 30 3A 41 41 B2 31 30 AA 41 41 00 94 21 7E |900:AA.10.AA..!~|
00001090: 22 8B 20 41 41 B3 38 20 B0 20 41 41 B1 31 31 20 |". AA.8 . AA.11 |
000010A0: 89 20 38 38 30 30 00 BE 21 C3 22 99 22 13 22 3B |. 8800..!.".".";|
000010B0: C8 28 59 59 24 2C 59 59 25 29 3B C8 28 58 58 24 |.(YY$,YY%);.(XX$|
000010C0: 2C 32 31 29 3B 41 41 3B 22 20 20 20 22 3B 3A 8E |,21);AA;" ";:.|
000010D0: 00 F4 21 C4 22 9E 20 35 31 30 32 34 2C 58 58 25 |..!.". 51024,XX%|
000010E0: 2C 59 59 25 3A 41 41 B2 C2 28 32 35 35 29 3A 8B |,YY%:AA..(255):.|
000010F0: 20 41 41 B2 39 32 20 B0 20 41 41 B2 31 36 39 20 | AA.92 . AA.169 |
00001100: 89 20 39 30 30 30 00 16 22 CE 22 41 41 B2 41 41 |. 9000.."."AA.AA|
00001110: AB 34 38 3A 8B 20 41 41 B3 30 20 B0 20 41 41 B1 |.48:. AA.0 . AA.|
00001120: 39 20 A7 20 41 41 B2 30 00 1C 22 D8 22 8E 00 31 |9 . AA.0.."."..1|
00001130: 22 28 23 97 20 31 38 36 2C 52 36 3A 9E 20 35 31 |"(#. 186,R6:. 51|
00001140: 37 31 32 00 58 22 0E 27 9F 20 31 35 2C 38 2C 31 |712.X".'. 15,8,1|
00001150: 35 2C 22 49 30 22 3A A0 20 31 35 3A 94 22 40 30 |5,"I0":. 15:."@0|
00001160: 3A 43 4C 4F 4E 45 31 22 2C 38 00 00 00 |:CLONE1",8... |
DI..DO . .".";.14);"NOW CLONING:".#.H..
".";H(YY$,3);.6.L.. .16);"TRACK".I.Q.. .
16);"BLOCK".M.V.."I-N-P-U-T";.20);"O-U-T
-P-U-T"...[.." DISK ";DI;.22);"DISK ";DO
:.:....J.. 646,6.L.K.PY$." QQQQQQQQQ"
:. H(PY$,5):. H(PY$,5)...L.. J(PY$,2,6):
. J(PY$,3,7):. J(PY$,4,8)...M.. J(PY$,5,
9):. J(PY$,5,9).+.R.. ET..35 . . 6600.7.
S.. 646,0.A.T..:.:." BLOCKS ON CURR
ENT TRACK:"...~.. DI.DO . .:.:." ONE HU
NDRED TWENTY BLOCK BUFFER:"...... DI..DO
. 6280.J.... 646,5:. HF.0 . . 646,6....
.. I.0 . 39:."#";:.:. 646,C.....TX.T.1..
.... TX.0 . 6299...... I.1 . TX.D...."."
;H(YY$,IY(I));H(XX$,IX(I));" ":. 646,6.U
.... I..TW . .".";H(YY$,OY(I));H(XX$,OX(
I));"W".{.......... B.0 . . 646,0:. 6299
...... 646,5......".";H(YY$,20);"
";:. I.0 . B:."X";:.:. 646,0...........
TR.T:BR.B:. 6500:......TR.T1:BR.B1:. 650
0:..&.D.C.B(646):. 646,5.I.I..".";H(YY$,
20);H(XX$,BR.7);"X".Q.K.. 646,10:.".";H(
YY$,3);H(XX$,21);TR...L..".";H(YY$,4);H(
XX$,21);BR...N.. TR.TX . . 6599...X.TX.T
R.Q.Z..".";H(YY$,4);H(XX$,21);" 0 "...}.
. TR.1 . 0 . 6538......".";H(YY$,IY(TR.1
));H(XX$,IX(TR.1));" ":. 646,6.6.... DI.
DO . HF.0 . 6538.C....".";H(YY$,OY(TR.1)
);H(XX$,OX(TR.1));"W".}.... DI.DO . HF.1
. 6560...... 646,5:.".";H(YY$,IY(TR));H
(XX$,IX(TR));"W"... .. 646,5......".";H(
YY$,20);" X";:.646,6:. I.1.S(TR):.
"X";:......." ";...G.. 646,C:..G.H.
.I.ET.1.35:.".";H(YY$,IY(I));H(XX$,IX(I)
);" ":.:..H.X.."..";TT$:.:.:DS.0:DI.0:DO
.0...B.." DISK DRIVE CONFIGURATION
":....L.." FILL IN THE BLANKS WITH DIS
K DRIVE"...Q.." NUMBERS IN THE RAN
GE 8-11"...V..:."..SINGLE DRIVE COPY:":.
:." DRIVE NUMBER:".S....:."..TWO D
RIVE COPY:":.:." INPUT DRIVE:".Q.
...:." OUTPUT DRIVE:"......".";H(Y
Y$,13);H(XX$,21);G(18);" ";......"..";H
(YY$,6);" ";.S...."..";H(YY$,2);" ";G(
146);.....YY%.13:. 8800:DS.AA:. DS..0 .
7082... .YY%.19:. 8800:DI.AA.*...YY%.21:
. 8800:DO.AA.E.... DS.0 . DI..DO . 7099.
T.... DS..0 . DI.0 . DO.0 . DI.DS:DO.DS:
. 7099..... 7000............"...";TT$:.
DO..DI . 7150.H.P.. 7900:."A DISKETTE U
SING ONLY"...Z.."THE DISKETTE DRIVE ";DI
;".":. 7170...... 7900:."FROM A DISKETTE
ON DRIVE";DI.A...."TO A DISKETTE ON DRI
VE ";DO;".".G....:."IS THAT WHAT YOU WAN
T (Y/N)?"...... 51024,29,8:AA.B(255):. A
A..89 . 1000...... 7400......... .. 8507
:. EX..0 . 7210...%.. 49920:. B(50113).0
. 2055...*.EX.0:. 7320...... 8507:. EX.
.0 . 7310.(.... 50432:. B(50113)..0 . 73
10.=.... RF . 2056,3050.G...EX.29.C....
7700:. G(146);:. 9000.V...."...";TT$:.:.
......"DO ";:. 7490:. AA..89 . 7489.....
. 8500......"...";TT$:.:....$.."ARE YOU
SURE ";:. 7490:. AA..89 . 7489...... 15,
DO,15:.15,"N0:CLONE,CC": 15.?.3.. 15,DO
,15:.15,A$,B$,C$,D$: 15:. E(A$).0 . 748
9.`.8..".";:. 7700:. G(146):. 1000.F.A..
...B.."YOU WANT TO INITIALIZE"...D.."THE
OUTPUT DISKETTE (Y/N)?"...F.. 198,0:. 5
1024,26,6:AA.B(255):. AA.92 . AA.169 . 1
000...K.......RR.18:. 646,10.3.... ".";G
(RR);H(YY$,8);.EX);"E-R-R-O-R";:.RR.18..
5100.T.(.RR.(RR.18)..146.(RR..18)..18..
.2.B$."":. I.1 . 60:. A$:B$.B$.A$:.:. B$
."" . 7710...W.. 646,C:.......:."THIS PR
OGRAM WILL COPY":......D1..(II.10):D2.II
.D1.10:. LL,D1.48:. LL.1,D2.48:..... XX%
.21:. 8300:. AA.32 . D1.0:. 8230.1.. . A
A.48 . AA.57 . 8200.>.. D1.AA.48.G.& XX%
.22:. 8300:. AA.32 . AA.D1:. 8260...0 .
AA.48 . AA.57 . 8230...: AA.10.D1.(AA.48
).C.D .".";H(YY$,YY%);H(XX$,XX%.1);" ..
";AA;.I.K ....L . 198,0:. 51024,XX%,YY%:
AA.B(255):. AA.92 . AA.169 . 1000...V ..
<.P ."...";TT$:.:."INSERT DISKETTE CONTA
INING".U.R ."ORIGINAL FILES ON DISK DRIV
E ";DI;".":DF.DI:. 8504...4!."...";TT$:.
:."INSERT DISKETTE TO CONTAIN".U.6!."COP
Y OF FILES ON DISK DRIVE ";DO;".":DF.DO.
..8!. 5100:.:. E3$:XX%.19:YY%.7:. 8300.&
.;!EX.0:. 50112,DF:. 50113,0:. 50114,111
.`.<!L.50176:. L,162:. L.1,237:. L.2,32:
. L.3,81:. L.4,195...=!. L.5,96:. 50176:
. B(50113)..0 . EX.255...G!.....!."...";
TT$:.:."DO YOU WANT TO START AT"....!."A
PARTICULAR TRACK/BLOCK (Y/N)?"....!T.1:
B.0:ET.35.. .!. 198,0:XX%.32:YY%.5:. 830
0.- .!. AA..89 . . 8699.U .!.".";H(YY$,7
);E1$;E2$;:YY%.7:. 8200.O .!. AA.1 . AA.
35 . 8630.X .!T.AA.. .!.".";H(YY$,9);E1$
;"BLOCK: ";:YY%.9:. 8200.F E!. AA.0
. AA.S(T) . 8640.O I!B.AA.Z J!YY%.11..!L
!.".";H(YY$,YY%);"ENTER ENDING ";E2$;:.
8200.&!O!. AA.T . AA.35 . 8650.0!T!ET.
AA.6!.!..V!`"XX%.21:. 8900:. AA.0 . 8899
.Z!T". AA.1 . XX%.22:. 8900:AA.10.AA..!~
". AA.8 . AA.11 . 8800..!C".".";H(YY$,YY
%);H(XX$,21);AA;" ";:...!D". 51024,XX%
,YY%:AA.B(255):. AA.92 . AA.169 . 9000..
"N"AA.AA.48:. AA.0 . AA.9 . AA.0.."X"..1
"(#. 186,R6:. 51712.X".'. 15,8,15,"I0":
15:."@0:CLONE1",8...
> CLICK IMAGE PREVIEW FOR FULL MODAL