LIB 1.1
FILE INFORMATION
FILENAME(S): LIB 1.1
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-10-20 14:31:13
APPEARS ON: 1 disk(s)
FILE HASH
e46453aa51039b65d905bd43bd8d8998c76341916ca391391bfd15401663f950
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0025UT | LIB 1.1 | PRG | Treasure Chest - Klaus Der Suhler | 33 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 00 00 99 22 93 0E 1E 22 3A 97 35 33 |......."...":.53|
00000010: 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 4A |281,0:.53280,0.J|
00000020: 08 01 00 99 22 11 11 11 11 11 11 22 3B A3 31 35 |...."......";.15|
00000030: 29 3B 22 D4 48 45 20 CC 49 42 52 41 52 59 11 22 |);".HE .IBRARY."|
00000040: 3A 99 A3 32 30 29 22 42 59 22 00 75 08 02 00 99 |:..20)"BY".u....|
00000050: 22 11 22 3B A3 38 29 3B 22 C4 41 56 49 44 20 C2 |".";.8);".AVID .|
00000060: 4F 4C 54 20 41 4E 44 20 C7 52 45 47 20 D0 46 4F |OLT AND .REG .FO|
00000070: 55 4E 54 5A 22 00 9D 08 03 00 99 22 11 22 3B A3 |UNTZ"......".";.|
00000080: 39 29 22 C4 55 41 4C 20 44 52 49 56 45 20 42 59 |9)".UAL DRIVE BY|
00000090: 20 D2 49 43 4B 20 D6 4F 4C 4B 45 52 22 00 E1 08 | .ICK .OLKER"...|
000000A0: 04 00 54 58 24 B2 22 41 22 3A 81 41 B2 31 A4 32 |..TX$."A":.A.1.2|
000000B0: 35 34 3A 54 58 24 B2 54 58 24 AA 22 41 22 3A 82 |54:TX$.TX$."A":.|
000000C0: 3A 9F 31 2C 30 3A 8D 35 34 3A 52 24 B2 22 22 3A |:.1,0:.54:R$."":|
000000D0: 44 B2 38 3A 44 31 B2 38 3A 56 31 24 B2 22 30 3A |D.8:D1.8:V1$."0:|
000000E0: 22 00 16 09 05 00 99 22 93 11 11 11 11 11 11 11 |"......"........|
000000F0: 11 11 11 20 20 20 20 C1 52 45 20 59 4F 55 20 55 |... .RE YOU U|
00000100: 53 49 4E 47 20 41 20 C4 55 41 4C 20 C4 52 49 56 |SING A .UAL .RIV|
00000110: 45 20 59 2F 4E 22 00 27 09 06 00 A1 52 24 3A 8B |E Y/N".'....R$:.|
00000120: 52 24 B2 22 22 A7 36 00 37 09 07 00 8B 52 24 B3 |R$."".6.7....R$.|
00000130: B1 22 59 22 A7 31 34 00 4D 09 08 00 44 B2 38 3A |."Y".14.M...D.8:|
00000140: 44 31 B2 38 3A 56 31 24 B2 22 31 3A 22 00 81 09 |D1.8:V1$."1:"...|
00000150: 09 00 99 22 93 11 11 11 11 11 11 11 11 11 20 20 |...".......... |
00000160: 20 20 D0 4C 41 43 45 20 CF 52 49 47 49 4E 41 4C | .LACE .RIGINAL|
00000170: 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 | DISK IN DRIVE 0|
00000180: 22 00 AC 09 0A 00 99 22 11 20 20 20 20 D0 4C 41 |"......". .LA|
00000190: 43 45 20 D4 41 52 47 45 54 20 20 20 44 49 53 4B |CE .ARGET DISK|
000001A0: 20 49 4E 20 44 52 49 56 45 20 31 22 00 D8 09 0B | IN DRIVE 1"....|
000001B0: 00 99 22 11 11 20 20 20 20 20 20 12 20 D0 52 45 |..".. . .RE|
000001C0: 53 53 20 41 4E 59 20 4B 45 59 20 57 48 45 4E 20 |SS ANY KEY WHEN |
000001D0: 52 45 41 44 59 20 92 22 00 EA 09 0C 00 A1 52 24 |READY ."......R$|
000001E0: 3A 8B 52 24 B2 22 22 A7 31 32 00 F2 09 0D 00 89 |:.R$."".12......|
000001F0: 31 38 00 20 0A 0E 00 85 22 93 11 11 CF 52 49 47 |18. ...."....RIG|
00000200: 49 4E 41 4C 20 46 49 4C 45 53 20 4F 4E 20 44 52 |INAL FILES ON DR|
00000210: 49 56 45 20 20 38 20 20 9D 9D 9D 9D 9D 22 3B 44 |IVE 8 .....";D|
00000220: 00 3A 0A 0F 00 8B 44 B3 38 B0 44 B1 31 31 A7 99 |.:....D.8.D.11..|
00000230: 22 91 91 91 22 3B 3A 89 31 34 00 6E 0A 10 00 85 |"...";:.14.n....|
00000240: 22 11 11 CC 49 42 52 41 52 59 20 46 49 4C 45 20 |"...IBRARY FILE |
00000250: 57 49 4C 4C 20 42 45 20 4F 4E 20 44 52 49 56 45 |WILL BE ON DRIVE|
00000260: 20 20 38 20 20 9D 9D 9D 9D 9D 22 3B 44 31 00 8B | 8 .....";D1..|
00000270: 0A 11 00 8B 44 31 B3 38 B0 44 31 B1 31 31 A7 99 |....D1.8.D1.11..|
00000280: 22 91 91 91 91 22 3B 3A 89 31 36 00 BC 0A 12 00 |"....";:.16.....|
00000290: 86 46 24 28 31 34 34 29 2C 54 24 28 31 34 34 29 |.F$(144),T$(144)|
000002A0: 2C 42 24 28 31 30 29 2C 43 28 31 34 34 29 3A 9F |,B$(10),C(144):.|
000002B0: 31 35 2C 44 2C 31 35 2C 22 55 39 22 00 C9 0A 13 |15,D,15,"U9"....|
000002C0: 00 99 22 93 22 3A 89 34 33 00 F5 0A 14 00 99 22 |..".":.43......"|
000002D0: 93 11 11 D5 53 45 20 54 48 45 53 45 20 46 49 4C |....SE THESE FIL|
000002E0: 45 53 20 49 4E 20 54 48 45 20 4C 49 42 52 41 52 |ES IN THE LIBRAR|
000002F0: 59 3F 11 11 22 00 FD 0A 15 00 55 B2 31 00 25 0B |Y?..".....U.1.%.|
00000300: 16 00 9F 38 2C 44 2C 30 2C 22 24 30 22 3A 8D 34 |...8,D,0,"$0":.4|
00000310: 31 3A 8B 45 B3 B1 30 AF 45 B3 B1 37 33 A7 A0 38 |1:.E..0.E..73..8|
00000320: 3A A0 39 3A 80 00 34 0B 17 00 8D 35 33 3A 97 39 |:.9:..4....53:.9|
00000330: 31 37 2C 30 00 53 0B 18 00 A1 23 38 2C 41 24 2C |17,0.S....#8,A$,|
00000340: 41 24 2C 41 24 2C 41 24 2C 41 24 2C 41 24 3A 9E |A$,A$,A$,A$,A$:.|
00000350: 38 39 36 00 67 0B 19 00 A1 23 38 2C 41 24 2C 41 |896.g....#8,A$,A|
00000360: 24 2C 41 24 2C 42 24 00 87 0B 1A 00 43 B2 C6 28 |$,A$,B$.....C..(|
00000370: 41 24 AA C7 28 30 29 29 AA C6 28 42 24 AA C7 28 |A$..(0))..(B$..(|
00000380: 30 29 29 AC 32 35 36 00 9B 0B 1B 00 8B 20 C2 28 |0)).256...... .(|
00000390: 31 34 34 29 B3 B1 30 20 A7 33 38 00 A4 0B 1C 00 |144)..0 .38.....|
000003A0: 99 20 43 3B 00 D9 0B 1D 00 9E 38 39 36 3A 53 53 |. C;......896:SS|
000003B0: B2 C2 28 31 34 34 29 3A 99 C8 28 54 58 24 2C C2 |..(144):..(TX$,.|
000003C0: 28 31 34 32 29 29 3A 8B C8 28 54 58 24 2C 33 29 |(142)):..(TX$,3)|
000003D0: B2 22 42 4C 4F 22 A7 33 38 00 F1 0B 1E 00 99 22 |."BLO".38......"|
000003E0: 91 22 3B A3 33 30 29 3B 22 28 59 2F 4E 29 20 22 |.";.30);"(Y/N) "|
000003F0: 3B 00 06 0C 1F 00 41 24 B2 C8 28 54 58 24 2C C2 |;.....A$..(TX$,.|
00000400: 28 31 34 32 29 29 00 2A 0C 20 00 A1 54 24 3A 8B |(142)).*. ..T$:.|
00000410: 54 24 B3 B1 22 20 22 AF 54 24 B3 B1 22 59 22 AF |T$.." ".T$.."Y".|
00000420: 54 24 B3 B1 22 4E 22 A7 33 32 00 32 0C 21 00 99 |T$.."N".32.2.!..|
00000430: 54 24 00 43 0C 22 00 8B 54 24 B2 C7 28 33 32 29 |T$.C."..T$..(32)|
00000440: A7 33 39 00 52 0C 23 00 8B 54 24 B2 22 4E 22 A7 |.39.R.#..T$."N".|
00000450: 33 37 00 62 0C 24 00 8B 54 24 B2 22 59 22 A7 8D |37.b.$..T$."Y"..|
00000460: 34 38 00 6A 0C 25 00 89 32 35 00 83 0C 26 00 99 |48.j.%..25...&..|
00000470: 22 91 1D 1D 1D 1D 1D 42 4C 4F 43 4B 53 20 46 52 |"......BLOCKS FR|
00000480: 45 45 22 00 A4 0C 27 00 A0 38 3A 97 20 39 31 37 |EE"...'..8:. 917|
00000490: 2C 31 33 3A 8D 35 34 3A 98 31 35 2C 22 55 39 22 |,13:.54:.15,"U9"|
000004A0: 3A 4E B2 55 00 AC 0C 28 00 89 35 36 00 BF 0C 29 |:N.U...(..56...)|
000004B0: 00 84 31 35 2C 45 2C 45 24 2C 45 31 2C 45 32 00 |..15,E,E$,E1,E2.|
000004C0: C5 0C 2A 00 8E 00 EF 0C 2B 00 99 22 C3 52 45 41 |..*.....+..".REA|
000004D0: 54 45 20 4F 52 20 C4 49 53 53 4F 4C 56 45 20 4C |TE OR .ISSOLVE L|
000004E0: 49 42 52 41 52 59 20 28 43 2F 44 29 20 22 3B 00 |IBRARY (C/D) ";.|
000004F0: 0B 0D 2C 00 A1 41 24 3A 8B 41 24 B3 B1 22 43 22 |..,..A$:.A$.."C"|
00000500: AF 41 24 B3 B1 22 44 22 A7 34 34 00 1F 0D 2D 00 |.A$.."D".44...-.|
00000510: 8B 41 24 B2 22 43 22 A7 99 41 24 3A 89 32 30 00 |.A$."C"..A$:.20.|
00000520: 27 0D 2E 00 99 41 24 00 2F 0D 2F 00 89 39 34 00 |'....A$././..94.|
00000530: 66 0D 30 00 43 28 55 29 B2 43 3A 54 24 28 55 29 |f.0.C(U).C:T$(U)|
00000540: B2 CA 28 C4 28 43 29 AA 41 24 2C 32 35 2C 31 29 |..(.(C).A$,25,1)|
00000550: 3A 46 24 28 55 29 B2 CA 28 C4 28 43 29 AA 41 24 |:F$(U)..(.(C).A$|
00000560: 2C 37 2C 31 36 29 00 7E 0D 31 00 8B 54 24 28 55 |,7,16).~.1..T$(U|
00000570: 29 B2 22 52 22 A7 46 24 28 55 29 B2 22 22 00 90 |)."R".F$(U).""..|
00000580: 0D 32 00 81 41 B2 31 A4 C3 28 46 24 28 55 29 29 |.2..A.1..(F$(U))|
00000590: 00 BB 0D 33 00 8B CA 28 46 24 28 55 29 2C 41 2C |...3...(F$(U),A,|
000005A0: 31 29 B2 C7 28 33 34 29 A7 46 24 28 55 29 B2 C8 |1)..(34).F$(U)..|
000005B0: 28 46 24 28 55 29 2C 41 AB 31 29 00 CA 0D 34 00 |(F$(U),A.1)...4.|
000005C0: 82 41 3A 55 B2 55 AA 31 3A 8E 00 E7 0D 35 00 8C |.A:U.U.1:....5..|
000005D0: 3A 81 49 B2 38 39 36 A4 39 33 37 3A 87 58 3A 97 |:.I.896.937:.X:.|
000005E0: 49 2C 58 3A 82 3A 8E 00 02 0E 36 00 8C 3A 81 49 |I,X:.:....6..:.I|
000005F0: B2 38 39 36 A4 39 33 37 3A 87 58 3A 97 49 2C 58 |.896.937:.X:.I,X|
00000600: 3A 82 00 26 0E 37 00 81 49 B2 39 31 36 A4 39 33 |:..&.7..I.916.93|
00000610: 33 3A 87 58 3A 97 49 2C 58 3A 82 3A 97 39 32 34 |3:.X:.I,X:.:.924|
00000620: 2C 32 35 34 3A 8E 00 53 0E 38 00 99 3A 4E B2 4E |,254:..S.8..:N.N|
00000630: AB 31 3A 99 22 CC C2 D2 20 46 49 4C 45 4E 41 4D |.1:."... FILENAM|
00000640: 45 20 28 31 32 20 43 48 41 52 53 20 4D 41 58 29 |E (12 CHARS MAX)|
00000650: 20 22 3B 00 70 0E 39 00 84 31 2C 4C 24 3A 8B 4C | ";.p.9..1,L$:.L|
00000660: 24 B2 22 22 B0 C3 28 4C 24 29 B1 31 32 A7 35 37 |$.""..(L$).12.57|
00000670: 00 90 0E 3A 00 51 B2 33 32 30 3A 8B 44 B3 B1 44 |...:.Q.320:.D..D|
00000680: 31 B0 56 31 24 B2 22 31 3A 22 A7 51 B2 36 36 30 |1.V1$."1:".Q.660|
00000690: 00 AC 0E 3B 00 99 22 93 11 22 3A 81 41 B2 31 20 |...;.."..":.A.1 |
000006A0: A4 20 4E 3A 51 B2 51 AB 43 28 41 29 00 C7 0E 3C |. N:Q.Q.C(A)...<|
000006B0: 00 8B 51 B3 31 A7 51 B2 51 AA 43 28 41 29 3A 46 |..Q.1.Q.Q.C(A):F|
000006C0: 24 28 41 29 B2 22 22 00 CE 0E 3D 00 82 41 00 FD |$(A).""...=..A..|
000006D0: 0E 3E 00 99 3A 99 22 11 D4 48 45 53 45 20 46 49 |.>..:."..HESE FI|
000006E0: 4C 45 53 20 57 49 4C 4C 20 46 49 54 20 49 4E 20 |LES WILL FIT IN |
000006F0: 54 48 45 20 4C 49 42 52 41 52 59 11 22 00 1A 0F |THE LIBRARY."...|
00000700: 3F 00 81 41 B2 31 A4 4E 3A 8B 46 24 28 41 29 B3 |?..A.1.N:.F$(A).|
00000710: B1 22 22 A7 99 46 24 28 41 29 00 21 0F 40 00 82 |.""..F$(A).!.@..|
00000720: 41 00 3F 0F 41 00 99 22 11 11 C3 4F 55 4E 54 49 |A.?.A.."...OUNTI|
00000730: 4E 47 20 46 49 4C 45 20 53 49 5A 45 2E 2E 22 00 |NG FILE SIZE..".|
00000740: 57 0F 42 00 81 41 B2 31 A4 4E 3A 8B 46 24 28 41 |W.B..A.1.N:.F$(A|
00000750: 29 B2 22 22 A7 37 32 00 8B 0F 43 00 46 24 B2 46 |)."".72...C.F$.F|
00000760: 24 28 41 29 3A 9F 38 2C 44 2C 38 2C 46 24 AA 22 |$(A):.8,D,8,F$."|
00000770: 2C 4D 22 3A 8D 34 31 3A 8B 45 B3 B1 30 AF 45 B3 |,M":.41:.E..0.E.|
00000780: B1 37 33 A7 A0 38 3A A0 39 3A 80 00 93 0F 44 00 |.73..8:.9:....D.|
00000790: 48 B2 30 00 B9 0F 45 00 9E 38 39 36 3A 48 B2 48 |H.0...E..896:H.H|
000007A0: AA C2 28 31 34 32 29 3A 8B C2 28 31 34 34 29 B2 |..(142):..(144).|
000007B0: 36 34 A7 A0 38 3A 89 37 31 00 C1 0F 46 00 89 36 |64..8:.71...F..6|
000007C0: 39 00 E4 0F 47 00 43 28 41 29 B2 48 3A 99 46 24 |9...G.C(A).H:.F$|
000007D0: 28 41 29 3B 22 3D 22 3B 43 28 41 29 3B 22 42 59 |(A);"=";C(A);"BY|
000007E0: 54 45 53 22 00 03 10 48 00 82 3A 5A 51 B2 30 3A |TES"...H..:ZQ.0:|
000007F0: 81 49 B2 31 A4 4E 3A 8B 46 24 28 49 29 B2 22 22 |.I.1.N:.F$(I).""|
00000800: A7 37 34 00 0F 10 49 00 5A 51 B2 5A 51 AA 31 00 |.74...I.ZQ.ZQ.1.|
00000810: 15 10 4A 00 82 00 36 10 4B 00 99 22 11 11 D7 52 |..J...6.K.."...R|
00000820: 49 54 49 4E 47 20 CC 49 42 52 41 52 59 20 C6 49 |ITING .IBRARY .I|
00000830: 4C 45 2E 2E 2E 22 00 55 10 4C 00 9F 20 39 2C 44 |LE...".U.L.. 9,D|
00000840: 31 2C 39 2C 56 31 24 AA 4C 24 AA 22 2E 4C 42 52 |1,9,V1$.L$.".LBR|
00000850: 2C 53 2C 57 22 00 77 10 4D 00 8D 34 31 3A 8B 45 |,S,W".w.M..41:.E|
00000860: B3 B1 30 AF 45 B3 B1 37 33 A7 99 45 2C 45 24 3A |..0.E..73..E,E$:|
00000870: A0 39 3A A0 38 3A 80 00 85 10 4E 00 98 39 2C 22 |.9:.8:....N..9,"|
00000880: 44 57 42 22 3B 00 8F 10 4F 00 98 39 2C 5A 51 00 |DWB";...O..9,ZQ.|
00000890: A7 10 50 00 81 49 B2 31 A4 4E 3A 8B 46 24 28 49 |..P..I.1.N:.F$(I|
000008A0: 29 B2 22 22 A7 38 32 00 C5 10 51 00 98 39 2C 46 |)."".82...Q..9,F|
000008B0: 24 28 49 29 3A 98 39 2C 54 24 28 49 29 3A 98 39 |$(I):.9,T$(I):.9|
000008C0: 2C 43 28 49 29 00 CC 10 52 00 82 49 00 E4 10 53 |,C(I)...R..I...S|
000008D0: 00 81 49 B2 31 A4 4E 3A 8B 46 24 28 49 29 B2 22 |..I.1.N:.F$(I)."|
000008E0: 22 A7 39 32 00 04 11 54 00 9F 38 2C 44 2C 38 2C |".92...T..8,D,8,|
000008F0: 46 24 28 49 29 AA 22 2C 22 AA 54 24 28 49 29 AA |F$(I).",".T$(I).|
00000900: 22 2C 52 22 00 20 11 55 00 8D 34 31 3A 8B 45 B3 |",R". .U..41:.E.|
00000910: B1 30 AF 45 B3 B1 37 33 A7 A0 38 3A A0 39 3A 80 |.0.E..73..8:.9:.|
00000920: 00 28 11 56 00 48 B2 30 00 5D 11 57 00 9E 38 39 |.(.V.H.0.].W..89|
00000930: 36 3A 42 24 28 48 29 B2 C8 28 54 58 24 2C C2 28 |6:B$(H)..(TX$,.(|
00000940: 31 34 32 29 29 3A 53 52 B2 C2 28 31 34 34 29 3A |142)):SR..(144):|
00000950: 8B 53 52 B3 B1 30 A7 A0 38 3A 89 39 30 00 70 11 |.SR..0..8:.90.p.|
00000960: 58 00 48 B2 48 AA 31 3A 8B 48 B3 31 30 A7 38 37 |X.H.H.1:.H.10.87|
00000970: 00 7A 11 59 00 48 B2 48 AB 31 00 91 11 5A 00 81 |.z.Y.H.H.1...Z..|
00000980: 41 B2 30 A4 48 3A 98 39 2C 42 24 28 41 29 3B 3A |A.0.H:.9,B$(A);:|
00000990: 82 00 9E 11 5B 00 8B 53 52 B2 30 A7 38 36 00 A5 |....[..SR.0.86..|
000009A0: 11 5C 00 82 49 00 AE 11 5D 00 A0 39 3A 80 00 C3 |.\..I...]..9:...|
000009B0: 11 5E 00 8F 20 55 4E 2D 4C 49 42 52 41 52 49 5A |.^.. UN-LIBRARIZ|
000009C0: 45 21 21 00 CE 11 5F 00 99 3A 53 49 B2 30 00 F2 |E!!..._..:SI.0..|
000009D0: 11 60 00 99 22 CE 41 4D 45 20 4F 46 20 CC 49 42 |.`..".AME OF .IB|
000009E0: 52 41 52 59 20 C6 49 4C 45 20 22 3B 3A 84 31 2C |RARY .ILE ";:.1,|
000009F0: 4C 24 00 09 12 61 00 8B 4C 24 B2 22 22 B0 C3 28 |L$...a..L$.""..(|
00000A00: 4C 24 29 B1 31 32 A7 39 36 00 20 12 62 00 99 3A |L$).12.96. .b..:|
00000A10: 4C 24 B2 4C 24 AA 22 2E 4C 42 52 2C 53 2C 52 22 |L$.L$.".LBR,S,R"|
00000A20: 00 4D 12 63 00 9F 20 38 2C 44 2C 38 2C 4C 24 3A |.M.c.. 8,D,8,L$:|
00000A30: 8D 34 31 3A 8B 45 B3 B1 30 AF 45 B3 B1 37 33 A7 |.41:.E..0.E..73.|
00000A40: 99 45 2C 45 24 3A A0 38 3A A0 39 3A 80 00 6A 12 |.E,E$:.8:.9:..j.|
00000A50: 64 00 A1 23 38 2C 41 24 2C 42 24 2C 43 24 3A 54 |d..#8,A$,B$,C$:T|
00000A60: 24 B2 41 24 AA 42 24 AA 43 24 00 9A 12 65 00 8B |$.A$.B$.C$...e..|
00000A70: 54 24 B3 B1 22 44 57 42 22 A7 99 22 C9 4E 43 4F |T$.."DWB"..".NCO|
00000A80: 4D 50 41 54 49 42 4C 45 20 CC 49 42 52 41 52 59 |MPATIBLE .IBRARY|
00000A90: 20 C6 49 4C 45 21 21 22 3A 90 00 A3 12 66 00 84 | .ILE!!":....f..|
00000AA0: 38 2C 4E 00 C5 12 67 00 81 41 B2 31 A4 4E 3A 84 |8,N...g..A.1.N:.|
00000AB0: 38 2C 46 24 28 41 29 2C 54 24 28 41 29 2C 43 28 |8,F$(A),T$(A),C(|
00000AC0: 41 29 3A 82 41 00 03 13 68 00 99 22 C6 49 4C 45 |A):.A...h..".ILE|
00000AD0: 53 20 49 4E 20 54 48 49 53 20 4C 49 42 52 41 52 |S IN THIS LIBRAR|
00000AE0: 59 22 3A 99 22 C6 49 4C 45 4E 41 4D 45 22 3B A3 |Y":.".ILENAME";.|
00000AF0: 32 30 29 3B 22 D3 49 5A 45 20 49 4E 20 42 59 54 |20);".IZE IN BYT|
00000B00: 45 53 22 00 28 13 69 00 81 41 B2 31 A4 4E 3A 99 |ES".(.i..A.1.N:.|
00000B10: 41 3B 46 24 28 41 29 3B A3 32 30 29 3B 43 28 41 |A;F$(A);.20);C(A|
00000B20: 29 3A 82 3A 89 31 31 38 00 65 13 6A 00 99 22 11 |):.:.118.e.j..".|
00000B30: C3 52 45 41 54 49 4E 47 22 3A 81 5A B2 31 A4 4E |.REATING":.Z.1.N|
00000B40: 3A 43 B2 43 28 5A 29 3A 42 B2 B5 28 43 AD 32 35 |:C.C(Z):B..(C.25|
00000B50: 34 29 3A 4D B2 43 AB 28 42 AC 32 35 34 29 3A 99 |4):M.C.(B.254):.|
00000B60: 46 24 28 5A 29 00 8B 13 6B 00 9F 20 39 2C 44 31 |F$(Z)...k.. 9,D1|
00000B70: 2C 39 2C 56 31 24 AA 46 24 28 5A 29 AA 22 2C 22 |,9,V1$.F$(Z).","|
00000B80: AA 54 24 28 5A 29 AA 22 2C 57 22 00 AD 13 6C 00 |.T$(Z).",W"...l.|
00000B90: 8D 34 31 3A 8B 45 B3 B1 30 AF 45 B3 B1 37 33 A7 |.41:.E..0.E..73.|
00000BA0: 99 45 2C 45 24 3A A0 38 3A A0 39 3A 80 00 D9 13 |.E,E$:.8:.9:....|
00000BB0: 6D 00 8B 42 B2 30 A7 97 39 32 34 2C 4D 3A 9E 38 |m..B.0..924,M:.8|
00000BC0: 39 36 3A 98 39 2C C8 28 54 58 24 2C C2 28 31 34 |96:.9,.(TX$,.(14|
00000BD0: 32 29 29 3B 3A 89 31 31 33 00 05 14 6E 00 81 41 |2));:.113...n..A|
00000BE0: B2 31 A4 42 3A 9E 38 39 36 3A 98 39 2C C8 28 54 |.1.B:.896:.9,.(T|
00000BF0: 58 24 2C C2 28 31 34 32 29 29 3B 3A 82 41 3A 97 |X$,.(142));:.A:.|
00000C00: 39 32 34 2C 4D 00 12 14 6F 00 8B 4D B2 30 A7 31 |924,M...o..M.0.1|
00000C10: 31 33 00 2D 14 70 00 9E 38 39 36 3A 98 39 2C C8 |13.-.p..896:.9,.|
00000C20: 28 54 58 24 2C C2 28 31 34 32 29 29 3B 00 3D 14 |(TX$,.(142));.=.|
00000C30: 71 00 97 39 32 34 2C 32 35 34 3A A0 39 00 51 14 |q..924,254:.9.Q.|
00000C40: 72 00 8B 53 49 B2 AB 39 39 A7 A0 38 3A 89 31 32 |r..SI..99..8:.12|
00000C50: 37 00 5B 14 73 00 82 5A 3A A0 38 00 68 14 74 00 |7.[.s..Z:.8.h.t.|
00000C60: 99 22 C4 4F 4E 45 2E 22 00 6E 14 75 00 80 00 9A |.".ONE.".n.u....|
00000C70: 14 76 00 99 22 C4 4F 20 59 4F 55 20 57 49 53 48 |.v..".O YOU WISH|
00000C80: 20 54 4F 20 45 58 54 52 41 43 54 20 41 20 53 49 | TO EXTRACT A SI|
00000C90: 4E 47 4C 45 20 46 49 4C 45 22 00 C0 14 77 00 99 |NGLE FILE"...w..|
00000CA0: 22 4F 52 20 43 4F 4E 56 45 52 54 20 54 48 45 20 |"OR CONVERT THE |
00000CB0: 45 4E 54 49 52 45 20 4C 49 42 52 41 52 59 3F 22 |ENTIRE LIBRARY?"|
00000CC0: 00 DB 14 78 00 99 22 28 53 29 49 4E 47 4C 45 20 |...x.."(S)INGLE |
00000CD0: 4F 52 20 28 41 29 4C 4C 20 22 3B 00 F8 14 79 00 |OR (A)LL ";...y.|
00000CE0: A1 41 24 3A 8B 41 24 B3 B1 22 53 22 AF 41 24 B3 |.A$:.A$.."S".A$.|
00000CF0: B1 22 41 22 A7 31 32 31 00 0C 15 7A 00 99 41 24 |."A".121...z..A$|
00000D00: 3A 8B 41 24 B2 22 41 22 A7 31 30 36 00 33 15 7B |:.A$."A".106.3.{|
00000D10: 00 99 22 D7 48 49 43 48 20 46 49 4C 45 20 28 31 |..".HICH FILE (1|
00000D20: 2D 22 3B CA 28 C4 28 4E 29 2C 32 29 3B 22 29 3F |-";.(.(N),2);")?|
00000D30: 20 22 3B 00 48 15 7C 00 84 31 2C 41 24 3A 5A B2 | ";.H.|..1,A$:Z.|
00000D40: B5 28 C5 28 41 24 29 29 00 59 15 7D 00 8B 5A B3 |.(.(A$)).Y.}..Z.|
00000D50: 31 B0 5A B1 4E A7 31 32 34 00 64 15 7E 00 99 3A |1.Z.N.124.d.~..:|
00000D60: 89 31 33 32 00 83 15 7F 00 99 22 41 4E 59 20 4D |.132......"ANY M|
00000D70: 4F 52 45 20 46 49 4C 45 53 3F 20 28 59 2F 4E 29 |ORE FILES? (Y/N)|
00000D80: 20 22 3B 00 A0 15 80 00 A1 41 24 3A 8B 41 24 B3 | ";......A$:.A$.|
00000D90: B1 22 59 22 AF 41 24 B3 B1 22 4E 22 A7 31 32 38 |."Y".A$.."N".128|
00000DA0: 00 A8 15 81 00 99 41 24 00 B7 15 82 00 8B 41 24 |......A$......A$|
00000DB0: B2 22 59 22 A7 39 34 00 BD 15 83 00 80 00 F7 15 |."Y".94.........|
00000DC0: 84 00 8B 5A B2 31 A7 53 49 B2 AB 39 39 3A 43 B2 |...Z.1.SI..99:C.|
00000DD0: 43 28 5A 29 3A 42 B2 B5 28 43 AD 32 35 34 29 3A |C(Z):B..(C.254):|
00000DE0: 4D B2 43 AB 28 42 AC 32 35 34 29 3A 99 46 24 28 |M.C.(B.254):.F$(|
00000DF0: 5A 29 3A 89 31 30 37 00 19 16 85 00 99 22 D3 4B |Z):.107......".K|
00000E00: 49 50 50 49 4E 47 20 55 4E 57 41 4E 54 45 44 20 |IPPING UNWANTED |
00000E10: 46 49 4C 45 53 2E 2E 2E 22 00 33 16 86 00 8F 20 |FILES...".3.... |
00000E20: 52 45 41 44 20 42 59 50 41 53 53 45 44 20 46 49 |READ BYPASSED FI|
00000E30: 4C 45 53 00 65 16 87 00 81 51 B2 31 A4 5A AB 31 |LES.e....Q.1.Z.1|
00000E40: 3A 43 B2 43 28 51 29 3A 42 B2 B5 28 43 AD 32 35 |:C.C(Q):B..(C.25|
00000E50: 34 29 3A 4D B2 43 AB 28 42 AC 32 35 34 29 3A 99 |4):M.C.(B.254):.|
00000E60: 46 24 28 51 29 00 7F 16 88 00 8B 42 B2 30 A7 97 |F$(Q)......B.0..|
00000E70: 39 32 34 2C 4D 3A 9E 38 39 36 3A 89 31 34 31 00 |924,M:.896:.141.|
00000E80: 99 16 89 00 81 41 B2 31 A4 42 3A 9E 38 39 36 3A |.....A.1.B:.896:|
00000E90: 82 41 3A 97 39 32 34 2C 4D 00 A6 16 8A 00 8B 4D |.A:.924,M......M|
00000EA0: B2 30 A7 31 34 31 00 AF 16 8B 00 9E 38 39 36 00 |.0.141......896.|
00000EB0: B6 16 8C 00 82 51 00 C6 16 8D 00 97 39 32 34 2C |.....Q......924,|
00000EC0: 32 35 34 3A A0 39 00 05 17 8E 00 53 49 B2 AB 39 |254:.9.....SI..9|
00000ED0: 39 3A 43 B2 43 28 5A 29 3A 42 B2 B5 28 43 AD 32 |9:C.C(Z):B..(C.2|
00000EE0: 35 34 29 3A 4D B2 43 AB 28 42 AC 32 35 34 29 3A |54):M.C.(B.254):|
00000EF0: 99 22 D7 52 49 54 49 4E 47 20 22 46 24 28 5A 29 |.".RITING "F$(Z)|
00000F00: 3A 89 31 30 37 00 2C 17 8F 00 83 20 31 36 30 2C |:.107.,.... 160,|
00000F10: 32 2C 31 37 37 2C 34 35 2C 31 35 33 2C 31 33 37 |2,177,45,153,137|
00000F20: 2C 30 2C 32 30 30 2C 31 39 32 2C 36 00 68 17 90 |,0,200,192,6.h..|
00000F30: 00 83 20 32 30 38 2C 32 34 36 2C 31 36 32 2C 38 |.. 208,246,162,8|
00000F40: 2C 33 32 2C 31 39 38 2C 32 35 35 3A 8F 20 4D 4F |,32,198,255:. MO|
00000F50: 44 49 46 49 45 44 20 46 4F 52 20 46 49 4C 45 20 |DIFIED FOR FILE |
00000F60: 4E 55 4D 42 45 52 20 38 00 93 17 91 00 83 20 33 |NUMBER 8...... 3|
00000F70: 32 2C 32 32 38 2C 32 35 35 2C 32 30 31 2C 31 33 |2,228,255,201,13|
00000F80: 2C 32 34 30 2C 31 35 2C 31 36 34 2C 31 34 32 2C |,240,15,164,142,|
00000F90: 31 34 35 00 D2 17 92 00 83 20 31 34 30 2C 32 30 |145...... 140,20|
00000FA0: 30 2C 31 33 32 2C 31 34 32 2C 31 39 36 2C 31 33 |0,132,142,196,13|
00000FB0: 39 2C 32 34 30 2C 34 2C 31 36 35 2C 31 34 34 2C |9,240,4,165,144,|
00000FC0: 32 34 30 2C 32 33 34 2C 37 36 2C 32 30 34 2C 32 |240,234,76,204,2|
00000FD0: 35 35 00 1B 18 93 00 83 20 31 36 34 2C 31 34 32 |55...... 164,142|
00000FE0: 2C 31 34 35 2C 31 34 30 2C 32 30 30 2C 31 33 32 |,145,140,200,132|
00000FF0: 2C 31 34 32 2C 31 39 32 2C 30 2C 32 34 30 2C 34 |,142,192,0,240,4|
00001000: 2C 31 36 35 2C 31 34 34 2C 32 34 30 2C 32 33 38 |,165,144,240,238|
00001010: 2C 37 36 2C 32 30 34 2C 32 35 35 00 00 00 |,76,204,255... |
......."...":.53281,0:.53280,0.J...."...
...";.15);"THE LIBRARY.":..20)"BY".U....
".";.8);"DAVID BOLT AND GREG PFOUNTZ"...
...".";.9)"DUAL DRIVE BY RICK VOLKER"...
..TX$."A":.A.1.254:TX$.TX$."A":.:.1,0:.5
4:R$."":D.8:D1.8:V1$."0:"......"........
... ARE YOU USING A DUAL DRIVE Y/N".'
....R$:.R$."".6.7....R$.."Y".14.M...D.8:
D1.8:V1$."1:"......".......... PLACE
ORIGINAL DISK IN DRIVE 0"......". PLA
CE TARGET DISK IN DRIVE 1".X...."..
. PRESS ANY KEY WHEN READY ."......R$
:.R$."".12......18. ...."...ORIGINAL FIL
ES ON DRIVE 8 .....";D.:....D.8.D.11..
"...";:.14.N...."..LIBRARY FILE WILL BE
ON DRIVE 8 .....";D1......D1.8.D1.11..
"....";:.16......F$(144),T$(144),B$(10),
C(144):.15,D,15,"U9".I....".":.43......"
...USE THESE FILES IN THE LIBRARY?.."...
..U.1.%....8,D,0,"$0":.41:.E..0.E..73. 8
: 9:..4....53:.917,0.S....#8,A$,A$,A$,A$
,A$,A$:.896.G....#8,A$,A$,A$,B$.....C.F(
A$.G(0)).F(B$.G(0)).256...... B(144)..0
.38...... C;.Y....896:SS.B(144):.H(TX$,B
(142)):.H(TX$,3)."BLO".38......".";.30);
"(Y/N) ";.....A$.H(TX$,B(142)).*. ..T$:.
T$.." ".T$.."Y".T$.."N".32.2.!..T$.C."..
T$.G(32).39.R.#..T$."N".37.B.$..T$."Y"..
48.J.%..25...&.."......BLOCKS FREE"...'.
8:. 917,13:.54:.15,"U9":N.U...(..56...)
..15,E,E$,E1,E2.E.*.....+.."CREATE OR DI
SSOLVE LIBRARY (C/D) ";...,..A$:.A$.."C"
.A$.."D".44...-..A$."C"..A$:.20.'....A$.
/./..94.F.0.C(U).C:T$(U).J(D(C).A$,25,1)
:F$(U).J(D(C).A$,7,16).~.1..T$(U)."R".F$
(U).""...2..A.1.C(F$(U))...3..J(F$(U),A,
1).G(34).F$(U).H(F$(U),A.1).J.4..A:U.U.1
:....5..:.I.896.937:.X:.I,X:.:....6..:.I
.896.937:.X:.I,X:..&.7..I.916.933:.X:.I,
X:.:.924,254:..S.8..:N.N.1:."LBR FILENAM
E (12 CHARS MAX) ";.P.9..1,L$:.L$."".C(L
$).12.57...:.Q.320:.D..D1.V1$."1:".Q.660
...;.."..":.A.1 . N:Q.Q.C(A).G.<..Q.1.Q.
Q.C(A):F$(A)."".N.=..A...>..:.".THESE FI
LES WILL FIT IN THE LIBRARY."...?..A.1.N
:.F$(A)..""..F$(A).!.@..A.?.A.."..COUNTI
NG FILE SIZE..".W.B..A.1.N:.F$(A)."".72.
..C.F$.F$(A):.8,D,8,F$.",M":.41:.E..0.E.
.73. 8: 9:....D.H.0...E..896:H.H.B(142):
.B(144).64. 8:.71.A.F..69...G.C(A).H:.F$
(A);"=";C(A);"BYTES"...H..:ZQ.0:.I.1.N:.
F$(I)."".74...I.ZQ.ZQ.1...J...6.K.."..WR
ITING LIBRARY FILE...".U.L.. 9,D1,9,V1$.
L$.".LBR,S,W".W.M..41:.E..0.E..73..E,E$:
9: 8:....N..9,"DWB";...O..9,ZQ...P..I.1
.N:.F$(I)."".82.E.Q..9,F$(I):.9,T$(I):.9
,C(I).L.R..I...S..I.1.N:.F$(I)."".92...T
..8,D,8,F$(I).",".T$(I).",R". .U..41:.E.
.0.E..73. 8: 9:..(.V.H.0.].W..896:B$(H).
H(TX$,B(142)):SR.B(144):.SR..0. 8:.90.P.
X.H.H.1:.H.10.87.Z.Y.H.H.1...Z..A.0.H:.9
,B$(A);:....[..SR.0.86...\..I...]. 9:..C
.^.. UN-LIBRARIZE!!.N._..:SI.0...`.."NAM
E OF LIBRARY FILE ";:.1,L$...A..L$."".C(
L$).12.96. .B..:L$.L$.".LBR,S,R".M.C.. 8
,D,8,L$:.41:.E..0.E..73..E,E$: 8: 9:..J.
D..#8,A$,B$,C$:T$.A$.B$.C$...E..T$.."DWB
".."INCOMPATIBLE LIBRARY FILE!!":....F..
8,N.E.G..A.1.N:.8,F$(A),T$(A),C(A):.A...
H.."FILES IN THIS LIBRARY":."FILENAME";.
20);"SIZE IN BYTES".(.I..A.1.N:.A;F$(A);
.20);C(A):.:.118.E.J..".CREATING":.Z.1.N
:C.C(Z):B..(C.254):M.C.(B.254):.F$(Z)...
K.. 9,D1,9,V1$.F$(Z).",".T$(Z).",W"...L.
.41:.E..0.E..73..E,E$: 8: 9:..Y.M..B.0..
924,M:.896:.9,H(TX$,B(142));:.113...N..A
.1.B:.896:.9,H(TX$,B(142));:.A:.924,M...
O..M.0.113.-.P..896:.9,H(TX$,B(142));.=.
Q..924,254: 9.Q.R..SI..99. 8:.127.[.S..Z
: 8.H.T.."DONE.".N.U.....V.."DO YOU WISH
TO EXTRACT A SINGLE FILE"...W.."OR CONV
ERT THE ENTIRE LIBRARY?"...X.."(S)INGLE
OR (A)LL ";...Y..A$:.A$.."S".A$.."A".121
...Z..A$:.A$."A".106.3.{.."WHICH FILE (1
-";J(D(N),2);")? ";.H.|..1,A$:Z..(E(A$))
.Y.}..Z.1.Z.N.124.D.~..:.132....."ANY M
ORE FILES? (Y/N) ";. ....A$:.A$.."Y".A$.
."N".128......A$......A$."Y".94.........
...Z.1.SI..99:C.C(Z):B..(C.254):M.C.(B.2
54):.F$(Z):.107......"SKIPPING UNWANTED
FILES...".3.... READ BYPASSED FILES.E...
.Q.1.Z.1:C.C(Q):B..(C.254):M.C.(B.254):.
F$(Q).....B.0..924,M:.896:.141......A.1
.B:.896:.A:.924,M......M.0.141......896.
.....Q.F....924,254: 9.....SI..99:C.C(Z)
:B..(C.254):M.C.(B.254):."WRITING "F$(Z)
:.107.,.... 160,2,177,45,153,137,0,200,1
92,6.H.... 208,246,162,8,32,198,255:. MO
DIFIED FOR FILE NUMBER 8...... 32,228,25
5,201,13,240,15,164,142,145.R.... 140,20
0,132,142,196,139,240,4,165,144,240,234,
76,204,255...... 164,142,145,140,200,132
,142,192,0,240,4,165,144,240,238,76,204,
255...
> CLICK IMAGE PREVIEW FOR FULL MODAL