00000000: 00 80 5E 55 3A 5A 45 52 4F 0D 20 20 20 20 C2 20 |..^U:ZERO. . |
00000010: C9 20 D4 20 D3 20 20 20 26 20 20 20 C7 20 C5 20 |. . . & . . |
00000020: CF 20 D3 20 D7 20 C1 20 D2 20 C5 0D 20 20 20 20 |. . . . . .. |
00000030: 20 20 20 CF 55 52 20 CE 45 57 20 D0 41 43 4B 45 | .UR .EW .ACKE|
00000040: 52 2F D5 4E 50 41 43 4B 45 52 0D 0D 20 20 20 20 |R/.NPACKER.. |
00000050: 20 20 20 20 20 20 42 59 20 D3 43 4F 54 54 20 C5 | BY .COTT .|
00000060: 2E 20 D2 45 53 48 0D 0D 20 20 20 D4 48 45 20 49 |. .ESH.. .HE I|
00000070: 44 45 41 20 46 4F 52 20 41 20 CE C5 D7 20 28 49 |DEA FOR A ... (I|
00000080: 2E 45 2E 20 42 45 54 54 45 52 21 29 0D 50 41 43 |.E. BETTER!).PAC|
00000090: 4B 45 52 2F 55 4E 50 41 43 4B 45 52 20 43 4F 4D |KER/UNPACKER COM|
000000A0: 42 49 4E 41 54 49 4F 4E 20 43 41 4D 45 20 54 4F |BINATION CAME TO|
000000B0: 0D 4D 45 20 4F 4E 45 20 44 41 59 2E 20 20 C9 20 |.ME ONE DAY. . |
000000C0: 57 41 53 20 47 4F 49 4E 47 20 54 48 52 4F 55 47 |WAS GOING THROUG|
000000D0: 48 20 54 48 45 0D 4C 4F 4E 47 2C 20 54 45 44 49 |H THE.LONG, TEDI|
000000E0: 4F 55 53 2C 20 4D 4F 4E 4F 54 4F 4E 4F 55 53 2C |OUS, MONOTONOUS,|
000000F0: 20 41 4E 44 20 50 41 49 4E 46 55 4C 0D CF CC C4 | AND PAINFUL....|
00000100: 20 50 41 43 4B 45 52 20 50 52 4F 43 45 53 53 2E | PACKER PROCESS.|
00000110: 20 20 C9 20 54 48 4F 55 47 48 54 20 54 4F 0D 4D | . THOUGHT TO.M|
00000120: 59 53 45 4C 46 20 22 D4 48 45 52 45 20 48 41 53 |YSELF ".HERE HAS|
00000130: 20 54 4F 20 42 45 20 41 20 42 45 54 54 45 52 20 | TO BE A BETTER |
00000140: 57 41 59 0D 54 4F 20 44 4F 20 54 48 49 53 21 22 |WAY.TO DO THIS!"|
00000150: 2E 0D 0D 20 20 20 D4 41 2D 44 41 21 20 20 D4 48 |... .A-DA! .H|
00000160: 45 20 42 49 52 54 48 20 4F 46 20 54 57 4F 20 4E |E BIRTH OF TWO N|
00000170: 45 57 0D 53 59 4D 42 49 4F 54 49 43 20 50 52 4F |EW.SYMBIOTIC PRO|
00000180: 47 52 41 4D 53 20 2D 20 22 D3 48 41 50 45 20 54 |GRAMS - ".HAPE T|
00000190: 48 41 54 20 C2 41 42 59 22 0D 41 4E 44 20 22 D5 |HAT .ABY".AND ".|
000001A0: CE D0 C1 C3 CB C5 D2 2E 38 39 22 2E 20 20 D3 48 |........89". .H|
000001B0: 41 50 45 20 54 48 41 54 20 C2 41 42 59 20 49 53 |APE THAT .ABY IS|
000001C0: 0D 41 20 C7 C5 CF D3 20 50 52 4F 47 52 41 4D 2E |.A .... PROGRAM.|
000001D0: 20 20 D5 CE D0 C1 C3 CB C5 D2 2E 38 39 20 57 4F | .........89 WO|
000001E0: 52 4B 53 20 49 4E 0D 54 48 45 20 22 4E 41 54 49 |RKS IN.THE "NATI|
000001F0: 56 45 22 20 4D 4F 44 45 20 4F 46 20 54 48 45 20 |VE" MODE OF THE |
00000200: C3 36 34 2E 0D 0D 20 20 20 D4 48 45 20 4E 45 57 |.64... .HE NEW|
00000210: 20 50 41 43 4B 45 52 20 57 49 4C 4C 20 50 41 43 | PACKER WILL PAC|
00000220: 4B 20 C1 44 56 41 4E 43 45 44 0D CF C3 D0 20 C1 |K .DVANCED.... .|
00000230: 52 54 20 D3 54 55 44 49 4F 2C 20 CB 4F 41 4C 41 |RT .TUDIO, .OALA|
00000240: 2C 20 41 4E 44 20 C4 4F 4F 44 4C 45 21 0D 50 49 |, AND .OODLE!.PI|
00000250: 43 54 55 52 45 53 2E 20 20 D7 48 49 4C 45 20 49 |CTURES. .HILE I|
00000260: 4E 20 C7 C5 CF D3 2C 20 4F 50 45 4E 20 41 20 44 |N ...., OPEN A D|
00000270: 49 53 4B 0D 43 4F 4E 54 41 49 4E 49 4E 47 20 22 |ISK.CONTAINING "|
00000280: D3 48 41 50 45 20 54 48 41 54 20 C2 41 42 59 22 |.HAPE THAT .ABY"|
00000290: 20 41 4E 44 0D 44 4F 55 42 4C 45 2D 43 4C 49 43 | AND.DOUBLE-CLIC|
000002A0: 4B 20 4F 4E 20 54 48 45 20 22 D3 48 41 50 45 20 |K ON THE ".HAPE |
000002B0: 54 48 41 54 20 C2 41 42 59 22 0D 49 43 4F 4E 2E |THAT .ABY".ICON.|
000002C0: 20 20 C1 20 44 49 41 4C 4F 47 20 42 4F 58 20 57 | . DIALOG BOX W|
000002D0: 49 4C 4C 20 41 50 50 45 41 52 20 57 49 54 48 0D |ILL APPEAR WITH.|
000002E0: 41 20 4C 49 53 54 49 4E 47 20 4F 46 20 4E 4F 4E |A LISTING OF NON|
000002F0: 2D C7 C5 CF D3 20 28 49 2E 45 2E 20 4E 4F 52 4D |-.... (I.E. NORM|
00000300: 41 4C 0D C3 36 34 29 20 46 49 4C 45 53 2E 20 20 |AL..64) FILES. |
00000310: C3 48 4F 4F 53 45 20 59 4F 55 52 20 50 49 43 54 |.HOOSE YOUR PICT|
00000320: 55 52 45 2C 20 54 48 45 4E 0D CF D0 C5 CE 20 49 |URE, THEN..... I|
00000330: 54 2E 20 20 D3 48 41 50 45 20 54 48 41 54 20 C2 |T. .HAPE THAT .|
00000340: 41 42 59 20 57 49 4C 4C 0D 41 55 54 4F 4D 41 54 |ABY WILL.AUTOMAT|
00000350: 49 43 41 4C 4C 59 20 44 45 54 45 43 54 20 54 48 |ICALLY DETECT TH|
00000360: 45 20 46 4F 52 4D 41 54 20 20 4F 46 0D 59 4F 55 |E FORMAT OF.YOU|
00000370: 52 20 50 49 43 54 55 52 45 20 41 4E 44 20 44 49 |R PICTURE AND DI|
00000380: 53 50 4C 41 59 20 54 48 41 54 20 49 4E 46 4F 0D |SPLAY THAT INFO.|
00000390: 57 48 49 4C 45 20 4C 4F 41 44 49 4E 47 20 49 4E |WHILE LOADING IN|
000003A0: 20 59 4F 55 52 20 50 49 43 54 55 52 45 2E 20 20 | YOUR PICTURE. |
000003B0: C1 46 54 45 52 0D 59 4F 55 52 20 50 49 43 54 55 |.FTER.YOUR PICTU|
000003C0: 52 45 20 49 53 20 4C 4F 41 44 45 44 2C 20 49 54 |RE IS LOADED, IT|
000003D0: 20 57 49 4C 4C 20 42 45 0D 44 49 53 50 4C 41 59 | WILL BE.DISPLAY|
000003E0: 45 44 2E 20 20 C1 20 54 49 4E 59 20 44 49 41 4C |ED. . TINY DIAL|
000003F0: 4F 47 20 42 4F 58 20 57 49 4C 4C 0D 41 50 50 45 |OG BOX WILL.APPE|
00000400: 41 52 20 41 53 4B 49 4E 47 20 22 C9 4D 41 47 45 |AR ASKING ".MAGE|
00000410: 20 CF CB 3F 22 2E 20 20 C3 4C 49 43 4B 20 4F 4E | ..?". .LICK ON|
00000420: 0D D9 C5 D3 20 4F 52 20 CE CF 2E 20 20 C9 46 20 |.... OR ... .F |
00000430: D9 C5 D3 20 57 41 53 20 53 45 4C 45 43 54 45 44 |... WAS SELECTED|
00000440: 2C 20 59 4F 55 52 0D 50 49 43 54 55 52 45 20 57 |, YOUR.PICTURE W|
00000450: 49 4C 4C 20 42 45 20 50 41 43 4B 45 44 20 41 4E |ILL BE PACKED AN|
00000460: 44 20 59 4F 55 20 57 49 4C 4C 0D 42 45 20 50 52 |D YOU WILL.BE PR|
00000470: 4F 4D 50 54 45 44 20 46 4F 52 20 41 20 46 49 4C |OMPTED FOR A FIL|
00000480: 45 4E 41 4D 45 2E 0D 0D 20 20 20 C1 46 54 45 52 |ENAME... .FTER|
00000490: 20 50 41 43 4B 49 4E 47 20 41 20 50 49 43 54 55 | PACKING A PICTU|
000004A0: 52 45 2C 20 54 48 45 20 4E 45 58 54 0D 54 48 49 |RE, THE NEXT.THI|
000004B0: 4E 47 20 54 4F 20 44 4F 20 49 53 20 57 52 49 54 |NG TO DO IS WRIT|
000004C0: 45 20 41 20 53 4D 41 4C 4C 20 50 52 4F 47 52 41 |E A SMALL PROGRA|
000004D0: 4D 0D 54 4F 20 C4 C9 D3 D0 CC C1 D9 20 54 48 45 |M.TO ....... THE|
000004E0: 20 50 41 43 4B 45 44 20 50 49 43 54 55 52 45 2E | PACKED PICTURE.|
000004F0: 0D 0D 20 20 20 D5 CE D0 C1 C3 CB C5 D2 2E 38 39 |.. .........89|
00000500: 20 49 53 20 56 45 52 59 20 45 41 53 59 20 54 4F | IS VERY EASY TO|
00000510: 20 55 53 45 2E 0D D4 57 4F 20 22 4C 4F 41 44 53 | USE...WO "LOADS|
00000520: 22 2C 20 54 48 52 45 45 20 D0 CF CB C5 53 20 41 |", THREE ....S A|
00000530: 4E 44 20 54 57 4F 20 D3 D9 D3 53 0D 41 52 45 20 |ND TWO ...S.ARE |
00000540: 41 4C 4C 20 54 48 41 54 20 49 53 20 4E 45 45 44 |ALL THAT IS NEED|
00000550: 45 44 20 54 4F 20 44 49 53 50 4C 41 59 20 41 0D |ED TO DISPLAY A.|
00000560: 50 41 43 4B 45 44 20 50 49 43 54 55 52 45 2E 0D |PACKED PICTURE..|
00000570: 0D 20 20 20 CF 4E 20 54 48 45 20 4E 45 58 54 20 |. .N THE NEXT |
00000580: 50 41 47 45 20 49 53 20 41 20 53 41 4D 50 4C 45 |PAGE IS A SAMPLE|
00000590: 0D 50 52 4F 47 52 41 4D 20 55 53 45 44 20 54 4F |.PROGRAM USED TO|
000005A0: 20 44 49 53 50 4C 41 59 20 50 41 43 4B 45 44 0D | DISPLAY PACKED.|
000005B0: 50 49 43 54 55 52 45 53 2E 20 20 C8 4F 57 45 56 |PICTURES. .OWEV|
000005C0: 45 52 2C 20 49 46 20 59 4F 55 27 44 20 4C 49 4B |ER, IF YOU'D LIK|
000005D0: 45 20 54 4F 0D 53 45 45 20 41 20 56 45 52 53 49 |E TO.SEE A VERSI|
000005E0: 4F 4E 20 4F 46 20 54 48 45 20 50 52 4F 47 52 41 |ON OF THE PROGRA|
000005F0: 4D 20 C1 CC D2 C5 C1 C4 D9 0D 4F 4E 20 44 49 53 |M ........ON DIS|
00000600: 4B 2C 20 CC CF C1 C4 20 26 20 CC C9 D3 D4 20 22 |K, .... & .... "|
00000610: D2 C5 D6 C9 C5 D7 32 22 2E 0D 0D 20 20 20 D5 CE |......2"... ..|
00000620: D0 C1 C3 CB C5 D2 2E 38 39 20 4C 4F 41 44 53 20 |.......89 LOADS |
00000630: 41 54 20 24 C3 39 30 30 20 28 35 31 34 35 36 0D |AT $.900 (51456.|
00000640: 44 45 43 49 4D 41 4C 29 2E 0D 0D 0D 20 20 20 31 |DECIMAL).... 1|
00000650: 30 30 20 D3 D9 D3 35 37 38 31 32 22 D5 CE D0 C1 |00 ...57812"....|
00000660: C3 CB C5 D2 2E 38 39 22 2C 38 2C 30 3A 0D 20 20 |.....89",8,0:. |
00000670: 20 20 20 20 20 20 D0 CF CB C5 37 38 30 2C 30 3A | ....780,0:|
00000680: D0 CF CB C5 37 38 31 2C 30 3A 0D 20 20 20 20 20 |....781,0:. |
00000690: 20 20 20 D0 CF CB C5 37 38 32 2C 32 30 31 3A D3 | ....782,201:.|
000006A0: D9 D3 36 35 34 39 33 0D 20 20 20 31 31 30 20 D3 |..65493. 110 .|
000006B0: D9 D3 35 37 38 31 32 22 59 4F 55 52 20 50 49 43 |..57812"YOUR PIC|
000006C0: 54 55 52 45 2E D3 C8 D0 22 2C 38 2C 30 3A 0D 20 |TURE....",8,0:. |
000006D0: 20 20 20 20 20 20 20 D0 CF CB C5 37 38 30 2C 30 | ....780,0|
000006E0: 3A 50 4F 4B 45 37 38 31 2C 30 3A 0D 20 20 20 20 |:POKE781,0:. |
000006F0: 20 20 20 20 D0 CF CB C5 37 38 32 2C 4D 45 4D 4F | ....782,MEMO|
00000700: 52 59 20 50 41 47 45 20 46 4F 52 20 50 49 43 0D |RY PAGE FOR PIC.|
00000710: 0D 20 20 20 31 32 30 20 D0 CF CB C5 32 35 31 2C |. 120 ....251,|
00000720: CD D3 C2 20 4F 46 20 50 49 43 54 55 52 45 20 D3 |... OF PICTURE .|
00000730: CF D5 D2 C3 C5 0D 20 20 20 31 33 30 20 D0 CF CB |...... 130 ...|
00000740: C5 32 35 32 2C CD D3 C2 20 4F 46 20 50 49 43 54 |.252,... OF PICT|
00000750: 55 52 45 20 C4 C5 D3 D4 0D 20 20 20 31 34 30 20 |URE ..... 140 |
00000760: D0 CF CB C5 32 35 33 2C CD D3 C2 20 4F 46 20 43 |....253,... OF C|
00000770: 4F 4C 4F 52 20 4D 45 4D 4F 52 59 0D 0D 20 20 20 |OLOR MEMORY.. |
00000780: 31 35 30 20 D3 D9 D3 35 31 34 35 36 20 3A 20 D2 |150 ...51456 : .|
00000790: C5 CD 20 55 4E 50 41 43 4B 20 50 49 43 54 55 52 |.. UNPACK PICTUR|
000007A0: 45 0D 20 20 20 31 36 30 20 D3 D9 D3 35 31 34 35 |E. 160 ...5145|
000007B0: 39 20 3A 20 D2 C5 CD 20 44 49 53 50 4C 41 59 20 |9 : ... DISPLAY |
000007C0: 50 49 43 54 55 52 45 0D 0D 20 20 20 31 37 30 20 |PICTURE.. 170 |
000007D0: C7 C5 D4 C1 24 3A C9 C6 C1 24 3D 22 22 D4 C8 C5 |....$:...$=""...|
000007E0: CE 31 37 30 0D 20 20 20 31 38 30 20 D3 D9 D3 35 |.170. 180 ...5|
000007F0: 31 34 35 39 20 3A 20 D2 C5 CD 20 52 45 54 55 52 |1459 : ... RETUR|
00000800: 4E 20 54 4F 0D 20 20 20 20 20 20 20 20 20 20 20 |N TO. |
00000810: 20 20 20 20 20 20 20 20 20 20 20 20 50 52 45 56 | PREV|
00000820: 49 4F 55 53 20 53 43 52 45 45 4E 0D 20 20 20 31 |IOUS SCREEN. 1|
00000830: 39 30 20 C5 CE C4 0D 0D 20 20 20 D4 48 41 54 20 |90 ..... .HAT |
00000840: 57 41 53 20 41 20 4C 45 4E 47 54 48 59 20 50 52 |WAS A LENGTHY PR|
00000850: 4F 47 52 41 4D 20 57 41 53 4E 27 54 0D 49 54 21 |OGRAM WASN'T.IT!|
00000860: 3F 20 20 C1 46 54 45 52 20 54 48 45 20 D3 D9 D3 |? .FTER THE ...|
00000870: 35 31 34 35 36 2C 20 54 48 45 20 54 48 52 45 45 |51456, THE THREE|
00000880: 0D 56 41 4C 55 45 53 20 54 48 41 54 20 57 45 52 |.VALUES THAT WER|
00000890: 45 20 D0 CF CB C5 44 20 49 4E 54 4F 20 4D 45 4D |E ....D INTO MEM|
000008A0: 4F 52 59 0D 41 52 45 20 53 54 49 4C 4C 20 54 48 |ORY.ARE STILL TH|
000008B0: 45 52 45 2E 20 20 D4 48 45 59 20 C4 CF 20 CE CF |ERE. .HEY .. ..|
000008C0: D4 20 47 45 54 0D 44 45 53 54 52 4F 59 45 44 2E |. GET.DESTROYED.|
000008D0: 20 20 D4 48 45 20 D3 D9 D3 35 31 34 35 39 20 55 | .HE ...51459 U|
000008E0: 53 45 44 20 54 4F 0D 44 49 53 50 4C 41 59 20 54 |SED TO.DISPLAY T|
000008F0: 48 45 20 50 49 43 54 55 52 45 2C 20 4C 4F 4F 4B |HE PICTURE, LOOK|
00000900: 53 20 41 54 20 54 48 45 53 45 0D 42 59 54 45 53 |S AT THESE.BYTES|
00000910: 20 54 4F 20 44 45 54 45 52 4D 49 4E 45 20 57 45 | TO DETERMINE WE|
00000920: 52 45 20 54 4F 20 46 49 4E 44 20 54 48 45 0D 50 |RE TO FIND THE.P|
00000930: 49 43 54 55 52 45 20 54 4F 20 44 49 53 50 4C 41 |ICTURE TO DISPLA|
00000940: 59 2E 20 20 C9 54 27 53 20 50 4F 53 53 49 42 4C |Y. .T'S POSSIBL|
00000950: 45 20 54 4F 0D 55 4E 50 41 43 4B 20 41 20 50 49 |E TO.UNPACK A PI|
00000960: 43 54 55 52 45 2C 20 4D 4F 56 45 20 49 54 2C 20 |CTURE, MOVE IT, |
00000970: 41 4E 44 0D 44 49 53 50 4C 41 59 20 54 48 45 20 |AND.DISPLAY THE |
00000980: 50 49 43 54 55 52 45 20 41 54 20 49 54 27 53 20 |PICTURE AT IT'S |
00000990: CE C5 D7 0D 4C 4F 43 41 54 49 4F 4E 2E 0D 0D 20 |....LOCATION... |
000009A0: 20 20 D4 48 45 20 C7 C5 CF D0 D2 CF C7 D2 C1 CD | .HE ..........|
000009B0: CD C5 D2 20 50 41 43 4B 41 47 45 20 57 41 53 20 |... PACKAGE WAS |
000009C0: 55 53 45 44 0D 54 4F 20 43 52 45 41 54 45 20 42 |USED.TO CREATE B|
000009D0: 4F 54 48 20 D3 48 41 50 45 20 54 48 41 54 20 C2 |OTH .HAPE THAT .|
000009E0: 41 42 59 20 41 4E 44 0D D5 CE D0 C1 C3 CB C5 D2 |ABY AND.........|
000009F0: 2E 38 39 2E 20 20 D4 48 45 20 53 4F 55 52 43 45 |.89. .HE SOURCE|
00000A00: 20 43 4F 44 45 20 46 4F 52 0D 42 4F 54 48 20 50 | CODE FOR.BOTH P|
00000A10: 52 4F 47 52 41 4D 53 20 49 53 20 53 4D 41 4C 4C |ROGRAMS IS SMALL|
00000A20: 2E 20 20 C8 4F 57 45 56 45 52 2C 20 44 55 45 0D |. .OWEVER, DUE.|
00000A30: 54 4F 20 41 56 41 49 4C 41 42 4C 45 20 44 49 53 |TO AVAILABLE DIS|
00000A40: 4B 20 53 50 41 43 45 2C 20 54 48 45 20 53 4F 55 |K SPACE, THE SOU|
00000A50: 52 43 45 0D 46 49 4C 45 53 20 41 52 45 20 CE CF |RCE.FILES ARE ..|
00000A60: D4 20 49 4E 43 4C 55 44 45 44 20 4F 4E 20 54 48 |. INCLUDED ON TH|
00000A70: 49 53 20 44 49 53 4B 2E 0D 0D 20 20 20 C1 4C 54 |IS DISK... .LT|
00000A80: 48 4F 55 47 48 2C 20 49 46 20 59 4F 55 20 57 4F |HOUGH, IF YOU WO|
00000A90: 55 4C 44 20 4C 49 4B 45 20 54 4F 20 48 41 56 45 |ULD LIKE TO HAVE|
00000AA0: 0D 41 20 43 4F 50 59 20 4F 46 20 54 48 45 20 53 |.A COPY OF THE S|
00000AB0: 4F 55 52 43 45 20 46 49 4C 45 53 20 28 49 4E 0D |OURCE FILES (IN.|
00000AC0: C7 45 4F D7 52 49 54 45 20 32 2E 31 20 46 4F 52 |.EO.RITE 2.1 FOR|
00000AD0: 4D 41 54 29 2C 20 59 4F 55 20 41 52 45 0D 45 4E |MAT), YOU ARE.EN|
00000AE0: 43 4F 55 52 41 47 45 44 20 54 4F 20 D7 D2 C9 D4 |COURAGED TO ....|
00000AF0: C5 20 54 4F 20 4D 45 20 41 4E 44 20 41 53 4B 20 |. TO ME AND ASK |
00000B00: 46 4F 52 0D 41 20 43 4F 50 59 2E 20 20 C8 41 50 |FOR.A COPY. .AP|
00000B10: 50 59 20 50 41 43 4B 49 4E 27 20 26 20 55 4E 50 |PY PACKIN' & UNP|
00000B20: 41 43 4B 49 4E 27 20 21 0D 0D 0D 0D 20 20 20 20 |ACKIN' !.... |
00000B30: 20 20 20 2A 2A 2A 2A 2A 20 C5 4E 44 20 4F 46 20 | ***** .ND OF |
00000B40: D4 45 58 54 20 2A 2A 2A 2A 2A 0D |.EXT *****. |
..^U:ZERO. B I T S & G E O S W A
R E. OUR NEW PACKER/UNPACKER..
BY SCOTT E. RESH.. THE IDEA FOR
A NEW (I.E. BETTER!).PACKER/UNPACKER COM
BINATION CAME TO.ME ONE DAY. I WAS GOIN
G THROUGH THE.LONG, TEDIOUS, MONOTONOUS,
AND PAINFUL.OLD PACKER PROCESS. I THOU
GHT TO.MYSELF "THERE HAS TO BE A BETTER
WAY.TO DO THIS!"... TA-DA! THE BIRTH
OF TWO NEW.SYMBIOTIC PROGRAMS - "SHAPE T
HAT BABY".AND "UNPACKER.89". SHAPE THAT
BABY IS.A GEOS PROGRAM. UNPACKER.89 WO
RKS IN.THE "NATIVE" MODE OF THE C64...
THE NEW PACKER WILL PACK ADVANCED.OCP A
RT STUDIO, KOALA, AND DOODLE!.PICTURES.
WHILE IN GEOS, OPEN A DISK.CONTAINING "
SHAPE THAT BABY" AND.DOUBLE-CLICK ON THE
"SHAPE THAT BABY".ICON. A DIALOG BOX W
ILL APPEAR WITH.A LISTING OF NON-GEOS (I
.E. NORMAL.C64) FILES. CHOOSE YOUR PICT
URE, THEN.OPEN IT. SHAPE THAT BABY WILL
.AUTOMATICALLY DETECT THE FORMAT OF.YOU
R PICTURE AND DISPLAY THAT INFO.WHILE LO
ADING IN YOUR PICTURE. AFTER.YOUR PICTU
RE IS LOADED, IT WILL BE.DISPLAYED. A T
INY DIALOG BOX WILL.APPEAR ASKING "IMAGE
OK?". CLICK ON.YES OR NO. IF YES WAS
SELECTED, YOUR.PICTURE WILL BE PACKED AN
D YOU WILL.BE PROMPTED FOR A FILENAME...
AFTER PACKING A PICTURE, THE NEXT.THI
NG TO DO IS WRITE A SMALL PROGRAM.TO DIS
PLAY THE PACKED PICTURE... UNPACKER.89
IS VERY EASY TO USE..TWO "LOADS", THREE
POKES AND TWO SYSS.ARE ALL THAT IS NEED
ED TO DISPLAY A.PACKED PICTURE... ON T
HE NEXT PAGE IS A SAMPLE.PROGRAM USED TO
DISPLAY PACKED.PICTURES. HOWEVER, IF Y
OU'D LIKE TO.SEE A VERSION OF THE PROGRA
M ALREADY.ON DISK, LOAD & LIST "REVIEW2"
... UNPACKER.89 LOADS AT $C900 (51456.
DECIMAL).... 100 SYS57812"UNPACKER.89"
,8,0:. POKE780,0:POKE781,0:.
POKE782,201:SYS65493. 110 SYS57812"
YOUR PICTURE.SHP",8,0:. POKE780,0
:POKE781,0:. POKE782,MEMORY PAGE
FOR PIC.. 120 POKE251,MSB OF PICTURE S
OURCE. 130 POKE252,MSB OF PICTURE DEST
. 140 POKE253,MSB OF COLOR MEMORY..
150 SYS51456 : REM UNPACK PICTURE. 160
SYS51459 : REM DISPLAY PICTURE.. 170
GETA$:IFA$=""THEN170. 180 SYS51459 : R
EM RETURN TO. PREV
IOUS SCREEN. 190 END.. THAT WAS A LE
NGTHY PROGRAM WASN'T.IT!? AFTER THE SYS
51456, THE THREE.VALUES THAT WERE POKED
INTO MEMORY.ARE STILL THERE. THEY DO NO
T GET.DESTROYED. THE SYS51459 USED TO.D
ISPLAY THE PICTURE, LOOKS AT THESE.BYTES
TO DETERMINE WERE TO FIND THE.PICTURE T
O DISPLAY. IT'S POSSIBLE TO.UNPACK A PI
CTURE, MOVE IT, AND.DISPLAY THE PICTURE
AT IT'S NEW.LOCATION... THE GEOPROGRAM
MER PACKAGE WAS USED.TO CREATE BOTH SHAP
E THAT BABY AND.UNPACKER.89. THE SOURCE
CODE FOR.BOTH PROGRAMS IS SMALL. HOWEV
ER, DUE.TO AVAILABLE DISK SPACE, THE SOU
RCE.FILES ARE NOT INCLUDED ON THIS DISK.
.. ALTHOUGH, IF YOU WOULD LIKE TO HAVE
.A COPY OF THE SOURCE FILES (IN.GEOWRITE
2.1 FORMAT), YOU ARE.ENCOURAGED TO WRIT
E TO ME AND ASK FOR.A COPY. HAPPY PACKI
N' & UNPACKIN' !.... ***** END OF
TEXT *****.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL