DUALDRIVE-COPY
FILE INFORMATION
FILENAME(S): DUALDRIVE-COPY
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-11-30 16:28:45
APPEARS ON: 1 disk(s)
FILE HASH
a84edc701f84ffe3ae3133e115b5d1fe4a80c583d76b092be3e1e5a9cf55bc7f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RED WOLFGANG 01 | DUALDRIVE-COPY | PRG | BrainSkull, Wolfgang Red | 27 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2B 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..+....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 32 08 0B 00 |***********.2...|
00000030: 8F 22 00 5C 08 0C 00 8F 22 20 C3 CF D0 D9 A0 D5 |.".\...." ......|
00000040: CE C9 D4 A0 D4 CF A0 D5 CE C9 D4 A0 D6 C5 D2 31 |...............1|
00000050: 2E 30 A0 C6 C5 C2 20 30 33 2F 38 33 00 63 08 0D |.0.... 03/83.c..|
00000060: 00 8F 22 00 87 08 0E 00 8F 22 20 D4 48 49 53 20 |.."......" .HIS |
00000070: 50 52 4F 47 52 41 4D 20 43 48 41 4E 47 45 53 20 |PROGRAM CHANGES |
00000080: 54 48 45 20 4F 4C 44 00 B1 08 0F 00 8F 22 20 44 |THE OLD......" D|
00000090: 45 56 49 43 45 20 4E 55 4D 42 45 52 20 54 4F 20 |EVICE NUMBER TO |
000000A0: 41 20 4E 45 57 20 4F 4E 45 20 54 48 41 54 20 49 |A NEW ONE THAT I|
000000B0: 53 00 DB 08 10 00 8F 22 20 47 49 56 45 4E 20 42 |S......" GIVEN B|
000000C0: 59 20 54 48 45 20 4F 50 45 52 41 54 4F 52 2E 20 |Y THE OPERATOR. |
000000D0: 20 D4 48 45 20 4E 55 4D 42 45 52 00 05 09 11 00 | .HE NUMBER.....|
000000E0: 8F 22 20 43 41 4E 20 52 41 4E 47 45 20 46 52 4F |." CAN RANGE FRO|
000000F0: 4D 20 38 20 54 4F 20 31 35 2E 20 20 D4 48 49 53 |M 8 TO 15. .HIS|
00000100: 20 49 53 20 41 00 2D 09 12 00 8F 22 20 53 4F 46 | IS A.-...." SOF|
00000110: 54 20 43 48 41 4E 47 45 3B 20 54 48 55 53 20 41 |T CHANGE; THUS A|
00000120: 20 52 45 53 45 54 20 4F 46 20 54 48 45 00 56 09 | RESET OF THE.V.|
00000130: 13 00 8F 22 20 48 41 52 44 57 41 52 45 20 57 49 |..." HARDWARE WI|
00000140: 4C 4C 20 43 41 55 53 45 20 49 54 20 54 4F 20 52 |LL CAUSE IT TO R|
00000150: 45 53 54 4F 52 45 00 7E 09 14 00 8F 22 20 54 4F |ESTORE.~...." TO|
00000160: 20 54 48 45 20 48 41 52 44 20 44 45 56 49 43 45 | THE HARD DEVICE|
00000170: 20 4E 55 4D 42 45 52 2E 20 20 D4 48 49 53 00 A4 | NUMBER. .HIS..|
00000180: 09 15 00 8F 22 20 55 54 49 4C 49 54 59 20 48 41 |...." UTILITY HA|
00000190: 53 20 42 45 45 4E 20 41 44 44 45 44 20 54 4F 20 |S BEEN ADDED TO |
000001A0: CA 49 4D 2D 00 CC 09 16 00 8F 22 20 C2 55 54 54 |.IM-......" .UTT|
000001B0: 45 52 46 49 45 4C 44 20 43 4F 50 59 2D 41 4C 4C |ERFIELD COPY-ALL|
000001C0: 20 50 52 4F 47 52 41 4D 2C 20 42 59 00 F3 09 17 | PROGRAM, BY....|
000001D0: 00 8F 22 20 CE 41 4E 47 20 D1 55 41 43 48 20 4F |.." .ANG .UACH O|
000001E0: 46 20 D0 48 2E 20 C4 2E 20 C1 53 53 4F 43 49 41 |F .H. .. .SSOCIA|
000001F0: 54 45 53 00 FF 09 18 00 8F 22 20 C9 4E 43 2E 00 |TES......" .NC..|
00000200: 06 0A 19 00 8F 22 00 2C 0A 1A 00 8F 22 20 D4 48 |.....".,...." .H|
00000210: 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 41 50 |IS PROGRAM IS AP|
00000220: 50 4C 49 43 41 42 4C 45 20 46 4F 52 00 50 0A 1B |PLICABLE FOR.P..|
00000230: 00 8F 22 20 41 4E 59 20 44 49 53 4B 20 44 52 49 |.." ANY DISK DRI|
00000240: 56 45 20 57 49 54 48 20 44 4F 53 20 32 2E 58 2E |VE WITH DOS 2.X.|
00000250: 00 57 0A 1C 00 8F 22 00 81 0A 1D 00 8F 2A 2A 2A |.W...."......***|
00000260: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000280: 2A 00 C5 0A 1E 00 97 35 39 34 36 38 2C 31 34 3A |*......59468,14:|
00000290: 99 22 13 13 0E 93 20 20 20 20 20 20 20 20 20 20 |.".... |
000002A0: 12 C3 CF D0 D9 A0 D5 CE C9 D4 A0 D4 CF A0 D5 CE |................|
000002B0: C9 D4 A0 D6 C5 D2 31 2E 30 A0 C6 C5 C2 A0 30 33 |......1.0.....03|
000002C0: 2F 38 33 11 22 00 12 0B 20 00 85 22 D7 48 41 54 |/83."... ..".HAT|
000002D0: 20 4D 4F 44 45 4C 53 20 4F 46 20 44 49 53 4B 20 | MODELS OF DISK |
000002E0: 44 52 49 56 45 20 41 52 45 20 59 4F 55 20 55 53 |DRIVE ARE YOU US|
000002F0: 49 4E 47 20 20 34 30 34 30 2C 38 32 35 30 9D 9D |ING 4040,8250..|
00000300: 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 44 31 24 2C 44 |.........";D1$,D|
00000310: 32 24 00 55 0B 22 00 99 22 C6 4F 52 20 57 48 49 |2$.U."..".OR WHI|
00000320: 43 48 20 4F 4E 45 20 44 4F 20 59 4F 55 20 57 41 |CH ONE DO YOU WA|
00000330: 4E 54 20 54 4F 20 43 48 41 4E 47 45 20 54 48 45 |NT TO CHANGE THE|
00000340: 20 44 45 56 49 43 45 20 4E 55 4D 42 45 52 20 20 | DEVICE NUMBER |
00000350: 22 44 32 24 3B 00 73 0B 24 00 81 49 B2 31 A4 C3 |"D2$;.s.$..I.1..|
00000360: 28 44 32 24 29 AA 32 3A 99 22 9D 22 3B 3A 82 3A |(D2$).2:.".";:.:|
00000370: 85 41 24 00 92 0B 26 00 8B 41 24 B3 B1 44 31 24 |.A$...&..A$..D1$|
00000380: AF 41 24 B3 B1 44 32 24 A7 99 22 91 22 3B 3A 89 |.A$..D2$..".";:.|
00000390: 33 34 00 B4 0B 28 00 99 22 11 0F 22 3B 3A 8B 41 |34...(.."..";:.A|
000003A0: 24 B2 44 31 24 A7 44 31 24 B2 44 32 24 3A 44 32 |$.D1$.D1$.D2$:D2|
000003B0: 24 B2 41 24 00 00 0C 2A 00 99 22 C9 4E 53 55 52 |$.A$...*..".NSUR|
000003C0: 45 20 54 48 41 54 20 59 4F 55 52 20 22 44 31 24 |E THAT YOUR "D1$|
000003D0: 22 20 49 53 20 54 55 52 4E 45 44 20 4F 46 46 20 |" IS TURNED OFF |
000003E0: 4F 52 20 41 4C 4C 20 4F 46 20 59 4F 55 52 20 44 |OR ALL OF YOUR D|
000003F0: 49 53 4B 20 44 52 49 56 45 53 20 54 48 41 54 22 |ISK DRIVES THAT"|
00000400: 00 47 0C 2C 00 99 22 48 41 56 45 20 54 48 45 20 |.G.,.."HAVE THE |
00000410: 53 41 4D 45 20 44 45 56 49 43 45 20 4E 55 4D 42 |SAME DEVICE NUMB|
00000420: 45 52 20 41 53 20 22 44 32 24 22 20 41 52 45 20 |ER AS "D2$" ARE |
00000430: 4F 46 46 20 41 4E 44 20 54 48 41 54 20 59 4F 55 |OFF AND THAT YOU|
00000440: 52 20 22 44 32 24 3B 00 78 0C 2E 00 99 22 20 49 |R "D2$;.x...." I|
00000450: 53 20 4F 4E 21 22 3A 99 A6 32 30 29 22 11 D0 52 |S ON!":..20)"..R|
00000460: 45 53 53 20 12 53 50 41 43 45 92 20 57 48 45 4E |ESS .SPACE. WHEN|
00000470: 20 52 45 41 44 59 2E 22 00 8E 0C 30 00 A1 41 24 | READY."...0..A$|
00000480: 3A 8B 41 24 B3 B1 C7 28 33 32 29 A7 34 38 00 B1 |:.A$...(32).48..|
00000490: 0C 32 00 85 22 93 CF 4C 44 20 44 45 56 49 43 45 |.2.."..LD DEVICE|
000004A0: 20 4E 55 4D 42 45 52 20 20 38 9D 9D 9D 22 3B 44 | NUMBER 8...";D|
000004B0: 4F 00 C7 0C 37 00 8B 44 4F B3 38 20 B0 20 44 4F |O...7..DO.8 . DO|
000004C0: B1 31 35 20 A7 35 30 00 E9 0C 3C 00 85 22 CE 45 |.15 .50...<..".E|
000004D0: 57 20 44 45 56 49 43 45 20 4E 55 4D 42 45 52 20 |W DEVICE NUMBER |
000004E0: 20 39 9D 9D 9D 22 3B 44 4E 00 FF 0C 41 00 8B 44 | 9...";DN...A..D|
000004F0: 4E B3 38 20 B0 20 44 4E B1 31 35 20 A7 36 30 00 |N.8 . DN.15 .60.|
00000500: 1F 0D 46 00 9F 31 35 2C 44 4F 2C 31 35 3A 8F 20 |..F..15,DO,15:. |
00000510: 43 4F 4D 4D 41 4E 44 20 43 48 41 4E 4E 45 4C 00 |COMMAND CHANNEL.|
00000520: 4B 0D 50 00 98 31 35 2C 22 4D 2D 57 22 C7 28 31 |K.P..15,"M-W".(1|
00000530: 32 29 C7 28 30 30 29 C7 28 32 29 C7 28 44 4E AA |2).(00).(2).(DN.|
00000540: 33 32 29 C7 28 44 4E AA 36 34 29 00 55 0D 5A 00 |32).(DN.64).U.Z.|
00000550: A0 31 35 3A 9C 00 8E 0D 6E 00 41 24 B2 22 21 4A |.15:....n.A$."!J|
00000560: 49 4D 20 42 55 54 54 45 52 46 49 45 4C 44 21 22 |IM BUTTERFIELD!"|
00000570: 3A 41 24 B2 41 24 AA 41 24 AA 41 24 3A 41 24 B2 |:A$.A$.A$.A$:A$.|
00000580: 41 24 AA 41 24 AA 41 24 AA 41 24 AA 41 24 00 98 |A$.A$.A$.A$.A$..|
00000590: 0D 78 00 50 24 B2 22 22 00 C4 0D 82 00 86 4C 32 |.x.P$.""......L2|
000005A0: 28 32 33 32 29 2C 4C 31 25 28 32 33 32 29 2C 4E |(232),L1%(232),N|
000005B0: 24 28 32 33 32 29 2C 54 25 28 32 33 32 29 2C 54 |$(232),T%(232),T|
000005C0: 24 28 34 29 00 DD 0D 8C 00 83 58 58 58 2C 53 45 |$(4)......XXX,SE|
000005D0: 51 2C 50 52 47 2C 55 53 52 2C 52 45 4C 00 F2 0D |Q,PRG,USR,REL...|
000005E0: 96 00 81 4A B2 30 A4 34 3A 87 54 24 28 4A 29 3A |...J.0.4:.T$(J):|
000005F0: 82 4A 00 0C 0E A0 00 85 22 11 C6 52 4F 4D 20 55 |.J......"..ROM U|
00000600: 4E 49 54 20 20 38 9D 9D 9D 22 3B 46 00 15 0E AA |NIT 8...";F....|
00000610: 00 8D 38 33 30 00 1F 0E B4 00 46 24 B2 44 24 00 |..830.....F$.D$.|
00000620: 36 0E BE 00 85 22 D4 4F 20 55 4E 49 54 20 20 39 |6....".O UNIT 9|
00000630: 9D 9D 9D 22 3B 54 00 3F 0E C8 00 8D 38 33 30 00 |...";T.?....830.|
00000640: 49 0E D2 00 54 24 B2 44 24 00 67 0E DC 00 8B 46 |I...T$.D$.g....F|
00000650: B2 54 20 AF 46 24 B2 54 24 A7 99 22 91 91 91 91 |.T .F$.T$.."....|
00000660: 22 3B 3A 89 31 36 30 00 72 0E E1 00 99 22 11 0F |";:.160.r...."..|
00000670: 22 3B 00 96 0E E6 00 4E B2 30 3A A0 31 3A A0 31 |";.....N.0:.1:.1|
00000680: 35 3A 9F 20 31 35 2C 46 2C 31 35 3A 98 31 35 2C |5:. 15,F,15:.15,|
00000690: 22 49 22 AA 46 24 00 AE 0E F0 00 8D 38 36 30 3A |"I".F$......860:|
000006A0: 8B 45 A7 8D 39 35 30 3A 90 3A 89 32 33 30 00 EE |.E..950:.:.230..|
000006B0: 0E FA 00 5A B2 39 30 3A 99 22 D0 41 54 54 45 52 |...Z.90:.".ATTER|
000006C0: 4E 20 28 2A 3D 41 4C 4C 2C 20 58 58 58 2C 20 53 |N (*=ALL, XXX, S|
000006D0: 45 51 2C 20 50 52 47 2C 20 55 53 52 2C 20 52 45 |EQ, PRG, USR, RE|
000006E0: 4C 29 20 20 2A 9D 9D 9D 22 3B 3A 85 50 24 00 16 |L) *...";:.P$..|
000006F0: 0F 04 01 50 24 B2 22 58 58 58 22 AA C8 28 50 24 |...P$."XXX"..(P$|
00000700: AA 22 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |."..............|
00000710: A0 22 2C 31 36 29 00 58 0F 0E 01 99 22 C8 4F 4C |.",16).X....".OL|
00000720: 44 20 44 4F 57 4E 20 27 59 27 20 4F 52 20 27 4E |D DOWN 'Y' OR 'N|
00000730: 27 20 4B 45 59 20 54 4F 20 53 45 4C 45 43 54 2C |' KEY TO SELECT,|
00000740: 20 4F 52 20 41 4C 53 4F 20 50 52 45 53 53 20 12 | OR ALSO PRESS .|
00000750: 52 45 54 55 52 4E 92 22 00 93 0F 18 01 99 22 46 |RETURN."......"F|
00000760: 4F 52 20 43 4F 4E 54 49 4E 55 4F 55 53 20 53 45 |OR CONTINUOUS SE|
00000770: 4C 45 43 54 2C 20 54 48 45 20 50 52 4F 47 52 41 |LECT, THE PROGRA|
00000780: 4D 53 20 54 4F 20 42 45 20 43 4F 50 49 45 44 2E |MS TO BE COPIED.|
00000790: 2E 2E 22 00 A6 0F 22 01 9F 20 31 2C 46 2C 33 2C |.."...".. 1,F,3,|
000007A0: 22 24 22 AA 46 24 00 BE 0F 2C 01 8D 38 36 30 3A |"$".F$...,..860:|
000007B0: 8B 45 A7 8D 39 35 30 3A 90 3A 89 32 33 30 00 C8 |.E..950:.:.230..|
000007C0: 0F 36 01 9E 34 36 31 35 00 D8 0F 40 01 52 B2 32 |.6..4615...@.R.2|
000007D0: 35 35 3A 89 20 33 34 30 00 E2 0F 4A 01 9E 34 37 |55:. 340...J..47|
000007E0: 30 34 00 06 10 54 01 81 4A B2 31 36 A4 32 A9 AB |04...T..J.16.2..|
000007F0: 31 3A 8B C6 28 CA 28 41 24 2C 4A AA 33 29 29 B2 |1:..(.(A$,J.3)).|
00000800: 31 36 30 A7 82 4A 00 17 10 5E 01 4E 24 B2 CA 28 |160..J...^.N$..(|
00000810: 41 24 2C 34 2C 4A 29 00 37 10 68 01 54 39 B2 C6 |A$,4,J).7.h.T9..|
00000820: 28 41 24 29 AB 31 32 38 3A 8B 54 39 B3 31 B0 54 |(A$).128:.T9.1.T|
00000830: 39 B1 34 89 34 37 30 00 4B 10 72 01 4C 31 25 B2 |9.4.470.K.r.L1%.|
00000840: C6 28 CA 28 41 24 2C 32 32 29 29 00 6E 10 7C 01 |.(.(A$,22)).n.|.|
00000850: 4C 32 B2 C6 28 CA 28 41 24 2C 32 39 29 29 AA C6 |L2..(.(A$,29))..|
00000860: 28 CA 28 41 24 2C 33 30 29 29 AC 32 35 36 00 89 |(.(A$,30)).256..|
00000870: 10 86 01 99 CA 28 41 24 2C 34 2C 31 36 29 3B 22 |.....(A$,4,16);"|
00000880: 20 22 3B 54 24 28 54 39 29 00 98 10 90 01 50 B2 | ";T$(T9).....P.|
00000890: C2 28 31 35 31 29 AF 52 00 B1 10 9A 01 A1 5A 24 |.(151).R......Z$|
000008A0: 3A 8B 5A 24 B2 22 22 AF 50 B3 32 35 35 89 34 35 |:.Z$."".P.255.45|
000008B0: 30 00 D7 10 A4 01 8B 5A 24 B2 22 59 22 B0 5A 24 |0......Z$."Y".Z$|
000008C0: B2 22 4E 22 A7 5A B2 C6 28 5A 24 29 3A 52 B2 32 |."N".Z..(Z$):R.2|
000008D0: 35 35 3A 89 34 35 30 00 EE 10 AE 01 8B 5A 24 B2 |55:.450......Z$.|
000008E0: C7 28 31 33 29 A7 52 B2 30 3A 89 34 35 30 00 F7 |.(13).R.0:.450..|
000008F0: 10 B8 01 89 34 31 30 00 21 11 C2 01 8B 5A B3 38 |....410.!....Z.8|
00000900: 30 A7 99 22 91 20 20 20 20 20 20 20 20 20 20 20 |0..". |
00000910: 20 20 20 20 20 20 20 20 20 20 91 22 3A 89 34 37 | .":.47|
00000920: 30 00 51 11 CC 01 4E B2 4E AA 31 3A 4C 32 28 4E |0.Q...N.N.1:L2(N|
00000930: 29 B2 4C 32 3A 4E 24 28 4E 29 B2 4E 24 3A 54 25 |).L2:N$(N).N$:T%|
00000940: 28 4E 29 B2 54 39 3A 4C 31 25 28 4E 29 B2 4C 31 |(N).T9:L1%(N).L1|
00000950: 25 00 65 11 D6 01 8B 53 54 B2 30 AF 4E B3 32 33 |%.e....ST.0.N.23|
00000960: 32 89 33 33 30 00 7E 11 E0 01 A0 31 3A A0 31 35 |2.330.~....1:.15|
00000970: 3A 99 22 20 2A 20 2A 20 2A 20 2A 20 2A 22 00 A0 |:." * * * * *"..|
00000980: 11 E5 01 8B 4E B2 30 A7 99 22 2A 20 CE 4F 20 50 |....N.0.."* .O P|
00000990: 52 4F 47 52 41 4D 53 20 2A 22 3A 89 20 38 30 30 |ROGRAMS *":. 800|
000009A0: 00 AB 11 EA 01 81 4A B2 31 A4 4E 00 CB 11 F4 01 |......J.1.N.....|
000009B0: 4C 32 B2 4C 32 28 4A 29 3A 54 25 B2 54 25 28 4A |L2.L2(J):T%.T%(J|
000009C0: 29 3A 8B 4C B1 4C 32 89 36 37 30 00 D8 11 FE 01 |):.L.L2.670.....|
000009D0: 8B 51 B2 30 89 35 35 30 00 F4 11 08 02 99 22 2A |.Q.0.550......"*|
000009E0: 2A 2A 20 CF 55 54 50 55 54 20 44 49 53 4B 20 46 |** .UTPUT DISK F|
000009F0: 55 4C 4C 22 00 14 12 12 02 85 22 C4 4F 20 59 4F |ULL"......".O YO|
00000A00: 55 20 48 41 56 45 20 41 20 4E 45 57 20 4F 4E 45 |U HAVE A NEW ONE|
00000A10: 22 3B 5A 24 00 2C 12 1C 02 8B C6 28 5A 24 29 B3 |";Z$.,.....(Z$).|
00000A20: B1 38 39 A7 99 22 13 13 93 22 3A 80 00 65 12 26 |.89.."...":..e.&|
00000A30: 02 A0 31 35 3A 9F 31 35 2C 54 2C 31 35 3A 85 22 |..15:.15,T,15:."|
00000A40: D7 41 4E 54 20 54 4F 20 4E 45 57 20 54 48 45 20 |.ANT TO NEW THE |
00000A50: 4F 55 54 50 55 54 20 44 49 53 4B 20 20 4E 9D 9D |OUTPUT DISK N..|
00000A60: 9D 22 3B 5A 24 00 78 12 30 02 8B C6 28 5A 24 29 |.";Z$.x.0...(Z$)|
00000A70: B3 B1 38 39 89 36 30 30 00 92 12 3A 02 85 22 C4 |..89.600...:..".|
00000A80: 49 53 4B 20 4E 41 4D 45 2C 49 44 22 3B 58 24 2C |ISK NAME,ID";X$,|
00000A90: 59 24 00 AF 12 44 02 98 31 35 2C 22 4E 22 AA 54 |Y$...D..15,"N".T|
00000AA0: 24 AA 22 3A 22 AA 58 24 AA 22 2C 22 AA 59 24 00 |$.":".X$.",".Y$.|
00000AB0: C7 12 4E 02 8D 38 36 30 3A 8B 45 A7 8D 39 35 30 |..N..860:.E..950|
00000AC0: 3A 90 3A 89 35 35 30 00 ED 12 58 02 98 31 35 2C |:.:.550...X..15,|
00000AD0: 22 49 22 AA 54 24 3A 9F 31 2C 54 2C 30 2C 22 24 |"I".T$:.1,T,0,"$|
00000AE0: 22 AA 54 24 AA 22 3A 21 23 24 25 26 22 00 05 13 |".T$.":!#$%&"...|
00000AF0: 62 02 8D 38 36 30 3A 8B 45 A7 8D 39 35 30 3A 90 |b..860:.E..950:.|
00000B00: 3A 89 35 35 30 00 19 13 6C 02 8D 38 39 30 3A 8D |:.550...l..890:.|
00000B10: 38 39 30 3A 51 B2 51 AA 31 00 30 13 76 02 A1 23 |890:Q.Q.1.0.v..#|
00000B20: 31 2C 58 24 3A 8B 58 24 B3 B1 22 22 89 36 33 30 |1,X$:.X$.."".630|
00000B30: 00 39 13 80 02 8D 38 39 30 00 5E 13 8A 02 4C B2 |.9....890.^...L.|
00000B40: 58 AA 59 AC 32 35 36 3A 99 22 28 22 3B 4C 3B 22 |X.Y.256:."(";L;"|
00000B50: 42 4C 4F 43 4B 53 20 46 52 45 45 20 29 22 00 6E |BLOCKS FREE )".n|
00000B60: 13 94 02 A0 31 3A A0 31 35 3A 89 35 30 30 00 84 |....1:.15:.500..|
00000B70: 13 9E 02 9F 31 34 2C 46 2C 31 35 3A 9F 31 35 2C |....14,F,15:.15,|
00000B80: 54 2C 31 35 00 AD 13 A8 02 99 C8 28 4E 24 28 4A |T,15.......(N$(J|
00000B90: 29 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |)." |
00000BA0: 20 20 20 20 20 20 20 22 2C 32 31 29 3B 00 D0 13 | ",21);...|
00000BB0: B2 02 9F 33 2C 46 2C 33 2C 46 24 AA 22 3A 22 AA |...3,F,3,F$.":".|
00000BC0: 4E 24 28 4A 29 AA 22 2C 22 AA 54 24 28 54 25 29 |N$(J).",".T$(T%)|
00000BD0: 00 FC 13 BC 02 84 31 34 2C 45 2C 45 24 2C 45 31 |......14,E,E$,E1|
00000BE0: 2C 45 32 3A 8D 38 37 30 3A 8B 45 A7 99 22 2A 2A |,E2:.870:.E.."**|
00000BF0: 20 22 3B 45 24 3B 45 3A 89 37 38 30 00 2F 14 C6 | ";E$;E:.780./..|
00000C00: 02 8B 54 25 B2 34 A7 9F 34 2C 54 2C 34 2C 54 24 |..T%.4..4,T,4,T$|
00000C10: AA 22 3A 22 AA 4E 24 28 4A 29 AA 22 2C 4C 2C 22 |.":".N$(J).",L,"|
00000C20: AA C7 28 4C 31 25 28 4A 29 29 3A 89 37 33 30 00 |..(L1%(J)):.730.|
00000C30: 57 14 D0 02 9F 34 2C 54 2C 34 2C 54 24 AA 22 3A |W....4,T,4,T$.":|
00000C40: 22 AA 4E 24 28 4A 29 AA 22 2C 22 AA 54 24 28 54 |".N$(J).",".T$(T|
00000C50: 25 29 AA 22 2C 57 22 00 7C 14 DA 02 4C B2 4C AB |%).",W".|...L.L.|
00000C60: 4C 32 3A 8D 38 36 30 3A 8B 45 A7 99 22 2A 2A 2A |L2:.860:.E.."***|
00000C70: 20 22 3B 45 24 3B 45 3A 89 37 38 30 00 91 14 E4 | ";E$;E:.780....|
00000C80: 02 8B 54 25 B2 34 A7 9E 33 34 33 38 3A 89 37 36 |..T%.4..3438:.76|
00000C90: 30 00 9B 14 EE 02 9E 34 39 30 32 00 C3 14 F8 02 |0......4902.....|
00000CA0: 4E 24 28 4A 29 B2 22 22 3A 8D 38 36 30 3A 8B 45 |N$(J)."":.860:.E|
00000CB0: A7 99 22 2A 2A 2A 2A 20 22 3B 45 24 3B 45 3A 89 |.."**** ";E$;E:.|
00000CC0: 37 38 30 00 CC 14 02 03 99 22 91 22 00 DE 14 0C |780......"."....|
00000CD0: 03 A0 34 3A A0 33 3A A0 31 35 3A A0 31 34 00 E5 |..4:.3:.15:.14..|
00000CE0: 14 16 03 82 4A 00 0F 15 20 03 58 B2 B8 28 30 29 |....J... .X..(0)|
00000CF0: 3A 85 22 C1 4E 4F 54 48 45 52 20 49 4E 50 55 54 |:.".NOTHER INPUT|
00000D00: 20 44 49 53 4B 20 52 45 41 44 59 22 3B 5A 24 00 | DISK READY";Z$.|
00000D10: 21 15 2A 03 8B C6 28 5A 24 29 B2 38 39 89 32 33 |!.*...(Z$).89.23|
00000D20: 30 00 2E 15 34 03 99 22 13 13 93 22 3A 80 00 43 |0...4.."...":..C|
00000D30: 15 3E 03 85 22 C4 52 49 56 45 20 20 30 9D 9D 9D |.>..".RIVE 0...|
00000D40: 22 3B 44 00 53 15 48 03 8B 44 AC 44 B3 B1 44 89 |";D.S.H..D.D..D.|
00000D50: 38 33 30 00 64 15 52 03 44 24 B2 C7 28 44 AA 34 |830.d.R.D$..(D.4|
00000D60: 38 29 3A 8E 00 77 15 5C 03 84 31 35 2C 45 2C 45 |8):..w.\..15,E,E|
00000D70: 24 2C 45 31 2C 45 32 00 97 15 66 03 8B 45 B2 30 |$,E1,E2...f..E.0|
00000D80: A7 45 B2 28 53 54 20 AF 20 31 39 31 29 3A 45 24 |.E.(ST . 191):E$|
00000D90: B2 22 2A 53 54 2A 22 00 9D 15 70 03 8E 00 A8 15 |."*ST*"...p.....|
00000DA0: 7A 03 A1 23 31 2C 58 24 00 B3 15 84 03 A1 23 31 |z..#1,X$......#1|
00000DB0: 2C 58 24 00 BE 15 8E 03 A1 23 31 2C 58 24 00 CF |,X$......#1,X$..|
00000DC0: 15 98 03 58 B2 C6 28 58 24 AA C7 28 30 29 29 00 |...X..(X$..(0)).|
00000DD0: E7 15 A2 03 A1 23 31 2C 58 24 3A 59 B2 C6 28 58 |.....#1,X$:Y..(X|
00000DE0: 24 AA C7 28 30 29 29 00 ED 15 AC 03 8E 00 05 16 |$..(0)).........|
00000DF0: B6 03 99 45 22 2C 22 45 24 22 2C 22 45 31 22 2C |...E","E$","E1",|
00000E00: 22 45 32 3A 8E 00 00 00 A0 0B B1 2A 85 BD 88 B1 |"E2:.......*....|
00000E10: 2A 85 BC 88 B1 2A 8D 46 03 A0 04 B1 2A 85 BB 88 |*....*.F....*...|
00000E20: B1 2A 85 BA A9 08 8D 44 03 20 70 12 A0 00 B1 BA |.*.....D. p.....|
00000E30: C9 40 90 13 C9 4F B0 0F A2 01 20 C6 FF A0 DE 20 |.@...O.... .... |
00000E40: E4 FF 88 D0 FA F0 DD B1 BA 10 16 A0 03 B1 BC C9 |................|
00000E50: 2A F0 0D C9 3F F0 04 D1 BA D0 06 C8 C0 13 D0 ED |*...?...........|
00000E60: 60 A0 00 98 91 BA A5 96 D0 F6 20 70 12 A0 00 F0 |`......... p....|
00000E70: D6 A9 20 CE 44 03 D0 07 A9 08 8D 44 03 A9 1E 8D |.. .D......D....|
00000E80: 45 03 A2 01 20 C6 FF A0 00 20 E4 FF 91 BA C8 CC |E... .... ......|
00000E90: 45 03 D0 F5 4C CC FF 18 78 F8 AD 42 03 69 01 8D |E...L...x..B.i..|
00000EA0: 42 03 AD 43 03 69 00 8D 43 03 D8 58 A2 01 BD 42 |B..C.i..C..X...B|
00000EB0: 03 48 4A 4A 4A 4A 09 30 20 D2 FF 68 29 0F 09 30 |.HJJJJ.0 ..h)..0|
00000EC0: 20 D2 FF CA 10 E8 A2 03 A9 9D 20 D2 FF CA 10 FA | ......... .....|
00000ED0: A2 03 20 C6 FF A0 00 A2 00 8E 45 03 20 E4 FF A6 |.. .......E. ...|
00000EE0: 96 F0 0B E0 40 F0 07 EC 45 03 D0 ED F0 0B 91 BA |....@...E.......|
00000EF0: C8 C0 FE F0 04 E0 00 F0 E0 8C 44 03 8E 45 03 20 |..........D..E. |
00000F00: CC FF A2 04 20 C9 FF A0 00 A2 00 B1 BA 8E 46 03 |.... .........F.|
00000F10: 20 D2 FF A6 96 F0 07 EC 46 03 D0 F1 F0 06 C8 CC | .......F.......|
00000F20: 44 03 D0 E7 4C CC FF A9 00 8D 42 03 8D 43 03 20 |D...L.....B..C. |
00000F30: 96 12 AD 45 03 05 96 F0 F6 60 A9 00 8D 40 03 8D |...E.....`...@..|
00000F40: 41 03 8D 42 03 8D 43 03 EE 40 03 D0 03 EE 41 03 |A..B..C..@....A.|
00000F50: A2 0E 20 C9 FF A9 50 20 D2 FF A9 03 20 D2 FF AD |.. ...P .... ...|
00000F60: 40 03 20 D2 FF AD 41 03 20 D2 FF A9 01 20 D2 FF |@. ...A. .... ..|
00000F70: 20 CC FF A2 0E 20 C6 FF 20 E4 FF AA 20 CC FF E0 | .... .. ... ...|
00000F80: 30 D0 07 20 96 12 A5 96 F0 BE 60 3B 00 41 1F 00 |0.. ......`;.A..|
00000F90: AE |. |
..+....*********************************
***.2....".\...." COPY UNIT TO UNIT VER1
.0 FEB 03/83.C...."......" THIS PROGRAM
CHANGES THE OLD......" DEVICE NUMBER TO
A NEW ONE THAT IS......" GIVEN BY THE OP
ERATOR. THE NUMBER......" CAN RANGE FRO
M 8 TO 15. THIS IS A.-...." SOFT CHANGE
; THUS A RESET OF THE.V...." HARDWARE WI
LL CAUSE IT TO RESTORE.~...." TO THE HAR
D DEVICE NUMBER. THIS......" UTILITY HA
S BEEN ADDED TO JIM-.L...." BUTTERFIELD
COPY-ALL PROGRAM, BY......" NANG QUACH O
F PH. D. ASSOCIATES......" INC.......".,
...." THIS PROGRAM IS APPLICABLE FOR.P..
.." ANY DISK DRIVE WITH DOS 2.X..W....".
.....***********************************
*.E....59468,14:.".... .COPY UN
IT TO UNIT VER1.0 FEB 03/83."... .."WHAT
MODELS OF DISK DRIVE ARE YOU USING 404
0,8250...........";D1$,D2$.U.".."FOR WHI
CH ONE DO YOU WANT TO CHANGE THE DEVICE
NUMBER "D2$;.S.$..I.1.C(D2$).2:.".";:.:
.A$...&..A$..D1$.A$..D2$..".";:.34...(..
"..";:.A$.D1$.D1$.D2$:D2$.A$...*.."INSUR
E THAT YOUR "D1$" IS TURNED OFF OR ALL O
F YOUR DISK DRIVES THAT".G.,.."HAVE THE
SAME DEVICE NUMBER AS "D2$" ARE OFF AND
THAT YOUR "D2$;.X...." IS ON!":..20)".PR
ESS .SPACE. WHEN READY."...0..A$:.A$..G(
32).48...2..".OLD DEVICE NUMBER 8...";D
O.G.7..DO.8 . DO.15 .50...<.."NEW DEVICE
NUMBER 9...";DN...A..DN.8 . DN.15 .60.
..F..15,DO,15:. COMMAND CHANNEL.K.P..15,
"M-W"G(12)G(00)G(2)G(DN.32)G(DN.64).U.Z.
15:....N.A$."!JIM BUTTERFIELD!":A$.A$.A
$.A$:A$.A$.A$.A$.A$.A$...X.P$."".D....L2
(232),L1%(232),N$(232),T%(232),T$(4)....
..XXX,SEQ,PRG,USR,REL......J.0.4:.T$(J):
.J... ..".FROM UNIT 8...";F......830...
..F$.D$.6...."TO UNIT 9...";T.?.H..830.
I.R.T$.D$.G....F.T .F$.T$.."....";:.160.
R...."..";.....N.0: 1: 15:. 15,F,15:.15,
"I".F$......860:.E..950:.:.230.....Z.90:
."PATTERN (*=ALL, XXX, SEQ, PRG, USR, RE
L) *...";:.P$.....P$."XXX".H(P$."
",16).X...."HOLD DOWN 'Y' OR 'N
' KEY TO SELECT, OR ALSO PRESS .RETURN."
......"FOR CONTINUOUS SELECT, THE PROGRA
MS TO BE COPIED..."...".. 1,F,3,"$".F$..
.,..860:.E..950:.:.230.H.6..4615.X.@.R.2
55:. 340...J..4704...T..J.16.2..1:.F(J(A
$,J.3)).160..J...^.N$.J(A$,4,J).7.H.T9.F
(A$).128:.T9.1.T9.4.470.K.R.L1%.F(J(A$,2
2)).N.|.L2.F(J(A$,29)).F(J(A$,30)).256..
....J(A$,4,16);" ";T$(T9).....P.B(151).R
......Z$:.Z$."".P.255.450.W....Z$."Y".Z$
."N".Z.F(Z$):R.255:.450......Z$.G(13).R.
0:.450......410.!.B..Z.80..".
.":.470.Q.L.N.N.1:L2(N).L2:N$(
N).N$:T%(N).T9:L1%(N).L1%.E.V..ST.0.N.23
2.330.~... 1: 15:." * * * * *". ....N.0.
."* NO PROGRAMS *":. 800......J.1.N.K...
L2.L2(J):T%.T%(J):.L.L2.670.X....Q.0.550
......"*** OUTPUT DISK FULL"......"DO YO
U HAVE A NEW ONE";Z$.,....F(Z$)..89.."..
.":..E.&. 15:.15,T,15:."WANT TO NEW THE
OUTPUT DISK N...";Z$.X.0..F(Z$)..89.600
...:.."DISK NAME,ID";X$,Y$...D..15,"N".T
$.":".X$.",".Y$.G.N..860:.E..950:.:.550.
..X..15,"I".T$:.1,T,0,"$".T$.":!#$%&"...
B..860:.E..950:.:.550...L..890:.890:Q.Q.
1.0.V..#1,X$:.X$.."".630.9....890.^...L.
X.Y.256:."(";L;"BLOCKS FREE )".N... 1: 1
5:.500......14,F,15:.15,T,15......H(N$(J
)." ",21);.P....3,F,3
,F$.":".N$(J).",".T$(T%)......14,E,E$,E1
,E2:.870:.E.."** ";E$;E:.780./.F..T%.4..
4,T,4,T$.":".N$(J).",L,".G(L1%(J)):.730.
W.P..4,T,4,T$.":".N$(J).",".T$(T%).",W".
|.Z.L.L.L2:.860:.E.."*** ";E$;E:.780....
..T%.4..3438:.760......4902.C...N$(J).""
:.860:.E.."**** ";E$;E:.780.L...."."....
. 4: 3: 15: 14......J... .X..(0):."ANOTH
ER INPUT DISK READY";Z$.!.*..F(Z$).89.23
0...4.."...":..C.>.."DRIVE 0...";D.S.H.
.D.D..D.830.D.R.D$.G(D.48):..W.\..15,E,E
$,E1,E2...F..E.0.E.(ST . 191):E$."*ST*".
..P.....Z..#1,X$......#1,X$......#1,X$.O
...X.F(X$.G(0))......#1,X$:Y.F(X$.G(0)).
...........E","E$","E1","E2:.... ..*....
*....*.F. ..*....*.....D. P. ...I@..IO..
.. F. . ...P....... ...I*..I?..Q.P.H..P.
` ......P. P. ..V. ND.P....D....E... F.
. ....HLE.P.LL..X..B.I..B..C.I..C.XX...B
.HJJJJ.0 R.H)..0 R.J...... R.J.... F. ..
..E. .......@...E.P.....H.........D..E.
L... I. ......F. R......F.P...HLD.P.LL..
..B..C. ...E.....`...@..A..B..C..@.P..A.
.. I..P R... R..@. R..A. R... R. L... F.
... L..0P. ......`;.A...
> CLICK IMAGE PREVIEW FOR FULL MODAL