_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

BUDDY

FILE INFORMATION

FILENAME(S): BUDDY

FILE TYPE(S): PRG

FILE SIZE: 2.5K

FIRST SEEN: 2025-10-19 22:35:28

APPEARS ON: 2 disk(s)

FILE HASH

df659172d182398aab14a775e76c4d4751b4cdde223aca466ee9500a0c914611

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FLOYD SADOOF BUDDY PRG Radd Maxx 19 6 DOWNLOAD FILE
FLOYD SADOOF BUDDY PRG Radd Maxx 22 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0D 08 00 00 8F 20  42 55 44 44 59 00 15 08  |....... BUDDY...|
00000010: 01 00 89 36 35 00 3D 08  02 00 97 32 2C C2 28 35  |...65.=....2,.(5|
00000020: 36 29 3A 97 35 36 2C C2  28 34 36 29 AA 31 30 3A  |6):.56,.(46).10:|
00000030: 9C 3A 46 B2 C2 28 35 36  29 3A 49 B2 31 00 5D 08  |.:F..(56):I.1.].|
00000040: 03 00 48 B2 49 3A 4E B2  32 35 35 3A 8B C2 28 32  |..H.I:N.255:..(2|
00000050: 29 B3 B1 31 36 30 A7 4E  B2 C2 28 32 29 00 82 08  |)..160.N..(2)...|
00000060: 04 00 4E B2 4E AB 46 AB  49 3A 44 B2 46 AC 32 35  |..N.N.F.I:D.F.25|
00000070: 36 3A 4D B2 38 32 38 3A  86 42 25 28 33 35 2C 32  |6:M.828:.B%(35,2|
00000080: 30 29 00 BA 08 05 00 99  22 93 11 22 4E 22 42 55  |0)......".."N"BU|
00000090: 46 46 45 52 53 20 41 56  41 49 4C 41 42 4C 45 11  |FFERS AVAILABLE.|
000000A0: 22 3A 9F 31 2C 38 2C 31  35 3A 44 24 B2 22 53 22  |":.1,8,15:D$."S"|
000000B0: 3A 8D 35 37 3A 46 24 B2  48 24 00 E6 08 06 00 8B  |:.57:F$.H$......|
000000C0: 41 24 AA 42 24 B3 B1 22  32 41 22 A7 99 22 12 43  |A$.B$.."2A"..".C|
000000D0: 41 4E 54 20 43 4F 50 59  20 44 4F 53 20 31 2E 30  |ANT COPY DOS 1.0|
000000E0: 92 22 3A 89 36 34 00 02  09 07 00 8D 34 34 3A 54  |.":.64......44:T|
000000F0: B2 4A 3A 53 B2 2E 3A 5A  B2 49 3A 56 B2 54 3A 51  |.J:S..:Z.I:V.T:Q|
00000100: B2 53 00 20 09 08 00 8D  33 31 3A 99 22 11 52 45  |.S. ....31:.".RE|
00000110: 41 44 49 4E 47 20 42 55  46 46 45 52 20 23 22 3B  |ADING BUFFER #";|
00000120: 00 41 09 09 00 8B 42 25  28 56 2C 51 29 B2 2E A7  |.A....B%(V,Q)...|
00000130: 8D 33 32 3A 5A B2 5A AA  49 3A 8B 5A B1 4E A7 31  |.32:Z.Z.I:.Z.N.1|
00000140: 32 00 5B 09 0A 00 51 B2  51 AA 49 3A 8B 51 B1 32  |2.[...Q.Q.I:.Q.2|
00000150: 30 A7 51 B2 2E 3A 56 B2  56 AA 49 00 67 09 0B 00  |0.Q..:V.V.I.g...|
00000160: 8B 56 B3 B2 4C A7 39 00  73 09 0C 00 99 22 11 22  |.V..L.9.s...."."|
00000170: 3A A0 33 00 8E 09 0D 00  44 24 B2 22 44 22 3A 8D  |:.3.....D$."D":.|
00000180: 35 37 3A 8B 48 24 B3 B1  43 24 A7 89 31 33 00 B8  |57:.H$..C$..13..|
00000190: 09 0E 00 8D 33 31 3A 99  22 11 57 52 49 54 49 4E  |....31:.".WRITIN|
000001A0: 47 20 42 55 46 46 45 52  20 23 22 3B 3A 5A B2 49  |G BUFFER #";:Z.I|
000001B0: 3A 56 B2 54 3A 51 B2 53  00 D9 09 0F 00 8B 42 25  |:V.T:Q.S......B%|
000001C0: 28 56 2C 51 29 B2 2E A7  8D 33 37 3A 5A B2 5A AA  |(V,Q)....37:Z.Z.|
000001D0: 49 3A 8B 5A B1 4E A7 31  38 00 F3 09 10 00 51 B2  |I:.Z.N.18.....Q.|
000001E0: 51 AA 49 3A 8B 51 B1 32  30 A7 51 B2 2E 3A 56 B2  |Q.I:.Q.20.Q..:V.|
000001F0: 56 AA 49 00 00 0A 11 00  8B 56 B3 B2 4C A7 31 35  |V.I......V..L.15|
00000200: 00 22 0A 12 00 99 22 11  22 3A A0 33 3A 53 B2 51  |."....".":.3:S.Q|
00000210: AA 49 3A 8B 53 B1 32 30  A7 53 B2 2E 3A 56 B2 56  |.I:.S.20.S..:V.V|
00000220: AA 49 00 32 0A 13 00 54  B2 56 3A 8B 54 B1 4C A7  |.I.2...T.V:.T.L.|
00000230: 32 32 00 4C 0A 14 00 44  24 B2 22 53 22 3A 8D 35  |22.L...D$."S":.5|
00000240: 37 3A 8B 48 24 B3 B1 46  24 A7 32 30 00 5F 0A 15  |7:.H$..F$.20._..|
00000250: 00 5A B2 49 3A 56 B2 54  3A 51 B2 53 3A 89 38 00  |.Z.I:V.T:Q.S:.8.|
00000260: 7B 0A 16 00 A0 31 3A 99  22 11 43 4F 50 59 49 4E  |{....1:.".COPYIN|
00000270: 47 20 44 4F 4E 45 22 3A  89 36 34 00 B7 0A 17 00  |G DONE":.64.....|
00000280: 85 22 11 48 41 53 20 4F  55 54 50 55 54 20 44 49  |.".HAS OUTPUT DI|
00000290: 53 4B 20 42 45 45 4E 20  46 4F 52 4D 41 54 54 45  |SK BEEN FORMATTE|
000002A0: 44 20 3F 20 4E 9D 9D 9D  22 3B 41 24 3A 8B 41 24  |D ? N...";A$:.A$|
000002B0: B2 22 59 22 A7 32 39 00  CF 0A 18 00 8B 41 24 B3  |."Y".29......A$.|
000002C0: B1 22 4E 22 A7 99 22 91  91 91 22 3A 89 32 33 00  |."N".."...":.23.|
000002D0: 07 0B 19 00 85 22 11 45  4E 54 45 52 20 44 49 53  |.....".ENTER DIS|
000002E0: 4B 20 4E 41 4D 45 3A 20  3F 20 20 9D 9D 9D 22 3B  |K NAME: ?  ...";|
000002F0: 41 24 3A 58 B2 C3 28 41  24 29 3A 8B 58 B3 49 B0  |A$:X..(A$):.X.I.|
00000300: 58 B1 31 36 A7 32 35 00  42 0B 1A 00 85 22 11 45  |X.16.25.B....".E|
00000310: 4E 54 45 52 20 55 4E 49  51 55 45 20 44 49 53 4B  |NTER UNIQUE DISK|
00000320: 2D 49 44 3A 20 3F 20 20  9D 9D 9D 22 3B 43 24 3A  |-ID: ?  ...";C$:|
00000330: 8B 43 24 B2 46 24 B0 C3  28 43 24 29 B3 B1 32 A7  |.C$.F$..(C$)..2.|
00000340: 32 36 00 63 0B 1B 00 98  31 2C 22 4E 30 3A 22 AA  |26.c....1,"N0:".|
00000350: 41 24 AA 22 2C 22 AA 43  24 3A 8D 35 36 3A 8B 45  |A$.",".C$:.56:.E|
00000360: A7 36 33 00 6D 0B 1C 00  48 B2 2E 3A 8E 00 86 0B  |.63.m...H..:....|
00000370: 1D 00 8D 36 31 3A 43 24  B2 48 24 3A 8B 43 24 B3  |...61:C$.H$:.C$.|
00000380: B1 46 24 A7 32 38 00 A9  0B 1E 00 99 3A 99 47 24  |.F$.28......:.G$|
00000390: 22 20 44 49 53 4B 2D 49  44 20 4E 4F 54 20 55 4E  |" DISK-ID NOT UN|
000003A0: 49 51 55 45 22 3A 89 32  35 00 C2 0B 1F 00 98 31  |IQUE":.25......1|
000003B0: 2C 22 49 30 22 3A 9F 33  2C 38 2C 33 2C 22 23 22  |,"I0":.3,8,3,"#"|
000003C0: 3A 8E 00 CA 0B 20 00 43  B2 2E 00 E9 0B 21 00 98  |:.... .C.....!..|
000003D0: 31 2C 22 55 31 22 3B 33  3B 30 3B 56 3B 51 3A 8D  |1,"U1";3;0;V;Q:.|
000003E0: 35 36 3A 8B A8 45 A7 33  35 00 FB 0B 22 00 43 B2  |56:..E.35...".C.|
000003F0: 43 AA 49 3A 8B 43 B3 33  89 33 33 00 28 0C 23 00  |C.I:.C.3.33.(.#.|
00000400: 98 31 2C 22 42 2D 50 22  3B 33 3B 30 3A 8D 34 32  |.1,"B-P";3;0:.42|
00000410: 3A 9E 4D 3A 8D 34 33 3A  57 B2 53 54 3A 8B 57 B2  |:.M:.43:W.ST:.W.|
00000420: 2E B0 57 B2 36 34 A7 8E  00 34 0C 24 00 8D 35 35  |..W.64...4.$..55|
00000430: 3A 89 36 33 00 58 0C 25  00 43 B2 2E 3A 98 31 2C  |:.63.X.%.C..:.1,|
00000440: 22 42 2D 41 22 3B 30 3B  56 3B 51 3A 98 31 2C 22  |"B-A";0;V;Q:.1,"|
00000450: 42 2D 50 22 3B 33 3B 30  00 7C 0C 26 00 8D 34 32  |B-P";3;0.|.&..42|
00000460: 3A 9E 4D AA 33 3A 8D 34  33 3A 57 B2 53 54 3A 8B  |:.M.3:.43:W.ST:.|
00000470: 57 B1 2E AF 57 B3 B1 36  34 A7 36 33 00 9A 0C 27  |W...W..64.63...'|
00000480: 00 98 31 2C 22 55 32 22  3B 33 3B 30 3B 56 3B 51  |..1,"U2";3;0;V;Q|
00000490: 3A 8D 35 36 3A 8B A8 45  A7 8E 00 AC 0C 28 00 43  |:.56:..E.....(.C|
000004A0: B2 43 AA 49 3A 8B 43 B3  33 A7 33 39 00 B4 0C 29  |.C.I:.C.3.39...)|
000004B0: 00 89 33 36 00 E4 0C 2A  00 99 C9 28 22 20 22 AA  |..36...*...(" ".|
000004C0: C4 28 5A 29 2C 33 29 22  9D 9D 9D 22 3B 3A 50 B2  |.(Z),3)"...";:P.|
000004D0: C2 28 33 29 3A 52 B2 C2  28 34 29 3A 97 34 2C 46  |.(3):R..(4):.4,F|
000004E0: AA 5A 3A 8E 00 F4 0C 2B  00 97 33 2C 50 3A 97 34  |.Z:....+..3,P:.4|
000004F0: 2C 52 3A 8E 00 1D 0D 2C  00 4A B2 49 3A 4C B2 2E  |,R:....,.J.I:L..|
00000500: 3A 55 B2 2E 3A 42 B2 34  3A 5A B2 2E 3A 56 B2 31  |:U..:B.4:Z..:V.1|
00000510: 38 3A 51 B2 2E 3A 8D 33  31 3A 8D 33 33 00 4D 0D  |8:Q..:.31:.33.M.|
00000520: 2D 00 53 B2 2E 3A 4B B2  B5 28 28 42 AB 34 29 AD  |-.S..:K..((B.4).|
00000530: 34 29 AA 49 3A 99 22 20  22 4B 22 91 22 3A 47 B2  |4).I:." "K".":G.|
00000540: 32 31 3A 8B 4B B1 31 37  A7 47 B2 31 39 00 5C 0D  |21:.K.17.G.19.\.|
00000550: 2E 00 8B 4B B1 32 34 A7  47 B2 31 38 00 6B 0D 2F  |...K.24.G.18.k./|
00000560: 00 8B 4B B1 33 30 A7 47  B2 31 37 00 9F 0D 30 00  |..K.30.G.17...0.|
00000570: 59 B2 47 AB C2 28 44 AA  42 29 3A 8B 59 B2 47 A7  |Y.G..(D.B):.Y.G.|
00000580: 3A 81 58 B2 2E A4 47 AB  49 3A 42 25 28 4B 2C 58  |:.X...G.I:B%(K,X|
00000590: 29 B2 2E 3A 82 3A 42 B2  42 AA 33 3A 89 35 30 00  |)..:.:B.B.3:.50.|
000005A0: D8 0D 31 00 42 B2 42 AA  49 3A 41 B2 C2 28 44 AA  |..1.B.B.I:A..(D.|
000005B0: 42 29 3A 81 58 B2 2E A4  37 3A 42 25 28 4B 2C 53  |B):.X...7:B%(K,S|
000005C0: 29 B2 32 AE 58 AF 41 3A  53 B2 53 AA 49 3A 8B 53  |).2.X.A:S.S.I:.S|
000005D0: B3 47 A7 82 3A 89 34 39  00 FD 0D 32 00 42 B2 42  |.G..:.49...2.B.B|
000005E0: AA 49 3A 8B 47 B3 32 31  A7 81 58 B2 47 A4 32 30  |.I:.G.21..X.G.20|
000005F0: 3A 42 25 28 4B 2C 58 29  B2 AB 49 3A 82 00 1A 0E  |:B%(K,X)..I:....|
00000600: 33 00 55 B2 55 AA 59 3A  8B 59 B2 2E AF 4A B2 4B  |3.U.U.Y:.Y...J.K|
00000610: A7 4A B2 4A AA 49 3A 89  35 33 00 25 0E 34 00 8B  |.J.J.I:.53.%.4..|
00000620: 59 A7 4C B2 4B 00 33 0E  35 00 8B 42 B3 31 34 33  |Y.L.K.3.5..B.143|
00000630: A7 34 35 00 5D 0E 36 00  A0 33 3A 99 22 11 46 49  |.45.].6..3:.".FI|
00000640: 52 53 54 20 54 52 41 43  4B 20 3D 22 4A 22 20 4C  |RST TRACK ="J" L|
00000650: 41 53 54 20 54 52 41 43  4B 20 3D 22 4C 00 79 0E  |AST TRACK ="L.y.|
00000660: 37 00 99 22 11 42 4C 4F  43 4B 53 20 54 4F 20 43  |7..".BLOCKS TO C|
00000670: 4F 50 59 3A 20 22 55 3A  8E 00 B1 0E 38 00 84 31  |OPY: "U:....8..1|
00000680: 2C 45 24 2C 4D 24 2C 54  24 2C 53 24 3A 45 B2 C5  |,E$,M$,T$,S$:E..|
00000690: 28 45 24 29 3A 45 24 B2  45 24 AA 22 20 22 AA 4D  |(E$):E$.E$." ".M|
000006A0: 24 AA 22 20 22 AA 54 24  AA 22 20 22 AA 53 24 3A  |$." ".T$." ".S$:|
000006B0: 8E 00 D5 0E 39 00 47 24  B2 22 53 4F 55 52 43 45  |....9.G$."SOURCE|
000006C0: 22 3A 8B 44 24 B2 22 44  22 A7 47 24 B2 22 4F 55  |":.D$."D".G$."OU|
000006D0: 54 50 55 54 22 00 FC 0E  3A 00 99 22 49 4E 53 45  |TPUT"...:.."INSE|
000006E0: 52 54 20 22 47 24 22 20  44 49 53 4B 2C 20 50 52  |RT "G$" DISK, PR|
000006F0: 45 53 53 20 12 53 50 41  43 45 92 22 00 10 0F 3B  |ESS .SPACE."...;|
00000700: 00 A1 41 24 3A 8B 41 24  B3 B1 22 20 22 A7 35 39  |..A$:.A$.." ".59|
00000710: 00 22 0F 3C 00 8B 48 AF  44 24 B2 22 44 22 A7 8D  |.".<..H.D$."D"..|
00000720: 32 33 00 3C 0F 3D 00 9F  32 2C 38 2C 30 2C 22 24  |23.<.=..2,8,0,"$|
00000730: 30 22 3A 8D 35 36 3A 8B  45 A7 36 33 00 70 0F 3E  |0":.56:.E.63.p.>|
00000740: 00 81 58 B2 49 A4 31 34  3A A1 23 32 2C 41 24 2C  |..X.I.14:.#2,A$,|
00000750: 42 24 3A 82 58 3A 48 24  B2 41 24 AA 42 24 3A A1  |B$:.X:H$.A$.B$:.|
00000760: 23 32 2C 41 24 2C 41 24  2C 42 24 3A A0 32 3A 8E  |#2,A$,A$,B$:.2:.|
00000770: 00 86 0F 3F 00 99 22 45  52 52 4F 52 3A 20 53 54  |...?.."ERROR: ST|
00000780: 3D 22 57 3B 45 24 00 97  0F 40 00 97 35 36 2C C2  |="W;E$...@..56,.|
00000790: 28 32 29 3A 9C 3A 80 00  A7 0F 41 00 8B C2 28 34  |(2):.:....A...(4|
000007A0: 36 29 B2 31 35 A7 32 00  CF 0F 42 00 99 22 93 11  |6).15.2...B.."..|
000007B0: 20 20 20 20 20 20 20 20  12 43 3D 36 34 20 4F 53  |        .C=64 OS|
000007C0: 49 31 20 44 49 53 4B 20  43 4F 50 49 45 52 22 00  |I1 DISK COPIER".|
000007D0: 0F 10 43 00 99 22 11 54  59 50 45 3A 20 20 47 4F  |..C..".TYPE:  GO|
000007E0: 54 4F 20 36 34 3A 20 20  49 46 20 50 52 4F 47 52  |TO 64:  IF PROGR|
000007F0: 41 4D 20 41 42 4F 52 54  53 20 20 2D 2D 20 20 54  |AM ABORTS  --  T|
00000800: 48 45 4E 20 54 59 50 45  3A 20 20 52 55 4E 22 00  |HEN TYPE:  RUN".|
00000810: 35 10 44 00 99 22 11 44  4F 4E 27 54 20 53 41 56  |5.D..".DON'T SAV|
00000820: 45 20 50 52 4F 47 52 41  4D 20 41 46 54 45 52 20  |E PROGRAM AFTER |
00000830: 52 55 4E 21 22 00 59 10  45 00 99 22 11 3C 3C 50  |RUN!".Y.E..".<<P|
00000840: 52 45 53 53 20 41 20 4B  45 59 20 54 4F 20 43 4F  |RESS A KEY TO CO|
00000850: 4E 54 49 4E 55 45 3E 3E  22 00 6B 10 46 00 A1 41  |NTINUE>>".k.F..A|
00000860: 24 3A 8B 41 24 B2 22 22  A7 37 30 00 84 10 47 00  |$:.A$."".70...G.|
00000870: 81 58 B2 38 32 38 A4 39  31 35 3A 87 4E 3A 97 58  |.X.828.915:.N:.X|
00000880: 2C 4E 3A 82 00 B0 10 48  00 97 34 35 2C 31 35 36  |,N:....H..45,156|
00000890: 3A 97 34 36 2C 31 35 3A  97 35 35 2C 30 3A 97 33  |:.46,15:.55,0:.3|
000008A0: 39 39 34 2C 30 3A 97 33  39 39 35 2C 30 3A 89 32  |994,0:.3995,0:.2|
000008B0: 00 F6 10 49 00 83 37 36  2C 36 36 2C 33 2C 37 36  |...I..76,66,3,76|
000008C0: 2C 39 37 2C 33 2C 31 36  32 2C 33 2C 33 32 2C 31  |,97,3,162,3,32,1|
000008D0: 39 38 2C 32 35 35 2C 31  36 30 2C 30 2C 31 33 32  |98,255,160,0,132|
000008E0: 2C 33 2C 33 32 2C 32 30  37 2C 32 35 35 2C 33 32  |,3,32,207,255,32|
000008F0: 2C 31 33 38 2C 33 00 20  11 4A 00 83 31 34 35 2C  |,138,3. .J..145,|
00000900: 33 2C 33 32 2C 31 32 38  2C 33 2C 31 36 35 2C 31  |3,32,128,3,165,1|
00000910: 34 34 2C 32 30 38 2C 33  2C 32 30 30 2C 32 30 38  |44,208,3,200,208|
00000920: 00 52 11 4B 00 83 32 33  38 2C 33 32 2C 32 30 34  |.R.K..238,32,204|
00000930: 2C 32 35 35 2C 39 36 2C  31 36 32 2C 33 2C 33 32  |,255,96,162,3,32|
00000940: 2C 32 30 31 2C 32 35 35  2C 31 36 30 2C 30 2C 31  |,201,255,160,0,1|
00000950: 33 32 00 74 11 4C 00 83  33 2C 33 32 2C 31 33 38  |32.t.L..3,32,138|
00000960: 2C 33 2C 31 37 37 2C 33  2C 33 32 2C 31 32 38 2C  |,3,177,3,32,128,|
00000970: 33 2C 33 32 00 A6 11 4D  00 83 32 31 30 2C 32 35  |3,32...M..210,25|
00000980: 35 2C 31 36 35 2C 31 34  34 2C 32 30 38 2C 33 2C  |5,165,144,208,3,|
00000990: 32 30 30 2C 32 30 38 2C  32 33 38 2C 33 32 2C 32  |200,208,238,32,2|
000009A0: 30 34 2C 32 35 35 00 EC  11 4E 00 83 39 36 2C 37  |04,255...N..96,7|
000009B0: 32 2C 31 36 35 2C 31 2C  39 2C 33 2C 31 33 33 2C  |2,165,1,9,3,133,|
000009C0: 31 2C 38 38 2C 31 30 34  2C 39 36 2C 37 32 2C 31  |1,88,104,96,72,1|
000009D0: 32 30 2C 31 36 35 2C 31  2C 34 31 2C 32 35 32 2C  |20,165,1,41,252,|
000009E0: 31 33 33 2C 31 2C 31 30  34 2C 39 36 00 F6 11 C8  |133,1,104,96....|
000009F0: 00 8F 20 44 44 54 00 00  00                       |.. DDT...       |
....... BUDDY......65.=....2,B(56):.56,B
(46).10:.:F.B(56):I.1.]...H.I:N.255:.B(2
)..160.N.B(2).....N.N.F.I:D.F.256:M.828:
.B%(35,20)......".."N"BUFFERS AVAILABLE.
":.1,8,15:D$."S":.57:F$.H$......A$.B$.."
2A"..".CANT COPY DOS 1.0.":.64......44:T
.J:S..:Z.I:V.T:Q.S. ....31:.".READING BU
FFER #";.A....B%(V,Q)....32:Z.Z.I:.Z.N.1
2.[...Q.Q.I:.Q.20.Q..:V.V.I.G....V..L.9.
S....".": 3.....D$."D":.57:.H$..C$..13..
....31:.".WRITING BUFFER #";:Z.I:V.T:Q.S
.Y....B%(V,Q)....37:Z.Z.I:.Z.N.18.....Q.
Q.I:.Q.20.Q..:V.V.I......V..L.15."....".
": 3:S.Q.I:.S.20.S..:V.V.I.2...T.V:.T.L.
22.L...D$."S":.57:.H$..F$.20._...Z.I:V.T
:Q.S:.8.{... 1:.".COPYING DONE":.64.....
.".HAS OUTPUT DISK BEEN FORMATTED ? N...
";A$:.A$."Y".29.O....A$.."N".."...":.23.
.....".ENTER DISK NAME: ?  ...";A$:X.C(A
$):.X.I.X.16.25.B....".ENTER UNIQUE DISK
-ID: ?  ...";C$:.C$.F$.C(C$)..2.26.C....
1,"N0:".A$.",".C$:.56:.E.63.M...H..:....
...61:C$.H$:.C$..F$.28......:.G$" DISK-I
D NOT UNIQUE":.25.B....1,"I0":.3,8,3,"#"
:..J. .C.....!..1,"U1";3;0;V;Q:.56:..E.3
5...".C.C.I:.C.3.33.(.#..1,"B-P";3;0:.42
:.M:.43:W.ST:.W...W.64...4.$..55:.63.X.%
.C..:.1,"B-A";0;V;Q:.1,"B-P";3;0.|.&..42
:.M.3:.43:W.ST:.W...W..64.63...'..1,"U2"
;3;0;V;Q:.56:..E.....(.C.C.I:.C.3.39...)
..36...*..I(" ".D(Z),3)"...";:P.B(3):R.B
(4):.4,F.Z:....+..3,P:.4,R:....,.J.I:L..
:U..:B.4:Z..:V.18:Q..:.31:.33.M.-.S..:K.
.((B.4).4).I:." "K".":G.21:.K.17.G.19.\.
...K.24.G.18.K./..K.30.G.17...0.Y.G.B(D.
B):.Y.G.:.X...G.I:B%(K,X)..:.:B.B.3:.50.
X.1.B.B.I:A.B(D.B):.X...7:B%(K,S).2.X.A:
S.S.I:.S.G..:.49...2.B.B.I:.G.21..X.G.20
:B%(K,X)..I:....3.U.U.Y:.Y...J.K.J.J.I:.
53.%.4..Y.L.K.3.5..B.143.45.].6. 3:.".FI
RST TRACK ="J" LAST TRACK ="L.Y.7..".BLO
CKS TO COPY: "U:....8..1,E$,M$,T$,S$:E.E
(E$):E$.E$." ".M$." ".T$." ".S$:..U.9.G$
."SOURCE":.D$."D".G$."OUTPUT"...:.."INSE
RT "G$" DISK, PRESS .SPACE."...;..A$:.A$
.." ".59.".<..H.D$."D"..23.<.=..2,8,0,"$
0":.56:.E.63.P.>..X.I.14:.#2,A$,B$:.X:H$
.A$.B$:.#2,A$,A$,B$: 2:....?.."ERROR: ST
="W;E$...@..56,B(2):.:....A..B(46).15.2.
O.B.."..        .C=64 OSI1 DISK COPIER".
..C..".TYPE:  GOTO 64:  IF PROGRAM ABORT
S  --  THEN TYPE:  RUN".5.D..".DON'T SAV
E PROGRAM AFTER RUN!".Y.E..".<<PRESS A K
EY TO CONTINUE>>".K.F..A$:.A$."".70...G.
.X.828.915:.N:.X,N:....H..45,156:.46,15:
.55,0:.3994,0:.3995,0:.2...I..76,66,3,76
,97,3,162,3,32,198,255,160,0,132,3,32,20
7,255,32,138,3. .J..145,3,32,128,3,165,1
44,208,3,200,208.R.K..238,32,204,255,96,
162,3,32,201,255,160,0,132.T.L..3,32,138
,3,177,3,32,128,3,32...M..210,255,165,14
4,208,3,200,208,238,32,204,255...N..96,7
2,165,1,9,3,133,1,88,104,96,72,120,165,1
,41,252,133,1,104,96...H.. DDT...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL