COPIER
FILE INFORMATION
FILENAME(S): COPIER
FILE TYPE(S): PRG
FILE SIZE: 4.2K
FIRST SEEN: 2025-12-01 19:06:46
APPEARS ON: 2 disk(s)
FILE HASH
9388e7985bb94434b2cae2b5cfc915e89cbb67e19174e93ffb01bc8c396d4556
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LS 128 17 S 1 | COPIER | PRG | Icebreaker | 6 | 8 | DOWNLOAD FILE |
| LS 128 17 S 2 | COPIER | PRG | Icebreaker | 14 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 16 1C 05 00 FE 02 31 35 3A DE 9C 3A FE 25 |........15:..:.%|
00000010: 3A 99 22 0E 0B 22 00 52 1C 0A 00 53 50 24 B2 22 |:."..".R...SP$."|
00000020: 20 20 20 20 20 20 20 20 20 20 22 3A 81 49 B2 31 | ":.I.1|
00000030: A4 33 3A 53 50 24 B2 53 50 24 AA 53 50 24 3A 82 |.3:SP$.SP$.SP$:.|
00000040: 3A 53 50 24 B2 C8 28 53 50 24 2C 37 39 29 3A 89 |:SP$..(SP$,79):.|
00000050: 32 35 00 72 1C 0F 00 48 49 B2 B5 28 4E 55 AD 32 |25.r...HI..(NU.2|
00000060: 35 36 29 3A 4C 4F B2 4E 55 AB 48 49 AC 32 35 36 |56):LO.NU.HI.256|
00000070: 3A 8E 00 8E 1C 14 00 97 32 30 38 2C 2E 3A EB 3A |:.......208,.:.:|
00000080: A1 41 24 3A EC FC 41 24 B2 22 20 22 3A 8E 00 A1 |.A$:..A$." ":...|
00000090: 1C 19 00 FE 11 22 46 49 4C 45 43 4F 50 59 2E 4F |....."FILECOPY.O|
000000A0: 22 00 D8 1C 1E 00 97 34 36 32 36 2C 2E 3A 97 34 |"......4626,.:.4|
000000B0: 36 32 37 2C 36 34 3A 86 20 46 24 28 31 30 30 29 |627,64:. F$(100)|
000000C0: 2C 54 24 28 31 30 30 29 2C 45 41 28 31 30 30 29 |,T$(100),EA(100)|
000000D0: 2C 53 41 28 31 30 30 29 00 FD 1C 23 00 52 42 B2 |,SA(100)...#.RB.|
000000E0: 31 3A 8D 32 34 30 3A 53 41 B2 31 36 33 38 34 3A |1:.240:SA.16384:|
000000F0: 46 4C 24 B2 22 22 3A 46 B2 35 30 30 30 00 25 1D |FL$."":F.5000.%.|
00000100: 28 00 41 B2 C2 28 46 29 3A 8B 41 B3 B1 2E A7 46 |(.A..(F):.A....F|
00000110: 4C 24 B2 46 4C 24 AA C7 28 41 29 3A 46 B2 46 AA |L$.FL$..(A):F.F.|
00000120: 31 3A 89 34 30 00 42 1D 2D 00 8B C3 28 46 4C 24 |1:.40.B.-...(FL$|
00000130: 29 B1 31 36 A7 46 4C 24 B2 C8 28 46 4C 24 2C 31 |).16.FL$..(FL$,1|
00000140: 36 29 00 62 1D 32 00 9F 32 2C 38 2C 32 2C 22 46 |6).b.2..2,8,2,"F|
00000150: 49 4C 45 53 20 4F 4E 20 53 49 44 45 20 22 AA 53 |ILES ON SIDE ".S|
00000160: 49 24 00 95 1D 37 00 84 32 2C 41 24 3A 49 B2 53 |I$...7..2,A$:I.S|
00000170: 54 3A 84 32 2C 4E 46 24 3A 4E 46 B2 C5 28 4E 46 |T:.2,NF$:NF..(NF|
00000180: 24 29 3A 84 32 2C 4E 42 24 3A 4E 42 B2 C5 28 4E |$):.2,NB$:NB..(N|
00000190: 42 24 29 AA 31 00 B2 1D 3C 00 81 58 B2 31 A4 4E |B$).1...<..X.1.N|
000001A0: 46 3A 84 32 2C 46 24 28 58 29 2C 54 24 28 58 29 |F:.2,F$(X),T$(X)|
000001B0: 3A 82 00 02 1E 41 00 4E 46 B2 4E 46 AA 31 3A 46 |:....A.NF.NF.1:F|
000001C0: 24 28 4E 46 29 B2 22 51 55 49 43 4B 54 45 58 54 |$(NF)."QUICKTEXT|
000001D0: 2E 38 30 22 3A 54 24 28 4E 46 29 B2 22 50 22 3A |.80":T$(NF)."P":|
000001E0: 4E 46 B2 4E 46 AA 31 3A 46 24 28 4E 46 29 B2 22 |NF.NF.1:F$(NF)."|
000001F0: 51 54 38 30 2E 4F 22 3A 54 24 28 4E 46 29 B2 22 |QT80.O":T$(NF)."|
00000200: 50 22 00 16 1E 46 00 8B 41 24 B3 B1 46 4C 24 AF |P"...F..A$..FL$.|
00000210: 49 B2 30 A7 35 35 00 78 1E 4B 00 A0 32 3A 8B 41 |I.0.55.x.K..2:.A|
00000220: 24 B3 B1 46 4C 24 A7 99 22 11 05 C5 52 52 4F 52 |$..FL$.."...RROR|
00000230: 3A 20 50 52 4F 47 52 41 4D 20 22 46 4C 24 22 20 |: PROGRAM "FL$" |
00000240: 4E 4F 54 20 46 4F 55 4E 44 21 20 20 D4 52 59 20 |NOT FOUND! .RY |
00000250: 4F 54 48 45 52 20 53 49 44 45 20 2D 20 50 52 45 |OTHER SIDE - PRE|
00000260: 53 53 20 4B 45 59 22 3A DA 31 2C 32 30 30 30 2C |SS KEY":.1,2000,|
00000270: 35 3A A1 F9 41 24 3A 8A 00 A8 1E 50 00 99 A3 32 |5:..A$:....P...2|
00000280: 32 29 22 9F 11 11 11 D0 52 45 53 53 20 05 12 D3 |2)".....RESS ...|
00000290: D0 C1 C3 C5 92 20 9F 54 4F 20 53 54 41 52 54 20 |..... .TO START |
000002A0: 43 4F 50 59 49 4E 47 22 00 DD 1E 55 00 99 A3 32 |COPYING"...U...2|
000002B0: 39 29 22 11 05 12 D2 C5 D4 D5 D2 CE 92 20 9F 54 |9)".......... .T|
000002C0: 4F 20 52 45 54 55 52 4E 20 54 4F 20 CC CF C1 C4 |O RETURN TO ....|
000002D0: D3 D4 C1 D2 2E 22 3A 97 32 30 38 2C 2E 00 FF 1E |.....":.208,....|
000002E0: 5A 00 A1 41 24 3A 8B 41 24 B2 C7 28 31 33 29 A7 |Z..A$:.A$..(13).|
000002F0: 8D 35 35 30 3A 97 32 30 38 2C 2E 3A 89 39 30 00 |.550:.208,.:.90.|
00000300: 0F 1F 5F 00 8B 41 24 B3 B1 22 20 22 A7 39 30 00 |.._..A$.." ".90.|
00000310: 18 1F 64 00 44 31 B2 2E 00 4F 1F 69 00 4E 55 B2 |..d.D1...O.i.NU.|
00000320: 53 41 3A 8D 31 35 3A 44 31 B2 44 31 AA 31 3A 44 |SA:.15:D1.D1.1:D|
00000330: B2 44 31 3A 97 34 39 35 36 2C 48 49 3A 97 34 39 |.D1:.4956,HI:.49|
00000340: 36 30 2C 4C 4F 3A 53 41 28 44 31 29 B2 53 41 00 |60,LO:SA(D1).SA.|
00000350: 8E 1F 6E 00 8D 33 31 35 3A 99 22 13 11 11 11 11 |..n..315:.".....|
00000360: 11 11 22 3B 3A 54 42 24 B2 22 9F D2 45 41 44 49 |..";:TB$."..EADI|
00000370: 4E 47 3A 20 05 22 AA 46 24 28 44 29 3A 99 A3 34 |NG: .".F$(D):..4|
00000380: 31 AB C3 28 54 42 24 29 AD 32 29 54 42 24 00 AD |1..(TB$).2)TB$..|
00000390: 1F 73 00 FE 02 31 35 3A 9F 31 2C 38 2C 32 2C 46 |.s...15:.1,8,2,F|
000003A0: 24 28 44 29 3A 9E 34 38 36 34 3A A0 31 00 D6 1F |$(D):.4864:.1...|
000003B0: 78 00 45 41 28 44 31 29 B2 C2 28 32 35 33 29 AA |x.EA(D1)..(253).|
000003C0: C2 28 32 35 34 29 AC 32 35 36 3A 53 41 B2 45 41 |.(254).256:SA.EA|
000003D0: 28 44 31 29 AA 31 00 FB 1F 7D 00 8B 20 28 45 41 |(D1).1...}.. (EA|
000003E0: 28 44 31 29 B3 36 35 32 38 30 29 20 AF 20 28 44 |(D1).65280) . (D|
000003F0: 31 B3 4E 46 29 20 A7 20 31 30 35 00 14 20 82 00 |1.NF) . 105.. ..|
00000400: 8B 20 45 41 28 44 31 29 B3 36 35 32 38 30 20 A7 |. EA(D1).65280 .|
00000410: 20 31 34 35 00 44 20 87 00 44 31 B2 44 31 AB 31 | 145.D ..D1.D1.1|
00000420: 3A 53 41 B2 31 32 32 38 38 3A 99 A3 33 32 29 22 |:SA.12288:..32)"|
00000430: 11 11 96 C2 55 46 46 45 52 20 4F 56 45 52 46 4C |....UFFER OVERFL|
00000440: 4F 57 21 22 00 73 20 8C 00 54 42 24 B2 22 CD 55 |OW!".s ..TB$.".U|
00000450: 53 54 20 52 45 43 4F 50 59 20 22 AA 46 24 28 44 |ST RECOPY ".F$(D|
00000460: 29 3A 99 A3 34 30 AB C3 28 54 42 24 29 AD 32 29 |):..40..(TB$).2)|
00000470: 54 42 24 00 9C 20 91 00 99 A3 32 37 29 22 11 11 |TB$.. ....27)"..|
00000480: 9F C9 4E 53 45 52 54 20 44 45 53 54 49 4E 41 54 |..NSERT DESTINAT|
00000490: 49 4F 4E 20 44 49 53 4B 2E 2E 2E 22 00 CC 20 96 |ION DISK...".. .|
000004A0: 00 99 A3 32 35 29 22 D0 52 45 53 53 20 05 D3 D0 |...25)".RESS ...|
000004B0: C1 C3 C5 20 9F 57 48 45 4E 20 52 45 41 44 59 20 |... .WHEN READY |
000004C0: 54 4F 20 43 4F 50 59 22 3A 8D 32 30 00 FA 20 9B |TO COPY":.20.. .|
000004D0: 00 8B 52 42 A7 99 A3 32 36 29 22 11 9F C3 48 45 |..RB...26)"...HE|
000004E0: 43 4B 49 4E 47 20 23 20 4F 46 20 42 4C 4F 43 4B |CKING # OF BLOCK|
000004F0: 53 20 46 52 45 45 2E 2E 2E 22 00 0C 21 A0 00 8B |S FREE..."..!...|
00000500: 52 42 A7 52 42 B2 2E 3A 8D 33 35 35 00 22 21 A5 |RB.RB..:.355."!.|
00000510: 00 44 32 B2 44 32 AA 31 3A 44 B2 44 32 3A 8D 33 |.D2.D2.1:D.D2:.3|
00000520: 31 35 00 61 21 AA 00 99 22 13 11 11 11 11 11 11 |15.a!...".......|
00000530: 22 3B 3A 54 42 24 B2 22 9F D7 52 49 54 49 4E 47 |";:TB$."..RITING|
00000540: 3A 20 05 22 AA 46 24 28 44 29 3A 99 A3 34 31 AB |: .".F$(D):..41.|
00000550: C3 28 54 42 24 29 AD 32 29 54 42 24 3A 8D 33 30 |.(TB$).2)TB$:.30|
00000560: 30 00 6F 21 AF 00 8B 28 4D 4D 29 A7 31 39 35 00 |0.o!...(MM).195.|
00000570: 93 21 B4 00 4E 55 B2 53 41 28 44 32 29 3A 8D 31 |.!..NU.SA(D2):.1|
00000580: 35 3A 97 34 39 36 30 2C 4C 4F 3A 97 34 39 35 36 |5:.4960,LO:.4956|
00000590: 2C 48 49 00 B5 21 B9 00 4E 55 B2 45 41 28 44 32 |,HI..!..NU.EA(D2|
000005A0: 29 3A 8D 31 35 3A 97 32 35 33 2C 4C 4F 3A 97 32 |):.15:.253,LO:.2|
000005B0: 35 34 2C 48 49 00 DE 21 BE 00 9F 31 2C 38 2C 32 |54,HI..!...1,8,2|
000005C0: 2C 46 24 28 44 29 AA 22 2C 22 AA 54 24 28 44 29 |,F$(D).",".T$(D)|
000005D0: AA 22 2C 57 22 3A 9E 34 39 31 34 3A A0 31 00 ED |.",W":.4914:.1..|
000005E0: 21 C3 00 8B 44 32 B3 44 31 A7 31 36 35 00 1F 22 |!...D2.D1.165.."|
000005F0: C8 00 54 42 24 B2 22 11 97 C9 4E 53 45 52 54 20 |..TB$."...NSERT |
00000600: 9F 22 AA 44 4E 24 AA 22 97 2E 2E 2E 22 3A 99 A3 |.".DN$."....":..|
00000610: 34 32 AB C3 28 54 42 24 29 AD 32 29 54 42 24 00 |42..(TB$).2)TB$.|
00000620: 54 22 CD 00 99 A3 32 33 29 22 97 D0 52 45 53 53 |T"....23)"..RESS|
00000630: 20 9F D3 D0 C1 C3 C5 20 97 57 48 45 4E 20 52 45 | ...... .WHEN RE|
00000640: 41 44 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 |ADY TO CONTINUE"|
00000650: 3A 8D 32 30 00 73 22 D2 00 8D 32 37 35 3A 8B 28 |:.20.s"...275:.(|
00000660: 4D 4D 24 B3 B1 44 4E 24 29 A7 8D 33 32 35 3A 89 |MM$..DN$)..325:.|
00000670: 32 31 30 00 8C 22 D7 00 99 22 91 91 22 3B 3A 81 |210.."..."..";:.|
00000680: 41 B2 31 A4 32 3A 99 53 50 24 3A 82 00 A1 22 DC |A.1.2:.SP$:...".|
00000690: 00 99 22 91 91 91 22 3B 3A 53 41 B2 31 36 33 38 |.."...";:SA.1638|
000006A0: 34 00 B0 22 E1 00 8B 44 31 B3 4E 46 A7 31 30 35 |4.."...D1.NF.105|
000006B0: 00 B9 22 E6 00 8D 34 36 35 00 C2 22 EB 00 89 35 |.."...465.."...5|
000006C0: 37 35 00 FA 22 F0 00 99 22 93 22 A3 32 30 29 22 |75.."...".".20)"|
000006D0: 9A B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000006E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000006F0: C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 30 23 F5 00 99 |.........".0#...|
00000700: A3 32 30 29 22 DD 20 20 20 20 20 95 CC CF C1 C4 |.20)". .....|
00000710: D3 D4 C1 D2 20 31 32 38 20 20 D0 52 4F 47 52 41 |.... 128 .ROGRA|
00000720: 4D 20 C3 4F 50 49 45 52 20 20 20 20 20 9A DD 22 |M .OPIER .."|
00000730: 00 67 23 FF 00 99 A3 32 30 29 22 DD 20 20 20 20 |.g#....20)". |
00000740: 20 97 38 35 36 33 20 56 45 52 53 49 4F 4E 20 42 | .8563 VERSION B|
00000750: 59 20 20 9F CA 4F 4E 20 CD 41 54 54 53 4F 4E 20 |Y ..ON .ATTSON |
00000760: 20 20 20 20 9A DD 22 00 9B 23 04 01 99 A3 32 30 | .."..#....20|
00000770: 29 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |)"..............|
00000780: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000790: C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 00 AC 23 09 01 |.........."..#..|
000007A0: 8D 32 37 35 3A 4D 4D 24 B2 44 4E 24 00 E7 23 0E |.275:MM$.DN$..#.|
000007B0: 01 99 A3 32 31 29 22 11 11 11 97 D0 4C 45 41 53 |...21)".....LEAS|
000007C0: 45 20 57 41 49 54 20 2D 2D 20 52 45 41 44 49 4E |E WAIT -- READIN|
000007D0: 47 20 9F 46 49 4C 45 53 20 4F 4E 20 53 49 44 45 |G .FILES ON SIDE|
000007E0: 20 22 53 49 24 3A 8E 00 04 24 13 01 9F 31 35 2C | "SI$:...$...15,|
000007F0: 38 2C 31 35 2C 22 49 30 22 3A 9F 38 2C 38 2C 38 |8,15,"I0":.8,8,8|
00000800: 2C 22 23 22 00 1A 24 18 01 98 31 35 2C 22 55 41 |,"#"..$...15,"UA|
00000810: 3A 38 20 30 20 31 38 20 30 22 00 2E 24 1D 01 98 |:8 0 18 0"..$...|
00000820: 31 35 2C 22 42 2D 50 3A 38 20 31 34 34 22 00 55 |15,"B-P:8 144".U|
00000830: 24 22 01 44 4E 24 B2 22 22 3A 81 41 B2 31 A4 31 |$".DN$."":.A.1.1|
00000840: 36 3A A1 23 38 2C 41 24 3A 44 4E 24 B2 44 4E 24 |6:.#8,A$:DN$.DN$|
00000850: AA 41 24 3A 82 00 79 24 27 01 A1 23 38 2C 41 24 |.A$:..y$'..#8,A$|
00000860: 2C 41 24 2C 41 24 2C 41 24 3A A0 38 3A A0 31 35 |,A$,A$,A$:.8:.15|
00000870: 3A 53 49 24 B2 41 24 3A 8E 00 A0 24 2C 01 9F 31 |:SI$.A$:...$,..1|
00000880: 35 2C 38 2C 31 35 2C 22 52 30 3A 22 AA 46 24 28 |5,8,15,"R0:".F$(|
00000890: 44 29 AA 22 3D 22 AA 46 24 28 44 29 3A A0 31 35 |D)."=".F$(D):.15|
000008A0: 00 B5 24 31 01 4D 4D B2 2E 3A 8B 44 53 B2 36 33 |..$1.MM..:.DS.63|
000008B0: A7 4D 4D B2 31 00 BB 24 36 01 8E 00 DB 24 3B 01 |.MM.1..$6....$;.|
000008C0: FE 1A 30 2C 35 2C 37 39 2C 32 34 2C 31 3A FE 1A |..0,5,79,24,1:..|
000008D0: 30 2C 30 2C 37 39 2C 32 34 3A 8E 00 04 25 40 01 |0,0,79,24:...%@.|
000008E0: 99 22 91 91 91 91 91 91 22 3B 3A 81 41 B2 31 A4 |."......";:.A.1.|
000008F0: 36 3A 99 53 50 24 3A 82 3A 99 22 91 91 91 91 91 |6:.SP$:.:.".....|
00000900: 22 3B 3A 8E 00 16 25 45 01 99 22 91 91 22 53 50 |";:...%E..".."SP|
00000910: 24 3A 99 53 50 24 00 53 25 4A 01 54 42 24 B2 22 |$:.SP$.S%J.TB$."|
00000920: 91 91 9F 22 AA 4D 4D 24 AA 22 97 20 49 53 20 4E |...".MM$.". IS N|
00000930: 4F 54 20 49 4E 20 54 48 45 20 44 52 49 56 45 2E |OT IN THE DRIVE.|
00000940: 22 3A 99 A3 34 32 AB C3 28 54 42 24 29 AD 32 29 |":..42..(TB$).2)|
00000950: 54 42 24 00 90 25 4F 01 54 42 24 B2 22 11 97 D0 |TB$..%O.TB$."...|
00000960: 55 54 20 9F 22 AA 4D 4D 24 AA 22 20 97 49 4E 20 |UT .".MM$." .IN |
00000970: 54 48 45 20 44 52 49 56 45 20 41 4E 44 22 3A 99 |THE DRIVE AND":.|
00000980: A3 34 32 AB C3 28 54 42 24 29 AD 32 29 54 42 24 |.42..(TB$).2)TB$|
00000990: 00 BB 25 54 01 99 A3 32 38 29 22 97 50 52 45 53 |..%T...28)".PRES|
000009A0: 53 20 9F D3 D0 C1 C3 C5 20 97 54 4F 20 54 52 59 |S ...... .TO TRY|
000009B0: 20 41 47 41 49 4E 22 3A 8D 32 30 00 DF 25 59 01 | AGAIN":.20..%Y.|
000009C0: 99 22 91 91 91 91 22 3B 3A 81 41 B2 31 A4 34 3A |."....";:.A.1.4:|
000009D0: 99 53 50 24 3A 82 3A 99 22 91 91 91 22 3A 8E 00 |.SP$:.:."...":..|
000009E0: E5 25 5E 01 8F 00 10 26 63 01 9F 31 35 2C 38 2C |.%^....&c..15,8,|
000009F0: 31 35 2C 22 49 30 22 3A A0 31 35 3A 8B 28 44 53 |15,"I0":.15:.(DS|
00000A00: B3 32 30 29 B0 28 44 53 B1 32 34 29 A7 33 36 35 |.20).(DS.24).365|
00000A10: 00 56 26 68 01 8D 33 31 35 3A 99 22 13 11 11 11 |.V&h..315:."....|
00000A20: 11 11 11 22 A3 32 31 29 22 96 D4 48 45 20 44 49 |...".21)"..HE DI|
00000A30: 53 4B 20 49 4E 20 54 48 45 20 44 52 49 56 45 20 |SK IN THE DRIVE |
00000A40: 49 53 4E 27 54 20 46 4F 52 4D 41 54 54 45 44 2E |ISN'T FORMATTED.|
00000A50: 22 3A 89 34 31 30 00 73 26 6D 01 9F 31 35 2C 38 |":.410.s&m..15,8|
00000A60: 2C 31 35 2C 22 49 30 22 3A 9F 38 2C 38 2C 38 2C |,15,"I0":.8,8,8,|
00000A70: 22 23 22 00 97 26 72 01 98 31 35 2C 22 55 41 3A |"#"..&r..15,"UA:|
00000A80: 38 20 30 20 31 38 20 30 22 3A 98 31 35 2C 22 42 |8 0 18 0":.15,"B|
00000A90: 2D 50 3A 38 20 34 22 00 BA 26 77 01 42 41 B2 2E |-P:8 4"..&w.BA..|
00000AA0: 3A 81 41 B2 31 A4 33 35 3A 8B 41 B2 31 38 A7 A1 |:.A.1.35:.A.18..|
00000AB0: 23 38 2C 41 24 3A 89 33 38 35 00 D6 26 7C 01 A1 |#8,A$:.385..&|..|
00000AC0: 23 38 2C 41 24 3A 42 41 B2 42 41 AA C6 28 41 24 |#8,A$:BA.BA..(A$|
00000AD0: AA C7 28 2E 29 29 00 EA 26 81 01 81 42 B2 31 A4 |..(.))..&...B.1.|
00000AE0: 33 3A A1 23 38 2C 41 24 3A 82 00 00 27 86 01 82 |3:.#8,A$:...'...|
00000AF0: 3A 8B 4E 42 B3 42 41 A7 A0 38 3A A0 31 35 3A 8E |:.NB.BA..8:.15:.|
00000B00: 00 0B 27 8B 01 A0 38 3A A0 31 35 00 4E 27 90 01 |..'...8:.15.N'..|
00000B10: 8D 33 31 35 3A 99 22 13 11 11 11 11 11 11 22 A3 |.315:.".......".|
00000B20: 32 30 29 22 1C D4 48 45 52 45 27 53 20 4E 4F 54 |20)"..HERE'S NOT|
00000B30: 20 45 4E 4F 55 47 48 20 52 4F 4F 4D 20 4F 4E 20 | ENOUGH ROOM ON |
00000B40: 54 48 49 53 20 44 49 53 4B 20 46 4F 52 22 00 98 |THIS DISK FOR"..|
00000B50: 27 95 01 54 42 24 B2 22 96 22 AA 46 24 28 44 29 |'..TB$.".".F$(D)|
00000B60: AA 22 1C 20 41 4E 44 20 54 48 45 20 46 49 4C 45 |.". AND THE FILE|
00000B70: 53 20 41 53 53 4F 43 49 41 54 45 44 20 57 49 54 |S ASSOCIATED WIT|
00000B80: 48 20 49 54 2E 22 3A 99 A3 34 31 AB C3 28 54 42 |H IT.":..41..(TB|
00000B90: 24 29 AD 32 29 54 42 24 00 B7 27 9A 01 99 A3 33 |$).2)TB$..'....3|
00000BA0: 32 29 22 11 11 95 2D 20 D9 4F 55 52 20 4F 50 54 |2)"...- .OUR OPT|
00000BB0: 49 4F 4E 53 20 2D 22 00 E5 27 9F 01 99 A3 32 35 |IONS -"..'....25|
00000BC0: 29 22 11 11 05 C6 97 4F 52 4D 41 54 20 41 20 44 |)".....ORMAT A D|
00000BD0: 49 53 4B 20 46 4F 52 20 54 48 49 53 20 50 52 4F |ISK FOR THIS PRO|
00000BE0: 47 52 41 4D 22 00 1B 28 A4 01 99 A3 32 30 29 22 |GRAM"..(....20)"|
00000BF0: 11 05 D4 97 52 59 20 53 41 56 49 4E 47 20 54 48 |....RY SAVING TH|
00000C00: 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E |IS PROGRAM ON AN|
00000C10: 4F 54 48 45 52 20 44 49 53 4B 22 00 47 28 A9 01 |OTHER DISK".G(..|
00000C20: 99 A3 32 35 29 22 11 05 D1 97 55 49 54 20 28 46 |..25)"....UIT (F|
00000C30: 4F 52 47 45 54 20 41 42 4F 55 54 20 43 4F 50 59 |ORGET ABOUT COPY|
00000C40: 49 4E 47 20 49 54 29 00 52 28 AE 01 97 32 30 38 |ING IT).R(...208|
00000C50: 2C 2E 00 7B 28 B3 01 EB 3A A1 41 24 3A 41 B2 B5 |,..{(...:.A$:A..|
00000C60: 28 D4 28 22 C6 46 D4 54 D1 51 22 2C 41 24 29 AD |(.(".F.T.Q",A$).|
00000C70: 32 AA 2E 35 29 3A EC FC 41 B1 2E 00 8E 28 B8 01 |2..5):..A....(..|
00000C80: 8B 41 B2 33 A7 8D 35 35 30 3A 89 34 33 35 00 BF |.A.3..550:.435..|
00000C90: 28 BD 01 8B 41 B2 32 A7 99 A3 32 37 29 22 11 9F |(...A.2...27)"..|
00000CA0: C3 48 45 43 4B 49 4E 47 20 23 20 4F 46 20 42 4C |.HECKING # OF BL|
00000CB0: 4F 43 4B 53 20 46 52 45 45 22 3A 89 33 35 35 00 |OCKS FREE":.355.|
00000CC0: EA 28 C2 01 99 A3 32 35 29 22 11 97 D0 55 54 20 |.(....25)"...UT |
00000CD0: 44 49 53 4B 20 54 4F 20 46 4F 52 4D 41 54 20 49 |DISK TO FORMAT I|
00000CE0: 4E 20 44 52 49 56 45 20 38 22 00 1C 29 C7 01 99 |N DRIVE 8"..)...|
00000CF0: A3 32 34 29 22 D0 52 45 53 53 20 9F D3 D0 C1 C3 |.24)".RESS .....|
00000D00: C5 20 97 57 48 45 4E 20 52 45 41 44 59 20 54 4F |. .WHEN READY TO|
00000D10: 20 46 4F 52 4D 41 54 22 3A 8D 32 30 00 49 29 CC | FORMAT":.20.I).|
00000D20: 01 9F 31 35 2C 38 2C 31 35 2C 22 4E 30 3A 4C 4F |..15,8,15,"N0:LO|
00000D30: 41 44 53 54 41 52 20 50 52 4F 47 53 2C 4C 53 22 |ADSTAR PROGS,LS"|
00000D40: 3A A0 31 35 3A 89 33 35 35 00 7C 29 D1 01 8D 33 |:.15:.355.|)...3|
00000D50: 31 35 3A 99 22 13 11 11 11 11 11 11 22 A3 32 39 |15:.".......".29|
00000D60: 29 22 9F 2D 2D 20 05 C6 49 4E 49 53 48 45 44 20 |)".-- ..INISHED |
00000D70: 43 4F 50 59 49 4E 47 20 9F 2D 2D 22 00 B5 29 D6 |COPYING .--"..).|
00000D80: 01 99 A3 32 30 29 22 11 11 9F D4 4F 20 4C 4F 41 |...20)"....O LOA|
00000D90: 44 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 46 |D THIS PROGRAM F|
00000DA0: 52 4F 4D 20 C2 C1 D3 C9 C3 2C 20 45 4E 54 45 52 |ROM ....., ENTER|
00000DB0: 3A 11 11 05 22 00 EA 29 DB 01 54 42 24 B2 22 44 |:..."..)..TB$."D|
00000DC0: 4C 4F 41 44 20 22 AA C7 28 33 34 29 AA 46 24 28 |LOAD "..(34).F$(|
00000DD0: 31 29 AA C7 28 33 34 29 3A 99 A3 34 30 AB C3 28 |1)..(34):..40..(|
00000DE0: 54 42 24 29 AD 32 29 54 42 24 00 15 2A E5 01 99 |TB$).2)TB$..*...|
00000DF0: A3 32 36 29 22 11 11 9F D0 4C 45 41 53 45 20 4D |.26)"....LEASE M|
00000E00: 41 4B 45 20 4E 4F 54 45 20 4F 46 20 54 48 49 53 |AKE NOTE OF THIS|
00000E10: 2E 2E 2E 2E 22 00 3C 2A EA 01 99 A3 33 30 29 22 |....".<*....30)"|
00000E20: 11 D0 52 45 53 53 20 05 D3 D0 C1 C3 C5 20 9F 46 |..RESS ...... .F|
00000E30: 4F 52 20 4D 4F 52 45 22 3A 8D 32 30 00 4F 2A EF |OR MORE":.20.O*.|
00000E40: 01 8D 33 31 35 3A 99 22 13 11 11 11 11 11 22 00 |..315:."......".|
00000E50: 98 2A F4 01 99 A3 39 29 22 9F D4 4F 20 52 45 41 |.*....9)"..O REA|
00000E60: 44 20 41 42 4F 55 54 20 54 48 49 53 20 50 52 4F |D ABOUT THIS PRO|
00000E70: 47 52 41 4D 20 46 52 4F 4D 20 C2 C1 D3 C9 C3 2C |GRAM FROM .....,|
00000E80: 20 45 4E 54 45 52 20 54 48 45 20 46 4F 4C 4C 4F | ENTER THE FOLLO|
00000E90: 57 49 4E 47 2E 2E 2E 22 00 D0 2A F9 01 99 A3 31 |WING..."..*....1|
00000EA0: 34 29 22 11 11 05 52 55 4E 20 22 C7 28 33 34 29 |4)"...RUN ".(34)|
00000EB0: 22 51 55 49 43 4B 54 45 58 54 2E 38 30 22 C7 28 |"QUICKTEXT.80".(|
00000EC0: 33 34 29 3A 99 A3 35 38 29 22 9F 54 48 45 4E 22 |34):..58)".THEN"|
00000ED0: 00 FE 2A 03 02 99 A3 31 34 29 22 05 11 41 4E 53 |..*....14)"..ANS|
00000EE0: 57 45 52 20 46 49 4C 45 20 51 55 45 52 59 20 57 |WER FILE QUERY W|
00000EF0: 49 54 48 3A 20 9E 54 2E 22 46 24 28 31 29 00 2F |ITH: .T."F$(1)./|
00000F00: 2B 0D 02 99 A3 32 33 29 22 05 11 D0 52 45 53 53 |+....23)"...RESS|
00000F10: 20 05 D3 D0 C1 C3 C5 20 9F 54 4F 20 52 45 54 55 | ...... .TO RETU|
00000F20: 52 4E 20 54 4F 20 CC CF C1 C4 D3 D4 C1 D2 22 00 |RN TO ........".|
00000F30: 37 2B 12 02 89 32 30 00 54 2B 17 02 9F 33 2C 38 |7+...20.T+...3,8|
00000F40: 2C 33 2C 22 46 49 4C 45 53 20 4F 4E 20 53 49 44 |,3,"FILES ON SID|
00000F50: 45 20 31 22 00 70 2B 1C 02 81 49 B2 2E A4 31 3A |E 1".p+...I...1:|
00000F60: A1 23 33 2C 41 24 3A 49 B2 53 54 3A 99 41 24 3B |.#3,A$:I.ST:.A$;|
00000F70: 00 79 2B 21 02 82 3A A0 33 00 B6 2B 26 02 99 A3 |.y+!..:.3..+&...|
00000F80: 32 32 29 22 11 9F C1 52 45 20 59 4F 55 20 53 55 |22)"...RE YOU SU|
00000F90: 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 51 |RE YOU WANT TO Q|
00000FA0: 55 49 54 3F 20 28 05 59 9F 2F 05 4E 9F 29 22 3A |UIT? (.Y./.N.)":|
00000FB0: 97 32 30 38 2C 2E 00 DD 2B 2B 02 EB 3A A1 41 24 |.208,...++..:.A$|
00000FC0: 3A 41 B2 B5 28 D4 28 22 D9 59 CE 4E 22 2C 41 24 |:A..(.(".Y.N",A$|
00000FD0: 29 AD 32 AA 2E 35 29 3A EC FC 41 B1 2E 00 F7 2B |).2..5):..A....+|
00000FE0: 30 02 8B 41 B2 32 A7 99 22 91 22 53 50 24 3A 99 |0..A.2.."."SP$:.|
00000FF0: 22 91 91 22 3B 3A 8E 00 36 2C 35 02 54 42 24 B2 |"..";:..6,5.TB$.|
00001000: 22 11 9F 50 4C 41 43 45 20 05 22 AA 44 4E 24 AA |"..PLACE .".DN$.|
00001010: 22 20 9F 49 4E 20 54 48 45 20 44 52 49 56 45 20 |" .IN THE DRIVE |
00001020: 41 4E 44 22 3A 99 A3 34 32 AB C3 28 54 42 24 29 |AND":..42..(TB$)|
00001030: AD 32 29 54 42 24 00 6B 2C 3A 02 99 A3 32 33 29 |.2)TB$.k,:...23)|
00001040: 22 D0 52 45 53 53 20 05 D3 D0 C1 C3 C5 20 9F 54 |".RESS ...... .T|
00001050: 4F 20 52 45 54 55 52 4E 20 54 4F 20 97 CC CF C1 |O RETURN TO ....|
00001060: C4 D3 D4 C1 D2 2E 22 3A 8D 32 30 00 AE 2C 3F 02 |......":.20..,?.|
00001070: 97 31 37 38 2C 32 34 38 3A 97 34 36 32 36 2C 2E |.178,248:.4626,.|
00001080: 3A 97 34 36 32 37 2C 32 35 35 3A FE 26 3A F5 22 |:.4627,255:.&:."|
00001090: 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 A4 22 |HELLO CONNECT"."|
000010A0: 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 00 BC |HELLO CONNECT"..|
000010B0: 2C 44 02 8B 44 53 B3 B1 36 33 A7 80 00 D1 2C 49 |,D..DS..63....,I|
000010C0: 02 8A 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 |.."HELLO CONNECT|
000010D0: 22 00 EB 2C 10 27 F2 22 43 4F 50 49 45 52 22 3A |"..,.'."COPIER":|
000010E0: EF 22 43 4F 50 49 45 52 22 3A 80 00 00 00 |."COPIER":.... |
........15:..:.%:."..".R...SP$."
":.I.1.3:SP$.SP$.SP$:.:SP$.H(SP$,79):.
25.R...HI..(NU.256):LO.NU.HI.256:.......
208,.:.:.A$:..A$." ":........"FILECOPY.O
".X....4626,.:.4627,64:. F$(100),T$(100)
,EA(100),SA(100)...#.RB.1:.240:SA.16384:
FL$."":F.5000.%.(.A.B(F):.A....FL$.FL$.G
(A):F.F.1:.40.B.-..C(FL$).16.FL$.H(FL$,1
6).B.2..2,8,2,"FILES ON SIDE ".SI$...7..
2,A$:I.ST:.2,NF$:NF.E(NF$):.2,NB$:NB.E(N
B$).1...<..X.1.NF:.2,F$(X),T$(X):....A.N
F.NF.1:F$(NF)."QUICKTEXT.80":T$(NF)."P":
NF.NF.1:F$(NF)."QT80.O":T$(NF)."P"...F..
A$..FL$.I.0.55.X.K. 2:.A$..FL$.."..ERROR
: PROGRAM "FL$" NOT FOUND! TRY OTHER SI
DE - PRESS KEY":Z1,2000,5:..A$:....P...2
2)"....PRESS ..SPACE. .TO START COPYING"
...U...29)"...RETURN. .TO RETURN TO LOAD
STAR.":.208,....Z..A$:.A$.G(13)..550:.20
8,.:.90..._..A$.." ".90...D.D1...O.I.NU.
SA:.15:D1.D1.1:D.D1:.4956,HI:.4960,LO:SA
(D1).SA...N..315:.".......";:TB$.".READI
NG: .".F$(D):..41.C(TB$).2)TB$...S...15:
.1,8,2,F$(D):.4864: 1.V.X.EA(D1).B(253).
B(254).256:SA.EA(D1).1...}.. (EA(D1).652
80) . (D1.NF) . 105.. ... EA(D1).65280 .
145.D ..D1.D1.1:SA.12288:..32)"...BUFFE
R OVERFLOW!".S ..TB$."MUST RECOPY ".F$(D
):..40.C(TB$).2)TB$.. ....27)"...INSERT
DESTINATION DISK...".L ....25)"PRESS .SP
ACE .WHEN READY TO COPY":.20.. ...RB...2
6)"..CHECKING # OF BLOCKS FREE..."..! ..
RB.RB..:.355."!..D2.D2.1:D.D2:.315.A!...
".......";:TB$.".WRITING: .".F$(D):..41.
C(TB$).2)TB$:.300.O!...(MM).195..!..NU.S
A(D2):.15:.4960,LO:.4956,HI..!..NU.EA(D2
):.15:.253,LO:.254,HI..!...1,8,2,F$(D)."
,".T$(D).",W":.4914: 1..!C..D2.D1.165.."
H.TB$."..INSERT .".DN$."....":..42.C(TB$
).2)TB$.T"M...23)".PRESS .SPACE .WHEN RE
ADY TO CONTINUE":.20.S"R..275:.(MM$..DN$
)..325:.210.."W.."..";:.A.1.2:.SP$:...".
.."...";:SA.16384.."...D1.NF.105.."...46
5.B"...575.."...".".20)"................
.........................".0#....20)".
.LOADSTAR 128 PROGRAM COPIER .."
.G#....20)". .8563 VERSION BY .JON
MATTSON .."..#....20)"..............
.........................."..#...275:MM$
.DN$..#....21)"....PLEASE WAIT -- READIN
G .FILES ON SIDE "SI$:...$...15,8,15,"I0
":.8,8,8,"#"..$...15,"UA:8 0 18 0"..$...
15,"B-P:8 144".U$".DN$."":.A.1.16:.#8,A$
:DN$.DN$.A$:..Y$'..#8,A$,A$,A$,A$: 8: 15
:SI$.A$:.. $,..15,8,15,"R0:".F$(D)."=".F
$(D): 15..$1.MM..:.DS.63.MM.1..$6....$;.
..0,5,79,24,1:..0,0,79,24:...%@.."......
";:.A.1.6:.SP$:.:.".....";:...%E..".."SP
$:.SP$.S%J.TB$."...".MM$.". IS NOT IN TH
E DRIVE.":..42.C(TB$).2)TB$..%O.TB$."..P
UT .".MM$." .IN THE DRIVE AND":..42.C(TB
$).2)TB$..%T...28)".PRESS .SPACE .TO TRY
AGAIN":.20..%Y.."....";:.A.1.4:.SP$:.:.
"...":...%^....&C..15,8,15,"I0": 15:.(DS
.20).(DS.24).365.V&H..315:.".......".21)
".THE DISK IN THE DRIVE ISN'T FORMATTED.
":.410.S&M..15,8,15,"I0":.8,8,8,"#"..&R.
.15,"UA:8 0 18 0":.15,"B-P:8 4"..&W.BA..
:.A.1.35:.A.18..#8,A$:.385.V&|..#8,A$:BA
.BA.F(A$.G(.))..&...B.1.3:.#8,A$:...'...
:.NB.BA. 8: 15:...'.. 8: 15.N'...315:.".
......".20)".THERE'S NOT ENOUGH ROOM ON
THIS DISK FOR"..'..TB$.".".F$(D).". AND
THE FILES ASSOCIATED WITH IT.":..41.C(TB
$).2)TB$..'....32)"...- YOUR OPTIONS -".
.'....25)"...F.ORMAT A DISK FOR THIS PRO
GRAM"..(....20)"..T.RY SAVING THIS PROGR
AM ON ANOTHER DISK".G(....25)"..Q.UIT (F
ORGET ABOUT COPYING IT).R(...208,..{(...
:.A$:A..(T("FFTTQQ",A$).2..5):..A....(..
.A.3..550:.435..(...A.2...27)"..CHECKING
# OF BLOCKS FREE":.355..(B...25)"..PUT
DISK TO FORMAT IN DRIVE 8"..)G...24)"PRE
SS .SPACE .WHEN READY TO FORMAT":.20.I)L
..15,8,15,"N0:LOADSTAR PROGS,LS": 15:.35
5.|)Q..315:.".......".29)".-- .FINISHED
COPYING .--"..)V...20)"...TO LOAD THIS P
ROGRAM FROM BASIC, ENTER:..."..)..TB$."D
LOAD ".G(34).F$(1).G(34):..40.C(TB$).2)T
B$..*....26)"...PLEASE MAKE NOTE OF THIS
....".<*....30)".PRESS .SPACE .FOR MORE"
:.20.O*...315:."......"..*....9)".TO REA
D ABOUT THIS PROGRAM FROM BASIC, ENTER T
HE FOLLOWING...".P*....14)"...RUN "G(34)
"QUICKTEXT.80"G(34):..58)".THEN"..*....1
4)"..ANSWER FILE QUERY WITH: .T."F$(1)./
+....23)"..PRESS .SPACE .TO RETURN TO LO
ADSTAR".7+...20.T+...3,8,3,"FILES ON SID
E 1".P+...I...1:.#3,A$:I.ST:.A$;.Y+!..:
3..+&...22)"..ARE YOU SURE YOU WANT TO Q
UIT? (.Y./.N.)":.208,...++..:.A$:A..(T("
YYNN",A$).2..5):..A....+0..A.2.."."SP$:.
"..";:..6,5.TB$."..PLACE .".DN$." .IN TH
E DRIVE AND":..42.C(TB$).2)TB$.K,:...23)
"PRESS .SPACE .TO RETURN TO .LOADSTAR.":
.20..,?..178,248:.4626,.:.4627,255:.&:."
HELLO CONNECT"."HELLO CONNECT"..,D..DS..
63...Q,I.."HELLO CONNECT"..,.'."COPIER":
."COPIER":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL