COPIER
FILE INFORMATION
FILENAME(S): COPIER
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 18:05:26
APPEARS ON: 1 disk(s)
FILE HASH
cb9a5cea0c063ad4705be8b715754e16335abeac4208fddf735518c27f7eaf22
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 71 S 2 | COPIER | PRG | Xii | 13 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 C3 07 9E 32 30 36 31 00 00 00 78 A9 |.......2061...x.|
00000010: 34 85 01 A9 10 85 AE A9 EE 85 AF C6 2E CE 25 08 |4.............%.|
00000020: A0 00 B1 2D 99 00 00 88 D0 F8 A5 2E C9 07 D0 EB |...-............|
00000030: A2 61 9A BD 3D 08 48 CA 10 F9 9A 4C 00 01 A2 00 |.a..=.H....L....|
00000040: B1 AE E6 AE D0 02 E6 AF C9 FE F0 26 9D 01 08 E8 |...........&....|
00000050: D0 03 EE 10 01 A5 AE 05 AF D0 E5 A9 62 85 2D 85 |............b.-.|
00000060: AE A9 1B 85 2E 85 AF A9 37 85 01 58 20 59 A6 4C |........7..X Y.L|
00000070: AE A7 B1 AE E6 AE D0 02 E6 AF C9 00 D0 04 A9 FE |................|
00000080: D0 CA 85 FF B1 AE AC 10 01 8C 56 01 A4 FF C8 88 |..........V.....|
00000090: F0 B0 9D 01 08 E8 D0 F7 EE 10 01 EE 56 01 D0 EF |............V...|
000000A0: 09 08 0A 00 89 33 30 00 29 08 14 00 48 49 B2 B5 |.....30.)...HI..|
000000B0: 28 4E 55 AD 32 35 36 29 3A 4C 4F B2 4E 55 AB 48 |(NU.256):LO.NU.H|
000000C0: 49 AC 32 35 36 3A 8E 00 64 08 19 00 81 41 B2 31 |I.256:..d....A.1|
000000D0: A4 49 58 3A 99 22 FE 26 20 22 3A 82 3A 8E 00 83 |.IX:.".& ":.:...|
000000E0: 08 1E 00 8B 59 B2 30 A7 59 B2 31 3A 93 22 46 49 |....Y.0.Y.1:."FI|
000000F0: 4C 45 43 4F 50 59 2E 4F 22 2C 38 2C 31 00 B8 08 |LECOPY.O",8,1...|
00000100: 28 00 97 35 31 2C 2E 3A 97 35 36 2C 34 37 3A 9C |(..51,.:.56,47:.|
00000110: 3A 86 20 46 24 28 31 30 30 29 2C 54 24 28 31 30 |:. F$(100),T$(10|
00000120: 30 29 2C 45 41 28 31 30 30 29 2C 53 41 28 31 30 |0),EA(100),SA(10|
00000130: 30 29 00 DA 08 2D 00 44 44 25 B2 39 3A A0 32 3A |0)...-.DD%.9:.2:|
00000140: 9F 32 2C 39 2C 31 35 3A A0 32 3A 8B 53 54 A7 44 |.2,9,15:.2:.ST.D|
00000150: 44 25 B2 38 00 EB 08 2E 00 8B 44 44 25 B2 39 A7 |D%.8......DD%.9.|
00000160: 8D 32 30 30 30 00 11 09 32 00 52 42 B2 31 3A 8D |.2000...2.RB.1:.|
00000170: 35 32 30 3A 53 41 B2 31 32 32 38 38 3A 46 4C 24 |520:SA.12288:FL$|
00000180: B2 22 22 3A 46 B2 33 32 37 36 38 00 39 09 46 00 |."":F.32768.9.F.|
00000190: 41 B2 C2 28 46 29 3A 8B 41 B3 B1 30 A7 46 4C 24 |A..(F):.A..0.FL$|
000001A0: B2 46 4C 24 AA C7 28 41 29 3A 46 B2 46 AA 31 3A |.FL$..(A):F.F.1:|
000001B0: 89 37 30 00 56 09 50 00 8B C3 28 46 4C 24 29 B1 |.70.V.P...(FL$).|
000001C0: 31 36 A7 46 4C 24 B2 C8 28 46 4C 24 2C 31 36 29 |16.FL$..(FL$,16)|
000001D0: 00 76 09 5A 00 9F 32 2C 38 2C 32 2C 22 46 49 4C |.v.Z..2,8,2,"FIL|
000001E0: 45 53 20 4F 4E 20 53 49 44 45 20 22 AA 53 49 24 |ES ON SIDE ".SI$|
000001F0: 00 A9 09 64 00 84 32 2C 41 24 3A 49 B2 53 54 3A |...d..2,A$:I.ST:|
00000200: 84 32 2C 4E 46 24 3A 4E 46 B2 C5 28 4E 46 24 29 |.2,NF$:NF..(NF$)|
00000210: 3A 84 32 2C 4E 42 24 3A 4E 42 B2 C5 28 4E 42 24 |:.2,NB$:NB..(NB$|
00000220: 29 AA 31 00 C6 09 6E 00 81 58 B2 31 A4 4E 46 3A |).1...n..X.1.NF:|
00000230: 84 32 2C 46 24 28 58 29 2C 54 24 28 58 29 3A 82 |.2,F$(X),T$(X):.|
00000240: 00 F6 09 78 00 4E 46 B2 4E 46 AA 31 3A 46 24 28 |...x.NF.NF.1:F$(|
00000250: 4E 46 29 B2 22 4C 4F 41 44 53 54 41 52 20 52 45 |NF)."LOADSTAR RE|
00000260: 41 44 45 52 22 3A 54 24 28 4E 46 29 B2 22 50 22 |ADER":T$(NF)."P"|
00000270: 00 0B 0A 82 00 8B 41 24 B3 B1 46 4C 24 AF 49 B2 |......A$..FL$.I.|
00000280: 30 A7 31 30 30 00 1B 0A 8C 00 8B 41 24 B2 46 4C |0.100......A$.FL|
00000290: 24 A7 31 37 30 00 4F 0A 96 00 99 22 1C 45 52 52 |$.170.O....".ERR|
000002A0: 4F 52 2E 2E 2E 2E 46 49 4C 45 20 22 46 4C 24 22 |OR....FILE "FL$"|
000002B0: 20 4E 4F 54 20 46 4F 55 4E 44 20 49 4E 20 46 49 | NOT FOUND IN FI|
000002C0: 4C 45 21 22 3A A0 32 3A 90 00 66 0A AA 00 A0 32 |LE!":.2:..f....2|
000002D0: 3A 99 3A 99 3A 97 31 39 38 2C 2E 3A 44 31 B2 2E |:.:.:.198,.:D1..|
000002E0: 00 9B 0A E6 00 4E 55 B2 53 41 3A 8D 32 30 3A 44 |.....NU.SA:.20:D|
000002F0: 31 B2 44 31 AA 31 3A 44 B2 44 31 3A 97 32 35 32 |1.D1.1:D.D1:.252|
00000300: 2C 48 49 3A 97 32 35 31 2C 4C 4F 3A 53 41 28 44 |,HI:.251,LO:SA(D|
00000310: 31 29 B2 53 41 00 BE 0A F0 00 8D 36 37 30 3A 99 |1).SA......670:.|
00000320: 22 13 FE 05 11 9A 52 45 41 44 49 4E 47 3A 05 22 |".....READING:."|
00000330: 46 24 28 44 29 00 D9 0A FA 00 9F 31 2C 38 2C 32 |F$(D)......1,8,2|
00000340: 2C 46 24 28 44 29 3A 9E 31 32 30 34 33 3A A0 31 |,F$(D):.12043:.1|
00000350: 00 02 0B 04 01 45 41 28 44 31 29 B2 C2 28 38 33 |.....EA(D1)..(83|
00000360: 32 29 AA C2 28 38 33 33 29 AC 32 35 36 3A 53 41 |2)..(833).256:SA|
00000370: B2 45 41 28 44 31 29 AA 31 00 27 0B 0E 01 8B 20 |.EA(D1).1.'.... |
00000380: 28 45 41 28 44 31 29 B3 35 33 32 34 38 29 20 AF |(EA(D1).53248) .|
00000390: 20 28 44 31 B3 4E 46 29 20 A7 20 32 33 30 00 40 | (D1.NF) . 230.@|
000003A0: 0B 18 01 8B 20 45 41 28 44 31 29 B3 35 33 32 34 |.... EA(D1).5324|
000003B0: 38 20 A7 20 33 31 30 00 78 0B 22 01 44 31 B2 44 |8 . 310.x.".D1.D|
000003C0: 31 AB 31 3A 53 41 B2 31 32 32 38 38 3A 99 22 11 |1.1:SA.12288:.".|
000003D0: 11 96 FE 1B 20 22 00 96 0B 2C 01 99 22 FE 15 20 |.... "...,..".. |
000003E0: 22 00 A5 0B 36 01 8B 44 44 25 B2 39 A7 33 34 30 |"...6..DD%.9.340|
000003F0: 00 D7 0B 3B 01 99 22 11 11 FE 06 20 1E 49 4E 53 |...;..".... .INS|
00000400: 45 52 54 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 |ERT DESTINATION |
00000410: 44 49 53 4B 2E 2E 2E FE 05 20 22 00 09 0C 40 01 |DISK..... "...@.|
00000420: 99 22 20 20 20 20 50 52 45 53 53 20 53 50 41 43 |." PRESS SPAC|
00000430: 45 20 57 48 45 4E 20 52 45 41 44 59 20 54 4F 20 |E WHEN READY TO |
00000440: 43 4F 50 59 2E 22 3A 97 31 39 38 2C 2E 00 1E 0C |COPY.":.198,....|
00000450: 4A 01 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 33 |J..A$:.A$.." ".3|
00000460: 33 30 00 4C 0C 54 01 8B 52 42 A7 99 22 11 FE 06 |30.L.T..RB.."...|
00000470: 20 81 43 48 45 43 4B 49 4E 47 20 23 20 4F 46 20 | .CHECKING # OF |
00000480: 42 4C 4F 43 4B 53 20 46 52 45 45 22 00 5E 0C 5E |BLOCKS FREE".^.^|
00000490: 01 8B 52 42 A7 52 42 B2 2E 3A 8D 37 39 30 00 74 |..RB.RB..:.790.t|
000004A0: 0C 68 01 44 32 B2 44 32 AA 31 3A 44 B2 44 32 3A |.h.D2.D2.1:D.D2:|
000004B0: 8D 36 37 30 00 97 0C 72 01 99 22 13 FE 05 11 9A |.670...r..".....|
000004C0: 57 52 49 54 49 4E 47 3A 05 22 46 24 28 44 29 3A |WRITING:."F$(D):|
000004D0: 8D 36 34 30 00 A5 0C 7C 01 8B 28 4D 4D 29 A7 34 |.640...|..(MM).4|
000004E0: 32 30 00 C7 0C 86 01 4E 55 B2 45 41 28 44 32 29 |20.....NU.EA(D2)|
000004F0: 3A 8D 32 30 3A 97 38 33 32 2C 4C 4F 3A 97 38 33 |:.20:.832,LO:.83|
00000500: 33 2C 48 49 00 E9 0C 90 01 4E 55 B2 53 41 28 44 |3,HI.....NU.SA(D|
00000510: 32 29 3A 8D 32 30 3A 97 32 35 32 2C 48 49 3A 97 |2):.20:.252,HI:.|
00000520: 32 35 31 2C 4C 4F 00 15 0D 9A 01 9F 31 2C 44 44 |251,LO......1,DD|
00000530: 25 2C 32 2C 46 24 28 44 29 AA 22 2C 22 AA 54 24 |%,2,F$(D).",".T$|
00000540: 28 44 29 AA 22 2C 57 22 3A 9E 31 32 30 38 34 3A |(D).",W":.12084:|
00000550: A0 31 00 30 0D 9F 01 8D 20 35 30 30 30 3A 8B 20 |.1.0.... 5000:. |
00000560: 45 52 20 B1 20 31 20 A7 20 31 32 38 30 00 42 0D |ER . 1 . 1280.B.|
00000570: A4 01 8B 20 44 32 B3 44 31 20 A7 20 33 36 30 00 |... D2.D1 . 360.|
00000580: 51 0D AE 01 8B 44 44 25 B2 39 A7 34 36 30 00 73 |Q....DD%.9.460.s|
00000590: 0D B3 01 99 22 11 FE 06 20 1E 49 4E 53 45 52 54 |...."... .INSERT|
000005A0: 20 99 22 44 4E 24 22 1E 2E 2E 2E 22 00 A6 0D B8 | ."DN$"...."....|
000005B0: 01 99 22 20 50 52 45 53 53 20 53 50 41 43 45 20 |.." PRESS SPACE |
000005C0: 57 48 45 4E 20 52 45 41 44 59 20 54 4F 20 43 4F |WHEN READY TO CO|
000005D0: 4E 54 49 4E 55 45 2E 22 3A 97 31 39 38 2C 2E 00 |NTINUE.":.198,..|
000005E0: BB 0D C2 01 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 |.....A$:.A$.." "|
000005F0: A7 34 35 30 00 DA 0D CC 01 8D 36 30 30 3A 8B 28 |.450......600:.(|
00000600: 4D 4D 24 B3 B1 44 4E 24 29 A7 8D 37 31 30 3A 89 |MM$..DN$)..710:.|
00000610: 34 36 30 00 EE 0D D6 01 99 22 91 91 22 3B 3A 49 |460......"..";:I|
00000620: 58 B2 32 3A 8D 32 35 00 09 0E E0 01 99 22 91 91 |X.2:.25......"..|
00000630: 91 22 3B 3A 97 38 33 32 2C 2E 3A 97 38 33 33 2C |.";:.832,.:.833,|
00000640: 33 32 00 1B 0E EA 01 8B 20 44 31 B3 4E 46 20 A7 |32...... D1.NF .|
00000650: 20 32 33 30 00 2B 0E F4 01 8D 31 30 33 30 3A 89 | 230.+....1030:.|
00000660: 31 33 31 30 00 41 0E 08 02 97 35 33 32 38 30 2C |1310.A....53280,|
00000670: 30 3A 97 35 33 32 38 31 2C 30 00 7B 0E 12 02 99 |0:.53281,0.{....|
00000680: C7 28 31 34 32 29 22 93 08 1F D5 FE 25 C0 C9 22 |.(142)".....%.."|
00000690: 3B 00 AE 0E 1C 02 99 22 DD FE 06 20 1E 4C 4F 41 |;......"... .LOA|
000006A0: 44 53 54 41 52 20 50 52 4F 47 52 41 4D 20 43 4F |DSTAR PROGRAM CO|
000006B0: 50 49 45 52 FE 07 20 1F DD 22 3B 00 E1 0E 26 02 |PIER.. ..";...&.|
000006C0: 99 22 DD 20 20 20 9A 42 59 3A 20 20 4D 49 4B 45 |.". .BY: MIKE|
000006D0: 20 4D 41 59 4E 41 52 44 20 26 20 41 4C 41 4E 20 | MAYNARD & ALAN |
000006E0: 47 41 52 44 4E 45 52 20 20 20 1F DD 22 3B 00 12 |GARDNER ..";..|
000006F0: 0F 30 02 99 22 CA FE 25 C0 CB 22 3B 00 2F 0F 3A |.0.."..%..";./.:|
00000700: 02 81 41 B2 32 31 37 A4 32 34 32 3A 97 41 2C C2 |..A.217.242:.A,.|
00000710: 28 41 29 B0 31 32 38 3A 82 00 4D 0F 44 02 8D 36 |(A).128:..M.D..6|
00000720: 30 30 3A 53 49 24 B2 C9 28 44 4E 24 2C 31 29 3A |00:SI$..(DN$,1):|
00000730: 4D 4D 24 B2 44 4E 24 00 7D 0F 4E 02 99 22 11 11 |MM$.DN$.}.N.."..|
00000740: 11 20 1E 50 4C 45 41 53 45 20 57 41 49 54 20 46 |. .PLEASE WAIT F|
00000750: 49 56 45 20 4D 4F 52 45 20 53 45 43 4F 4E 44 53 |IVE MORE SECONDS|
00000760: 2E 2E 2E 20 22 3A 8E 00 9A 0F 58 02 9F 31 35 2C |... ":....X..15,|
00000770: 38 2C 31 35 2C 22 49 30 22 3A 9F 38 2C 38 2C 38 |8,15,"I0":.8,8,8|
00000780: 2C 22 23 22 00 B0 0F 62 02 98 31 35 2C 22 55 41 |,"#"...b..15,"UA|
00000790: 3A 38 20 30 20 31 38 20 30 22 00 C4 0F 6C 02 98 |:8 0 18 0"...l..|
000007A0: 31 35 2C 22 42 2D 50 3A 38 20 31 34 34 22 00 F4 |15,"B-P:8 144"..|
000007B0: 0F 76 02 44 4E 24 B2 22 22 3A 81 41 B2 31 A4 31 |.v.DN$."":.A.1.1|
000007C0: 36 3A A1 23 38 2C 41 24 3A 44 4E 24 B2 44 4E 24 |6:.#8,A$:DN$.DN$|
000007D0: AA 41 24 3A 82 3A A0 38 3A A0 31 35 3A 8E 00 24 |.A$:.:.8:.15:..$|
000007E0: 10 80 02 9F 31 35 2C 44 44 25 2C 31 35 2C 22 52 |....15,DD%,15,"R|
000007F0: 30 3A 22 AA 46 24 28 44 29 AA 22 3D 22 AA 46 24 |0:".F$(D)."=".F$|
00000800: 28 44 29 3A 84 31 35 2C 45 52 3A A0 31 35 00 39 |(D):.15,ER:.15.9|
00000810: 10 8A 02 4D 4D B2 2E 3A 8B 45 52 B2 36 33 A7 4D |...MM..:.ER.63.M|
00000820: 4D B2 31 00 3F 10 94 02 8E 00 57 10 9E 02 99 22 |M.1.?.....W...."|
00000830: 13 11 11 11 11 22 3B 3A 49 58 B2 32 30 3A 89 32 |.....";:IX.20:.2|
00000840: 35 00 6F 10 B2 02 99 22 FE 05 91 22 3B 3A 49 58 |5.o...."...";:IX|
00000850: B2 36 3A 8D 32 35 00 7F 10 BC 02 99 22 FE 04 91 |.6:.25......"...|
00000860: 22 3B 3A 8E 00 A6 10 C6 02 99 22 91 91 9F 20 22 |";:......."... "|
00000870: 4D 4D 24 22 9A 20 49 53 20 4E 4F 54 20 49 4E 20 |MM$". IS NOT IN |
00000880: 54 48 45 20 44 52 49 56 45 2E 22 00 D3 10 D0 02 |THE DRIVE.".....|
00000890: 99 22 FE 24 20 22 00 F8 10 DA 02 99 22 20 50 55 |.".$ "......" PU|
000008A0: 54 20 9F 22 4D 4D 24 22 20 9A 49 4E 20 54 48 45 |T ."MM$" .IN THE|
000008B0: 20 44 52 49 56 45 20 41 4E 44 22 00 29 11 E4 02 | DRIVE AND".)...|
000008C0: 99 22 FE 06 20 50 52 45 53 53 20 05 53 50 41 43 |.".. PRESS .SPAC|
000008D0: 45 20 9A 54 4F 20 54 52 59 20 41 47 41 49 4E 2E |E .TO TRY AGAIN.|
000008E0: 22 3A 97 31 39 38 2C 2E 00 3E 11 EE 02 A1 41 24 |":.198,..>....A$|
000008F0: 3A 8B 41 24 B3 B1 22 20 22 A7 37 35 30 00 5D 11 |:.A$.." ".750.].|
00000900: F8 02 99 22 91 91 91 91 22 3B 3A 49 58 B2 34 3A |..."....";:IX.4:|
00000910: 8D 32 35 3A 99 22 91 91 91 22 3A 8E 00 91 11 16 |.25:."...":.....|
00000920: 03 9F 31 35 2C 44 44 25 2C 31 35 2C 22 49 30 22 |..15,DD%,15,"I0"|
00000930: 3A 84 31 35 2C 45 52 3A A0 31 35 3A 8B 28 45 52 |:.15,ER:.15:.(ER|
00000940: B3 32 30 29 B0 28 45 52 B1 32 34 29 A7 38 31 30 |.20).(ER.24).810|
00000950: 00 D2 11 20 03 8D 36 37 30 3A 99 22 13 FE 05 11 |... ..670:."....|
00000960: 1C 20 54 48 45 20 44 49 53 4B 20 49 4E 20 54 48 |. THE DISK IN TH|
00000970: 45 20 44 52 49 56 45 20 49 53 4E 27 54 20 46 4F |E DRIVE ISN'T FO|
00000980: 52 4D 41 54 54 45 44 2E 22 3A 89 39 31 30 00 F3 |RMATTED.":.910..|
00000990: 11 2A 03 9F 31 35 2C 44 44 25 2C 31 35 2C 22 49 |.*..15,DD%,15,"I|
000009A0: 30 22 3A 9F 38 2C 44 44 25 2C 38 2C 22 23 22 00 |0":.8,DD%,8,"#".|
000009B0: 17 12 34 03 98 31 35 2C 22 55 41 3A 38 20 30 20 |..4..15,"UA:8 0 |
000009C0: 31 38 20 30 22 3A 98 31 35 2C 22 42 2D 50 3A 38 |18 0":.15,"B-P:8|
000009D0: 20 34 22 00 3A 12 3E 03 42 41 B2 2E 3A 81 41 B2 | 4".:.>.BA..:.A.|
000009E0: 31 A4 33 35 3A 8B 41 B2 31 38 A7 A1 23 38 2C 41 |1.35:.A.18..#8,A|
000009F0: 24 3A 89 38 35 30 00 56 12 48 03 A1 23 38 2C 41 |$:.850.V.H..#8,A|
00000A00: 24 3A 42 41 B2 42 41 AA C6 28 41 24 AA C7 28 2E |$:BA.BA..(A$..(.|
00000A10: 29 29 00 6A 12 52 03 81 42 B2 31 A4 33 3A A1 23 |)).j.R..B.1.3:.#|
00000A20: 38 2C 41 24 3A 82 00 80 12 5C 03 82 3A 8B 4E 42 |8,A$:....\..:.NB|
00000A30: B3 42 41 A7 A0 38 3A A0 31 35 3A 8E 00 8B 12 66 |.BA..8:.15:....f|
00000A40: 03 A0 38 3A A0 31 35 00 C4 12 70 03 8D 36 37 30 |..8:.15...p..670|
00000A50: 3A 99 22 1C 13 FE 05 11 54 48 45 52 45 27 53 20 |:.".....THERE'S |
00000A60: 4E 4F 54 20 45 4E 4F 55 47 48 20 52 4F 4F 4D 20 |NOT ENOUGH ROOM |
00000A70: 4F 4E 20 54 48 49 53 20 44 49 53 4B 22 00 E7 12 |ON THIS DISK"...|
00000A80: 7A 03 99 22 46 4F 52 20 96 22 46 24 28 44 29 22 |z.."FOR ."F$(D)"|
00000A90: 1C 20 41 4E 44 20 54 48 45 20 46 49 4C 45 53 22 |. AND THE FILES"|
00000AA0: 00 02 13 84 03 99 22 41 53 53 4F 43 49 41 54 45 |......"ASSOCIATE|
00000AB0: 44 20 57 49 54 48 20 49 54 2E 22 00 27 13 8E 03 |D WITH IT.".'...|
00000AC0: 99 22 11 11 9E FE 0C 20 59 4F 55 52 20 4F 50 54 |."..... YOUR OPT|
00000AD0: 49 4F 4E 53 3A 22 00 51 13 98 03 99 22 11 11 05 |IONS:".Q...."...|
00000AE0: 46 9A 4F 52 4D 41 54 20 41 20 44 49 53 4B 20 46 |F.ORMAT A DISK F|
00000AF0: 4F 52 20 54 48 49 53 20 50 52 4F 47 52 41 4D 22 |OR THIS PROGRAM"|
00000B00: 00 82 13 A2 03 99 22 05 54 9A 52 59 20 53 41 56 |......".T.RY SAV|
00000B10: 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D |ING THIS PROGRAM|
00000B20: 20 4F 4E 20 41 4E 4F 54 48 45 52 20 44 49 53 4B | ON ANOTHER DISK|
00000B30: 22 00 AA 13 AC 03 99 22 11 05 51 9A 55 49 54 20 |"......"..Q.UIT |
00000B40: 28 46 4F 52 47 45 54 20 41 42 4F 55 54 20 43 4F |(FORGET ABOUT CO|
00000B50: 50 59 49 4E 47 20 49 54 29 00 D1 13 B6 03 99 22 |PYING IT)......"|
00000B60: 11 50 52 45 53 53 20 05 46 9A 2C 20 05 54 9A 2C |.PRESS .F., .T.,|
00000B70: 20 4F 52 20 05 51 9A 2E 22 3A 97 31 39 38 2C 2E | OR .Q..":.198,.|
00000B80: 00 F5 13 C0 03 41 B2 C2 28 32 30 33 29 3A 8B 41 |.....A..(203):.A|
00000B90: B3 B1 32 31 AF 41 B3 B1 32 32 AF 41 B3 B1 36 32 |..21.A..22.A..62|
00000BA0: A7 39 36 30 00 0A 14 CA 03 8B 41 B2 36 32 A7 8D |.960......A.62..|
00000BB0: 31 32 35 30 3A 89 39 36 30 00 3F 14 D4 03 8B 41 |1250:.960.?....A|
00000BC0: B2 32 32 A7 99 22 11 FE 06 20 81 43 48 45 43 4B |.22.."... .CHECK|
00000BD0: 49 4E 47 20 23 20 4F 46 20 42 4C 4F 43 4B 53 20 |ING # OF BLOCKS |
00000BE0: 46 52 45 45 22 3A 89 37 39 30 00 6B 14 DE 03 99 |FREE":.790.k....|
00000BF0: 22 11 9A FE 04 20 50 55 54 20 44 49 53 4B 20 54 |".... PUT DISK T|
00000C00: 4F 20 46 4F 52 4D 41 54 20 49 4E 20 44 52 49 56 |O FORMAT IN DRIV|
00000C10: 45 20 30 22 00 A0 14 E8 03 99 22 20 20 20 20 50 |E 0"......" P|
00000C20: 52 45 53 53 20 05 53 50 41 43 45 9A 20 57 48 45 |RESS .SPACE. WHE|
00000C30: 4E 20 52 45 41 44 59 20 54 4F 20 46 4F 52 4D 41 |N READY TO FORMA|
00000C40: 54 22 3A 97 31 39 38 2C 2E 00 B6 14 F2 03 A1 41 |T":.198,.......A|
00000C50: 24 3A 8B 41 24 B3 B1 22 20 22 A7 31 30 31 30 00 |$:.A$.." ".1010.|
00000C60: E5 14 FC 03 9F 31 35 2C 44 44 25 2C 31 35 2C 22 |.....15,DD%,15,"|
00000C70: 4E 30 3A 4C 4F 41 44 53 54 41 52 20 50 52 4F 47 |N0:LOADSTAR PROG|
00000C80: 53 2C 4D 4D 22 3A A0 31 35 3A 89 37 39 30 00 1B |S,MM":.15:.790..|
00000C90: 15 06 04 8D 36 37 30 3A 99 22 13 FE 05 11 FE 08 |....670:."......|
00000CA0: 20 9A 2D 2D 20 05 46 49 4E 49 53 48 45 44 20 43 | .-- .FINISHED C|
00000CB0: 4F 50 59 49 4E 47 20 9A 2D 2D 22 00 4D 15 10 04 |OPYING .--".M...|
00000CC0: 99 22 11 11 9A 54 4F 20 4C 4F 41 44 20 54 48 49 |."...TO LOAD THI|
00000CD0: 53 20 50 52 4F 47 52 41 4D 20 46 52 4F 4D 20 42 |S PROGRAM FROM B|
00000CE0: 41 53 49 43 2C 20 45 4E 54 45 52 3A 22 00 70 15 |ASIC, ENTER:".p.|
00000CF0: 1A 04 99 22 11 11 05 4C 4F 41 44 20 22 C7 28 33 |..."...LOAD ".(3|
00000D00: 34 29 46 24 28 31 29 C7 28 33 34 29 22 2C 38 22 |4)F$(1).(34)",8"|
00000D10: 00 90 15 24 04 99 22 91 22 A3 33 30 29 22 9A 54 |...$..".".30)".T|
00000D20: 48 45 4E 2E 2E 2E 22 3A 99 22 11 05 52 55 4E 22 |HEN...":."..RUN"|
00000D30: 00 BC 15 2E 04 99 22 11 11 9A FE 05 20 50 4C 45 |......"..... PLE|
00000D40: 41 53 45 20 4D 41 4B 45 20 4E 4F 54 45 20 4F 46 |ASE MAKE NOTE OF|
00000D50: 20 54 48 49 53 2E 2E 2E 22 00 E4 15 38 04 99 22 | THIS..."...8.."|
00000D60: 11 FE 08 20 50 52 45 53 53 20 05 53 50 41 43 45 |... PRESS .SPACE|
00000D70: 20 9A 46 4F 52 20 4D 4F 52 45 22 00 F9 15 42 04 | .FOR MORE"...B.|
00000D80: 8B C2 28 32 30 33 29 B3 B1 36 30 A7 31 30 39 30 |..(203)..60.1090|
00000D90: 00 0C 16 4C 04 8D 36 37 30 3A 99 22 13 FE 04 11 |...L..670:."....|
00000DA0: 22 00 3B 16 56 04 99 22 9A 54 4F 20 52 45 41 44 |".;.V..".TO READ|
00000DB0: 20 41 42 4F 55 54 20 54 48 49 53 20 50 52 4F 47 | ABOUT THIS PROG|
00000DC0: 52 41 4D 20 46 52 4F 4D 20 42 41 53 49 43 2C 22 |RAM FROM BASIC,"|
00000DD0: 00 57 16 60 04 99 22 45 4E 54 45 52 20 54 48 45 |.W.`.."ENTER THE|
00000DE0: 20 46 4F 4C 4C 4F 57 49 4E 47 3A 22 00 93 16 6A | FOLLOWING:"...j|
00000DF0: 04 99 22 11 11 05 4C 4F 41 44 20 22 C7 28 33 34 |.."...LOAD ".(34|
00000E00: 29 22 4C 4F 41 44 53 54 41 52 20 52 45 41 44 45 |)"LOADSTAR READE|
00000E10: 52 22 C7 28 33 34 29 22 2C 38 2C 31 20 20 20 9A |R".(34)",8,1 .|
00000E20: 54 48 45 4E 2E 2E 2E 22 00 C2 16 74 04 99 22 05 |THEN..."...t..".|
00000E30: 11 4E 45 57 FE 19 20 9A 54 48 45 4E 2E 2E 2E 22 |.NEW.. .THEN..."|
00000E40: 00 E7 16 7E 04 99 22 05 11 53 59 53 20 36 37 39 |...~.."..SYS 679|
00000E50: 2C 22 C7 28 33 34 29 22 54 2E 22 46 24 28 31 29 |,".(34)"T."F$(1)|
00000E60: C7 28 33 34 29 00 18 17 88 04 99 22 11 9A 11 55 |.(34)......"...U|
00000E70: 53 45 20 05 50 9A 20 54 4F 20 50 41 55 53 45 2C |SE .P. TO PAUSE,|
00000E80: 20 05 43 9A 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | .C. TO CONTINUE|
00000E90: 2C 20 41 4E 44 22 00 2D 17 92 04 99 22 05 41 9A |, AND".-....".A.|
00000EA0: 20 54 4F 20 41 42 4F 52 54 2E 22 00 59 17 9C 04 | TO ABORT.".Y...|
00000EB0: 99 22 11 11 9A FE 05 20 50 4C 45 41 53 45 20 4D |."..... PLEASE M|
00000EC0: 41 4B 45 20 4E 4F 54 45 20 4F 46 20 54 48 49 53 |AKE NOTE OF THIS|
00000ED0: 2E 2E 2E 22 00 88 17 A6 04 99 22 11 20 20 20 50 |..."......". P|
00000EE0: 52 45 53 53 20 05 53 50 41 43 45 20 9A 54 4F 20 |RESS .SPACE .TO |
00000EF0: 52 45 54 55 52 4E 20 54 4F 20 4C 4F 41 44 53 54 |RETURN TO LOADST|
00000F00: 41 52 22 00 9D 17 B0 04 8B C2 28 32 30 33 29 B3 |AR".......(203).|
00000F10: B1 36 30 A7 31 32 30 30 00 A3 17 BA 04 8E 00 C0 |.60.1200........|
00000F20: 17 C4 04 9F 33 2C 38 2C 33 2C 22 46 49 4C 45 53 |....3,8,3,"FILES|
00000F30: 20 4F 4E 20 53 49 44 45 20 31 22 00 E1 17 CE 04 | ON SIDE 1".....|
00000F40: 81 49 B2 2E A4 31 3A A1 23 33 2C 41 24 3A 49 B2 |.I...1:.#3,A$:I.|
00000F50: 53 54 3A 99 41 24 3B 3A 82 3A A0 33 00 1B 18 E2 |ST:.A$;:.:.3....|
00000F60: 04 99 22 11 20 9A 41 52 45 20 59 4F 55 20 53 55 |..". .ARE YOU SU|
00000F70: 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 51 |RE YOU WANT TO Q|
00000F80: 55 49 54 3F 20 28 05 59 9A 2F 05 4E 9A 29 22 3A |UIT? (.Y./.N.)":|
00000F90: 97 31 39 38 2C 2E 00 3A 18 EC 04 41 B2 C2 28 32 |.198,..:...A..(2|
00000FA0: 30 33 29 3A 8B 41 B3 B1 32 35 AF 41 B3 B1 33 39 |03):.A..25.A..39|
00000FB0: A7 31 32 36 30 00 77 18 F6 04 8B 41 B2 33 39 A7 |.1260.w....A.39.|
00000FC0: 99 22 91 FE 24 20 22 3A 99 22 91 91 22 3B 3A 8E |."..$ ":."..";:.|
00000FD0: 00 9F 18 00 05 99 22 11 9A 50 4C 41 43 45 20 9F |......"..PLACE .|
00000FE0: 22 44 4E 24 22 20 9A 49 4E 20 54 48 45 20 44 52 |"DN$" .IN THE DR|
00000FF0: 49 56 45 20 41 4E 44 22 00 D1 18 0A 05 99 22 50 |IVE AND"......"P|
00001000: 52 45 53 53 20 05 53 50 41 43 45 20 9A 54 4F 20 |RESS .SPACE .TO |
00001010: 52 45 54 55 52 4E 20 54 4F 20 4C 4F 41 44 53 54 |RETURN TO LOADST|
00001020: 41 52 22 3A 97 31 39 38 2C 2E 00 EA 18 14 05 41 |AR":.198,......A|
00001030: B2 C2 28 32 30 33 29 3A 8B 41 B3 B1 36 30 A7 31 |..(203):.A..60.1|
00001040: 33 30 30 00 F4 18 1E 05 89 33 30 30 30 00 2A 19 |300......3000.*.|
00001050: D0 07 99 22 13 9E FE 05 11 20 20 20 49 53 20 44 |..."..... IS D|
00001060: 52 49 56 45 20 39 20 59 4F 55 52 20 44 45 53 54 |RIVE 9 YOUR DEST|
00001070: 49 4E 41 54 49 4F 4E 3F 20 20 28 59 2F 4E 29 22 |INATION? (Y/N)"|
00001080: 00 48 19 DA 07 A1 41 24 3A 8B 41 24 B3 B1 22 59 |.H....A$:.A$.."Y|
00001090: 22 AF 41 24 B3 B1 22 4E 22 A7 32 30 31 30 00 80 |".A$.."N".2010..|
000010A0: 19 E4 07 99 22 13 FE 05 11 FE 28 20 22 00 92 19 |....".....( "...|
000010B0: EE 07 8B 41 24 B2 22 4E 22 A7 44 44 25 B2 38 00 |...A$."N".DD%.8.|
000010C0: 98 19 F8 07 8E 00 CF 19 B8 0B 97 34 35 2C 31 33 |...........45,13|
000010D0: 35 3A 97 34 36 2C 32 37 3A 97 34 37 2C 31 34 32 |5:.46,27:.47,142|
000010E0: 3A 97 34 38 2C 32 37 3A 97 34 39 2C 31 34 32 3A |:.48,27:.49,142:|
000010F0: 97 35 30 2C 32 37 3A 97 35 31 2C 30 00 FF 19 C2 |.50,27:.51,0....|
00001100: 0B 97 35 32 2C 31 32 38 3A 97 35 33 2C 30 3A 97 |..52,128:.53,0:.|
00001110: 35 34 2C 30 3A 97 35 35 2C 30 3A 97 35 36 2C 31 |54,0:.55,0:.56,1|
00001120: 32 38 3A 9C 3A 89 20 36 30 30 30 30 00 1A 1A 88 |28:.:. 60000....|
00001130: 13 9F 20 31 35 2C 44 44 25 2C 31 35 3A 84 31 35 |.. 15,DD%,15:.15|
00001140: 2C 45 52 3A A0 31 35 00 2B 1A 7C 15 8B 20 45 52 |,ER:.15.+.|.. ER|
00001150: 20 B3 20 32 20 A7 20 8E 00 48 1A 70 17 97 20 32 | . 2 . ..H.p.. 2|
00001160: 31 34 2C 31 31 3A 97 20 32 31 31 2C 31 31 3A 9E |14,11:. 211,11:.|
00001170: 35 38 37 33 32 00 65 1A 7A 17 99 22 1C 45 52 52 |58732.e.z..".ERR|
00001180: 4F 52 20 44 55 52 49 4E 47 20 43 4F 50 59 20 22 |OR DURING COPY "|
00001190: 3A 8E 00 9E 1A 60 EA 9F 31 35 2C 38 2C 31 35 2C |:....`..15,8,15,|
000011A0: 22 52 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 |"R0:HELLO CONNEC|
000011B0: 54 3D 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 |T=HELLO CONNECT"|
000011C0: 3A 84 31 35 2C 45 52 3A A0 31 35 00 B4 1A 6A EA |:.15,ER:.15...j.|
000011D0: 8B 20 45 52 B3 B1 36 33 20 A7 20 99 22 93 22 3A |. ER..63 . .".":|
000011E0: 80 00 EB 1A 74 EA 41 24 B2 22 48 45 4C 4C 4F 20 |....t.A$."HELLO |
000011F0: 43 4F 4E 4E 45 43 54 22 3A 51 24 B2 C7 28 33 34 |CONNECT":Q$..(34|
00001200: 29 3A 97 35 33 32 38 31 2C 37 3A 97 35 33 32 38 |):.53281,7:.5328|
00001210: 30 2C 37 3A 99 22 93 22 00 06 1B 7E EA 99 22 9E |0,7:."."...~..".|
00001220: 13 11 11 11 4C 4F 41 44 22 51 24 41 24 51 24 22 |....LOAD"Q$A$Q$"|
00001230: 2C 38 22 00 2F 1B 88 EA 99 22 11 11 11 11 52 55 |,8"./...."....RU|
00001240: 4E 13 22 3A 97 36 33 31 2C 31 33 3A 97 36 33 32 |N.":.631,13:.632|
00001250: 2C 31 33 3A 97 31 39 38 2C 32 3A A2 00 4C 1B 48 |,13:.198,2:..L.H|
00001260: EE 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A 43 4F |..15,8,15,"S0:CO|
00001270: 50 49 45 52 22 3A A0 31 35 00 60 1B 52 EE 94 22 |PIER":.15.`.R.."|
00001280: 30 3A 43 4F 50 49 45 52 22 2C 38 3A 80 00 00 00 |0:COPIER",8:....|
....C..2061...X.4..........F.N%. ..-....
P...I.P..A..=.HJ...L........P...I..&....
P........P..B.-.........7..X Y.L......P.
..I.P...PJ........V...H.......P.....V.P.
.....30.)...HI..(NU.256):LO.NU.HI.256:..
D....A.1.IX:.".& ":.:.......Y.0.Y.1:."FI
LECOPY.O",8,1...(..51,.:.56,47:.:. F$(10
0),T$(100),EA(100),SA(100).Z.-.DD%.9: 2:
.2,9,15: 2:.ST.DD%.8......DD%.9..2000...
2.RB.1:.520:SA.12288:FL$."":F.32768.9.F.
A.B(F):.A..0.FL$.FL$.G(A):F.F.1:.70.V.P.
.C(FL$).16.FL$.H(FL$,16).V.Z..2,8,2,"FIL
ES ON SIDE ".SI$...D..2,A$:I.ST:.2,NF$:N
F.E(NF$):.2,NB$:NB.E(NB$).1.F.N..X.1.NF:
.2,F$(X),T$(X):....X.NF.NF.1:F$(NF)."LOA
DSTAR READER":T$(NF)."P"......A$..FL$.I.
0.100......A$.FL$.170.O....".ERROR....FI
LE "FL$" NOT FOUND IN FILE!": 2:..F... 2
:.:.:.198,.:D1.......NU.SA:.20:D1.D1.1:D
.D1:.252,HI:.251,LO:SA(D1).SA......670:.
".....READING:."F$(D).Y....1,8,2,F$(D):.
12043: 1.....EA(D1).B(832).B(833).256:SA
.EA(D1).1.'.... (EA(D1).53248) . (D1.NF)
. 230.@.... EA(D1).53248 . 310.X.".D1.D
1.1:SA.12288:."..... "...,..".. "...6..D
D%.9.340.W.;..".... .INSERT DESTINATION
DISK..... "...@.." PRESS SPACE WHEN R
EADY TO COPY.":.198,....J..A$:.A$.." ".3
30.L.T..RB.."... .CHECKING # OF BLOCKS F
REE".^.^..RB.RB..:.790.T.H.D2.D2.1:D.D2:
.670...R..".....WRITING:."F$(D):.640...|
..(MM).420.G...NU.EA(D2):.20:.832,LO:.83
3,HI.....NU.SA(D2):.20:.252,HI:.251,LO..
....1,DD%,2,F$(D).",".T$(D).",W":.12084:
1.0.... 5000:. ER . 1 . 1280.B.... D2.D
1 . 360.Q....DD%.9.460.S...."... .INSERT
."DN$"...."......" PRESS SPACE WHEN REA
DY TO CONTINUE.":.198,....B..A$:.A$.." "
.450.Z.L..600:.(MM$..DN$)..710:.460...V.
."..";:IX.2:.25......"...";:.832,.:.833,
32...... D1.NF . 230.+....1030:.1310.A..
..53280,0:.53281,0.{....G(142)"...U.%.I"
;......"... .LOADSTAR PROGRAM COPIER.. .
.";...&..". .BY: MIKE MAYNARD & ALAN
GARDNER ..";...0.."J.%.K";./.:..A.217.
242:.A,B(A).128:..M.D..600:SI$.I(DN$,1):
MM$.DN$.}.N.."... .PLEASE WAIT FIVE MORE
SECONDS... ":....X..15,8,15,"I0":.8,8,8
,"#"...B..15,"UA:8 0 18 0".D.L..15,"B-P:
8 144"...V.DN$."":.A.1.16:.#8,A$:DN$.DN$
.A$:.: 8: 15:..$....15,DD%,15,"R0:".F$(D
)."=".F$(D):.15,ER: 15.9...MM..:.ER.63.M
M.1.?.....W....".....";:IX.20:.25.O...."
...";:IX.6:.25....."...";:....F.."... "
MM$". IS NOT IN THE DRIVE.".S.P..".$ "..
.Z.." PUT ."MM$" .IN THE DRIVE AND".)...
.".. PRESS .SPACE .TO TRY AGAIN.":.198,.
.>....A$:.A$.." ".750.]...."....";:IX.4:
.25:."...":.......15,DD%,15,"I0":.15,ER:
15:.(ER.20).(ER.24).810.R. ..670:."....
. THE DISK IN THE DRIVE ISN'T FORMATTED.
":.910...*..15,DD%,15,"I0":.8,DD%,8,"#".
..4..15,"UA:8 0 18 0":.15,"B-P:8 4".:.>.
BA..:.A.1.35:.A.18..#8,A$:.850.V.H..#8,A
$:BA.BA.F(A$.G(.)).J.R..B.1.3:.#8,A$:...
.\..:.NB.BA. 8: 15:....F. 8: 15.D.P..670
:.".....THERE'S NOT ENOUGH ROOM ON THIS
DISK"...Z.."FOR ."F$(D)". AND THE FILES"
......"ASSOCIATED WITH IT.".'....".....
YOUR OPTIONS:".Q...."...F.ORMAT A DISK F
OR THIS PROGRAM"......".T.RY SAVING THIS
PROGRAM ON ANOTHER DISK"......"..Q.UIT
(FORGET ABOUT COPYING IT).Q....".PRESS .
F., .T., OR .Q..":.198,......A.B(203):.A
..21.A..22.A..62.960...J..A.62..1250:.96
0.?.T..A.22.."... .CHECKING # OF BLOCKS
FREE":.790.K....".... PUT DISK TO FORMAT
IN DRIVE 0". ...." PRESS .SPACE. WHE
N READY TO FORMAT":.198,.......A$:.A$.."
".1010......15,DD%,15,"N0:LOADSTAR PROG
S,MM": 15:.790......670:."...... .-- .FI
NISHED COPYING .--".M...."...TO LOAD THI
S PROGRAM FROM BASIC, ENTER:".P...."...L
OAD "G(34)F$(1)G(34)",8"...$..".".30)".T
HEN...":."..RUN"......"..... PLEASE MAKE
NOTE OF THIS..."...8.."... PRESS .SPACE
.FOR MORE"...B..B(203)..60.1090...L..67
0:."....".;.V..".TO READ ABOUT THIS PROG
RAM FROM BASIC,".W.`.."ENTER THE FOLLOWI
NG:"...J.."...LOAD "G(34)"LOADSTAR READE
R"G(34)",8,1 .THEN...".B.T.."..NEW.. .
THEN..."...~.."..SYS 679,"G(34)"T."F$(1)
G(34)......"...USE .P. TO PAUSE, .C. TO
CONTINUE, AND".-....".A. TO ABORT.".Y...
."..... PLEASE MAKE NOTE OF THIS..."....
..". PRESS .SPACE .TO RETURN TO LOADST
AR"......B(203)..60.1200.........D..3,8,
3,"FILES ON SIDE 1"...N..I...1:.#3,A$:I.
ST:.A$;:.: 3......". .ARE YOU SURE YOU W
ANT TO QUIT? (.Y./.N.)":.198,..:...A.B(2
03):.A..25.A..39.1260.W....A.39.."..$ ":
."..";:......."..PLACE ."DN$" .IN THE DR
IVE AND".Q...."PRESS .SPACE .TO RETURN T
O LOADSTAR":.198,......A.B(203):.A..60.1
300......3000.*.P.."..... IS DRIVE 9 Y
OUR DESTINATION? (Y/N)".H.Z..A$:.A$.."Y
".A$.."N".2010......".....( "......A$."N
".DD%.8.......O....45,135:.46,27:.47,142
:.48,27:.49,142:.50,27:.51,0...B..52,128
:.53,0:.54,0:.55,0:.56,128:.:. 60000....
.. 15,DD%,15:.15,ER: 15.+.|.. ER . 2 . .
.H.P.. 214,11:. 211,11:.58732.E.Z..".ERR
OR DURING COPY ":....`..15,8,15,"R0:HELL
O CONNECT=HELLO CONNECT":.15,ER: 15...J.
. ER..63 . .".":....T.A$."HELLO CONNECT"
:Q$.G(34):.53281,7:.53280,7:."."...~..".
....LOAD"Q$A$Q$",8"./...."....RUN.":.631
,13:.632,13:.198,2:..L.H..15,8,15,"S0:CO
PIER": 15.`.R.."0:COPIER",8:....
> CLICK IMAGE PREVIEW FOR FULL MODAL