[unix-pc.sources] ``picture'' pictures and source

jdc@naucse.UUCP (John Campbell) (12/23/88)

A lot of people responded to my offer for ``picture'', a 3b1 program
that displays 7 grey level 240x150 pictures.  Lenny suggested I post
the program (and pictures) to unix-pc.source, which I am doing.  The
posting is in two pieces.  This is the first of the pieces.

#! /bin/sh
# This is a shell archive, meaning:
# 1. Remove everything above the #! /bin/sh line.
# 2. Save the resulting text in a file.
# 3. Execute the file with /bin/sh (not csh) to create:
#	000read.me
#	bay.uue
#	bay2.uue
#	bird.uue
#	brain.uue
#	flower.uue
# This archive created: Thu Dec 22 21:39:16 1988
# By:	John Campbell ()
export PATH; PATH=/bin:/usr/bin:$PATH
echo shar: "extracting '000read.me'" '(1891 characters)'
if test -f '000read.me'
then
	echo shar: "will not over-write existing file '000read.me'"
else
sed 's/^X//' << \SHAR_EOF > '000read.me'
X------------------Start Manifest-------------
X000read.me  This file
X
Xbay.uue     Picture of SF bay, landsat
X
Xbay2.uue    Landsat, same scene futher south
X
Xbird.uue    Silly bird (original 512x512x1 8 bit with grey scale at bottom)
X            This picture was subsampled to 128x128 for our screen.
X
Xbrain.uue   NMR image of human brain (original 256x256x1 12 bit)
X            This picture was subsampled to 128x128 for our screen.
X
Xflower.uue  Pansy? (original 512x512x3 8 bit with striking colors--sigh)
X
Xpicture.c   Source code--complete
X
Xpicture.l   man page (.l not .1 see?)
X
Xpig.uue     A pig (no kidding, original 512x512x3 8 bit a little blurry)
X
Xshuttle.uue Space shuttle (taking off--poor, original 1024x1024x3 8 bit)
X
Xskull.uue   X ray of skull (original very good, 512x512x1 8 bit)
X            This picture was subsampled to 128x128 for our screen.
X-------------------End Manifest-------------
X
XWell, here are your pictures (and the picture making program).  I
Xbuild picture using the ccc shell script that someone posted a while
Xago:
X
X$ ccc -O picture.c -o picture
X$ strip picture
X
Xbut you can use cc if you don't have ccc (and ld if you know the shared
Xlibrary ``magic'').  The man page and source code should explain themselves
Xwell enough.  Uuencode the pictures I've provided (*.uue) and simply say:
X
X$ picture *.pic*
X
Xto see all the pictures (and any transmission errors :-) Pictures can be put 
Xin $PICTURES or /usr/local/lib, which is where I've stuck mine.  The command 
X``picture bay.pic'' anywhere on my machine finds /usr/local/lib/bay.pic.Z 
Xand displays it.
X
XHave fun--share any improvements. (I modified this code to flicker between 
Xtwo bitmaps, it can go quite fast!  (Moving pictures--especially cartoons 
Xare quite possible.  Who's got the time and talent?)
X
XJohn Campbell   ...!arizona!naucse!jdc   (CAMPBELL@NAUVAX.bitnet)
XRt 4, Box 952A
XFlagstaff, AZ  86001
SHAR_EOF
if test 1891 -ne "`wc -c < '000read.me'`"
then
	echo shar: "error transmitting '000read.me'" '(should have been 1891 characters)'
fi
fi
echo shar: "extracting 'bay.uue'" '(7472 characters)'
if test -f 'bay.uue'
then
	echo shar: "will not over-write existing file 'bay.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'bay.uue'
Xbegin 644 bay.pic.Z
XM'YV0, (&C"&PH,&#" L2/#ACA@P9#AW*"/@P1@P9-&@\W,@1XL:&$CN*' GQ
XMHHP8#4F>7-DQI,J7,%M^Y"C1),V4)"6F=(FSITN1(2W:[*C (D*C"9,J+4BS
XM(PR+,9O^C#ITI,VJ52-&W5A5)<^((7]V?8AS9DN0.SVBY;F59-&%2^/*%>@Q
XMZUB84\FVE1E3Z-ZV6LO.S*LW)^&S: =[-/L2JL@8;^$JG*M4\D 8,X1"%3SR
XM*523)@_W90GS*MZ].D'&%+T:XL^U@5,79@U3P4FDE',?=>SXL>;?F?T6WGKW
XM=G'4J\.^+DO[;%2P:=F"7:RW^4,%8@5:7KI=^T#A'2\2%/];LW;-.:G^M4XR
XM-&?FJD>R9ZSXH\[G:=5&Q6[UY-SN=)'7E6>_/41@>04>IY*"I/U547] 54?6
XM?( U1 -T\;E&F'*Q#1>A#+9Q)9)N"CVXDDF5>5;1@9IEYB&%"YHH8W@QIC<;
XM;<6QEQ]G&KZTEFL3\HA3B N2F.*1")IG47 HL25?>X\]YZ"/]E7WVI0WI;93
XM8C>IM>5@L$V'%I'M&6EF0@L)=1EZU&$)(8.HW:>?EVU65!-UQ\FIH6R)_0C;
XM8AQ.Z.4,%X+8V)G>(:EFFDDB&%:A;AKWY*05C178:742IN"&?F;8)Z%]#AHD
XM=!H6522BNEFFZF\LJN8D57[5!">0BW4E'7U Y;?284/EA:&@&.IT8;"=C@H2
XM?XT!2!EN1UUF$*/C&57>>E!&F9Q7ADWUE9]-13I;EE5&=^-:PZY%YDNHQM7=
XMHJRRZ!B/-O(%X8?RTNKAMUI)Z%R-/4[ZJ[&N"L;EH+"=6Z=3B::Z'5SL-MHH
XMO(U%S)&E(L9[\+BSA5;EO6YJ:V&871*L)49DB@::36<JJQ!2T&[&)%D:>5OQ
XMB:7A2JG'V,XL,V/"EMOIEKH";?!?*E<VWD',.OQN;]X&)R-Y$U.;<[TO]N<>
XMO5@C]B.00!M;;HBF'3Q6RIZ5[1W#C6)V$<28$M<;:'M.E2>-#KYMF,UF"1PF
XML6*"E-%U#[+9EI'1LDS@4^XF^51))XD&HW&?3=U@KA<'66W@XG'5*W(<WOIS
XMN7_/8-O1W\VZHL)*(JTT>B]W2S2_<&?]I)BXYL5@Y,I)F66^5@;\)T1$-BQ<
XM<6JB+FW9JY?W,D$[1PTY>)DC]V)84L/YJJ_P]?VSWPV!+2W+S!]*..+F);[Z
XM\Y._"EBED5M%\5;3O2]QY+92O]S6>V($\(ZBRUJ>=Z<BD</,ESSS-"]JIA&<
XM\]H6(=--QS<.6LZHXK8Q3XE.<]];V>(>D[+D$5!I![06W<9BNMIURS34^PBD
XM;I,>7XD,9. "U@51=CBZ2(HC")E(T5:VN@\F:7([P\K$>(-!IE')A?.RF%0$
XM)J% S4E0&_.2 KYCH*-H#H<&84G1CE; +A9H2D&!X,S\ K7/L"E#W^H6VZZV
XMD9@!T57V.N+6?C><HIS'625B7T)HMBPO>M%>2 SB5=Z6.2-.+87A*6&#'FBA
XM%OIL?ZX37?DJ4\4<5D4N+?/C^<"X%ZC5S)/PTY?N+M>F@.'%=Z:<RNB*IY2-
XMH,DJF-1D%SO6R6E]<7*; F359!3(X;Q&(_"*CS#_%3!DG8@[I\LCPKAC/@+Z
XM$#R=U,M0PE9(] ANFM&S%,1XY1R30?%+I;0<T%!Y+ ZJ2S+8/.:12B=+)6E,
XME%/J2C8)64U0FE%G(G0=?H9S-3W)Y$M[RU_WZI2R$4[F6>U,6]A"Z)LO"K&0
XM0[Q+2J[B39;0YB?#RA\4N290C U4)N+13>#(QRRDL?.92CO0>B@D(/8-CWZ#
XMA.8$'3(K0W)L1G34*,CD)#1]CC0W.SP;JQ+:J(ZX\8 )8M,@KW@BF=*I4MB*
XMGD^]TC7JD(I+:!S35M*5)H0J#J4%U%_EJ'2YI#J5C(Z! <UDY[S8+1"0NHJ;
XMD+0G+J ,#9;I8B9102BS:=:HI?ADH8&@BCWUD,8F/H'C_B12 UJ-TXU!NZ 8
XML9A7-'VOBRAE:-U$-#RHLM"M2FRK:,$Y,(WZ:XZEE6PB&X0HE1GN?[*DE&8_
XMF4X$^@=(%*-I?0++PGR%BDZ>LIR&@$G!B-S5G,LZVYI81-(!%NY_/%/?;&>T
XM(*ERA2*;>:)LQ^J3XJ+1-3Z+3:$"9=RV!%5=B$N8FFK"0X<Q=;K/J2E4,X>9
XM]/ESH[K+ZL&P2BB(#*M<&!DO1XY[V(D U6RE4ZYV/@+;'[IR('S)G>3@2R.H
XMJ'5:WW61<.-:NP[]\V,@SL@P>_31K0H0P5L$U%#/P\KPG;"7U,5;:-^*RS)F
XMCE17[)P^[],W^9 3+0*VCU;WTD=GD4Y5"PY,!C.H.LD19H/;-6\M#32>?+ZQ
XM)_7"L9#Y!EGA6E4U!";)?Y1+NH1])S7'^VJ =HPN ^\L*"CA9[(@1QJQK,VB
XM'?XR5>6:K5SI),QB7B<[H752 FGN<(5#\$V52!$LL?0XBY.IG3_$''U=2: Y
XMW5;V) +HS@ 5)0E.KU=!P\/F,F6J4D%8T]R'1@6I5; .6=R&K JN^ZIQL7,*
XMKD [/<1/1VO0Y&.G?\S&,)5>^JA84V0$;:>2Q:EUP=KU,6)P*^TE?NR1F<HH
XMI_\BP)+>\=>P-;!7@3CAQS6M26[[]CM;"&.JE3; V':5MC]B3'YALM3/=%>O
XM6?S@S>+IHC)S23;;8V&_>A:179+@?CGEN12JEF-#.3&C_D/$A273IM5NXX0#
XM'F,3(1:'912L['@72=*B\J8C=@B@N^KMW31XJ"P?(!Y7EK.+))G"Q"-W/DOG
XMV:QI#&?)D:ZH;F(P+BD8O2A&D*@GTZZD-$GH>:1(9EPD= K3^+H05F"4A4E6
XMW=XZX:5\>!LGVK :BKKL,G?Z<V=NYD(;^B,KJT%ZE4VA62\P326YL\[S)F-J
XM(9S'DIR62Y6%SMVH:-_)M>*?6!8RK$-;K9>RNIQO.!'.5DY;;)9MK_"WX6.Y
XMEY5S[RKR0E]Y]RV=[7$AN7MX;#6\-^[-H:PP]'(L,<F'4RI3-#)S6<S%TSMU
XMA#/@*DF ^<#>@<7F!3$WU3;NTM%T?'W9^N[%; "=W#<9[86'-M&0?/IF/44P
XM ):KEG=U7=OO'8-4=5'[1OZ5Z?F94WJQ/N\GN23<C(=M4>$J?#"26-F,I+$:
XM,A1NI'<,Y'RR)T\SH77F-SOQ9U)-5V7HQW%M]Q]S15HKU#8$N"\S1C=O=4MR
XM0TK;]'6N\W%\1ROR-W^G9W6M1192E7Q(%6V+MF@85T0S*'*TY'!-Y$N%=8*\
XMEX)7MWW31#8$XB(NR% Q\QY;H1$,XC]/@TU$-&T^QCN8=R^@XG_7X7+>ME0G
XM$T\>)VYFDF@#\6YNLC:L!R@Q6'MP]GQJF$2T9C/C%%!-P8,'XG+L,T2O@WB5
XM!6%F\6IA1!R+M'Q]=4M-J'59D7X:.'1_$GDG^#\'T7Q*Y3:@=5ZM=6$+$4<,
XM(A"V-E;517YU85V356"(A7#XY62[11.+V'1,@8!WR#%Y2'B5M'J\Y1$WUQL.
XM@6Q44TU18D@+-2.;PW7PA"G<,A*+:'8&(7!]AVH5EH<*HXD3\RRZ]7%32$J\
XM44\T\XQ-049UDA4:%D4?EF$#QG2@!VW*UA8TT'+*^!\^LAW29!:VR$ Q)7@)
XMV"N"@W_MUGY("$RG.$DV!%'20X5:@7R)=XZ-AERG=CVG(3<H0F=+8BTV48XV
XMN(U")WWTD4KT-FJI<T"'$1("F5>95&SU13D,&!,4H2(8MXTP\QDN05PDMTL;
XM5FU#TEZ_!U^Y(XD;28<,9G,M8H89*&65LF 7)F=Z UJ?HF?-D8GFHCJX,UT>
XM,U$U:20?(U;]DET%R(R]01>OYCZYPC1QQD3<6%C^15H5:60UV#R8IQ5(UY28
XM6"R/0A!\HGP$9V"%>#&Z=3\3\G2,@S$S]2F!P8/OXI81I''AB)9[Q#7]A6G!
XMAQ/CV!K(%X-VUQ)NM7KC!T=8AE&G.$'F-3>+L4((*9A+X1$7:"SZ,W65YH;'
XMR(:D"&<\$8H5,Y18]G[ @S1#5WNF232<24GX587,@1DK*87<R'S(*()YPQK2
XM984\)3JPR7EVZ"&S(IS#5IM) 2I^MB?M.)J3R5:QQY(1XHMVPHS[988@ HZF
XM]5D]QXD;*"\TV927-QLB1BP<]1#4]T_>R4F'Z"^E2"FAJ(A(R24PA8T,17;G
XMN9%R657PD5& ^)OQ(I&M8:!IU'%@87TLER%Q!DI6)I^4Y9QH0E?=I!78MD0\
XM$T<Z&$&JZ&B!TX74P9=/(6!;F"R)>9?29*'<<82Q84A -C!<R9VTA"<9MW&/
XMR14A(8=+LI+.EYC^<V?_*9"[HE_APA8UT%C5F6MZ<FDVTFZ^Z8=:])TS9Y>K
XMB"4V4!HNVHCKR6$/ :,R1*,=2E:ER1=$6G.R:7 B(G_@@Z XUYX:V:59!*$E
XM2%B7IF6>8Z916#?-(43OM1)N>AXU ",K2B_#4F9T2A>(N7FN82N64ZB^%9]3
XM"9H7HR [F8L,R4(.BD[]XI=[YDOZLJB6-3/_*)4/P:2S 8 ER#OM:*,09Z/'
XM\7/SM1%R"&&C24KR65BB1ZK*=(UIZ8T0(:E[T65W\W5>9X L&J5/8Z565*C>
XM":111H4!RCBDYJO:5QA'XS=C$62[HUU(B'\*&B.'>H4'-1"O.I^PQVZ9@:W9
XM*HN,ZF*-=Z9WDZ[UR9UWT8NUH4':<0/$VGZ:96L\4J0UN8>\QX"M*:(OB("[
XMZ",]JG8R0'TU"G%+:!W:2;#H^6#/TB^QZ;!%>25EN:FX-*(32E.29%DS(+'Z
XM07*@>EJA@K%H&6<\-*]1]"C]Z67&."_W]!=VY'T 6)PPN&J$F5T- ;/.B383
XMD5H1!J3*AYA84ELBPCM5<:O:00-,ZCMB0Z%JI"*(Z:[<$6Y7:3]:"Z536C/-
XMRHGPXJ"[H6U;8Z]_27#1$AQ>JW:7]3V8%BX+RJ?7<B>:XCX-F[9&$P/0*E<;
XM*K33MEQ&*YBKHS='!:8.*V7K)ZXC2D(OT;.J\Q0W *.$$CH>.JY]!Q)S^X5*
XM5Q<3PJK_0J^HBVKC>!=4"Q<S\+,6,EYP6IKP%VN3N%Q'^WE$>Z @6: D&XMO
XM0GOD=A&MJQWO*618*GF)BZU\U29N&Y+E%E'K5AKR(XR8])E?FKKW*F2.ARJB
XMM[SGY%[ J;?9676^:WGGUR!\J2K\USBQ*ZT5$G8NU7UGR7;@2W'BV[GYQ:YC
XMZA6W$S&]8:*-*"OB%[#&@6 ">;_A6U3A"87EZYOJ,ZL\Z:S<P:KOHKV1!"8'
XMK,"X:Z%U6R  Q;WZRW?1J$_KQR\Z*Z@3&'= 0:!@U"'0H:BAZ[WY:UH9]H'<
XM9;; .S\R0K7CEAKS=IW[MS&$=F#TBT<<'+@_5%<K"[\<\;S)^8EC:*Y.MR8J
XMB9NPVC9!,</GF+_CY%C<F; T&[QE:QH^ZG32^5L<]X\)'+KNE1BR2Z8GP:JB
XM*I>?%,6Z.C$^G$.0I5@!:[L;:8ZY6\-?V24B-DKQ"2>@53=[C#0\II(<MSN!
XM3&B"W,9<]$5<UQ UX*VG-(H[QFP)JA*-[,C@Y<*2BRV)F,1<O"H_^H;!@FH*
XMAR]CE:^I9A5[W!TJI&N&%1CA]R"3O,K*0R[0N2UYDI*(5,)0 HT<2,$FE4-?
XM*22]256?B7I</,FM[%]0N;+G&ZUT*:O+7#&C3,IBN!B#NRF3NB)>6%FJK(P+
XM:;)#&:9DVT(>*L8V,Y;?6,56Q'_T7*#3VQGK7,W'R21;\J_$1:G_!&#$+#DY
XM%S4^3'A5^$T:!U[D2SW' ] QZU*T$[N<$QOF6V,B2Q2"-L#IRJNSV3OI;-%=
XM/%0;-H-/FG#QG,<V&#O%6QF'7"%%NX9^]L\ K71;*9'2%XP>%K0T)J'6BR8O
XM6M.IUJ1Q(G H79-HU2NFG)VY7)A^0YJANLB/$<X)L;FY"IRY]<7!U]0Q"X^Z
XM%%TA$6^1%T-\<H9%33A<'<)E&M?&YTJ5)-:M"#WU@U&<UTB.VUTTRZ8ZH]6P
XMN9X1EL$^_2^;8=<)' ,9U<[ Q6>$#1;$!R-%RTVB7%!<+<];EL$<)8J*S9%V
XM\WH[U9K<,TRJP<ERY+0VTL@ LB1('3566-99!JR?K<X)PG_E:$T<3;@9;6D:
XM+)D6*]C/@AE6.["^K<L0C2NU;=LD>1&;3%/8>-;V(]D<JL8-#,85Q,R^EA&;
XMG(!=%GD)JR>]V!#+S57\>3(R&MM("ANR.Y'B1)U<(=P(A1%+ND+3>RF,==UD
XM&#_E3<.4UWS2'2IH#<9]+"K:5#DF(=_V9R&;C&Q,])2:727$1P/]W5H@W%0N
XM(]#RMC?2D1*#^U2WIF/W_&D+9K49X<+[9:P5,BP5WD&WA"!:1(9CZL<X\3>J
XMNJ!O.%60,3[:\;H-+HJ+!N0J5"XM?F)@U1NY+2GD1"L9=82B*J!PI2OR'6Q"
XM<2&AX\2>G&GZ(\-%WD<PCC[SY33O3"^^%5>)Q;;?->4(]:7=')_:HIGS>\1=
XMKL0"XB@BDN2/'7W=U,<A#,GYHN8E\MQ^C#<\E;?7I8]S_K6;%&?N*QRBV;GA
XM14'BM"^ -^(K.%QF[CAM]*HHH72)OL(6F9,-LH5=LW^'7&DF)]55O1B KDS!
XM.-LOU!-*""3$ENCG]>4$Y%/BDA*3#7^([!JM[AV]K:X(6]"RP>6?3N?UQ'AT
XM%D/>]=-53;D0$^P]+MMC7,M-!!+NI-,QVVV=#FKAYH&T$^7T'+N@]).T:%SJ
XMO".7)Z6^I82>7MX$B]<P#H^)>)L \Y6>(;>)+0.#&Q;4CJZ52JE:(C<!,5$K
XMD>P+K$F;[5B,-.[EQR1,0UX!'Y.=/(4U"MS-V=1&FU"PEG)-##,CW.R\218!
XM_WT=C9W=":ZJ4<D*[_%S'2KKC>U@,N8G?Z)9O+0?5A(;XO+,:]NS%.-/1TP<
XM+K^",MZO4?$6\>&[NDNU&(/<;N3L'%9K-2Z)6.K3+:<TD;Q*+[@*2YAZEIG^
XM3EC+I/ TMTD*:7PB;L<<&S*3VO5T'"GW)>LB,R=F3[=%U5)LI)_IB:QNZ!)=
XMC\+7J35E'M9$^O.<^<8W26=B*U%/-/?[<=>"?Z#S$1%'MZA1/W]Z1\",O\_R
XMPK3P"<86<?-LN<CV?*?R<1'$Y?-.G?F6M;-5=A^:&U@K"LT30OJ,S>C-!WWP
XM]![(WJ6N/V[P>%9,.$HISQ,WC_-*Z>QY)^>U^?N*6U2V*!B%F"-"7=BVRLY.
XMWK*?[/O!CY2L/_4.IHO4"ZHJ;IQY",5DC$\M'6AT^OU86%1P5D@$#'A Q_8B
X"H0"?
X 
Xend
SHAR_EOF
if test 7472 -ne "`wc -c < 'bay.uue'`"
then
	echo shar: "error transmitting 'bay.uue'" '(should have been 7472 characters)'
fi
fi
echo shar: "extracting 'bay2.uue'" '(6869 characters)'
if test -f 'bay2.uue'
then
	echo shar: "will not over-write existing file 'bay2.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'bay2.uue'
Xbegin 644 bay2.pic.Z
XM'YV0,V0$E!&CH(R#"!,>+&APH4*%,1Y"A!$1AL6+&#-JW,BQ8\:$ P_.8"@Q
XMY$$:$26J7,FR)42'+EU&G)F2(4F"*4LJ,!ESX<R>$G\^C.&QJ-&C,$ &K/ER
XM98V (X%*C9D3)\RJ32'6S/G3)DVL @\JF.JP:TNP/(<B7<N6XHRW2ZUN]4E0
XM9$*P9/-27;@4+]:&-GUZ-=A0X8R=9(7678E7Y%N$,>*VG7R4J57&)4%J?CPT
XM[%2X6G$6OCOW+&'27ELJH)%6YFG(/:,:3DBY=E'8A;=6'6@9]-N4K6NVWJMR
XM=%#86F\*3JUXX&&IHW,79]G:MG6/QA5>? AUMMZ\8 '?#4TXO''FIW>/'3Y5
XM\7<9%.-?GW^Q,4:HG-_K9]EX<5:@@<FED@(QT- >=-PA2!]]0=4'5W\)1J@9
XM3'8E%E15Y=7%5'_N^6<7@4\E!N%X[Q6TX'Q@<<0=:/NUJ-QE&L8H6F<]C4;@
XM# :R5R%I))[5WHD+_C2#BH;I2-UQ,@$X&%?EA>>A:!@J=&-K.M+48XN0 7DB
XM0AME]YB.(XV868E0!M;DDP(BQV-*"E!4PTKL9?<>>UK6J1%!21FYHH28_>??
XM7^;I1I)?+ZIFD0T[.@8<5_I%%I&!=5F$T&-$V6DI10;IB25Q:J(YHY6,)L>H
XM66)=].:DGFT:4WUW7>IJ?(FV!*FJC85:W%>+V0HE72^V25&J7X:EZ95\/I21
XMB:^^FNI)PZJ:59AE"K8<<Z+FBJ&O,.0'%V?YC;E?0,<F^VI$?:'JK&F%0F8E
XM;AU>AN%7I&*+XZ1OL28LEGJ*JV]] 2Y+ZWBET2AM64WF9IZT.6%;8)'.#;?;
XMA?X6M^_$F,IYKF* I78K7;M:"Z.Z@Q&$+0RS G>@P$#)1[&X8NXE)EXF6=Q9
XMR &_6[ ,(W>[;<3[O;ORSX4UN[&W+K[V)*B ZC;RPO[A.*M>(U;Z\[X:"Y06
XM3W$5>Z2/:,++Y(9I1EO0TB GVC)X4U-MTZ^QGHMR:7+V2^&@+P88P\AY<BPT
XM68^E/;&)E2*IU[Q A224W.C27;>52T>V9Z=Y/?V@W\E6RI!%,G?K[*!#R7PA
XMKIS/%='2;-/KW+^>4<ZR5TFYC>"HGB-I=Z$,D8X5M\[*=I#J:BL7TND$@V19
XMVSP3&CMJ8'_*)-Z2,LPIVKROCCBEDA,N55I^"9@AP!PG'W"I&T':\+#B_0=\
XM]"L39-+O[',,)V/9HP<QC1K_Q3SF2D&-<81#HO^WU?1RS-YB0Y7SS @S-UO(
XM_2QRJB\UJS2:DIK_Q.48J^W,7V=SD> $=Y-^+9!MP4K2G_@T$,Q-4%_DXHSX
XMUB<#1'U&1-/Y"Z]>H[C#=&1AFLN,<G"%*IY8[H0L\XZY3O(=\M6J:DG3D,%P
XM=D-R?2>#"U$9$"_%)'\-<#9[,QY_D*,X\''$B86+2@?)!2%D3=%56\D;3 )B
XM+[[QS&S#ZQ@7U^6^A'Q04CE428[*M;^6G9&*9C372*[8*(+!;EHUL^-M0@@=
XM.N+&4_#YHYUP@CG'H:I=A1/A_)2G&]1(Y(X488WA8L(;4FTMBI*LT^6(4A<<
XML8>0%D(DA:S5+E!F*X\5Y& <)[2[5-II2>]SR;9P=[+0;'"$J;*E0-H(GEDF
XM*B0F]"600N;,,.*R)!&$W,=XJ,"BI/!J^+(+45(BS6DZ<32_<Y[U/'/-/EW%
XM3+HRF-*\:4'7&0MDY5R0C!Z&$&:VSW2YC"6/_G0XSBT&E 5AD8]R LL*Y1-%
XMN,)/U?;$1I:@!(J?:TH<;8+0;-& F=>;TT/I<[F*60V8K61DCH:H/FV=\IC2
XMB98MW0+2:A)/B.I2RDA&:IUQEN<WCBQ6.D^73M>-D4W>M$B][#5*HMTTIQ/B
XM:4_A*4>&4I2E.#TF+S,ZH!MBY"2B1-D3(R35VG S6B1:W],"JAE$88U,'U-D
XMES[R45%JJIWOXTQ9*6,YQ:6F+X[+&GZ*6J%K&BEKFWS( LU(TX_B]:::6NE>
XMV2+!)5D6:0_+8QL;]D*;:M.+&JFLU6J:EU<N$T^3-6LE*V8F6;*5E-=3J+"2
XM]\FU%*@[%YM(:FUSV?JEY*)8=2.P\L<BV4+H@Q+T:%B#641*[I:WO?W: 6.C
XMI^&X=*LLF2GF&OA8V'8NDL\UJV7E(MW8D!:[F5036+3;/--UUYVSRE;KPCL9
XM8%Y67=4]K3UUNB[VE@ZW*N$--OTD+/JVA9JK]9K1 ES8EOP&D@M5BG^S%98,
XMB@E[8C2P;4/G4W[1+*0.AL^+DG(Y4@9DPKGEI8$T7%]X1C<P[Z7.*$D23>8J
XMMBW$^A:W#"0U\$J1Q1Y>6WRB&]P>\@\DS?,IC'E)6-!69HL,CK([M0/D8R$+
XM<)7L+90!##SZ;>>E7:5LCCT;SN0"T<Q\96R6QVLQQ'Z'Q$5^UF-03+XI#TTE
XM50XMX$JJ90A=T8=6!;-G)LRTSY(9Q!+),T:$O&AD#8REUY5RHB4=DPE3&)FY
XMPZV 6Y7G/5N9E:[M['ZE-!E(14F$4(P,:/"BZ!\VFH8!XFQ<OU7DX1 :>^6;
XM#H1!LE+/F RU:4.SECH<6MG(K7W9P6B%.&3KR<#O9;N.56#YY>-.B]:2@DI7
XMK8H97(: T]*MVQ7B!-T3] F;BD,&K\F2QYEM8RE*_;&THV29+JCQ!96*_B+^
XM3"K' '(3DYL+,V51\ET/Y3I73J5-OK&#J3(E--1GDI&:&NH2>0<GKO4^],S.
XMC<)@*UE^[AI>)S.CIX?;&"'RWB#M9GF\E2S\BR\>*,NA>%BRR)O',83W-IL)
XM;*1PW+:J>W&V.Q:T4<<*W+I#WK9!+3,_XUO/0?ZY+_<\WIDSBI$!IGAM)W.J
XMC1EM)E]NT:(IU-ZGU]?<1,ZH$[4NZ) @G5(D I7!667T1.^VPRC5C._JGEW*
XM^'J@ *\(_HHV;MV>W7\QUWL* ?C&..L'W%_C4$X)4W:QTHKAQQ*(U"DF=&R^
XM)42#&]Q +!V<,T5G770O2]WY5<FPI-[L?A,Z5AR+5P![5YA.?O)Q-H2T&4I*
XMV;I&KYI,^F">(3[Q[A7N&ZDD<+:L%6+V%<QVH&U4JYJDX5GB7>>Q*%L$U=/F
XME&GJY+,"MA[S_=GQ PS:95]!_ 232H'56@]3SKU;;91UV'];:VD=[9QH7_:\
XM)RSM]!2:TWW-,E,RL&+AIE'5TBGXMW(#8S' 1QC/URGKQV;]$F@,-C[N%RS6
XM]3O:I4F!PD73\GLO 3J65TRZ$S.3$BX>!X"BX7X"U!H&PAI[Q"++U4.S<D=U
XMDUAQ9TH*%B/O<B5?YT@Z<DM=1R]8P5IJ]C< B$[:4GRS81,.Q'A<-D@G=A2N
XM)#>2%U0@0TWT4V^' QLE9RS\EB7H,34T<U\&B(/VMS,?:#HS52"F=FH;5T=E
XMLX;2(D9'4U 9AS+@PDN$X4H^H88N5G7+Y$*,IWD#IGG=T62+R$1'43*-E'<%
XM,U%]V(7 !R.W Q]\X1N6A2GC\H0QF((EL79"5%3:17!#^#GIX2[L<HCS<WH 
XM-R$^!#_^85>[ X8E]4N7B!XVT6LUHB$R^%JD5AE)Y#$_&#I*UUJA$D]DJ%7)
XM08+ETE*L@7]Y\QN 1&26)31-PBW%*$B2:!2+HWI$2%Z[AU+P]F^F='+VIVHX
XM(5B7M3-->"+WY5=_Z"V-H3/<P5[)=E3>$W>&A()]J#P$=B0. S8K&":#(6";
XMQUMB Y"7F$E=IE#=IUT=8AEG1550%7/1P3T)!%NW2'+3Z!7&]I#B=8]/V(I#
XM]%8 )5?D*''(M#WC]X4.MX9.(G$M5V3[N%. 1TTHF9*'N)*BXAX.I#,NA9&>
XM-"WO5)#-&(08)W?3)5S88W79UA#1-$G N))'5'@Y5$JCLQ8_:).PN$-TM'UQ
XMHY,]4T$)E37E$XJ,!B0BEGB#41\+6)0^@86XY!7^F(0T5#: *7/C1'2S0X)5
XMU$$\0R5+,9(VM21,Z&J5X56/R96EXXH3=T&3PI=L46%^Y8H'UU=:=I.?E4B?
XM450+^(]UV5N4A1V.*8JI>5\-Z%GMIIELP4?P8G!6R3HPR$KI=V_.DB> Q7L/
XM*(JLA8QQ65G8V&BOAH@(,WD->9,HEB9T V&SLTHXV21G2% GN!^G26*^91!N
XM4919.5=9EA1Z)G5\MC:T Y08.!BWAEE5-6LWR95*%GS/XR>X$VY& TUV 9:]
XMB!21(EYKMDK8%YQ#*726UCEY-T-RMYNZZ2DM@U$5:8>/!!7D-)GCY(+*"5%$
XM!E3TN226UFO;1TO?]8NJ67[' XV-P5V&!D"M0RG$UIH_YF&\A:'RX6T,*9$ 
XM2'KJY8P\-&Z@TV="EH?/-FLR%(F0XQO@4A7%*:/C69=3Y9@-V7FRYRLH^4ZW
XM"55,"3"4*44&)# 2.)7'E$Z5AZ%P:4+P8I<M1ID?RE'A-QY\"'AH]91=>J1Z
XMYX#2V#EG2!1#XISXR%C$ADA""9=MVELWAW!XF![[=S,."IYWB:=B6G]Y89YD
XMM)4:\VFJR5=F6J@(6H\W9#BO*(21IT2B:E^FZFA]!&7AQ)0>2DNY\6H#^G1!
XMN:F<&ET$XJE=0H08,W1*I*/L5U(M>A5YRC4AM$1*!TU9&7' 9F8_=YVU*J6W
XMZGR[UZNQJ*A4]:=F*62ZXCK$-#<B@9AH1:!X=$!?,:/D^*Q<V29!J:#&>H)5
XM1)@ZND]1%&U?F#%YA%'KAJC?^1%UU!>NN:9<B2=8)J7Q07_F&''R]),'BHCE
XM6GDY]HQ)M(D-)H!N274]XBC_.9YVF5P?1Y>N!IJIR:.$\BE=(W(9*(O_.*?+
XM(:?_QG,K@E?P2!5/JF_ZUK'EL69>:IUKDZ#\$5-76:I)(QZ(DQ[M%9SO2*'<
XM]E3]V1Z>=GBZ28MH*C5/NTH*XW,]ZX=@R*!=\9<*VT&#IZ4%^3VAAWL5Z!JP
XM>J/1]+$)EG\*IIXZJV0PT#BZYZU%R9R/=K*&N8[4-F9D>7["!:49RV<X&V2]
XM6H__";)W\T-2YX@L93/6NIX9@YN/I*NLDJ75Y(5^JR1/J[%#AG=2>XA=@K@Z
XMJZX50XXK&$-T.U% JI$R^3ECUZ,^N*K#>K4YZK:T>F7159QJVJ2U0Z-&,12V
XM)T.+8S-A>)BZ)+4AMW]<>GN52%X[&7FV^[89>KLGNJD$4I[-BB9NUCV%28(D
XM:Z0C:"5?=96BHW&XYR=;*[&<)+WH&KVP=KWE&9,2LKUSFHRM)+9=J1Q?A4C*
XM:D\H:[XY!W;M*W2/"1G1NEKGBAR/Z)DQ=;><**P+9JIA=ZJ>(S15:8I.(4C0
XMPK_I.<!1:W+P2VSRJU/= H\8.W(+YCXY9$#L28N=R;?>][V(V5"[BF7+^;;S
XM>5FNV9_1&I>LZ1U7DY#;^J7NIK68V$('FF(*^D:9(SMF5%D:BZ[J@W)4AZOG
XMV9\%6"3&%'*&=FJ8!9OF6)*1^CP%1:^QE)Z+%L6U^DGUN:[^4K8XE70*ZS["
XMF\.PB;7RV7@X19-=8\9F>[@96\"Z.Z)BX:3>Y&UD^+E>LFG?RKTI;'#"B7RP
XM^Z5*$ICJ"R"[^Z3LF\:W.R.'899-%'5KI\BMAU652L=;5+YMF[5T_+,'LD-^
XMB[;QJS*&/*"(>%$$(JB1F7]6EL99E<KGJ%YV#,O3]6%C1;>Y0QJL54_.&KB2
XM3,4W*UY+L;:LO%D8-(+4BC#86IWU*U#I.\46%JR[0Q>^D4LP-KRB;+E2<GJ<
XM^\.["*@F*8Y(6J^&F8??R8VT!</VA\%KR9DN9;3 TAUNZUL#PJ56#'/8.(_H
XM96H\>9;?6Z_<"+;VV2?YJ*H79F1Z/,\-=6(0;1LBAM!4.":,/*T9XX<0+<GN
XM5HN0+)!VJHRQU88ZU4\9O7QB@7"!3%(%S#"KUL492*KK$K!YW+JF$6WT*U#;
XM(DI,-52$8WN:-E@1,A9S<]#0%<_$%3'@6LPZIX?#S+K9L[3>VA]Y!$O <87"
XM)VL3NRPLA#/C=],D-;V%QDZNT4FW"8SVC*WZK$E= \?'K"B3PE3,K% VH(A,
XM1B,<_:Z .FSFMQEUYI012,%@/(QF?#N0Z#;E7)%<-B&ZN!)0W:-2G9*FHC=+
XMH=>02JYP8Z)V&Z$'^3A^2UJS,A N1(-A55>*)9@V?& XMB?M4L0UPZG\W,JN
XMP793(3ZG"-<*T=IV]5'W4M-:RM:_E'3MQJX/C,IS_<VB\Y$:9;R8EG4)=RY!
XMS)E:G(#Z91ALXMV,=V6JE!%O<AX.HW*'J8Z]%WW0K19&-2<N*\\55TJ+*+B:
XM>A0*[!";)KSN4=)!V)FG2BSYF)-4%F(;G;EJ'8URD<D^%Y22@];+"Z8<C$0^
XMRL=V]LLA1FZ4O2F(P:Y0O)ILD80]ZTRPIG0.M[ZFVJ(MAQ8R%T 4E]:.1VE[
XM@ACES"2<3.)SB]?":I#XW$6EBN(Z><D.9N2UYC9C$;,,I;/)8EW_X4@NMM4!
XM>S!A#&:=.+MWP8+I1=_=$>)1N!RE"\6065\V0.,/Q)%U2XJ&/<.>Y]42S;R-
XM*'SZ 4X!<0-B48PL\F(W.JL;<2H:F%C,>53#[*IJ+H3@1-QW+;OGVV5<LR,G
XMAIDQH\._!!/(/<6XQBLG38HR3)H_WB,N:4FI/;8$Q#Y0GMSK ]6.+GT)W=F2
XMB3F_0X"[QKI4'N0M;"O&P7R$!(? +5341>.J+L2 R^/8T=J:QK3H^*$1V:!C
X-O$9UWNLO]7FB[6 * "O&
X 
Xend
SHAR_EOF
if test 6869 -ne "`wc -c < 'bay2.uue'`"
then
	echo shar: "error transmitting 'bay2.uue'" '(should have been 6869 characters)'
fi
fi
echo shar: "extracting 'bird.uue'" '(3925 characters)'
if test -f 'bird.uue'
then
	echo shar: "will not over-write existing file 'bird.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'bird.uue'
Xbegin 644 bird.pic.Z
XM'YV0. (*'$BPH,&#"!,J7,BPH<.'$"-*G$@1H8**&#-JW,BQH\>/!2^"'$FR
XMI,F3*'&(3,FRI<N7*5?"G$FSILV%,F_JW,DS9L^?0(-NS"FTJ-&C!(DB7<J4
XMI]*F4*.Z?"JUJE605*]JW4HQ*]>O8!5Z#4NVK$JS:-,*' L3AMNW<./*G4NW
XMKMV[>//JW4NW*-N7=V,('CR8KV&[A&40CJ%8L&(9D!LO9AP9\HS+EVEHWDRC
XMAN?/H&MTYGS9;U"\,6 (/LPZ[^3)CU\/KFP9<V;.G4/KQEU:Z%^7K8,+CRO;
XM,67CB6G+L$UC!N[<NC\_[QWT=\OAV(/+ANQ8,FS:MIT_CPYZ^@S30+.K/YP\
XM,N78W&>#9XZ;?.CIZ'^NW[]7OO+'W$DV'V;-U6=?>:3EUQ-_#+KVGG+'^1=9
XM> 5R=N!]FYWGVVD-=EA7=_^Y!V!EX8EGX(6B<:8@3QZV.)>$E3'V((D$/@<=
XMBBEJMN).+O9(7(@RAECBB3CF2,...OFHI&HSACC@;42BJ.*&Z2VI9)-.U@9E
XME!=.61V'5K:8&F.89:DE?9L5B>"15.H7II@QS."9#73:L%N&FFV9IIJ>;8;D
XM36^Z&$-G=19:9W1V8GACD7ZVN6"@8LI @Z%U-E?B;: ERF>.?]H$:8\QU$"I
XMG9>96>.FC7Y9Y:<,IN;6#*.2.H.9 VHVIZ88=EH3JPVZ"D.L=-8P*ZW_G7HG
XMFZJZR6N#L )K PW$TFILBKK2M"Q<[_G*FJ3.T@EMM $B-R*4U<ZTK'^E:FN8
XM<]V2"JYWV]56;EN0@CBK;?&-N1I>RTW:;G/13L;D=O,"%N:,!(8GHI:*U059
XMNW662NQB=!%6,'!+OH>FB?=VO%S",KPX*\3>XFLF87A=?)V/]M;(F\0)USBK
XMNG$V"[&P"@\+(<5UJ<P2RQ-FQK''->,[Y,QP0>;OS98J#"3/<_F<DH?&?1SS
XMS(6IYI:]EITY0](RB$HRSB9WO3/4<$F-4H<3>JU9PP+*B*UB,UM6X*QO/4RR
XMK&4&C+)<:I_4H-4?%\[=P/MNK?5;W0GFLJN"[>WNN^X)_%;@)C'8;XE6Z\L7
XMRF2*][5J,D@N+.65HXUY2?P)#6V)JR7^><B.?TS#UJ5+KC/J^2:^.DG[#<K9
XM<LHM'J>ELG\X9FTTN)K[WCJ_%J"3K\'P^TC[F9AGQUB''#; $B_^(0Q!X_VK
XMY#;L#J^,\LU6W/4@K2?I<X5#R_YF9(I+L^*DUS8F^NE+77$&.!GX?40]PB.-
XMSBXS)A@XAX'PLHRV(+>\SL%@:=!;WW8(:#%'L0@[_5+@ B5#NMAM+3GJ.B'Y
XM+ C 9W'PA07T((^$<SS2;&]WA3E<Q?C'/^?5QBTM;!X,AQ@# WID6TW#4YZ:
XM1CSON:4QJ)'+OD@$1 #60&!$E(T1.Z(=455(A/=:#I/(E\(7T4Q?7:LB^JZ8
XM.!.>D(A;Y$AKCE>IT21Q6!!\8AFE>,;^,5 U+;SB^+(HF#ANQ#".TUZP;%BF
XM83DO>69DW!@=8SZ;F0Z2Q*$8 0VID?X0ZE!V\E>?,@0S*.K0+B'+Y I+I<8U
XM8G*0 ^1D1ESC'+%12FS2N1O,(-<PQ*026Z2[EZM:Z,(]*D^3@Y$E1E"S-[&1
XM4F+Q6:$QL[8X[U7FB<2<@3$1R21E5N0NSR,9H4@9-%[V\D<T:TR,W&)+](V.
XM/]ZD""JM.*D<01-O%=R7?+!UG";^DI@N9% \)_(A8HKF6:+IVW(:F*T'\3! 
XM$O,50&\G4!DFZ44 U=0-XP-%QD$M=D%S#S:)25%X6A10<\EHHA JNLKQ4(H#
XMXPX.WV))=S9HH!*9"P8-FDM+C4B2JNS?SM[23M.]<S\XC8A<=LI3T=BS=RF<
XMX,)(N#6 "NNF)_54TE0:+#MIU*?>.>>/\J5.7Q6UF37X)5*SNJN\<;50N+2G
XM(V,'N@=5C9KG"Z0@*YJL1\7IK8:*:Y\BVC#_#+"CY-/K5;':5Q:%"K"WA&M"
XMH=E'209)6V<-5F8/E=8.)14BX80L7#4[RC+]#9B6&^EH-\O9YGF6K301;;?6
XMA!GV1;5Q<2DJ:R7;V=<V=B>RO:6HHK,]E\*F@7"IZ:U8"QJUFO2W.@FN<+N:
XM*-+T[HUQ2AXN-<O948'FJ,\%BG58(MWI?B:4<H4J@-05SCF=]U;"[2UCQ1N4
XM\D9V-RE2Z&7%RLZN"C93G&VNAS[[$/L&EK2Z>6 88Y/"T';7O5[%E6BV.1P"
XM.\3 L<(E=)ZY4,C,9;/G72EO)SQ@V,X$P]Y%<"YAIDVYA&VWSI).BRS<$!2/
XM-L+$5=B'(7PSKTJ'PL*A,4-L'&,,=2R%<H+Q@0-<TOG^9+PI(7)D2:M _JH&
XMOFLLSXQ-#!,I3UFS2[3R!96<85R!-[Q/KJ^7;TSE/(EL4;HILHQ+#-V;K+G,
XM?4J1<U63ICVA"EI;KK--[@S*8S4GA1D>97UL=.A TQ<HA-8M;??,U  K^F[D
XM!'*0N?P20N.XNCT]<[.&RZB-BGD]0EZ(IP.+H;2J*\F;NO0?Z?SHGZQ:Q7;L
XM3(N3UE-;+6HTE\Z3IH.3:H7<^JOT8V^O;90CI_)FV*TI=D*.+>%,$R?8C,ZV
XMI5PD;8106U&'IAFVM6TC\]$ZS4!AEZ<-K4UQDYO<9>(VIUW"&#)+E]08XF\"
XMWUTA!==6WH*NB6, [&7BDAA;VM;>I4P+\%HOR%[V%NURG;I7N,![X2;K4;</
XM@MWC15RV[Z59PC'>-V@3>]XMB6J_/@Y9T(C\921WFLFCC7*6E)%,+&^Y9U*H
XMQ*;%/'P:KWE*D#NWW*Q[SZ(#(\DCXZ.-&P2O)URYIYO\1$8S9^&G=#2Z]0/U
XM@<EIU3P?N<]+WG2AKVV,+^I7I,$;*GY?*NOG[@F4SXX8G$<:IO,K-]9/C6:Y
XMGV:;A$GRG?=,4ZN_G>]K#;BU-&WW->_ZS3!WFI*<7A#QU5U2.5>I?.D2PALJ
XM;.:L20WE"8)(=4OY=!2NX=B1-GFS"VYV7S]]NEZY-8PC/O$._^#L,F]5GZ+M
XM1TZ[O7I&/Q#V<*O@D[VN\F@#>M807R#&_^3I\RO P)Q6ZWY?57^6PWO-3W:N
XMC&_^89X?$.,?/])WRQ<Z:>_;W,]P=N>_LZ+!/S<&LQ_5KL\<(AE3Z>D7%[%"
XM)4#BIQ?DAP.AAWFW]E14%8#MT77948!S%'NKEE_T!R)5\Q\.2'.*9RX'V'V 
XME5[?L1C3@X'WES+YQSJM@8 )^'\B>%GN0RLEV!<G"#P1*'WRIX -2%98DB49
XM&#4SB#W:(8'H5UPH)$"\$ST4!H':@7D>F%&E!7Y0)8+OPCD+>#D_&#\T9"M-
XMR%,9PE%A]1W@LG14I81!:"LWF%[V5QRH\W/N089S]#%;R(5@!4,C*"T_5RIN
XMF(*7$8=9-G^]HT'L0SEW"!EY>( OMF:39EN**(53R(8R4(CLP7]8AF)&IEX1
XMU#AAN'<Z XG1-XF4N&*5(X Y2"QB&!F<>!AYQX=C XI>N(B8.(4,\Q^G:!BI
XM:&-Q95WA<E>,R#MF,HM\83NJ*&=YEGQ?&"^\V(M7>$#9432>&%S@-GL@4HS'
XM""2FF(Q'M(R9T8P@MR:^%XVY&"33R'R4X8O]D8W#96#@!C#>N#/A2(*/:(U<
XMA!H<1(H_QV\XTBXWD(_ZN(_ZR! Y\(\ &9#_2(Z(HX9V&'/VB"+XR(\,>0/^
XM*) 029 O1(\(^6[WV"T-R9 /"9$!*9'S>) DEY 7LI 9V8\+P9$"68!JL9(5
XE,7<L^9+N!Y,RV10N.9,V21,U>9,ZV1(YN9,^:1(]^9-"^1$* )$"
X 
Xend
SHAR_EOF
if test 3925 -ne "`wc -c < 'bird.uue'`"
then
	echo shar: "error transmitting 'bird.uue'" '(should have been 3925 characters)'
fi
fi
echo shar: "extracting 'brain.uue'" '(4634 characters)'
if test -f 'brain.uue'
then
	echo shar: "will not over-write existing file 'brain.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'brain.uue'
Xbegin 644 brain.pic.Z
XM'YV0. (*'$BPH,&#"!,J7,BPH<.'$"-*G$@1H8**&#-JW,BQH\>/!2^"'$FR
XMI,F3*'&(3,FRI<N7*5?"G$FSILV%,F_JW,DS9L^?0(-NS"FTJ-&C!(DB7<J4
XMI]*F4*.Z?"JUJE605*]JW4HQ*]>O8!5Z#4NVK$JS:-,*' L3AMNW<./*G4NW
XMKMV[>//JW4NW*-N7? ,+'DRX<&"_00TK7LRX<5^A?UTZGDRYLE[$0"UKWJP9
XM\T_.H$,K]MQ3M.G3ER$G1LVZ-5S2/%W+9@U[Y^S;HFOKQ,U[L^Z;O8-3_FU3
XMN''&Q&L>7UXX.4WFT ^KSAR].E[G,ZUKKXN][?;OKZ=_!D^^.V#RX,U+1O]=
XM?4OV[<67AJ_=/4OZ]>7'QE_=?DK^_>EG&X#0^8<2@04*N!N"RQEX$H,-*@@<
XMA,8Y:!*%%4I8'(;!65@2AQUJJ!R(O'E(DG$QI!B##"NN*,.++,875&3OR;;B
XM##/0H&,-//9( X\_ZBCD#"]&9^)(K<608Y ]-FE#CT_:0,,,-D3Y8PU#QI#A
XMC*N)IN2./#YY99,^"EF#E% ^Z2.6.,9XVY$@B28##6BJB>64+Z9(EY9OJ2A#
XMCF?:Z2.1;J(&YT>@S<GC#&?BR:>**NH%*0POTADHF8[R&=JA'FVF:),S:*GG
XMGBV.>M>H-U99):9$:MJ9B,]5%L.8-<@ @ZFW0NHJ7I'N&NFM/ZXZYI2AOLHE
XM=9-1^62,C^JZ:UW/WBIMM+G>^N>J=N)(K6&<=C39I[9JRB*N?::8)XSHGEOM
XM6S+4D*N>FD;***N%(@=K=HTI.JY;Y/8Y;IYQ.?OB#+>V*2JI\8K:[IE MME8
XMMQPQIJ^T_,ZUK[3U]BJJGS#BV.:^"4]J[8J8UMO<O=X5-JN4\+JX,9_A!ORN
XMLRWK"J/--\-E+JHPS"MLL=RB?!YABK;<\\O\;DNSLTDOK7/'K99;9(OS FFR
XM=,>.-UB[H9K[[Z\5SZSQTN,N#6_3E);Z)] [OSMLU(-!O!%A/Y8--Z4ZZTRV
XMV7SK*G;--]KZ;M)52XECW$*O%UB.,?XI^+I- ]ZWS7X[S73D2KZ\\<(,%XDU
XM4#3>MWBM6L+8IUR3ZUGVWY"676K?Y?KY*+,I5DW#U7?)K5%@LW:M[>FQT\QB
XMV>&.+;S J6^N<.QI,_KCW7GIGA%?C'8-<-BQ#]\ZTY7SG:OVQS=K+?&S;S[D
XMX]$G7F->L])0>J&/2RX[S6('_ROE9,]\;M0YRL[O\S4@TEZDAY&]_$A+A')5
XMO,3F.OKY;6; VUGJ_C:\</WI>\6CDXX$F+ZLS0<OC H7!RE6/PGRK(23:J )
XMYV<VUJ'K;%ZSE@UN8(,< <TN!*Q(7M:&0/0]BH*OZU4#T\9"RW6/B Y46^/&
XMYR<L]>AP.%2?Z.SR)5LY#F'-XIL*@_BZ+0818RW<WHJJY:+O42E0(YQ+#BD"
XMPBGUD%HB R+RR):G+HKQ8BN\7ZX(AC>I >M%@XJB!_<#+2HA,(T'0V'?OK8S
XM1GH1>=^;W.!P9:Y;U4!)/<*=6]8XD;O84$NW"YCQ-#>Y1^[M7%],'N04N"\\
XM/1%]<>&D1*C(J-*%$G/T8UT<22D_EYG-E ^L6.F$"2] ;I"/:I3B?^I2MX(A
XM<Y*7RZ/W1%G$U>EMCKG$GN! J2<B.1%ZX1GD@.:"(_>-SWY_LU\6O2?&^;F.
XMF%Q,(N:L53%O!DF3LHP(78HF/MC)L9U>NR/^!KK.25DN:7W$XY*PY#FYY!,B
XM<YG5)1<(N4@JCX7@>V$=-4J^Y$6S9M/26\'@HB@=73"9XEQ07 X(2WZ]TZ,M
XM E],;_9".]91E;I,)!GIR2[GX>DQ*9T07*K74HIUKY?2]"4V_W73\%6.==,R
XME<+BU2YB-32<H.L2O[!$R43^LI0R'2A- ]I48/ISCGTLG1.)A=*L(LLM_2NJ
XM4;%I4&!NU$451)Y9P\A+7.YJ7C]UJ#(/U"<WG@JF$ES73&-*UK$6,:G<.V@N
XMS16D6\9RL _J:;]"!M"SXC5=>06M!,.*V F*3*T:O.HF,7NAM_P.=05EY_PH
XM!5K1?O9<-8VG;DO;NJ8M++!8_4GHE@G78OG*KWP5F&VQI[_<-G*,O)4DS]IG
XM4L$&=4/%_6&Y<IHZIKY04BXKZV.CR[1ML@A0M]O50Q_2)[@I4)W*=6JZR 5'
XMK[ENKQ[-*4D7I=KU.J2];HH6+^FJW)KRRK< @RQY55B\%.THC3#P;T-ZZB8?
XM/FO!>05>WM1INLZ2UY]"LNQJKSNBGH&3FJ64[\UTND".-I:W[VH@(PWJ%D5!
XM3\(,<>V)%?MA5-X4Q2M&Y6V=RT+NJ@V2!)-H>H/;D^$2UL3[^A.DDDS@\09T
XMM+P4+VYK"\R<YA6@U;I3&G&\$!U/S<1"].B,<;9;%WG,8 4VL)HQRCUF 6K,
XMK/V0M4(5OS%BS,@XPV^@15M"VY86MV)4;%67/&*WCL=T\2N4Q@!M6KR&%]'7
XM ]Y\QRO>12H66!M\')D5,KXD;_=TOEKP5.T[,L9F^F"W):5W&]G1=L:,NB,<
XM=4(HE4 -!^^:,+U8)"L8XXP*&X.6WMZ79[I1TOI9K0$4=9Y)DD"PH>Z=R%VD
XM_)IZY"$64Z.,[:RAPUM)U36,3[I&"/@."S+?=O=^ \4@MWM%6^>N6-E##G)O
XMX?4\H*7[("W:<,!:)55*4R[;=.7QD+/\M?F">\5X\[,-/?=O@TAU8-:[IPV)
XM2,;DX1&I,%S@YN:KOSAO>MZ1$ER0.%CQ@NRYV<?\&*72ZTN#EPJ:+0RI\39M
XMZX6C7&!IZUFH&RW<H&QQ;>7T&+K*>;OA\;1K/8?G@*^=,]#JDG@5#.M]51?T
XM]D&QY03QJKFZQFM".8[/U!TZ$1D,<C:GW'$@XZ&R:<I4I9);>STCH]K!/A!J
XMUI&V2B\G31.XS=CB$7/WSBVWZTTYAW^6UF.-,CV]SD>^"\17&E4ZU&;5,8S[
XM6MODPWI-IP:S\'%9B3Z6*1'YN*3*3WLD%_[3H.:D)![R^6,>LS:[&+Q%EUJ=
XMM$_3]Y6QC'KR]=&&KB<Q3?H%+!M.J6>VRA$,+CGX-MT0MDPTI8MI"\'=M[EF
XMCIVW%>'*)J(W.2BZK['C:@<S@IE]7 +4I,ZA'L8M6Q!I G6Z02WM7:R/47 3
XM9WY.8736!&"]5F.K-CQ\)%<AU75&Q&PW!3*0U%@1F'A"EC/=%$#)YV@]878!
XMMV<$IUD(549!QRL-=EK-I52D-RW^=VE99W\^9G<(Q%81]GH@\6:OI235YB>,
XMIU,05A=U!V\N%E,0I##WE74<XTO]]V('PS6"8WD!X3$;!#-P%UG,!5QR@4Q^
XMEF#^DF^KHSDEQX1DQ7_\UU32$H UJ'PS@8-L4UM=%&!_8EG/@GL*0W9) X.;
XM=H>CQ6U;QS':@X3#-W,L9X,?(86.XGL_IRO5<RK$0G.9@H@/QX=*9&5D&&2 
XM&% 8XS!IR($\88B?=(=VY3'LDRF$8H=E^((!9U]VM%MTQU%!*'ES0G&$Z!$X
XM>$Q]=C91=2/7MQ=4TV>BY5C-)7IT)'H/9W<8\WP"N!-.=A))QX;'!FN#)W\F
XMB#ZM^(+,HGA')CSZ)F2N1H)")VUJ"!-LZ(Q&@T%O)HT@=$,^ER[(YG@H=XG/
XMY6JHY!:&E8PZL8PF@70XB'1$MG"*P3;=^&51]HLJ>&7NF'B/QR>,MHE%!Q0#
XM\Y!+!Y%R5H7;(C.P-3M_Z&SN5(VMTW^6R&6FXQ8!I"E0B .G-WQ':&<G=F$"
XMYBH9N7WJAXI'UW#NN'#/%FUO49(@B8>@]3NQR)*$<S4?N';AARL.YVP5N'6&
XM=CU$E9.SV!'-MC9P)Y&U17 ,I7NR9U*8ES"AA83K0I.@%X$=F9&:HG8,>7Y 
XM<3R:UWD/R71X$H<'"!?$HBW-TE"RXVQRP7,*EH1N=W."F&M/R1$4F'%$4IC[
XMV(SC@B<XLBA9]'?(ICR.ARK-UHUC.(GAQXW%U71.&8XO 3!2^9 K,I=L&'/C
XMR$@%DVJUARH=:4(6I9&0MUBPZ8<G]26O=98#"!0&HX\AYHR&.8X31Y'*Y5+6
XM]S2R59#2)%.8]I(#TWXXN9F<N!/K=X2\:7V&^&!<AGL956-PEH+QN$*.Q68"
XM>91G)RY*QV2W^1,N*)L2.8Y3HI72Z&:O%8>W9G")F$=W%7GG]6JMASXE>2.?
XM17@[J8]#I!?M\CCK%UN_5&M&5(%E:(?_DWOFJ8SH1WOBB6CQ9%2"(6)2-E=[
XM,V!A))S@69LN9567Q9DNH8.7]CHHEG-\D6DF!FQ.8V10M4<1N(OL,I?6]9PZ
XM 6>%&6 L6FS,9Q<7]"L6EG,(FCQ $Y+4A'PM59)P5I\%]C+H>&V-5(((AVJE
XM]949LV76]RPZ>5Y^&*3RUGN\>(+C!U_IEZ53%7S6LY]%U9\QM*&2,FMMPS[8
XMA&I114+,8UJKY(?.I'314I)J,:@5@8^$>JAHB:B*6A6&NJB."A.-^JB2ZA.3
X*6JF!::F8FA$* (?.
X 
Xend
SHAR_EOF
if test 4634 -ne "`wc -c < 'brain.uue'`"
then
	echo shar: "error transmitting 'brain.uue'" '(should have been 4634 characters)'
fi
fi
echo shar: "extracting 'flower.uue'" '(6867 characters)'
if test -f 'flower.uue'
then
	echo shar: "will not over-write existing file 'flower.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'flower.uue'
Xbegin 644 flower.pic.Z
XM'YV0, (*'$BPH,&#"!,J%!@#1HR&#0T^E#&#1HV+%VEHI#&CXPP9$1>*'$FR
XMY,*'*"EJQ&BCI<L:-$"BG"B#8L>:#TLJ,,FSI\F<$ M.K(@QHT:/'T'Z7,JT
XM:< 8-E=>=.DRYDR:-F\J);G3J=>O(1E")5ITHT><7].J/0A595&J+6O,N-HV
XMZ\V<([NNW2LR[,"A%LL>38J7KV&G=0-/A2M7YLR:=C\65JCWL&6'?X6.56R4
XM(^'+H'T^K,AYL0V8<Z]"MHM69.70?(-*W%P4YN#6L'.?C%JZQLO4CR$CE>SW
XMX&O=:XL_W<QYH^>MR*,+S2KUM.^X5E4+/PL]X7'I7I4[9([1^7/QX&'3[%@=
XMKHWLP6L.[X[P>WK1F&>KE&K^+OK[EPU%6F#NR45779'19Y!] /:D7$H#FG>;
XM@@V&-M: M?UV(()9R419A98!)J%9=X&(G(B]60<<7:MU^!\,#)JHT(LH2HB4
XMAS*J%U5MM1&WX6HE>I?C7@*..-]D0Q[6%ED9JHC3C_(%:5R2R<EGXY$O4HE8
XM#$RR1%5&/K+HHI!:@G6A<\/Y5Z:2I/'HVW78.2:F310*%..:)*TW8)JXX:D6
XM5!NY^=9I\,T)V7]W6CA>6"B%=R%[?-;I)U-G]F8:H5"V^&*B 6YXE:.1S2?I
XMI$NAQ%Z*&F;ZY(>-ZN;I@6(5EN5R448Z*JD.BMCD2X6FM!J2"RXZ4XBO%OMI
XM9C/6)6J?N")FI:6+P21G?#AZYVELQF8[[+ G<:CIK,V.1)N@/(:I9[7U:?O4
XM>#QYVN*TVFZ;K+>KAMN4KN36UFN4'-T*8[RPYJD=:X=B]>N3KR8T<,'V,L4;
XMM&Z:^^Q'K@%\;;<0VOKNQAP'/)NO!8/;,$%<.I>OON9N)EG%%M.%<9&>:<7Q
XMS#,?RQ;(]8Y<$G,K245NORQ6Y&] "K2\H<(0HBDSS4R_Z_+-P0&K<[</!RIH
XMKP)*O:#1+HOW6(0Q-QVRV-,B[?'4XE)G]=7PCH6NM2EQC21$2=LV6%)-QTUV
XMV0B=C7:R_/KL)D<'_@INT5A-1*^QR\W4IE$WBAT?O1MS^['E?V.\7[Y 9\LR
XMY35?>Q63)"Z]]Z%[VTRRZIGO!G%9*1]-&<Z2BYY2<S&;?OKN"$OM=^ML=7D=
XM2^6U+7NZ!I.M[0SEW=UQ\DP;:SCF?[$./,F/N_GEBHS##7KHQ<H@F.[&@Q3]
XMV<7V;3WP,).[O?&_$X0XZ.1GJQB)-"_\?*OJ'[\Z]:U[E. N];YXS0YZV\%;
XMR-S5O*/D#6?>BI]FUO>_ZXV'--D;U&EX!3__R8]VM>+. G_4P.>0;W<4A!K_
XM^L<^G@V0>/HRGK N1C00)NA;KY)!8$H7.=XQ3#0I9$@ J_;"GVD+2#>*R/S>
XME28%=K!&N1,A$V_BQ&]1:H46)!D1BSBX)QH,*1M1ROPXU$0<YI!/38Q<&4,7
XMGC]I+3V/ AL78QBO!.ZI(6-LT1JGYRX[IO&/4N33&XG4EV.)S#!QE-#)P 0P
XM.YH%CXN:8@][UT<]EE&$RPH5<7(SR/'PL9,A4IMY%BFMKA7.CQ[!([5"N#]5
XM422$)Z19I$#I1O7)IW*'_-.S1OFZC#CF?]!+(R1!>*,JAD\XGKE;%9N&I>CX
XM3D![I"617&@RS@$G/Z=$(ACG\B\;2O%@KBR-,B_)L;-(<YJ:F1@/"7/.+06N
XMFH,["E!RJ$TPQH1HPM+C*SN&D][ID4?C!*0?W^:JZ>QG1&;A8X!$.4?(-;*>
XM%5D9C/+I0TKJ47#] :1 V[G04R&4A[\,Y7 "!3&->'&5U)'H1%%:429RY'Y*
XM:V) DYA+D9)4G/WYX30C8[+788V>=J3/3E@J.:9A"'(:%2BS $2>G\543LF)
XM(WO*\C/N02EY4AI(5XC:TEUF=&:3-%R.FLHY_$$55':!)TRN%KO)@0Y86[5A
XMWE"W,7CV"ZS?S)F)QG6R*QTJ/#P=97ELDQ'4G/1[6?%+7!%X/F9F[SD)RN2O
XMAL37OL94I91*JV"OUKE*TF\^\FL<8[O*F_(D=3[< 2!XR&K9K];T?PQM:"FS
XM6<ZS1&B36HW5:)VV6V3V[+1+RRM'B?0L4G8&34-3F&8W"U"@S1")EASI(X,E
XM6L0Z329,N]*REIG)X>KRH,8M(6Z!*$>UHFQ:M=6*3,VC(+W0%I=0B:]1M1M6
XMB(K0NVGA67@%TSD@>A6AXUL9 F66E#3:2 8%6:QJOJ<XZUHDHYG4Z&29NKG]
XMPNXS[=KB1QDI*^N^\H\Y37!U]49:R+P)PJCU:'=?NQ>*6!B@6<W303^*4*\Q
XM4Y(V*HZ"N7K=IO$WBNL5+HM;;!'&[->Y#M*PD?#6-][9$TTZ'K%<*XI3(*?Q
XM>2"*09&-3$J3#MDAL(34?=&CIU@:&+E1GN&4J3S @ HG;UEF7H&.&T]N.JM@
XM"^P+<#V*T!CCTU E!M+:[)97O"Y5.H!JR0U>8K=!@PG!8&&7I'<F9C[3.*=:
XM&RJ/27M4%),MB17BDF]NL&CL@ UE='N:,Z5:7AIC5L1K#G2G+WLZ##-5SC8@
XMM:D]TN8"RZQ5^"V55"^=T3<N,="RM!J$??CE/Q$EU[J6RY/Y^^A@Z_+,Q'ZU
XM5F,M:V4_]72J=::+75+JNWI4@ZAI]K63>NDZ(0[9S/QH?1^H;L#20-&E;LS#
XM")CN4%<*Q=FFT+OAG6QO*[.BUOZ*#D<=;;P]KD"$"W5LS;)ATPK<P]UNKO-\
XMJ&UG5@3?+3'WLR&>7- L]V[,%8S "3Y?SLZ;B; L.2+'3>I%Z]LM[CF-G26N
XM445&;.7;8;F@XPGD**&2UTB^3Z*AK7/AP.E+5MFK),O[,Z#_<9^!+K*^9@IB
XM(\F<30P/.62VS)B.GRB.FO3YX"B6X#"+JM!OIEEOZ)NF@-?;661_ST=PS9BH
XM4WC/:@=H>S6IU-HF6^,\I/%Q^]N@L<!)VGDW]=WO17CI IBPOM3QGB6+=:-R
XM5O%;=VW"W:EUSSS=U%^?YI+8O>$0)WCSG/^T3V7;:)!.7M@+M]OI#7M[T70H
XM[4<AJ>YA)W#8AW69'.MEER^]<Z7/V%)L;_SO YORM8M' <97(_++640N$WVS
XM$9=^JZ&<Y9A/7/GA?WWVU;M]L'(FYXP^<O/AN+EU)GVUOM+^DV7K=_6O/Y8M
XM1T Y9V'I=VL]LTY^!AKZ4WE(9UYEX6[_QQWMEWP""']'EGK8DGN7-1R]9S:[
XM!4B!1WS7%X$3V&,V48&E-H!O0BYF=R)NT6AO%WV=@F=XM5XAV&_&08(E^"1#
XM=WH@!W]? F.CYRQ3!8.!-'\SYUA^=&DQY!TZ6#L9$WGND8) N'6IT7B/-4X\
XMV();TEM&ET#$!CN(\G^I$QQD 81,AX;6T3SLA'^Y=URF R'_X4%-5FL*U("7
XM5SQCN'YE6#<^2!6+5G-4J()LR(5*4A,PY3QM 11_U3@,04D1P2V-XH4;@VW5
XMUQB4L6<$ X7K(85P$8B"F&MH*(1#*# O:'N6LXA1,Q20F"V&EUZ65WT%N"!7
XMMT?*HQHCIX:".(BC2'P8F"M%&#835A!T12<",D)SXDV^!G@WV'_&85_DQ(EU
XM4X7DMHNZIH9K:%JEJ$+9HQ6^8F,#-7W]!"^:(DEN%V1YB(/>48E $G>W^#4$
XM,F>+88V\2(@]0E!@T4_-T89@AAX?=EL:4XR5$UV;!WH[Y"\*4$XE%C2>&!=3
XM08_U*(]346W80D5DEQW50V;[]VU==69U9VG5]&"S^(Q"1XYG*)'X1H_0=HW>
XMMX)>=GNWDTQPXHR+TC<;N6QTLCMX&%-,R%^&2#0E63BY&(1> I'6*)&"!Y-+
XM(I)D5P/T@478<VH[Y&8Z.7[$]F#CDUP)R7*GQ#Q_V"1&N8OR&!=K2#A#6"0\
XM4A60]A>')A 5IG$!R8[;<96*)Y+CM1!;*4LHQ) "F)8K&9;DUHN\!Y4[ RB6
XM0A4T4!R+J%Q<-!AF93J79)6M=V"YE)?P)I12J#U_"9@1290QP3=](2Q%6($&
XM8E T,I38\5)VB48]YW..]F,)2!E<B9D^J"\/&99B*9BH\6OA]B.*,8J0)BNX
XM(34X!W6CN9NL9VF8MU9.I28\432SB8M]V4 ,AYLU1XTE%#,T 6S:(5]>B8V)
XM69-/,9P/4IR[MF5&:$\@Z8"6=9<Z@7'O&!R9N77789VY28@^XT Z%":69'1\
XM5X4KPI;0 97X B;"0Y?IN'P_"3>7R9?VB'F;:9UJ"%"H\6"$H1)(=RJH.8!G
XM!682!4!F:*%6@G@(JGSGU6P#%VBT^:"$%:&X.:$:AU3/9Q0:A(;P\1>I)%H3
XME#$]Z%2=09U'QGA+D:(+&31_Z)#-4Y_VR9(L.GQ(=8!^B8U-1Q\8&HD$"E2G
XM1H $N*!X28GQ"1A'&GJWN:01^3.(ER\Y5X_ZQBA5&DE/"52B]&+&E5!W=VPP
XMUX?P&*9BFI* V8M(ZJ-H.H6\N)O=43(1MR1O"J?40:%RVD#.Z11VVE5"J:<_
XMMF42*J5_*J>"RJ0A%V/[P4V(ZA>NJ$T&1WNAAS?;V$T-ZBL-^7UC:I282I0K
XMZ"6[DJ;7N3U999B'.HRZU6",M9.\5%;G 11K$:DMY: /.B)*"I&B&*M>DHVQ
XMRJ=,>A[8$T80P:NT8D:5:&EUYVH^8AG&BG"XV*K9:3(N>IV!B*FF4:-2RJPZ
XMYYZ?&IQ8)ZK/ XM*,W61DZK( Y_G R&4NGCF2J:=Z:?1&J&_P2S,P7:LP2C\
XM&D(YA5Z0F!OA>DMX.A3_>FG2VJ<%N[$9BWJ*>4<!L;#5XV0[R8_A%AH3RSO:
XM0:X ZYC5:9]IR+% ^**#28P@BW9L2K(@Z9[WD;(J.XWV*&]%1J8_V*PR6XWI
XMFIMK.AWDIS*8Y:6.1)D=.*3<)HWF*:NUIS3WMJ0IB88#"W\OJG<4,F-*8:BY
XMVK G-ZPFXK/@EJ?)RH3GZJY@RZDSF[&A2"@E(IQ[$IQ[2Z]VN+,\FQYL6[%7
XM&W_E.DIQ"ZN#>+?8J&NP:J!APA JQK>WX;=[$XMJ"R*#*XV;486A!V")"ZM(
XM2[>\>(WNBIQ\\V]V9K:OMAZ.=9.!"QZ;VZ]?<Z39V+*("[,K&;>?"(JE]KM'
XM22B0%5\AX4*K>R2K\VDVF+D50J3,AIF>>[C],;1AJ[NA^[B$NITA\7R@FB"B
XMBJA@!7QAHZ],X;QM^R,?9X&5NF34J[@2*K!'B53'&(G/5[9T$F/*LGU=5[GD
XMZQ/F^Z4,&;W2BW+M"[\&_+B5BZ'V*T=*D9,19;E&A6WFU+\]\;^TFT,LB[O3
XMJQ'7>\!$:QL$AF341#&&>2I/Z9\U*&&$*1T6;#Z'Q2*>2*+REKX>7,,;)+PA
XM;);C"3:@RL#%>RZR)%.B0L'/.5IR8[$LFFT>\;(U++"$ L*8U%G_)D\.P<-K
XMZ4FL1+'G6&G\V" 6?,1(C)19BV(?U\0';!V.Z7##6BMH5L7]D;-A]F8@>' K
XMC!Q?#,8JD<0SC!1AU\$VC,8HYVMW!89H-L)P?$,,6++L-+4F\;]@',8M.<8S
XM-6J :+=-7)9+5FE()+7U>\@]=%K:I5>R>TJ/W+EBG,EITL<S:\: W&>V1T3^
XMT<D"FL6)/'[^P<A<4<H8_)6?JU&JK(O6&X0VLL?FPV<3_#!/&UU'A[GWBH^Z
XM,4:ZK!HQ7*D@^+*Q&KQ8J\&H[%M:J+IK23L2F,BNAC ]&\WHR\N+9WE\C,U2
XM&J3,)UT%MH'%O+>-\X7&YZTA-<KFC*RRFE%D7 /L+,#+=Y7=NG<\*4_(#&D$
XM><_C7,<HN\\'LJ&8[*U+O)G8^&+#3"+!IY[<NK=J QQ8)U"M*6_YS,(0#</H
XM_,[KS+A&F\V+I,0:NDUR-+GJ>8Q;#,J\Q+^X_#DG#<F>N<<K3;>1/- 4/=(4
XMAX"II#);?-/O[,P2JRYR,V[RV&=I%':_*\8O7:)6%C,JK:$R 2E+77D!Y]2P
XM <W'DVH LZ&'"X(&Z])$39<JQLQD;$Y1D53+#& )1=8/G3 [6D?S67NG1<F<
XM*J=:G<D(>F43(V'G:'=$G!=\G1E&D\=<AM0&MKM8_7E,6=A<K9J.27>VM2>*
XM;8DWY4 .O=?;$A2*V3)2'7]<%U!;*]29.CS4IMDQ3=4\/,=65I#@1]J-S=,G
XMJV9'M'"L/4Z>UA$QJ[Y/M[[^;-MBALISK<[_IZR=\:WE_"GSU-? C;[HJ<U:
XMZ&(#^ZRWJ])H8G\SW-E<9\Q<#%R!1Z>]W:5T&"O9O<O*/==64K0P.M_!I[5"
XM3-5I'%&XS6L,K5;LO=.^3:QL$=_AXY79F<YH=&_'+=#<O8'[.][+;8DRS8S,
XM->  8M:3>#-2=D;-P9QP&"D=\<L0+K0;W77KR=D$;.$ KML9SML$[M[6W3?Y
XM@>"%@WZY#48/?LJ2O"?Y7= K[MDV.%*P)]TR6MJ@P>&%A..3*JSLUN,M.94;
XMK-'$;=XH?MX-R-'JG7(ZO>$2M!P9V4CQ*,R4S6N*UN-$Q]TQ_63 2N%GGJ%N
XM_MG+.VAYW=XT#FPV3JP6XV*U.<9_!- I2(4326V2K-%!=I-8GDP[WJVY0W@)
XMJI]X?D#\\R!"Y.3G/-5$7L:6'=L_VM4?*>2EDWB-#MT@UFI6*,HF+2\*@QE1
XMG;[]_-QE#(H^#M<8OKQ<SGJEGJ"00\[E+)XV/FE<(]R&.^(R59U-&N&E#L]%
X*'H%:7G$P1MV""]<8
X 
Xend
SHAR_EOF
if test 6867 -ne "`wc -c < 'flower.uue'`"
then
	echo shar: "error transmitting 'flower.uue'" '(should have been 6867 characters)'
fi
fi
exit 0
#	End of shell archive
-- 
	John Campbell               ...!arizona!naucse!jdc
                                    CAMPBELL@NAUVAX.bitnet
	unix?  Sure send me a dozen, all different colors.

jdc@naucse.UUCP (John Campbell) (12/23/88)

A lot of people responded to my offer for ``picture'', a 3b1 program
that displays 7 grey level 240x150 pictures.  Lenny suggested I post
the program (and pictures) to unix-pc.source, which I am doing.  The
posting is in two pieces.  This is the second of the pieces.

#! /bin/sh
# This is a shell archive, meaning:
# 1. Remove everything above the #! /bin/sh line.
# 2. Save the resulting text in a file.
# 3. Execute the file with /bin/sh (not csh) to create:
#	picture.c
#	picture.l
#	pig.uue
#	shuttle.uue
#	skull.uue
# This archive created: Thu Dec 22 21:40:31 1988
# By:	John Campbell ()
export PATH; PATH=/bin:/usr/bin:$PATH
echo shar: "extracting 'picture.c'" '(8169 characters)'
if test -f 'picture.c'
then
	echo shar: "will not over-write existing file 'picture.c'"
else
sed 's/^X//' << \SHAR_EOF > 'picture.c'
X#include <stdio.h>
X#include <fcntl.h>
X#include <sys/window.h>
X#include <sys/signal.h>
X
X#define DEFAULT_PICTURE_LIBRARY "/usr/local/lib"
X
X#define XSIZE	 720   /* 45 *16 = 720 resolution */
X#define YSIZE    300   /* 348 hah!, best is 300 due to 4 "special" lines*/
X
Xunsigned short g_display[YSIZE][XSIZE/16];
Xunsigned char A[YSIZE/2][XSIZE/3];
Xunsigned short ur_pat[] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
Xstatic struct urdata uPC_ur = {0, XSIZE/8, 0, XSIZE/8,
X                     0, 0, 0, 0, XSIZE, YSIZE, SRCSRC, DSTSRC, ur_pat};
X
Xextern errno, sys_nerr;
Xextern char *sys_errlist[];
Xextern char *getenv();
X
X#define IfErrOut(e1,e2,s1,s2) if (e1 e2) {\
Xfprintf(stderr, "%s:: %s %s\n", sys_errlist[errno], s1, s2);\
Xfixwind(0);\
Xexit(1);}
X
X#define display(src,dst,srcop,dstop,pat) \
X		{uPC_ur.ur_srcbase = (unsigned short *)src;\
X		 uPC_ur.ur_dstbase = (unsigned short *)dst;\
X		 uPC_ur.ur_srcop   = srcop;\
X		 uPC_ur.ur_dstop   = dstop;\
X		 uPC_ur.ur_pattern = pat;\
X        	 IfErrOut (ioctl(0, WIOCRASTOP, &uPC_ur), <0, \
X                         "ioctl failed on", "WIOCRASTOP");}
X
X
Xmain (argc, argv)
Xint argc;
Xchar *argv[];
X/*-
X   Program to show pictures on the 3b1.  In order to create a grey scale,
X   the 720x300 screen was viewed as 2x3 pels--allowing all pixels in the
X   pel to be off (0) or on (6) for a total of 7 grey levels.  This reduces
X   the addressable screen (in pels) to 240x300.  
X
X   The images are coded as '0', '1', '2', '3', '4', '5', '6' (and '7' is
X   allowed although it is treated the same as '6') pixel intensities.  The
X   image is viewed as 150 rows with 240 ('0'-'6') characters terminated
X   by a newline.  Thus each line (or row) is 241 characters long (counting
X   the newline).  This format allows editing in vi.
X
X   Pictures may be compressed (saves 70-90% of the space) and ``picture''
X   will show each (possibly compressed) argument until the argument list 
X   is empty.
X
X   Every attempt is made to restore your screen to normallacy in all exit
X   paths prior to leaving this program.  (All of the screen except the 
X   bottom 48 scan lines are used for pictures.)
X
X   Extensions to this routine could be easily made to have a number of
X   bitmaps (instead of just g_display) and toggle (with ioctl) between
X   a number of these pictures relatively quickly...  It might also be
X   fun to see what /dev/kmem ``looks'' like as a bitmap.  
X-*/
X{
X   short i, j, x, y, zflag, iarg;
X   struct uwdata uw;
X   char cmd[120], fpath[120];
X   char *picdir=getenv("PICTURES");
X   int fixwind(),c, len;
X   FILE *fd;
X
X   if (argc == 1 || argv[1][1] == '?') {
X      fprintf (stderr,"usage: picture file_name [ file_name ]\n");
X      exit(-1);
X   }
X
X   for (i=1; i<=16; i++)
X      signal (i, fixwind);
X
X/* Increase the screen size */
X   uw.uw_x = 0;
X   uw.uw_y = 0;   /* Leave room for top status line. */
X   uw.uw_width = XSIZE;   /* 720 */
X   uw.uw_height = YSIZE;     /* 288 normal--we clobber 12 (top row)*/
X   uw.uw_uflags = 1;         /* Creates with no border */
X	
X   IfErrOut (ioctl (0, WIOCSETD, &uw), <0, "ioctl failed on", "WIOCSETD");
X
X/* Turn off the cursor */
X   printf ("\033[=1C");
X   for (iarg=1; iarg < argc; iarg++) {
X   /* Position the cursor to prevent scrolling. */
X      printf ("\033[10;1H");
X   /*
X      Try to find the file as name, $PICTURES/name, /usr/local/lib/name and
X      determine if the file is compressed (zflag == 1)
X   */
X      zflag = must_find (fpath, argv[iarg], picdir);
X   
X      if (zflag)
X         sprintf (cmd, "zcat %s", fpath);
X      else
X         sprintf (cmd, "cat %s", fpath);
X   
X      if ((fd = popen (cmd, "r")) == NULL) {
X         fprintf (stderr, "can't execute zcat %s", fpath);
X	 fixwind (0);
X         exit(1);
X      }
X     
X   /* Ok- build the A array from the picture. */
X      x = 0; y = 0;
X      while ((c = fgetc(fd)) != EOF) {
X         if (c == '\n')
X            continue;
X         if (x < 240 && y < 150)
X            A[y][x] = c - '0';
X         if (++x >= 240) {
X            ++y;
X            x = 0;
X         }
X      }
X      pclose (fd);
X   
X      bit_fill (A);
X      display (g_display, 0, SRCSRC, DSTSRC, 0);
X      center_bottom (fpath);
X      getchar ();
X/* Clear the display buffer. */
X      display (g_display, g_display, SRCAND, DSTSRC, ur_pat);
X   }
X/* Clear the display. */   
X   display (0, 0, SRCAND, DSTSRC, ur_pat);
X   
X/* Fix the window (reset scrolling to "normal" */
X   fixwind (0);
X   exit(0);
X}
X
Xbit_fill (A)
Xchar A[YSIZE/2][XSIZE/3];
X{
X#define PLOT(a,b)	(*(a)|=(b))
X#define SBIT(addr,y,x) (g_display[y][x>>4] |= lookup[x & 0x0f])
X   int x,y;
X   static unsigned short lookup[] = {
X		0x0001, 0x0002, 0x0004, 0x0008,
X		0x0010, 0x0020, 0x0040, 0x0080,
X		0x0100, 0x0200, 0x0400, 0x0800,
X		0x1000, 0x2000, 0x4000, 0x8000,
X   };
X/*
X	a = &g_display[(YSIZE - 1) - y1][x1 >> 4];
X	mask = lookup[x1 & 0x0f];
X*/
X/* 
X   pel made out of 6 pixels.
X
X   -------------
X   | 4 | 1 | 5 |
X   +---+---+---+
X   | 6 | 2 | 3 |
X   -------------
X*/
X   
X   for (y=0; y<YSIZE/2; ++y) {
X      for (x=0; x<XSIZE/3; ++x) {
X         switch (A[y][x] & 0x07) {
X         case 7:  /* Really shouldn't have any of this value... */
X         case 6:
X            SBIT (g_display, 2*y+1, 3*x);
X         case 5:
X            SBIT (g_display, 2*y, 3*x+2);
X         case 4:
X            SBIT (g_display, 2*y, 3*x);
X         case 3:
X            SBIT (g_display, 2*y+1, 3*x+2);
X         case 2:
X            SBIT (g_display, 2*y+1, 3*x+1);
X         case 1:
X            SBIT (g_display, 2*y, 3*x+1);
X         break;
X         }
X      }
X   } 
X}
X
Xcenter_bottom (str)
Xchar *str;
X/* 
X   Routine to put the string centered on the 3rd line in the special "text"
X   region.
X*/
X{
X   int col = 40-strlen(str)/2, i;
X   struct utdata ut;
X   char *txt=ut.ut_text;
X
X/* Fill in the pad... */
X   for (i = 0; i < col; i++)
X      txt[i] = ' ';
X
X/* ...stick in the text. */
X   txt[i] = '\0';
X   strcat (txt, str);
X
X   ut.ut_num =  WTXTSLK1; 
X   ioctl (0, WIOCSETTEXT, &ut);
X}
X
X
Xfixwind (signo)
Xint signo;
X{
X   static struct uwdata wreset = { 0, 12, 720, 288, 0x1};
X   struct utdata ut;
X/* Reset the screen size. */
X   ioctl (0, WIOCSETD, &wreset); 
X
X/* Clear the title line. */
X   ut.ut_text[0] = '\0';
X   ut.ut_num =  WTXTSLK1;
X   ioctl (0, WIOCSETTEXT, &ut);
X
X/* Turn on the cursor */
X   printf ("\033[=0C\n");
X
X/* Position the cursor to the bottom of the screen. */
X   printf ("\033[25;1H\n");
X   fflush (stdin);
X
X/* Rearm any signals to do normal default tasks. */
X   if (signo) {
X      if (signo == SIGILL || signo == SIGTRAP || signo == SIGPWR)
X         signal (signo, SIG_DFL);
X      kill (0,signo);  /* Redo the signal (as if we never trapped it). */
X   }
X}
X
Xint must_find (fpath, name, picdir)
Xchar *fpath, *name, *picdir;
X/*
X   Search for name in . $PICTURES and /usr/local/lib.  If it doesn't exist
X   there try again with .Z at the end.  Return 0 if the name without .Z
X   was found, 1 if .Z was found (indicates we must run zcat).
X*/
X{
X   int len, found=0, zflag=0;
X
X/*  Just try the 6 possiblities. */
X   len = strlen (name);
X   if (name[len-1] == 'Z') zflag = 1;  /* Z on original name? */
X
X/* Try the original name. */
X   strcpy (fpath, name);
X   if (access (fpath, 04) != -1) 
X      return zflag;
X
X/* Try original with .Z at the end. */
X   if (!zflag) {
X      strcat (fpath, ".Z");
X      if (access (fpath, 04) != -1) 
X         return 1;
X   }
X
X   if (picdir != NULL) {
X   /* Try the $PICTURE/name. */
X      strcpy (fpath, picdir);
X      strcat (fpath, "/");
X      strcat (fpath, name);
X      if (access (fpath, 04) != -1) 
X         return zflag;
X
X   /* Try original with .Z at the end. */
X      if (!zflag) {
X         strcat (fpath, ".Z");
X         if (access (fpath, 04) != -1) 
X         return 1;
X      }
X   }
X/* Try /usr/local/lib (DEFAULT_PICTURE_LIBRARY) */
X
X/* Try /usr/local/lib/name. */
X   strcpy (fpath, DEFAULT_PICTURE_LIBRARY);
X   strcat (fpath, "/");
X   strcat (fpath, name);
X   if (access (fpath, 04) != -1) 
X      return zflag;
X
X/* Try original with .Z at the end. */
X   if (!zflag) {
X      strcat (fpath, ".Z");
X      if (access (fpath, 04) != -1) 
X      return 1;
X   }
X
X/* No file found--die. */
X
X   fprintf (stderr, "Can't open %s:: %s\n", name, sys_errlist[errno]);
X   fixwind (0);
X   exit (-1);
X}
SHAR_EOF
if test 8169 -ne "`wc -c < 'picture.c'`"
then
	echo shar: "error transmitting 'picture.c'" '(should have been 8169 characters)'
fi
fi
echo shar: "extracting 'picture.l'" '(1938 characters)'
if test -f 'picture.l'
then
	echo shar: "will not over-write existing file 'picture.l'"
else
sed 's/^X//' << \SHAR_EOF > 'picture.l'
X.TH PICTURE l
X.SH NAME
Xpicture - show pictures on a 3b1 (240 x 150, 7 grey levels).
X.SH SYNOPSIS
Xpicture pic_file [pic_file]
X.SH DESCRIPTION
X.LP
XPicture is a facility for displaying specially constructed ``images'' on the
X3b1 bitmapped display.  These images are coded as 150 rows of 240 bytes each
X(terminated by a newline) containing '0', '1', '2', '3', '4', '5', or '6'.
XThe result is mapped onto a 720 x 300 screen with a pel (pixel element) formed 
Xout of two rows and three columns (720/3 = 240, 300/2 = 150). 
XThe resulting bit map has 0, 1, 2, etc. pixels turned on in each 2x3 pel
Xdepending upon the indicated grey level.  
XImages are stored in ascii and may be edited with an editor.
X.LP
XImages are typically 85-95% smaller if compressed.  For this reason ``picture''
Xaccepts compressed files.  If a file name is given without the trailing ".Z",
X``picture'' will first try to open a normal image and then search
Xfor a compressed image.  
X.LP
X``Picture'' looks for an image first in the current directory, next
Xin a directory pointed to by the environment variable PICTURES, and last
Xin /usr/local/lib.  Together with the possibility  of trying
Xto open a compressed file there can be a total of six access
Xattempts for each file before ``picture'' gives up.
X.LP
X``Picture'' has no options, it simply displays each argument in its
Xargument list as though it were a well formed image.  After displaying
Xeach image ``picture'' waits for a carriage return before going on to
Xthe next image.  If there is an error, or signal, a trap is invoked
Xthat restores the cursor and resets the screen to
Xa ``normal'' state.
X.SH AUTHOR
X.nf
X.na
XJohn Campbell  (CAMPBELL@NAUVAX.bitnet)
XRt. 4, Box 952A
XFlagstaff, AZ  86001
X602-774-5375
X.fi
X.ad
X.LP
X.SH BUGS
X``Picture'' does not know about tam.  If called from ua or other tam window
Xenvironment the screen is not set back to normal.  Also, "grey" scales
Xare shown in various intensities of green.
SHAR_EOF
if test 1938 -ne "`wc -c < 'picture.l'`"
then
	echo shar: "error transmitting 'picture.l'" '(should have been 1938 characters)'
fi
fi
echo shar: "extracting 'pig.uue'" '(12576 characters)'
if test -f 'pig.uue'
then
	echo shar: "will not over-write existing file 'pig.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'pig.uue'
Xbegin 644 pig.pic.Z
XM'YV0,F3,$!BP8(P8!1,B3&AP(<*#$!_&@$$QHD6+,@[".)B1XD:-$RN&](@1
XM8L 9 R^J/#@PX\F "&<L-/BR8,N%+3/*E&ERYLF<,6Y&;+@2)$>:!!V:%#@P
XM)U&?! <JL)DPY=&&!*FZE%BTZT68+&%^A$B2K,B5##.N'!LSK<^9. WN?(@U
XM*-V:::N"[>D58]ZF>YEF?<E3:5P94P='?1O1J4ZN?/M>_*B6H]6(8]E2KGS7
XMLN2K3R]7#DA#KEV86U.[5!RUJL2G'/NV1CDX)N"6@-5R!JH :NZ3?F&CE0V9
XM[5#.:\]R1KU4)?*E1)L./;Q5)G.PHVOZ!!Q4X-'2R)FCC7J[/$/'-MM:G8H>
XMM735"KL&_LKW[$;C13WB]_I\+UJ>+_54U4VK/024;DCEQ%U;!95FW71;.>=4
XM4X"!EQ=T%,H WD&)M:=57O$-%UM1:AEWEE?ZC;A?A%]9Y=]XU\GE(50@9N0@
XM4Y=-J"%#T$5V5$H#T8!2D#?EAJ%@TB'$GEZHU93;@L2ME=]^4TY'95&XM>7C
XM<:H9*!B/\%U(V()_>:?04U@12-Z.0.&FVV]X(?9D;7KI^!R)(+&8W$9BJ;3B
XM0U<BYQ2#/J[6Y6-NPN>0H><Q26.,\S569UH4MCE3AG-6M>2'KY5Y)V0D?@K2
XMB1.-6*ISLC$J%&RK9M5<F//I2>FDK=%$EWP[UNKDD&".29"0N@J4V(5^M3><
XMJ'#YF1F>7XW&7YS9+9=4;,L)Z): $-ZE6W>T$2@:5-3&(.20-]8*9Y.*6<@M
XM2J4I -11)?VF+7T=_;FG1E>:RA6RW7&*8';?>I>M6^$-S)AOV$V+(8W=*J9C
XMHHSBQ:U@-/3V8F!B@BLEJGY.%NJ=PD'G9).WUE929-?>&J]=7D9+U+5480KM
XMS VG%*=C&;:+YLNLL9:?<Y4M:]1G*EW6;'OO'KGE524;%J&SUE6'+E8UVE2I
XM@^=JAV1M<WK8U+ +2TLSNOP9C=]8+TJ&KE!9\W@TB* 5#-&#*D,&WZ!,#N9F
XMP^/"Z:% ZC;J8KD%@7UIP352&[+(9$F9=MI<-IB4=@@;1IW/(>HK*W%5SV9D
XMS&S>1IK# R*EE7J$(3:UK=K"V>FGF_%[JIZ6OY75D#/:IFMPA"7K:MU$H]IY
XMHJ>E_C#%#K^7^%(RSS!LS[1N&*Y_^"5]ZJC!,S:ZANCA/#7OV_(<<;79Y]UY
XMR6W_M/55M(&>M$YZ"?D\I#6Z2#9FQPG5EW$-4?;YZ1/SGK;&QR^J"6PZGTE/
XM@.3EM+@E;%8)PYW50D>Z2J$$;'];&]D,A:O@X<<_!&.>2QI&++A(C#_%\D]A
XM.&>Z\9D0._UZE*-LT[Z78,USY,'=_*HFPQ!!;FD_4QN43/*D&MX/-$GJH%\,
XMIK;4P&L[,)$@;1#FK\F9ZSSMD]FX;K3#Q'T(9LB27>.:.$0'ZF]+9_K4O\+C
XM+"=RKE/L4QY3: "L 7DO9J*K%4[R2!I>?:V'H9G9$8&&O^SQ[HS- J'"0(.K
XM[$2N:<SBTJMN-@,ZTJ &EM0@;G#&MZTA2(IX'(S%SB>RSHD1>_0!(MP0R#A)
XM+I&-3RSEP7X8JE)VSY*8I*,1NY8W=B&O59*#&(&F DB,P8V#ABP),L'7GT0Z
XMDY$%8AJ,6GG*XW )3D+"9 VV60,V&0])?L31)J]8,^,-<W49S%B DBD\9U6.
XME77A6(^T]T-%LO-D3(M:=[3)31*BCH3F*0^O<A@D&WH2,<6$UJ*L)1X3>6Q%
XMCP-@N+04R7GNK(F/N^?T8E.#&6A32#=ZF'FP1IN^U:Q;?@QH0D;9PF/:BE% 
XMS-<S2ZDP%L$&A$N49I1TJM&*=O2C-13=A-QT0Y(:%:42_$D-E=2OB#GP3(^:
XMZ#UA2--_96N>XY'JL[#54Z*AY*?CTIMW+/0E]?G*@FM*7Y-8&L66JC-SG"&5
XM$IN9,K'ECY8)2V ;NRJN2F;3DI6LC%^UN4L-3>Q#PJR30&6V1I>P5(YB8IW&
XMGO*1^WQ,5,1J)OLR]QH@UK*:&!DL-[E) QN,U@:E)>UH+SF@TI U8GZS4Z/ 
XM0Z;XL)5@/FRD9#$3J(M%CD"IC.I,U=95#6W3M*:M07*7JUSD*I>TR[UD8.<8
XMV)W ,(=F+1/CN%/0EO3&@8HC'^125LC+YG1>J>+7&4$;/('PL[2I?:YS;4#?
XM^3;WN:OMIM4&RKK4M>92&6ILNI#T749BU)DXQ>A+%;E"VL5RFGPET25/"U_D
XM(C>U]&VN?>6KVCJBM8'DA&" R_I-@A3X8,_"K3OEV2R<#!!XG"7:XKHJ)-0F
XM][C*Q?!QX3O:'L^WOJO=)$C%0\61J0^M1L2B30J\6WW]MH0H"^/<P#(HS8$J
XM@5?NJ7LQ:>/XVCC'%@;SA'N,8PMGF)LVH6-'R4K##(Z8J&7=Y('<!6>ZZ>1 
XM#IG04P>)PBD7T,&L3%:$9<#E'7^9PQON,FK)O,T*WW?16>1>1ZN[+M(M[Z0 
XMS95!%- W7;H6*6&58ON,ZC"*9OE8I]XHT!P9X4HZEYNO+O.$8YUC1G^4N5W&
XMY)!^6DF_5C(HW;LNH<I$VS7!A,[L N4(?;U%7U>%CCNB+;E@4FP:%&\^#XJF
XM".MZ0. ET[VT1O1QSPQK^=KWS!7V<KIQ*=V_>EHQOFL=I,*)PX#0&4<@!:F0
XM>SWM2>,[L)\&.$JW^*M_$VEOL\U505_;)+*BAX@.XR>NS5S?BI_YQ_+%\+GQ
XMF^M\Y[+7N1RR&R$.NM$@_*P9X72EQ%G=7N<[VM--]I"!12']<H]<?<7=P&&N
XMRPH1VI>EZ:;.-Y0;A]]&WR MM[CIJW&+XQ?1%PYSK#.L:, BW:.6;+?>U(0I
XM!FVM;RPO7#CU#7#NY;OL0A_=S*<;=*3RN[LZ)Y? /5IPP :VF_K&T:^ +LY.
XM_U7JL-:XHZG^:(M7W-P<5CJB[>[R2TZ8[G@?R)IS^&E#F?3C<M?Y5%P[]R")
XMR^PSC[9!.YU2"^&NYV;W9;)Y[?+/GSV;,"]X2ODFP:0[>NF/1CR0;WQXJ2?Z
XMM(@'ZE_SR]I)9[/E+J\NX%IN=5ZY5GZ?GGGT;XYTF+>$\Z?OV^2S3W#.IY[7
XM!._CV]?,[Y .IMH 'S.7;_]EBD,]\8J'.N$+#V8<KWGX/9;N_3U*=Y.:M+IK
XMYVDE!7J;9WV9Q'G-AH#(=W;L@H!UA'3-]WR#Y7C-)A-7MWS_-R8ZEQ 2EWNO
XM=FX;9WCB%G@8UW[ %VN.UV@WEG]9=WQ@9U+4A7;,)GKCPFF$=G,R)W "&'=$
XMHB%V)WW0UH!JUGPAYU>,%VH".$?4YW; @C6.]X'R!X(:-G%4IW'XE6Y4-P.'
XMMG[M%W5CEEPM^'K-EWD#!W18UW^I5TD%6'MO)X1DUX!ZUX*5-'FZU$=RF$M 
XM)7?^=Q($]U71-F1#YX/\5']/9WA49X@K"(4E.'B/QF-5-X@[!HD?MW>Z9'P-
XMTGC3UH2@5W;-YBY-2',#F( "^()F1X><:%T*J&8?YX2H%VU!07:2QCTW6'GL
XM4FZ IW2*.(6(6()3&(5BMEJ+]H49AVM:QX<@)XL!=WIM"(%KXB#(YDOXMHEM
XMEVRAZ(,]QV]FAQ#_]U5G>"-_U3!IUWW]-X,D16;A9HL>J(N[MWOI2'A3%W5E
XMQFC1%8S1Q7I^&'FRUW?8EX.:N$D%>'/>A'V?)G3)IG;+6(U\F'HNZ$O=5(0%
XM50,Y%WUWQW=X2&:#=V'C]H%6:&8<YW3N=UI !I*XIF$=MFB&QG^C^'.:>$.J
XM9U@)6$Y,88--86WEL7_8)TYUUX8^1Y.KIW_\)X/O%G1S))1DEX+Q^'30-6M<
XM:&Y8&(^\6(*)J'N%J(XH&(PJB))JAI6HEXS+UQHO5R[>N(8^5R%^979>:5#;
XMYWPW&"1MQVO&IX,E)7D@]U$?I8K$N&%<IH6E-5]-YX7N"&ODYHM.:6C057A.
XMIX(3QF-8EX)R-VF2YSG5F(G-B!A<V9+'%Y?).),W2'ZM@7? !G)8)WRSR&^#
XM:)3YAXY16(6'9H*Z2(CP6&COU87NZ&5ZV6B2:'^G>9I9%W+5IX2A5B&?!W#]
XM<G %&%(HI9(^2(.A<W=_J(?=48F+F77,9H2V*8PK*&N )X5/*9*J&7Q-*69_
XM29>JQ6P4Z&.DI7ZF^5[-EG:<B).9&7"IXRZB-VT+1WVS")#,*71KUU'BYX+N
XMADOR&'P"^F/N2*"'&)Z'67]5*)[*I9>+]FHI.(23=XF[:93M)J&Y69<3RG>^
XM&8K3AU3%N9QF^)4!*7-I.'178X08:IU_V9U(J8Z)YWZ[&)**&%^&]H0W:EKQ
XMU6[127<*0GI@57S4&:%X.&99F3-L$FI]QW>:5Y\#2"27^:'D H&]9HRL:(2A
XM29@'VGL@>8*&.&[M:* BR*5,QZ"#F7'W)YTM67?2R(EMV7A$ZG@X6*5Q!TZ9
XM6'Z>6'9/ZH8Y&'-P699ZBH'6Z%%.N:4NJIM0::#O)Z:'B8*WR:572(2AUU;&
XMZ7(&B)5"2)<'.*?EIX3I-W?09Y:@^'_Y=HW(PX "N*%Z*%KPEY&#F6A]N73L
XM.'^\MZ6M6IV/^J+\5Y<S!R%I9JE'=75S2%B<^88-F'X&&'L5,Y,;"(I86JIQ
XMIX#3^9,&5XN 26Z_EZT*>J9?VJ(D&9Z,9J$/6FL=IJGZ-U[B)U34J(-9R7H*
XM.)3"^GHQR!XSJ(PO"8OB>(W'REK46*%/>9%-.9O968@>F9$#NZ#A"HGH:9(1
XM"J"$51HP<CRK^E/]9 .AN78E]6YZ>(0U>*5DZ7_)QX-R27H)^"NJR(5>MJWS
XM:*.X!ZG?:H('RW%9VK 6JJ&)*:$5>K-J-'+#N9DS"U9X2$%D^*D0J&_TNI79
XM9Z\\^(F_B7UX)VG8R;)\*74\!GQ:&H),R9H;MTT72[,5VFA?NYLH";0@]6VC
XMDZ;M.K.PN+27"GNZI')Y9T$2>:Q,^I@(Z(.[NB-*]X3JMH6+-Y*OBK4K*[ V
XMZI.Z1E@]J6L."+8^B4N[.B[L9(?4V9B.9ZEU.K<-N80U@&QA]6_0)I#MN9[6
XMYVM/6Y'PJ)$F":93=U\9J6.R"I[/E6X6"7XJNFM8Z;.X2K-:Z2 K83W3 :4'
XMB7ES&WH$%WEQ26?P&8C3:**8BX8.XH(J:6NTEKKQ)YNSVHB*:H)Q.H2C6'[]
XMUJF1!YUHNZO3*6T;VVT8LH'TR12NY[G):KP@=6^9R7<"R7-+2)1;=("$:IZ 
XM:6NGR:AD>K4O2GQ%:G?S69^$<\ 'S&X/6WW.-W87<V2T8E"A.'"IF&SR*:6B
XM.J<?ZKX@VW/FR'&WBIJ%.J/7.<*V6:YJZGD(YQ@N1C_4);9]&',T%WL-%E6A
XMQ)65AX-[IT.62I"R%[* B%1UN(V@)Y)'Z;_7";BU6K!)K'_M:G72R9*FP5[I
XM6[*2^;RG2!L0&3[HRL,I>GT'IWI2P8^ XTTS68&Y4K+;^%7J-X*Z69%)F8O<
XMZKKC:9-@/!LME&HR!J])JK?1^)YE9R9N0Z%)18V2&YG.HY LUWURV(,4(JW/
XM!YLW>IM0C*M<RZ 82:Y@IH5S3+Z!>DQF2Z$J'(9186V ^+3!2D&5RE_+2XFX
XM,;QL@KQY1ZIR=Y\\Z)9S>+'R6%IC"[;D2WQS6+@P"UU:2*C!_':[@T\RYJ/<
XMZ&X=!EBG;+M,P9E]NH Q",'@@<H49(K=ISJ6FI. .&1/NVN&FYB:ZJ@7"LS'
XM]U[$6K6PNZ -F[E@AS<:-3IC#'F[2I=5>AZ89%Q:_(*^1GMQJ9E.BL!0FH9A
XM"9K;3(-3NIDXHJFPZ86V!L6/W,[H'*&IN\GY%9WS&4+WQ*S35W!!6LX@4I:5
XMJY.!R*YZVZQ$:\,GVKE2,=(/Z:D#68IQ.HA@>,(2^KBIFIXX.I+42X&56(=X
XMUE4+)Y1 +#K?.*'_PHUP^(:,[,BVJYE4&GHHT;X;^"N;%\Y.NGR/F::E:9X\
XMS9MN.<_ZIUH!FL*9S'C*1TOEXZGTRW(?RRO4HHP06;S+B;%$PI\M6= #C5TA
XM.UTO ;< "<@K#7(6FM;F%IBYRZ.6[,YO3'SZ6L_*P\=>(<;\:(93FF0,QL/A
XM^)!L%X3)9XV"*F>)K6E99Y9\F*?0:(>>JXJ3?9M(F=%%F$VT;:0XRYF;$R;>
XMEE['&H?"RGWZVDS/EZH_-Y$@&\D/+&?D4;^0_(JZALB!I7()/5AP:IHG',(W
XM!J"V?;($'(: :#?RT5EZ98=2'<-]ND4/2[IOXGJU2WJ2YJ?=\I[)^K%S6R% 
XM^!/+&E8.")J17;.S*]X4:Z3F2KN#C%D1%A9%A:5 O+SIYVGB#:QDB=W-S9:D
XM5XW/.[I/FIS[&$4#C8V]9MA%*]'A>G8*.8:4F], "LJ MN#Y0[]]+>()S7-^
XM%X:8J%3KJHRUV'F1"3CPC<8Q")^P#-;+EZ<.*-L,NL)N85V@$WWDG.+""=??
XM1A\K!WFGK)+*#'OTF;1%V7AT+<T!;8WAJY8BYXT0C"G*MV_ :W9PFZD'_LB_
XMDTJJ49]C%4 O5>5XLAM]Y7UNBXPH&51#/+28^*[[B*79-T>F*&H9Z'WJ6FW>
XMI)"UVTVNK:)!]IMP;>=.]!CA4SOE,Q,[7"!N9".<FK>-B8U6XXWB%XMG1WZ?
XM^W:K3:(:2]=PN.;JV\-908LM/<4:(K\J2H&+L1O?A\ZY(B(P?A"H/-="%ND4
XM3#'*]WH#=34YY^$_Z=[W=\"(GN,&G,U&#NE4/,0?#<C0+C_,/2YI%QK!C)[2
XM<^RX(JTF;:6#O'"0C-41J'?MF9\1_E/)G;R(/GG\R7B  X,U+,;C+&D"KW!M
XMVRU(CCG,,\SF&E8[55PQ3&C5YW"OOEANYYAW)ZQ+:($WUY#E-XKUSMQ175VN
XMCH%P&3H7G]2D5B[&R^.4&>GA<G3YQ;4;8L55OJ3L?:3GT83=);D4 \*=/:EF
XM58NC2>CDIZ<A/I!]K7#)]Y7UK=)T6Z?[BK?4N"2M KP-6*03RNYXPH952M1)
XM]O0_7WN ([Q6W_'8".U)?X1";./OEO29NZH83L85B*)D:+*OGH'R:2O[VGB\
XMBKY>+RE#::_)Z=0-DH0%E9#9I[A8RL'*#*=I.M@3&;KZ5KI-+VW)>(',R.,R
XM;K+LZFE]#QS'K<M.C=F%XF3A92A'=XT!ETGG3EN]"7>EI[\4GWE[N*K0>='+
XMJ+<>]Z<FW8;5K,W^7=K@;B,HK=!RXI5]KF8R7T!9Y'W^=IPZGL TB?(5'[Y*
XMQ<AJ+D7?N-PA?\;/IY)7U[T.2(G0JGI61^O7[-"BNN6Y;OQ]NO!H3FFR,W0"
XM?W#F\IRH7O:(+)"5*-<QON/D_ZK>AMM'KT[C,229H^+65>'[1@3-&T6@Q830
XM[EWRBG_+K6]D,#16[T"&,3)[6JSLW0[X5L,^U/2Y:GX*G^$0$_CT EF2"E3?
XMS/]\L'#"IWH.*'),S6\<J2D;-[KR4;1K3E<'R=&P1[9"&%RIDV7PJ9[!M +(
XM[ZR>:P$VGD.'[37R553,$F$C*9\ODS O)Z6_&ET_4VC9K?80+X.4$\J%O-MU
XMR.M+[*])M!R($MX:@Y()K9!!5%0SB%=G@V":9OJ-'FJ7]&3<%J-N5I!D:3-!
XMI?%H"SYZ9EIO&]$<)Q2-\@A"$SUO[@%EI9O'WQQ:Z+)/E4H+_J%4]VQ&U)W*
XM:@H"P[DG9-5VZI!<@WINYR7@G0 $_YQ6("Q#!,_+=:JJAL^H6X!9.S3($\DU
XM?Z)4HIR\DDC?C%GI&C\F<&S(EOM4_2PXD3,QYIML8*=R3Z@*L!&5P+8*D=N&
XM WGK:VT-,=+&^190D-MQZPT2WC1Y 3]\GBI[@SZ./%V-XH>T1 Y#JH0H34GE
XM#*32"Y<;?TH=W:N^51XHQUI08+Q*/59P:&T^N'-Y_EB;TX)U#T55#%P6'SR>
XM0E1Y#BS]D385!:^ 82#S4XZN<V%!.C5JAM)\DV8$\= EQ >&>E;A05)32(CY
XM8+/QA['N5E2315 M8\VP$3?2$H(&,U92#O0P+?R'F5@AJ2%(E\O6X2 /(^\$
XM&@.RA.E-I5DCD2?_?-SS<GU:;HM)J1AX>DY9<?MP1NNC 1NLEK1^%(4C4<.P
XM,?' *S?T1J$*3 ESRSU1G\^#MI"B3@H[K$@GRK\QIWP:C1 "@IM0*(DTGG/=
XMIE6R*H4VZ(;0M1[V<A+%5UR&^J7&]4"FAHRL#SBY?BVAS/DFT /+UAYAK'9C
XM+"#EDM'T"\^89#Q2'"L3A95R!@@UHLJ;:TT(OG6UHF.<U!L@<G;&21/Y&QT7
XMQ*Z/'M-PZ4KH@+J6!F?.WS3*.^A/ZS"W!M'GZ%E%G$]N2[_YG2DE S,/6(N%
XM&F[UI"'2N,A:3B++(GH(X1FYS"ARJ(ODP(JUL8/UPU]#J;3<)9)WNN\+HK?/
XMM7?.DN-39<E/YKBZ6(:9+B*PJFS(9T.)J,.HB80%K",-2;$L[H0K%QXAT^B)
XM.1\M**TQR[4;81%<Q(0ARQ@V-;XHSMS@T!IR7FTB B :)'V8H]+JC=>M\/6U
XMS2,8JZ+IP4FA$)2\OF>G%E]>0")S"4[XA069B-K8T'I"D &A&G*YPS8:F=1I
XM*Y V!U@!)/9XI\!?_B(K)*4KZ4-5Z#QD6G\J)Y<K.%DFY)@@ 8/Q:G9N"#\!
XMO#W"'/O(1;R11''8Q3MZJ 4'W2%35H:EUK&VFUCJ:)\I]"0\B$>J(8[XG'Z)
XMB$J3+_ $_LB@"!QY6,!31@"R!Y&ZI)6N;&2?8CEM,4PVLOKVAP;>^YIF1.FA
XM8<& 2/5D4?5+B!DN1S;)-<?*%ICJD9(PT.1Y!X&"_3@AP?.(9XA=X(375P+5
XME_=B0.M-&?45O1/P(*0"K#OC\*\UM\MH?DB1%%&&]PJ153-=R!C9U-5XD1%R
XMC$&;[;=REF4,JH23<C-"KH]&V$J/'9DV7JD6/47])QVHE3@R:/RMH)TQVF<G
XM@Z%''&F0T1-2J32V 2N<4-%Q:HE9A4(4=QVE9*N4@)WG[.$<JN"$G!L:6U>S
XM4;2-1P\S%<><.XQV*8WYA,"?-U8:HR3K@=RLRP'*2+80G^!BH99)95PJP5;G
XM%3N)L]259._ZU##XD1,S)ECBBZ<HUK$=Y<4.@]L7%$,R$>7Y$0M!%5?2B>IA
XMLP?YC,@\LBZ@Y YBEJ@GJCG+HWB!N&6;@GGM@UM@C2 I':2@2.0Y!"E,IA1+
XMM!RWXQ;TCH$M[K@>.\CH= [_LY$\K.W<FZ2Y%<ME*\J9^HT6=K:<M.S(X FT
XM@0WS>Y$:AIF9OH[Q<U9;8_L P^.&*P'B...&OD0;@4QP".X^G/Y;26I( (*%
XMY-4O0TK]*W*O[;6QJ;!S!N7=='-%5DWA!"$%5IF6G<;3@Z#DP1T]D,GT %O0
XM##_7S-DLR_4E>OS:B4([,2_ 0 1YF,9@DOXS2!B3(;A$?-4*EZ*F26-S[[2]
XMQ21Y!</9CHR.#2U\N<09U =/HP7):CZ/8M:Z>G7A=ATY2IP;+D<D23Y41R(=
XM?RE[IJ>P+#Z&Z3<Y)+/[DX/.?'VYN+5O/J>M>W;^#2^>NW5E!G5B]?M,3(H5
XM/BOQAR#]')TB=[<#.'"$'1;<\!RJDSV\:_&E&:WF__90"-0T_ TX?D$W1K2L
XMHWO!)7ORH-5,1A@NP=Z,.X!CI0(6S:"Y,MF<^J(C].HXB9"+^4VN( =\"-9/
XM"7U'?IG_NF=:P(6 L.3M( N&M\#:9SJ81NP'1;]%.)GT(RW:-9U2IH$_MU.0
XM2D^'6&;<HF<2CL47&P%05O,O,W- !I6NY-_D(50P="6*/18E",K>VF.ZFF8$
XML/<-QW@YXVQC\4.*HN=9ZDKTQ^&J8[C+'THS"!G0^L>L1DB<\3[;STN^P^P8
XM0T&>L31\>,Q\J4Z$=SCE(6RK9;6R>'(QZ3(95=Y@3(EE\#B!4=*H.HQE8'B"
XM1[$<XB1FN4NJ)6LK@/%Q^9R[U*']]!AV\4^'+?*M)?&G.>,G6QI'.>F, <1A
XMACCAY;BLBK?SKY7.@W9![MP.&PK<;-:AR!1I&YW<;PAU+/ $^B%HBIPN9T Q
XM>Q.J_A4_B/3CA.0U1)-U:CL.H42W3.T=7Z-0M-3/><]%-AF+($N0GD&%CS31
XM4?E#OR."?%KHDT.B(3PRR>2IJXQ;, >/L2<B!ZA>IXO,9QW4=QY$>U<4\]M6
XM-)%ADXQVB)HH[,XH*,QR%0[(61?<P?](T?QDD2+M\_1"<S8I:>#98CL&*.Y]
XMG?B727W>$46:JO(_;:+!B0P'E6!K6ASJ)_2&DA=%[DK0=$DV9%W4LY:AZMPA
XM(/N E&=S*I9CE#W/YT+*EDGG&*DY\]5WI%%[7)XI$S[.NJG:SZ93G,EU^DJ_
XML0>0*&A^Q&NDF^+B.3FP2D,S2:A7$WZB4"@*O?H%[GI20U-_4'$>RDM"NJF4
XM%Z0T>']PX&W(N)6$-.?1*71S9.&)#I8Q-^ZBG?MJSC$SCM3]\INH'O^Q=WJO
XM?!F4+R&'CHSV6:,>L5!&(*[)%8&2M#*:=!59D;%F^B6[J"=RD&@QM!C-HA/$
XMNA(9?#:5-9/(S"'1Y]C7F,A?P8VA2BY0] "+7S.-J9"O5"%!#AB7)M':>I<E
XM<"V&3T]E'Q4$L82@CT%26"YS 25KI2&+99IPJVG#XPHDT@P"-#_CLQC"'<6U
XM]W92O.PT2Y'"I2'NV13<U3Y54ND2EZDK<&G5)JCS2*5-1D3&#/R)YV1:.(-7
XM7/!/HCSJ2BF,:W=<.>Z/'X9&]+A1'2"BDX=@Q[ON,KTV_OR?N/,YNX(@.L"8
XM!$KL&3+M?VD2"L*/2);E*FM!W9X<T7'J"L_9J3:?-*U@16WVX2?"</>"4GG(
XM.Z^HI+2W0>9A[B0G32FT,9^90><!!:?HE9% -C%-]AH#.B$@7G940O?0-,I8
XMJW!8(R6GM(SJ]."X-2(F5E@DU$.2;U7[Z,U_:6Q02MOKJFDECA+0976JV 1]
XMZ(ZT4L5.D&Z!/VU&A]-!6[&HPL2TNBO@8RC[:[02<Y5$%]C] I*%%)@VP[_U
XM$\M6+<>)B;2%: 4\5HK>$-#LGS0Q<KUC>Z0Z5Z8&O5'/RK)FCO^Y"J=P^6;A
XM?L&'^/ .WCL6Y@(ET-PCB5,D[H2<_:@@)I/(BZX)"<V%.SJK^XB"D'BGCN'F
XM\58*UC3#9J :0$#QJ^E1:]/S=B= V:*5*4DY/AW&5A>8 QM+[B%C.2;DN#DW
XM(B0=MR[V=2[9%'J!E$)6BPF.\D>51S,8G/9@%0R?'0Z@%HA^)9&V0Z:IGU!N
XMN_[*V]$K*QYLQ(Y6\K+*,OP&FJ3A:HU669,TR*>0N4Y81G("3CO!8K)9CZ<N
XM.ACK/(O-"3@T'"23:X7K(Y2P5G!<UHJ;]"?=91P]5=7NP];&Z81N9P]F98 T
XM<*(:(7]!1*+K];N-2*).UIG9,$6+"+9L(7[GY5).,X=3 2?R0"PPB(Q1R8'X
XM$=5.'FMSJ1/??L^/9QWE!_9+<&'A(Y 0-@L996BS [J",KO,0VI;YZPH;,-U
XMY"0#QC) )SA46J/#A+]*\IBJ4HA*@Q4-1*Q^MZAPKFP&(!AKF[F-]":[L+:P
XM$T*'BB/<G$.E:&9,-5AP3%N_RHXXYUA6MC$$1C6;B/Q3I-(H2M?[]=Q,5,-(
XM@RSW18P%-0$<1LRK_55LMWD I,_D/LK6P\A]).: 3EU1=<'^;.UDCF'U539"
XM7HJBHBWU:7!#%72UQKK5Z[82! 45%<%FL 8G617]:)$PN1 TTE#,8/=Z6^/U
XMDVI*MJ5)NI870&V9ZQMZ73$'Z0W(Y3$M4\NIDRF7:AP(.=%)?-=(Z YA02Y8
XM2DY8'=[#88FR4>.BVI$% W33@T/\>06/[]XG@!LLW,QIN U[))2,NE>A^NC%
XMI@L>'8+%OHO[8%G:",!8*,!E@Q@8 <HT"+"I$!S7YD%8"@5ZEO[OZWAQ@R\&
XMWPL.3!(H M:KA2LD1027QF#LE$F@@3%HY >CEX7B8 R(X<5Y,C@))P>S8!%@
XM0!J,0T%#/WR0H]%BEL8%-B%\P:;@%&%G9_:"S6@EK):#S+F783N^:*F9"UX"
XM7%(-EE!5U*[*()GP)#RDT#4U$J1PR8@/6N-P"!8KLE%]0\O8KV1X(6S/GN'9
XM;.?*.Z NS(W^5>_K3>!O0<6BKM3E=LNV0% )"HBC5V ,7]1@/L%Z+\1&U0X,
XM4]/9NTKS3*O,[0"FL:5KH$70Q]DJ592-0Q 5M4'3J'<B95K[4DXVDR7=X@)H
XM$S.8L*S#4CC:_=\L46'+(U @<M%(!:Y?4TQ0NF>W;*$P\;D=.D<J4C -A$V%
X1V>5LJI1[F\>6;_85;+9! 0 @
X 
Xend
SHAR_EOF
if test 12576 -ne "`wc -c < 'pig.uue'`"
then
	echo shar: "error transmitting 'pig.uue'" '(should have been 12576 characters)'
fi
fi
echo shar: "extracting 'shuttle.uue'" '(3450 characters)'
if test -f 'shuttle.uue'
then
	echo shar: "will not over-write existing file 'shuttle.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'shuttle.uue'
Xbegin 644 shuttle.pic.Z
XM'YV0, (*'$BPH,&#"!,J7,BPH<.'$!G&F"AC1@T;&#'>V,BQH\>/(#EF'$FR
XMI$F3"B*J7,FRI<N7$2=.M$@RI,V;'D_JW$DR)<R?0(,*%2I3QL6,.),FY<GT
XMI,^A4*-*G0I#9@P9-$8JW8JSJ5>,3ZF*'4NV8=&L2+FJ#?FU:=BR<..2M3I#
XMZ]J[(-ON?"NWKU^@5HVFQ4OXH]Z2?/\J7OPP,%H;A2.S/6PC,>/+F DZ'BRY
XM\T;*E3.+'AUPLT;/J#\?MDRZ-5S3D%/+OJ&7M>O;5*T^GLV[K6W<P(G*K,N9
XMMV??P9-/A6W<N-??RJ/'U%V\>6JWTK._M!J#>&SKUO=J'S\]\%'PZ%4C)L]>
XM(O<8N].#=]J^_L'WW:O+EPT9I?W_ N&'U6G[I=<3@ B^YUV!\AV(8'T"GL=@
XM@QE!]R!P^,4W(7HC67CA;>\)]MV&!H;VX7CX+4BB@;1Y>&)F^%UUU(@KAF?B
XMB\K%2!.!-<[G(HZ*Q2BC73VB]R.0?@F(U8PT%FG<D4C&%2(--5#)9)-.R@9E
XME&.%2%,-5_*8Y6Q;<KD<=R+: *9)8S97IIE0H;DC1FL2V29O;\(9E'EAUJG?
XMG9[EJ2=,YIWDYY^ 1B;HH"QQYYVA-25*)J-RT14F4Y).2FE9P_69T:69XKEI
XMES-=>FA)H8HZJE34C;0FF*<BFFIABZYJ$)JNPDJG3K.J:BM@5\TPPX!JPEHE
XMIKUJ^>M/G=HP;%:P6OG82<EJNFRCI=(IPY)5TN"MKM16BQI8UV([IYK;SN#M
XMMZ^"*NYQY)8+$45,@DE#NNM:>=2I[\(;K[SN$?NIM^H*RRZXQ<K:KU+K :P0
XM1=,6V^U%S^J[:Z0+$^:?P_==]=A%QH9<<<BH9JSQQAQKMN2G(;><;\MVFJR6
XM26#6BJ3'^[9<;\@'(RSS72792X/-+\XT<,]UZARMQ6+^W%70!,] ](79JIFO
XMONT:>_75$CJ]5-!5"KOMU !6;0,-!D^L=+=;K]NUUY.!'?6V,I -X9 8H:WN
XMUDJW_;+",NLDM-C;3F0W>QX?'37?6ON=+^ F&\HVX3+(=+AV1M-I,-KX,N[X
XMUDW#31O-40];N%671U=U#:975'A%G[>]][J0]TNZWJV?COJHV8*9.]V5ISM[
XM[,(.'[K3N<X-O) QI([;ZI33C69%FW]>_-X7B2Z2JWH#7SGSA@]*+YV<+Z\D
XM]</+7KRWQV><?/3@<^<\:7B?G7O\PE>OOL'MVWXT_/&3GYGJQSKO!9!NZ_/;
XM]7;DM?]%[WL!E D,YG>9Q&GN=Q&\"OK2EZ_UU2Y3 RN>]R"808%0,$CP^=0#
XM,TB1_"EP<_V;50@-R,*)&.2$?<F<U7Y'P@RZT''J>ENU2%*^'I80(3B4TIR*
XM*+T:%@5]L:N3N$@2MB8Z,08*2>)<!,8Z#%XQ,-3S&\FP!*B@4>Z+6%R(%G-3
XMD7TQT8A?_*';CO;!"4'-=&B4($/6&!4=5M&*>03C]6@70@:6D7S=@V,-(<)'
XMX7BGBS1T8E6PJ*3JD81P&LJ2YLP7R#0^I)',RD]&WBC)6X4(=E1$%P+K.)^\
XMZ:Z3GF0D>>KW1D7&:)(%H>0I(]:MWV72CB/A'"QMV!)0ML2"]ANA)&.IF>$$
XM;TZ^$QMS-A1,/ X3)L94"2UYN,Q<"LA9;53AO5X),586AGO6S"-4LCDO-WJQ
XME*;4I=&HI*9BM4Y( N-0W@@'2ZFPTRPI5-,[68@0Y@GL;'^,G[K,^;5]1O**
XM8_GG0N C ZMQ\HC,;&:*ZL7/ RZ4H88A'S>_"!>))B0&!1SH$0LJI$?YCISX
XM"R)(1V>U6L(T?GTQ*4*PHDQX=BQ&VT(+E:091YD"[HX&&];>.@J^JBA&I[<:
XMH2UO.5&@5FE D)PJ_O!U*;"!+)KY(\XX;\J=RT!U(!J\: 0?9M"CW&NH9,V@
XMND:X/\ZEKW78P\C]J(J9LTX2D#[UIE6K2=1 [HV$/0T6\ I6L,Y=Y%YI?4]K
XMSMI"K3;U5I,4$"_OB482%A9\PWHBOJXW(,A&EIB3%4T+(<K6EE)1F)T45AP5
XM2=>S?:^)N#$I& ,K6,V^-IT27&MI*-)9R[;1M+B]C6ZK$E?\N$='9HQK9B\[
XMW>*"#W:071YP=$M<X;8V17?4:G7UJ,>?7M>RTR-<:#,Z&E R<Y'L12L^ZY7(
XM9<;7O*=4:P33];W@Z-2[)QWO^%S%62%5]\"-.=]#FTI=TF@1M;WE:T$%/. 9
XMDG22,[@O2_,+6.8%Z)3E%<T)BW)?#VM8OFCB)6P!C-;0EH?#/0SJBBLYMQ";
XM52S!RO!)G?M<\!*QPS@5K#85W$1N@:R'S-V<V*2580@OQGD:E.:.K>(0U_Y8
XMG7N"L??HJ4(J0XQ@09U1%9WLE\M5MK^M!2ATJ=CDX7JYP:&$<0+%;%HY>2MX
XMET*;C>5RN+2B>:()#M&5PO;>E689395-WZO2.5WJW9;+Z-QS6>SFY\H-!:@J
XM'F>AJ3Q>5CU1D$A[Z>D^[.? &)7 ?RYIE@THG"E%%X(HEFQISK3;HF"/9YPE
XM=:53C#"!ICJBP%+FH6%#IS%SNJQE)95!];<NX.KZS("$7=*N2F9_QIF<A!+0
XMHW:XWD4J^[H+!"Z9IR=54V.-VB?^2:U(+.MC^AC5Z.7QM[=JR^]*]972!AED
XMQ;)N#V-+T"69\2WER6D<!Y#"DIYRI2]JY#I;VR6737>L 4Y$<1.44W"^-+FM
XMZ$+625PE@KIXCXE=T^;:T,"O07G*P8A8>M+@XQ')D\A'KL-1?C:-R);P7'2>
XM)&WK^>$K87"U-SP<J)$5EQ3^"\\KV.YU_INO,&_TN78XU5DO?>?)_E695#XO
XM- U:X 2/9=,A'G4W#WU36Y=WH,_R*:H/G+QAC_/9XUEV+J6]X%UG.R++=_"L
XM9UOM#TO9!(><\*KJ/2/\13(Q%^]WLG-=\&HD_-,/ZDHD.W769I_[VC,.^8-L
XM2?,*WW8RF^Y)P#_]X)V/?$S^?:ZP=9N2'T;XWPV=>B1B7)2$)2&*GPUZFDOV
XM\;4G" XI0D1C2QKVTYW]6L<>?!/.9=M9):]YAXWEY@N?5&S&^WT"U.H@7[WY
XM(W8=E59L>.I7W_H%&3%%"ML8C4?<].@?B/HY&?C+]Y&U\;=];DY;^)7G'/[Y
XM=WVT]GN8$7< &( "V$>6IUIOQGP(Z'E3,6IUIW2]]X#.IX 5:('MD3J_EDL:
XM:!]FEH$?R!YF-H)V9X((Z%<HJ!PJN(+^Y8+QUX(PJ%PS:'TR6(,.AH/!=X,Z
XMF!D\V(,W!H20]X-"^%1%*'A$>(0YI80<DX1,J&I/*"].&(7 1H77,H56.!58
X%F(51H0 W
X 
Xend
SHAR_EOF
if test 3450 -ne "`wc -c < 'shuttle.uue'`"
then
	echo shar: "error transmitting 'shuttle.uue'" '(should have been 3450 characters)'
fi
fi
echo shar: "extracting 'skull.uue'" '(3580 characters)'
if test -f 'skull.uue'
then
	echo shar: "will not over-write existing file 'skull.uue'"
else
sed 's/^X//' << \SHAR_EOF > 'skull.uue'
Xbegin 644 skull.pic.Z
XM'YV0. (*'$BPH,&#"!,J7,BPH<.'$"-*G$@1H8**&#-JW,BQH\>/!2^"'$FR
XMI,F3*'&(3,FRI<N7*5?"G$FSILV%,F_JW,DS9L^?0(-NS"FTJ-&C!(DB7<J4
XMI]*F4*.Z?"JUJE605*]JW4HQ*]>O8!5Z#4NVK$JS:-,*' L3AMNW<./*G4NW
XMKMV[>//JW4NW*-N7? //C6&CL.'#-6H<+IRXL>/'D"'3F$R9\HS+E!,O9CSY
XMLHS/,F*('CU:AM^@I&/0L'&C=>O-L&/+GKU8L8W&MW%'WMTX,V[8KH,SKE&Y
XM.(W+R$\#)2W#-NWGT&/SGDZ=N'$:CF4+'WZ]N_*?I%='OST^>O7SUKM7?CS[
XM!N+TZBE_[UG:.6W%MC67WXS^?'SCD$&76&?(S7!<@9/-Q]-HV.V7W7Z&]>??
XM?\5%]MR !Q:HH8$*[B1:<Q?R1MZ%$4I('87=63@;AANVV*%.HC4HH(H"DF?B
XMB2A>1R-L++:HX8LWQ="<?2&R5V-N-T:68WP!RM:CC\D)]9=+,<Q I)-(-GF?
XMC4E*MF2*6O)(()27 6F3:B36%F9M:G;IY9< KEG;F&2:61.(1V;Y8)%N$N<8
XMG&#NR1^=4-I)DY5YBLBGF]CU!FB@^HE)J(M2!B7CBODI>E^?CC[ZGY&#3KJA
XMH3-=BMB(Z(W(YG"<>DKA;J%F6&BE0$7ZWHTKZIFDJRCNR)FH/]+ZDZVL=LEC
XML;ORVBNH$5K6H@PS0$LJ3%?J*J&-UC*J['68^:8EAK(B!]IGT[YT):>:H?OF
XMMLYVZ^UON56VX;@SE.L2?^IFJRV[[2*WGI&=ACLNN<+VA*^Z" ?,[X;_/ACP
XMO./:V]+!"5?L)[LMOJL;N.%&&W'!/%%LL;XW*FM@QPTKV:^XH$G,DL@6)^PJ
XMF?XVNIN\&@[L<DIMQFSQS)CYF/)C.'LVL&D@[P2SS^@^BF#'[MK\IM%'$QS4
XME!/?RK3,3G>+8,T:]U9@U2TGK=.I6U?L*=@U1\V;K&1;#136+Y>8MKK8 =W=
XMR5(K/';<.Z/4\]U]=OTTI'_V&[?</]'-L]:$[[NDAG .Z#7+@)M]T^"1EVSX
XM9/!]FN&8BS/>D^."V]UYEWE[JC#.Q7U-]>*!GZ3ZZLFZSC'4?/M8>ME7!P4Y
XM[IY7SC&9P(XK9.;! W4[\<4O^3#-OH/V(?-S"X\L]/Y=_.7N9(+V[&>I8=^X
XM\-R;^"C11?L[MI#CI[9\U;6;1'+Z?X:^+/C."BQ^SJ&1W_QTICF;W ]_N]M?
XMZ^2ULME!ZV\"O-[1ZE>2 R+P>]Z+3_7H1;4(2O!CS?N)!2_8JX;%SD#CL][1
XM/,@< H;08#=#8.)$UYGVT6Q@I;$>"S]H.J=HKS<R5%F.VD8]S 7P>CML(0BS
XMY[QX]2V(">36TXHXNR3NT(5,%&&\H'@S"DV1BLJSH@>Q>+Y:;9&+Z]+@Y8H8
XM1C%&<(EE'-:ONDA"%*V1>FUTH_S@>+J@I.N)G<*?%P_'.P"23X\"Y*,/@=(@
XM<+%O:)U;CW$89AFH/;"#B$QD#W>"NI,@ZC8ZBE/Z%M@O*;+,8T;,Y!XWJ9-.
XMFF1(3GQ5ZP)IK.J0LG^3-.+_R*9*"5*0)*J9H7HR.$M1ILJ67_K;[ZJ62>!E
XMD3Y6$F:@)*F_:W'I;?JK9+N6B<->SN^7(XF1-"MTL?2\#I(!*EXV#T2V:'EL
XMA4)2I3/C2)\JI5&2)EPG(-G3M!-R,V[R9.5-7%D2!HVS0J #W3G1R;7V_?.!
XM>73C//NXG ])C9SZQ*@H]UFX$SI0>:4+J$!M0E!@EH:C432>GW[F48#J<(!'
XM%.,$"UB3\G&47QA26TL!.L:86G&F+UR03;.ST/4I])']48\NN^G-\@'UF4*U
XM*2#Y=53V(3.70?MH1)L*TY'6I*3A3*2![LFK?;$-8CSE:@[)2%'P>'"L!W45
XMZQH(I<6]<:U7I!]-:7+%BW;-F$FUH;A2:%>\OO2->@VJA_I:5#5&#:5"="@'
XM_5E8"<XOKT^E9U19* .;K8UO8>NB*0?V6$+!<ZU;=6IFVUK/)'8V@824(F#)
XM6C32@I:!ND0M/'W*PXDNTJT_;91'2QLN8U:5.,3-$ =ONS<</E2U;/UM:W\:
XM3:4^EG(I0VAL2?<_YN[MG9<D[&')!DZ0(!):MZ234M&IT.)*]C-@0RAE[ZA,
XM'08PL5!=['G'^MU/T1&YA)P7)8>V,@*%]Z.K5"0G41-0[^8HLJT+,/4PVEC/
XMH!6DND6:8F'D3?%1U90G*^)L]7G#TZY6NIL5*7K3B[&L(@]2_PG?;D^\X(HV
XME;2>':Z#4U1([)8RQS$F(GA+5]Z/J+6K(9[PY&@&XN1:-W;_++)'CMS5TOEX
XMD&/;+K F1]EE2KDC5.ZME;7<Y/!:E\P,M"XWO\R1,(MY<6C6,91VNF,"J7'-
XM>YV)F]_<SCK+66C5XYO^XLO<(9N/M2FF\C^=K.,#RPYB)SLG:$MK:/QJ5K][
XM!FD[A_@W*J+0PG"*+SN)G&>8[%F)?>:6%*&U7$_#UXOJA3*I-QRD4^OVTTEV
XMIZB/4S41P\W/HIKD[]B\$5NCNG<.%'6E'3W@=MFQT\7Q<JE?8FPE9C75\HJ;
XMDKL&T1531MJT/E.U/ZA5#_NOUTS^;)9!"^[\<GC<53Z:D,O-["L[UM>\'O:T
XMJ03O95(ZWWV>,Y8-W&R S]K=M1[W[RCWM3$+#5"R,XYMR;OOEL![@$.FI"'M
XMVUV!+WF[AEXVL35R<0["%XQ,[;C'GQTT8>,YW#55>*M1SM3Y>1K+NUXVQ6'.
XM5YFK7,#U/21TZXW=J*W<X.V^]+N-;=M !YVW5;YYNIWU4 TC7-S5GOF%67U:
XM5#?=TQFC>M5'GI&2:WVIS$QPP,%^.'K3KN(LN3@/Q9MVM6M[W;YCN,X/KO2$
XMF_WLY>9L/(^-]J\7/NF(QK3/?TZGKC?SD@O?^-CAGA*YRUOC2^6J^"+_]"A3
XM'B5RARD;:]YASE=]YU>/^=]_+GFHE_[NIT=]W['>;\-OW?6O[W7L99_XI=>>
XM]4^W]>X?2G:,A'[NAQ>Z\(>O;Y[K.?2VU_GOF<][%"L^ZX9'>FI/O7GJ^[;&
XMP,5^]N%&^L5[W^JS5SW3T?UH0Q\_WKLO?D7,#_C,OW^ ?.9[[_V^_J\[NOSW
XMEV&(9WV^MWRD170 &("7!7_1!7[3U7_UYWX*R%DOEWH]1W\'%E(3V%,#Z(")
XMYF9KUWG*MX%>IW\$R']A=G>RDU8D.'1OYWRFQGTJZ#[!UX(N^((6^'R9-H,N
XMIE4V6((XF'X7F()P-ECGEH *2'R?=Q(@R'FZUGHC2()*"(/4=F2+AD=U)X53
XMF(,QJ'EP=G)8Z'@;.'E4R&^YQWZ4!H6'I86>5X86=X;,5D/?Y7:X!WW/%0/R
XM1Q%G^'##M$TLF(1WF(=J,8@O 5:$>(BMA(B*>!6&N(B.V!*-^(B2:!*1.(F6
X*^!&5>(F:J!$* (1W
X 
Xend
SHAR_EOF
if test 3580 -ne "`wc -c < 'skull.uue'`"
then
	echo shar: "error transmitting 'skull.uue'" '(should have been 3580 characters)'
fi
fi
exit 0
#	End of shell archive
-- 
	John Campbell               ...!arizona!naucse!jdc
                                    CAMPBELL@NAUVAX.bitnet
	unix?  Sure send me a dozen, all different colors.