COMPRESSOR
FILE INFORMATION
FILENAME(S): COMPRESSOR
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 18:12:15
APPEARS ON: 1 disk(s)
FILE HASH
79183f883fd861bb625752f08893a492aca44de9bf3aa2ed6b69d049cac777f6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 38 S 1 | COMPRESSOR | PRG | Sailor, Ganheden | 33 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 0A 00 8B 5A B3 B1 30 A7 31 37 35 00 |.......Z..0.175.|
00000010: 30 08 0F 00 8B 41 B2 30 A7 41 B2 31 3A 93 22 43 |0....A.0.A.1:."C|
00000020: 4F 4D 50 52 45 53 53 4F 52 2E 4F 22 2C 38 2C 31 |OMPRESSOR.O",8,1|
00000030: 00 59 08 14 00 8B 41 B2 31 A7 41 B2 32 3A 97 35 |.Y....A.1.A.2:.5|
00000040: 36 2C 33 31 3A 97 35 35 2C 32 35 35 3A 9C 3A 41 |6,31:.55,255:.:A|
00000050: B2 32 3A 86 46 24 28 33 29 00 78 08 19 00 97 35 |.2:.F$(3).x....5|
00000060: 33 32 38 31 2C 31 35 3A 97 35 33 32 38 30 2C 31 |3281,15:.53280,1|
00000070: 32 3A 97 36 34 36 2C 36 00 AD 08 1E 00 42 24 B2 |2:.646,6.....B$.|
00000080: 22 12 97 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 92 22 00 EB 08 | ."...|
000000B0: 1F 00 53 24 B2 22 13 22 AA 42 24 AA 22 12 20 20 |..S$.".".B$.". |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4F 4D | COM|
000000D0: 50 52 45 53 53 4F 52 20 20 20 20 20 20 20 20 20 |PRESSOR |
000000E0: 20 20 20 20 20 20 92 22 AA 42 24 00 F8 08 21 00 | .".B$...!.|
000000F0: 50 41 B2 33 30 39 36 30 00 30 09 22 00 53 31 24 |PA.30960.0.".S1$|
00000100: B2 22 12 20 20 20 20 20 20 20 20 2A 20 50 52 45 |.". * PRE|
00000110: 53 53 20 52 45 54 55 52 4E 20 54 4F 20 45 58 49 |SS RETURN TO EXI|
00000120: 54 20 2A 20 20 20 20 20 20 20 20 92 22 AA 42 24 |T * .".B$|
00000130: 00 56 09 23 00 4B 4F 24 B2 22 12 22 AA C7 28 31 |.V.#.KO$."."..(1|
00000140: 39 33 29 AA 22 92 50 49 43 20 22 3A 4D 49 24 B2 |93).".PIC ":MI$.|
00000150: 22 50 49 43 2E 22 00 74 09 28 00 99 22 93 22 53 |"PIC.".t.(.."."S|
00000160: 24 22 11 11 11 11 22 A3 31 32 29 22 05 4B 1F 4F |$"....".12)".K.O|
00000170: 41 4C 41 22 00 93 09 2B 00 99 A3 31 32 29 22 11 |ALA"...+...12)".|
00000180: 05 4D 1F 49 43 52 4F 49 4C 4C 55 53 54 52 41 54 |.M.ICROILLUSTRAT|
00000190: 4F 52 22 00 A7 09 2D 00 99 A3 31 32 29 22 11 05 |OR"...-...12)"..|
000001A0: 4F 1F 54 48 45 52 22 00 BC 09 2F 00 99 A3 31 32 |O.THER".../...12|
000001B0: 29 22 11 05 51 1F 55 49 54 11 11 22 00 E9 09 30 |)"..Q.UIT.."...0|
000001C0: 00 99 A3 31 32 29 22 50 52 45 53 53 20 05 4B 1F |...12)"PRESS .K.|
000001D0: 2C 20 05 4D 1F 2C 20 05 4F 1F 2C 20 4F 52 20 05 |, .M., .O., OR .|
000001E0: 51 1F 2E 22 3A 54 50 B2 31 00 08 0A 32 00 92 31 |Q..":TP.1...2..1|
000001F0: 39 38 2C 31 35 3A A1 54 24 3A 42 47 B2 30 3A 42 |98,15:.T$:BG.0:B|
00000200: 4F B2 30 3A 4E 55 B2 2E 00 26 0A 33 00 8B 54 24 |O.0:NU...&.3..T$|
00000210: B2 22 51 22 B0 54 24 B2 22 D1 22 A7 8D 36 30 30 |."Q".T$."."..600|
00000220: 30 30 3A 89 34 38 00 66 0A 37 00 8B 54 24 B2 22 |00:.48.f.7..T$."|
00000230: 4B 22 A7 50 24 B2 4B 4F 24 3A 50 B2 31 3A 4C 31 |K".P$.KO$:P.1:L1|
00000240: B2 33 32 35 37 36 3A 4C 32 B2 33 33 35 37 36 3A |.32576:L2.33576:|
00000250: 4C 33 B2 32 34 35 37 36 3A 42 47 B2 33 34 35 37 |L3.24576:BG.3457|
00000260: 36 3A 42 4F B2 30 00 A5 0A 3C 00 8B 54 24 B2 22 |6:BO.0...<..T$."|
00000270: 4D 22 A7 50 24 B2 4D 49 24 3A 50 B2 31 3A 4C 31 |M".P$.MI$:P.1:L1|
00000280: B2 36 33 38 34 3A 4C 32 B2 37 33 38 34 3A 4C 33 |.6384:L2.7384:L3|
00000290: B2 38 33 38 34 3A 42 47 B2 36 33 36 34 3A 42 4F |.8384:BG.6364:BO|
000002A0: B2 36 33 36 35 00 C5 0A 41 00 8B 54 24 B3 B1 22 |.6365...A..T$.."|
000002B0: 4F 22 AF 54 24 B3 B1 22 4D 22 AF 54 24 B3 B1 22 |O".T$.."M".T$.."|
000002C0: 4B 22 A7 35 30 00 E9 0A 46 00 8B 54 24 B2 22 4F |K".50...F..T$."O|
000002D0: 22 A7 99 22 93 22 53 24 3B 53 31 24 3A 54 50 B2 |".."."S$;S1$:TP.|
000002E0: 30 3A 50 B2 30 3A 89 39 35 00 29 0B 4B 00 99 22 |0:P.0:.95.).K.."|
000002F0: 93 22 53 24 3B 53 31 24 3A 54 50 B2 30 3A 99 22 |."S$;S1$:TP.0:."|
00000300: 1C 11 45 4E 54 45 52 20 46 49 4C 45 4E 41 4D 45 |..ENTER FILENAME|
00000310: 3A 22 3B 3A 8D 36 30 35 30 30 3A 46 24 B2 42 24 |:";:.60500:F$.B$|
00000320: 3A 50 24 B2 50 24 AA 46 24 00 4D 0B 4C 00 8B 20 |:P$.P$.F$.M.L.. |
00000330: 42 24 B2 22 22 20 A7 20 99 3A 8D 20 36 30 30 30 |B$."" . .:. 6000|
00000340: 30 3A 99 22 91 91 91 22 3A 89 20 37 35 00 76 0B |0:."...":. 75.v.|
00000350: 50 00 99 22 91 22 A3 31 35 29 22 12 1F 22 50 24 |P..".".15)".."P$|
00000360: 22 92 22 3A 8B C8 28 50 24 2C 31 29 B3 B1 C7 28 |".":..(P$,1)...(|
00000370: 31 38 29 A7 39 35 00 98 0B 55 00 4C B2 C3 28 50 |18).95...U.L..(P|
00000380: 24 29 3A 8B 4C B3 31 37 A7 50 24 B2 50 24 AA C7 |$):.L.17.P$.P$..|
00000390: 28 33 32 29 3A 89 38 35 00 BC 0B 5A 00 50 24 B2 |(32):.85...Z.P$.|
000003A0: C9 28 50 24 2C 31 34 29 3A 50 24 B2 C7 28 31 32 |.(P$,14):P$..(12|
000003B0: 39 29 AA 50 24 3A 99 22 11 11 11 22 00 F5 0B 5F |9).P$:."..."..._|
000003C0: 00 99 22 20 9A 4C 4F 41 44 20 41 44 44 52 45 53 |.." .LOAD ADDRES|
000003D0: 53 20 4F 46 20 50 49 43 22 3A 99 22 20 41 44 44 |S OF PIC":." ADD|
000003E0: 52 45 53 53 20 3A 05 20 20 20 20 20 20 9D 9D 9D |RESS :. ...|
000003F0: 9D 9D 9D 22 3B 00 2D 0C 60 00 4E 55 B2 31 3A 8D |...";.-.`.NU.1:.|
00000400: 36 30 35 30 30 3A 4E 55 B2 2E 3A 46 B2 C5 28 42 |60500:NU..:F..(B|
00000410: 24 29 3A 8B 42 24 B2 22 22 A7 99 3A 8D 36 30 30 |$):.B$.""..:.600|
00000420: 30 30 3A 99 22 91 91 91 22 3A 89 39 35 00 49 0C |00:."...":.95.I.|
00000430: 61 00 8B 46 B3 2E B0 46 B1 36 35 35 33 35 A7 99 |a..F...F.65535..|
00000440: 22 91 91 91 22 3A 89 39 35 00 62 0C 62 00 4E 24 |"...":.95.b.b.N$|
00000450: B2 C9 28 C4 28 46 29 2C C3 28 C4 28 46 29 29 AB |..(.(F),.(.(F)).|
00000460: 31 29 00 91 0C 64 00 99 22 91 22 A3 31 30 29 22 |1)...d..".".10)"|
00000470: 12 1F 22 4E 24 22 9D 92 22 3A 46 31 B2 B5 28 46 |.."N$"..":F1..(F|
00000480: AD 32 35 36 29 3A 46 32 B2 46 AB 32 35 36 AC 46 |.256):F2.F.256.F|
00000490: 31 00 9C 0C 69 00 8B 50 A7 31 36 35 00 DA 0C 6E |1...i..P.165...n|
000004A0: 00 99 22 1C 1D 11 48 4F 57 20 4D 41 4E 59 20 46 |.."...HOW MANY F|
000004B0: 49 4C 45 53 20 54 4F 20 4C 4F 41 44 22 3A 99 22 |ILES TO LOAD":."|
000004C0: 20 50 41 52 54 53 20 3A 20 20 20 20 20 20 20 20 | PARTS : |
000004D0: 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 F8 0C 70 00 4E |........";...p.N|
000004E0: 55 B2 31 3A 8D 20 36 30 35 30 30 3A 44 B2 C5 28 |U.1:. 60500:D..(|
000004F0: 42 24 29 3A 4E 55 B2 30 00 1E 0D 71 00 8B 20 42 |B$):NU.0...q.. B|
00000500: 24 B2 22 22 20 A7 20 99 3A 8D 20 36 30 30 30 30 |$."" . .:. 60000|
00000510: 3A 99 22 91 91 91 91 22 3A 89 20 31 31 30 00 44 |:."....":. 110.D|
00000520: 0D 73 00 99 22 91 22 A3 37 29 22 1F 12 20 22 C9 |.s..".".7)".. ".|
00000530: 28 C4 28 44 29 2C C3 28 C4 28 44 29 29 AB 31 29 |(.(D),.(.(D)).1)|
00000540: 22 20 92 22 00 52 0D 74 00 8B 44 B3 B2 33 A7 31 |" .".R.t..D..3.1|
00000550: 32 30 00 86 0D 75 00 99 22 11 20 20 20 20 20 20 |20...u..". |
00000560: 20 20 20 20 1C 4E 4F 20 4D 4F 52 45 20 54 48 41 | .NO MORE THA|
00000570: 4E 20 33 20 50 41 52 54 53 22 3A 81 41 B2 31 A4 |N 3 PARTS":.A.1.|
00000580: 31 30 30 30 3A 82 00 BF 0D 76 00 99 22 91 20 20 |1000:....v..". |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 20 20 20 20 91 91 91 91 91 22 3A 89 31 31 30 00 | .....":.110.|
000005C0: CA 0D 78 00 81 49 B2 31 A4 44 00 E6 0D 79 00 99 |..x..I.1.D...y..|
000005D0: 22 11 1D 1C 46 49 4C 45 4E 41 4D 45 20 4F 46 20 |"...FILENAME OF |
000005E0: 50 41 52 54 22 49 00 02 0E 7A 00 99 22 2D 2D 3E |PART"I...z.."-->|
000005F0: 22 3B 3A 8D 36 30 35 30 30 3A 46 24 28 49 29 B2 |";:.60500:F$(I).|
00000600: 42 24 00 27 0E 7B 00 8B 42 24 B2 22 22 20 A7 20 |B$.'.{..B$."" . |
00000610: 99 3A 8D 20 36 30 30 30 30 3A 99 22 91 91 91 91 |.:. 60000:."....|
00000620: 22 3A 89 20 31 32 31 00 4E 0E 7D 00 99 22 91 12 |":. 121.N.}.."..|
00000630: 1F 22 A3 33 29 46 24 28 49 29 22 92 22 3A 82 3A |.".3)F$(I)".":.:|
00000640: 50 24 B2 46 24 28 31 29 3A 46 24 B2 50 24 00 86 |P$.F$(1):F$.P$..|
00000650: 0E 82 00 99 22 11 1C 41 44 44 52 45 53 53 20 4F |...."..ADDRESS O|
00000660: 46 20 56 49 44 45 4F 20 4D 41 54 52 49 58 3A 22 |F VIDEO MATRIX:"|
00000670: 3B 3A 4E 55 B2 31 3A 8D 36 30 35 30 30 3A 4C 31 |;:NU.1:.60500:L1|
00000680: B2 C5 28 42 24 29 00 A9 0E 85 00 8B 42 24 B2 22 |..(B$)......B$."|
00000690: 22 20 A7 20 99 3A 8D 20 36 30 30 30 30 3A 99 22 |" . .:. 60000:."|
000006A0: 91 91 91 22 3A 89 31 33 30 00 D9 0E 87 00 4C 31 |...":.130.....L1|
000006B0: 24 B2 C9 28 C4 28 4C 31 29 2C C3 28 C4 28 4C 31 |$..(.(L1),.(.(L1|
000006C0: 29 29 AB 31 29 3A 99 22 91 22 A3 32 34 29 22 12 |)).1):.".".24)".|
000006D0: 1F 22 4C 31 24 22 9D 92 22 00 0C 0F 8C 00 99 22 |."L1$".."......"|
000006E0: 11 1C 41 44 44 52 45 53 53 20 4F 46 20 43 4F 4C |..ADDRESS OF COL|
000006F0: 4F 52 20 4D 45 4D 4F 52 59 3A 22 3B 3A 8D 36 30 |OR MEMORY:";:.60|
00000700: 35 30 30 3A 4C 32 B2 C5 28 42 24 29 00 2F 0F 8F |500:L2..(B$)./..|
00000710: 00 8B 42 24 B2 22 22 20 A7 20 99 3A 8D 20 36 30 |..B$."" . .:. 60|
00000720: 30 30 30 3A 99 22 91 91 91 22 3A 89 31 34 30 00 |000:."...":.140.|
00000730: 5F 0F 91 00 4C 32 24 B2 C9 28 C4 28 4C 32 29 2C |_...L2$..(.(L2),|
00000740: C3 28 C4 28 4C 32 29 29 AB 31 29 3A 99 22 91 22 |.(.(L2)).1):."."|
00000750: A3 32 34 29 22 12 1F 22 4C 32 24 22 9D 92 22 00 |.24)".."L2$"..".|
00000760: 97 0F 96 00 99 22 11 1C 41 44 44 52 45 53 53 20 |....."..ADDRESS |
00000770: 4F 46 20 59 4F 55 52 20 42 49 54 20 4D 41 50 3A |OF YOUR BIT MAP:|
00000780: 22 3B 3A 8D 36 30 35 30 30 3A 4E 55 B2 31 3A 4C |";:.60500:NU.1:L|
00000790: 33 B2 C5 28 42 24 29 00 B8 0F 99 00 8B 42 24 B2 |3..(B$)......B$.|
000007A0: 22 22 20 A7 99 3A 8D 20 36 30 30 30 30 3A 99 22 |"" ..:. 60000:."|
000007B0: 91 91 22 3A 89 31 35 30 00 E8 0F 9B 00 4C 33 24 |..":.150.....L3$|
000007C0: B2 C9 28 C4 28 4C 33 29 2C C3 28 C4 28 4C 33 29 |..(.(L3),.(.(L3)|
000007D0: 29 AB 31 29 3A 99 22 91 22 A3 32 34 29 22 12 1F |).1):.".".24)"..|
000007E0: 22 4C 33 24 22 9D 92 22 00 33 10 A5 00 4B 24 B2 |"L3$"..".3...K$.|
000007F0: 22 12 97 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000810: 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 99 22 | .":."|
00000820: 93 11 11 11 11 11 11 11 11 11 11 22 4B 24 22 11 |..........."K$".|
00000830: 22 4B 24 00 6B 10 AA 00 99 22 91 91 91 1C 12 20 |"K$.k...."..... |
00000840: 20 49 4E 53 45 52 54 20 50 49 43 54 55 52 45 20 | INSERT PICTURE |
00000850: 44 49 53 4B 20 41 4E 44 20 50 52 45 53 53 20 1F |DISK AND PRESS .|
00000860: 20 53 50 41 43 45 20 1C 20 92 22 00 97 10 AB 00 | SPACE . .".....|
00000870: 99 22 11 20 20 20 20 20 50 52 45 53 53 20 52 45 |.". PRESS RE|
00000880: 54 55 52 4E 20 54 4F 20 52 45 54 55 52 4E 20 54 |TURN TO RETURN T|
00000890: 4F 20 4D 45 4E 55 22 00 C4 10 AC 00 97 31 39 38 |O MENU"......198|
000008A0: 2C 2E 3A 92 31 39 38 2C 31 3A A1 54 24 3A 8B 54 |,.:.198,1:.T$:.T|
000008B0: 24 B3 B1 22 20 22 AF 54 24 B3 B1 C7 28 31 33 29 |$.." ".T$...(13)|
000008C0: A7 31 37 32 00 D5 10 AD 00 8B 54 24 B2 C7 28 31 |.172......T$..(1|
000008D0: 33 29 A7 32 35 00 F1 10 AE 00 8D 31 30 30 30 3A |3).25......1000:|
000008E0: 8B 4F 4B B3 B1 2E A7 8D 32 30 30 30 3A 89 31 36 |.OK.....2000:.16|
000008F0: 35 00 FC 10 AF 00 8B 50 A7 31 39 35 00 14 11 B4 |5......P.195....|
00000900: 00 8B 5A B2 30 A7 5A B2 31 3A 93 46 24 28 31 29 |..Z.0.Z.1:.F$(1)|
00000910: 2C 38 2C 31 00 31 11 B9 00 8B 44 B1 31 A7 8B 5A |,8,1.1....D.1..Z|
00000920: B2 31 A7 5A B2 32 3A 93 46 24 28 32 29 2C 38 2C |.1.Z.2:.F$(2),8,|
00000930: 31 00 4E 11 BE 00 8B 44 B1 32 A7 8B 5A B2 32 A7 |1.N....D.2..Z.2.|
00000940: 5A B2 33 3A 93 46 24 28 33 29 2C 38 2C 31 00 63 |Z.3:.F$(3),8,1.c|
00000950: 11 C3 00 8B 5A B2 30 A7 5A B2 31 3A 93 50 24 2C |....Z.0.Z.1:.P$,|
00000960: 38 2C 31 00 89 11 C8 00 8B 4C 33 B2 32 34 35 37 |8,1......L3.2457|
00000970: 36 A7 50 24 B2 C9 28 50 24 2C 31 34 29 3A 50 24 |6.P$..(P$,14):P$|
00000980: B2 22 12 C1 92 22 AA 50 24 00 A4 11 CD 00 99 22 |."...".P$......"|
00000990: 1D 22 50 24 22 20 49 53 20 4E 4F 57 20 4C 4F 41 |."P$" IS NOW LOA|
000009A0: 44 45 44 22 00 C6 11 D2 00 99 22 11 22 4B 24 22 |DED"......"."K$"|
000009B0: 11 22 4B 24 3A 42 47 B2 C2 28 42 47 29 3A 42 4F |."K$:BG..(BG):BO|
000009C0: B2 C2 28 42 4F 29 00 07 12 D7 00 99 22 91 91 91 |..(BO)......"...|
000009D0: 1C 12 49 4E 53 45 52 54 20 44 45 53 54 49 4E 41 |..INSERT DESTINA|
000009E0: 54 49 4F 4E 20 44 49 53 4B 20 41 4E 44 20 48 49 |TION DISK AND HI|
000009F0: 54 20 1F 52 45 54 55 52 4E 92 22 3A 92 31 39 38 |T .RETURN.":.198|
00000A00: 2C 31 35 3A A1 54 24 00 1E 12 DC 00 43 50 B2 34 |,15:.T$.....CP.4|
00000A10: 39 31 35 32 3A 53 56 B2 43 50 AA 33 32 34 00 3D |9152:SV.CP.324.=|
00000A20: 12 E1 00 8B 4C 31 B1 32 39 39 36 30 AF 4C 31 B3 |....L1.29960.L1.|
00000A30: 34 30 39 36 30 A7 50 41 B2 35 30 30 30 00 5C 12 |40960.PA.5000.\.|
00000A40: E6 00 8B 4C 32 B1 32 39 39 36 30 AF 4C 32 B3 34 |...L2.29960.L2.4|
00000A50: 30 39 36 30 A7 50 41 B2 35 30 30 30 00 7B 12 EB |0960.PA.5000.{..|
00000A60: 00 8B 4C 33 B1 32 39 39 36 30 AF 4C 33 B3 34 30 |..L3.29960.L3.40|
00000A70: 39 36 30 A7 50 41 B2 35 30 30 30 00 8E 12 F0 00 |960.PA.5000.....|
00000A80: 9E 43 50 2C 4C 31 2C 50 41 2C 31 30 30 30 00 A7 |.CP,L1,PA,1000..|
00000A90: 12 F5 00 52 41 B2 C2 28 32 35 33 29 AA 32 35 36 |...RA..(253).256|
00000AA0: AC C2 28 32 35 34 29 00 BA 12 FA 00 9E 43 50 2C |..(254)......CP,|
00000AB0: 4C 32 2C 52 41 2C 31 30 30 30 00 D3 12 FF 00 52 |L2,RA,1000.....R|
00000AC0: 41 B2 C2 28 32 35 33 29 AA 32 35 36 AC C2 28 32 |A..(253).256..(2|
00000AD0: 35 34 29 00 E6 12 04 01 9E 43 50 2C 4C 33 2C 52 |54)......CP,L3,R|
00000AE0: 41 2C 38 30 30 30 00 FF 12 09 01 52 41 B2 C2 28 |A,8000.....RA..(|
00000AF0: 32 35 33 29 AA 32 35 36 AC C2 28 32 35 34 29 00 |253).256..(254).|
00000B00: 1E 13 0E 01 8B 4C 33 B2 32 34 35 37 36 A7 46 24 |.....L3.24576.F$|
00000B10: B2 C9 28 46 24 2C C3 28 46 24 29 AB 32 29 00 49 |..(F$,.(F$).2).I|
00000B20: 13 13 01 9F 32 2C 38 2C 32 2C 46 24 AA C7 28 31 |....2,8,2,F$..(1|
00000B30: 36 30 29 AA 4E 24 AA 22 2C 50 2C 57 22 3A 9E 53 |60).N$.",P,W":.S|
00000B40: 56 2C 50 41 2C 52 41 2C 46 00 5B 13 15 01 98 32 |V,PA,RA,F.[....2|
00000B50: 2C C7 28 42 47 29 C7 28 42 4F 29 00 8F 13 18 01 |,.(BG).(BO).....|
00000B60: A0 32 3A 9E 36 35 34 38 34 3A 99 A3 36 29 22 11 |.2:.65484:..6)".|
00000B70: 1F 4F 4C 44 20 46 49 4C 45 20 4C 45 4E 47 54 48 |.OLD FILE LENGTH|
00000B80: 20 3D 20 31 30 30 30 30 20 42 59 54 45 53 22 00 | = 10000 BYTES".|
00000B90: CC 13 1D 01 99 A3 36 29 22 4E 45 57 20 46 49 4C |......6)"NEW FIL|
00000BA0: 45 20 4C 45 4E 47 54 48 20 3D 22 3B 3A 52 41 B2 |E LENGTH =";:RA.|
00000BB0: 52 41 AB 50 41 3A 99 52 41 22 42 59 54 45 53 22 |RA.PA:.RA"BYTES"|
00000BC0: 3A 53 41 B2 31 30 30 30 30 AB 52 41 00 F6 13 22 |:SA.10000.RA..."|
00000BD0: 01 99 A3 36 29 22 1C C0 C0 C0 C0 C0 C0 C0 C0 C0 |...6)"..........|
00000BE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000BF0: C0 C0 C0 C0 1F 22 00 1B 14 27 01 99 A3 36 29 22 |....."...'...6)"|
00000C00: 4D 45 4D 4F 52 59 20 53 41 56 45 44 20 20 20 20 |MEMORY SAVED |
00000C10: 3D 22 53 41 22 42 59 54 45 53 22 00 39 14 29 01 |="SA"BYTES".9.).|
00000C20: 99 A3 31 33 29 22 11 1C 12 20 48 49 54 20 41 4E |..13)"... HIT AN|
00000C30: 59 20 4B 45 59 20 91 92 22 00 49 14 2C 01 92 31 |Y KEY ..".I.,..1|
00000C40: 39 38 2C 31 35 3A A1 54 24 00 7A 14 31 01 99 22 |98,15:.T$.z.1.."|
00000C50: 93 22 53 24 22 11 11 11 1C 20 41 4E 4F 54 48 45 |."S$".... ANOTHE|
00000C60: 52 20 46 49 4C 45 20 28 59 2F 4E 29 1F 22 3A 92 |R FILE (Y/N).":.|
00000C70: 31 39 38 2C 31 35 3A A1 54 24 00 A5 14 36 01 8B |198,15:.T$...6..|
00000C80: 54 24 B2 22 59 22 A7 5A B2 30 3A 9F 31 35 2C 38 |T$."Y".Z.0:.15,8|
00000C90: 2C 31 35 3A 98 31 35 2C 22 49 30 3A 22 3A A0 31 |,15:.15,"I0:":.1|
00000CA0: 35 3A 89 32 35 00 AE 14 E8 03 4F 4B B2 2E 00 E3 |5:.25.....OK....|
00000CB0: 14 F2 03 81 41 B2 31 A4 44 3A 9F 31 35 2C 38 2C |....A.1.D:.15,8,|
00000CC0: 31 35 2C 22 52 30 3A 22 AA 46 24 28 41 29 AA 22 |15,"R0:".F$(A)."|
00000CD0: 3D 22 AA 46 24 28 41 29 3A 84 31 35 2C 45 52 3A |=".F$(A):.15,ER:|
00000CE0: A0 31 35 00 F8 14 FC 03 8B 45 52 B3 B1 36 33 A7 |.15......ER..63.|
00000CF0: 4F 4B B2 41 3A 41 B2 44 00 00 15 06 04 82 3A 8E |OK.A:A.D......:.|
00000D00: 00 36 15 D0 07 4D 4D 24 B2 46 24 28 4F 4B 29 AA |.6...MM$.F$(OK).|
00000D10: 22 20 49 53 20 4E 4F 54 20 4F 4E 20 54 48 49 53 |" IS NOT ON THIS|
00000D20: 20 44 49 53 4B 21 22 3A 54 41 B2 32 30 AB C3 28 | DISK!":TA.20..(|
00000D30: 4D 4D 24 29 AD 32 00 48 15 D5 07 99 22 11 11 1F |MM$).2.H...."...|
00000D40: 22 A3 54 41 29 4D 4D 24 00 70 15 DA 07 99 22 11 |".TA)MM$.p....".|
00000D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 45 | PRE|
00000D60: 53 53 20 53 50 41 43 45 22 3A 97 31 39 38 2C 2E |SS SPACE":.198,.|
00000D70: 00 85 15 E4 07 8B C2 28 32 30 33 29 B3 B1 36 30 |.......(203)..60|
00000D80: A7 32 30 32 30 00 8B 15 EE 07 8E 00 C6 15 60 EA |.2020.........`.|
00000D90: 99 22 91 1F 20 20 41 52 45 20 59 4F 55 20 53 55 |.".. ARE YOU SU|
00000DA0: 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 51 |RE YOU WANT TO Q|
00000DB0: 55 49 54 3F 20 28 05 59 1F 2F 05 4E 1F 29 22 3A |UIT? (.Y./.N.)":|
00000DC0: 97 31 39 38 2C 2E 00 E6 15 6A EA 41 B2 C2 28 32 |.198,....j.A..(2|
00000DD0: 30 33 29 3A 8B 41 B3 B1 32 35 AF 41 B3 B1 33 39 |03):.A..25.A..39|
00000DE0: A7 36 30 30 31 30 00 1E 16 74 EA 8B 41 B2 33 39 |.60010...t..A.39|
00000DF0: A7 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E10: 20 20 20 20 20 20 20 20 20 20 91 22 3A 8E 00 30 | .":..0|
00000E20: 16 79 EA 8B 20 28 54 50 B2 2E 29 20 A7 20 32 35 |.y.. (TP..) . 25|
00000E30: 00 69 16 7E EA 9F 31 35 2C 38 2C 31 35 2C 22 52 |.i.~..15,8,15,"R|
00000E40: 30 3A 43 4F 4D 50 52 45 53 53 20 4D 45 4E 55 3D |0:COMPRESS MENU=|
00000E50: 43 4F 4D 50 52 45 53 53 20 4D 45 4E 55 22 3A 84 |COMPRESS MENU":.|
00000E60: 31 35 2C 45 52 3A A0 31 35 00 78 16 88 EA 8B 45 |15,ER:.15.x....E|
00000E70: 52 B3 B1 36 33 A7 20 8A 00 8F 16 92 EA 93 22 43 |R..63. ......."C|
00000E80: 4F 4D 50 52 45 53 53 20 4D 45 4E 55 22 2C 38 00 |OMPRESS MENU",8.|
00000E90: AE 16 54 EC 97 31 39 38 2C 2E 3A 42 24 B2 22 22 |..T..198,.:B$.""|
00000EA0: 3A 99 22 A4 22 3B 3A 81 41 B2 31 A4 31 37 00 C3 |:.".";:.A.1.17..|
00000EB0: 16 5E EC A1 41 24 3A 8B 41 24 B2 22 22 A7 36 30 |.^..A$:.A$."".60|
00000EC0: 35 31 30 00 D9 16 68 EC 8B 41 24 B2 C7 28 31 33 |510...h..A$..(13|
00000ED0: 29 A7 99 22 9D 20 22 3A 8E 00 11 17 72 EC 8B 41 |)..". ":....r..A|
00000EE0: 24 B2 C7 28 32 30 29 AF 41 B1 31 A7 99 22 9D 9D |$..(20).A.1.."..|
00000EF0: 20 20 9D 9D A4 22 3B 3A 41 B2 41 AB 31 3A 42 24 | ...";:A.A.1:B$|
00000F00: B2 C8 28 42 24 2C 41 AB 31 29 3A 89 36 30 35 31 |..(B$,A.1):.6051|
00000F10: 30 00 26 17 77 EC 8B 41 24 B2 C7 28 32 30 29 A7 |0.&.w..A$..(20).|
00000F20: 20 36 30 35 31 30 00 45 17 7C EC 8B 28 41 B2 31 | 60510.E.|..(A.1|
00000F30: 37 29 B0 28 28 4E 55 29 AF 28 41 B2 36 29 29 A7 |7).((NU).(A.6)).|
00000F40: 36 30 35 31 30 00 60 17 81 EC 8B 41 24 B1 B2 22 |60510.`....A$.."|
00000F50: 30 22 AF 41 24 B3 B2 22 39 22 A7 36 30 35 36 30 |0".A$.."9".60560|
00000F60: 00 73 17 82 EC 8B 20 4E 55 B2 31 20 A7 20 36 30 |.s.... NU.1 . 60|
00000F70: 35 31 30 00 93 17 83 EC 8B 20 20 41 24 B2 B1 22 |510...... A$.."|
00000F80: C1 22 20 AF 20 41 24 B3 B2 22 DA 22 20 A7 36 30 |." . A$.."." .60|
00000F90: 35 36 30 00 B1 17 86 EC 8B 20 20 41 24 B3 22 20 |560...... A$." |
00000FA0: 22 20 B0 20 41 24 B1 22 5A 22 20 A7 36 30 35 31 |" . A$."Z" .6051|
00000FB0: 30 00 D5 17 90 EC 99 22 9D 22 41 24 3B 3A 97 32 |0......"."A$;:.2|
00000FC0: 31 32 2C 2E 3A 99 22 A4 22 3B 3A 42 24 B2 42 24 |12,.:.".";:B$.B$|
00000FD0: AA 41 24 3A 82 00 00 00 |.A$:.... |
.......Z..0.175.0....A.0.A.1:."COMPRESSO
R.O",8,1.Y....A.1.A.2:.56,31:.55,255:.:A
.2:.F$(3).X....53281,15:.53280,12:.646,6
.....B$."..
.".....S$.".".B$.".
COMPRESSOR .".B$...!.
PA.30960.0.".S1$.". * PRESS RETUR
N TO EXIT * .".B$.V.#.KO$.".".G(1
93).".PIC ":MI$."PIC.".T.(.."."S$"....".
12)".K.OALA"...+...12)"..M.ICROILLUSTRAT
OR"...-...12)"..O.THER".../...12)"..Q.UI
T.."...0...12)"PRESS .K., .M., .O., OR .
Q..":TP.1...2..198,15:.T$:BG.0:BO.0:NU..
.&.3..T$."Q".T$."Q"..60000:.48.F.7..T$."
K".P$.KO$:P.1:L1.32576:L2.33576:L3.24576
:BG.34576:BO.0...<..T$."M".P$.MI$:P.1:L1
.6384:L2.7384:L3.8384:BG.6364:BO.6365.E.
A..T$.."O".T$.."M".T$.."K".50...F..T$."O
".."."S$;S1$:TP.0:P.0:.95.).K.."."S$;S1$
:TP.0:."..ENTER FILENAME:";:.60500:F$.B$
:P$.P$.F$.M.L.. B$."" . .:. 60000:."..."
:. 75.V.P..".".15)".."P$".":.H(P$,1)..G(
18).95...U.L.C(P$):.L.17.P$.P$.G(32):.85
...Z.P$.I(P$,14):P$.G(129).P$:."..."..._
.." .LOAD ADDRESS OF PIC":." ADDRESS :.
......";.-.`.NU.1:.60500:NU..:F.E(B
$):.B$.""..:.60000:."...":.95.I.A..F...F
.65535.."...":.95.B.B.N$.I(D(F),C(D(F)).
1)...D..".".10)".."N$"..":F1..(F.256):F2
.F.256.F1...I..P.165.Z.N.."...HOW MANY F
ILES TO LOAD":." PARTS : ........
";...P.NU.1:. 60500:D.E(B$):NU.0...Q.. B
$."" . .:. 60000:."....":. 110.D.S..".".
7)".. "I(D(D),C(D(D)).1)" .".R.T..D..3.1
20...U..". .NO MORE THAN 3 PART
S":.A.1.1000:....V..".
.....":.110.J.X..I.1
.D...Y.."...FILENAME OF PART"I...Z.."-->
";:.60500:F$(I).B$.'.{..B$."" . .:. 6000
0:."....":. 121.N.}.."...".3)F$(I)".":.:
P$.F$(1):F$.P$......"..ADDRESS OF VIDEO
MATRIX:";:NU.1:.60500:L1.E(B$)......B$."
" . .:. 60000:."...":.130.Y...L1$.I(D(L1
),C(D(L1)).1):.".".24)".."L1$".."......"
..ADDRESS OF COLOR MEMORY:";:.60500:L2.E
(B$)./....B$."" . .:. 60000:."...":.140.
_...L2$.I(D(L2),C(D(L2)).1):.".".24)".."
L2$".."......"..ADDRESS OF YOUR BIT MAP:
";:.60500:NU.1:L3.E(B$)......B$."" ..:.
60000:."..":.150.....L3$.I(D(L3),C(D(L3)
).1):.".".24)".."L3$"..".3...K$."..
.":."
..........."K$"."K$.K...."..... INSERT
PICTURE DISK AND PRESS . SPACE . .".....
.". PRESS RETURN TO RETURN TO MENU".
D....198,.:.198,1:.T$:.T$.." ".T$..G(13)
.172.U....T$.G(13).25......1000:.OK.....
2000:.165......P.195......Z.0.Z.1:.F$(1)
,8,1.1....D.1..Z.1.Z.2:.F$(2),8,1.N....D
.2..Z.2.Z.3:.F$(3),8,1.C.C..Z.0.Z.1:.P$,
8,1...H..L3.24576.P$.I(P$,14):P$.".A.".P
$...M.."."P$" IS NOW LOADED".F.R.."."K$"
."K$:BG.B(BG):BO.B(BO)...W..".....INSERT
DESTINATION DISK AND HIT .RETURN.":.198
,15:.T$.....CP.49152:SV.CP.324.=....L1.2
9960.L1.40960.PA.5000.\....L2.29960.L2.4
0960.PA.5000.{....L3.29960.L3.40960.PA.5
000......CP,L1,PA,1000.....RA.B(253).256
.B(254)......CP,L2,RA,1000.S...RA.B(253)
.256.B(254)......CP,L3,RA,8000.....RA.B(
253).256.B(254)......L3.24576.F$.I(F$,C(
F$).2).I....2,8,2,F$.G(160).N$.",P,W":.S
V,PA,RA,F.[....2,G(BG)G(BO)..... 2:.6548
4:..6)"..OLD FILE LENGTH = 10000 BYTES".
L.....6)"NEW FILE LENGTH =";:RA.RA.PA:.R
A"BYTES":SA.10000.RA..."...6)"..........
....................."...'...6)"MEMORY S
AVED ="SA"BYTES".9.)...13)"... HIT AN
Y KEY ..".I.,..198,15:.T$.Z.1.."."S$"...
. ANOTHER FILE (Y/N).":.198,15:.T$...6..
T$."Y".Z.0:.15,8,15:.15,"I0:": 15:.25...
..OK........A.1.D:.15,8,15,"R0:".F$(A)."
=".F$(A):.15,ER: 15......ER..63.OK.A:A.D
......:..6.P.MM$.F$(OK)." IS NOT ON THIS
DISK!":TA.20.C(MM$).2.H.U.."...".TA)MM$
.P.Z..". PRESS SPACE":.198,.
......B(203)..60.2020.......F.`..".. AR
E YOU SURE YOU WANT TO QUIT? (.Y./.N.)":
.198,....J.A.B(203):.A..25.A..39.60010..
.T..A.39..".
.":..0.Y.. (TP..) . 25.I.~..15
,8,15,"R0:COMPRESS MENU=COMPRESS MENU":.
15,ER: 15.X....ER..63. ......."COMPRESS
MENU",8...T..198,.:B$."":.".";:.A.1.17.C
.^..A$:.A$."".60510.Y.H..A$.G(13)..". ":
....R..A$.G(20).A.1..".. ...";:A.A.1:B$
.H(B$,A.1):.60510.&.W..A$.G(20). 60510.E
.|..(A.17).((NU).(A.6)).60510.`....A$.."
0".A$.."9".60560.S.... NU.1 . 60510.....
. A$.."A" . A$.."Z" .60560...... A$."
" . A$."Z" .60510.U...."."A$;:.212,.:.".
";:B$.B$.A$:....
> CLICK IMAGE PREVIEW FOR FULL MODAL