[comp.binaries.ibm.pc] head/tail command utility...

mdella@polyslo.UUCP (Marcos R. Della) (03/03/88)

The following file is a unix head/tail command look-alike program
that was written in Turbo Pascal 4.0. The source code is included.
You can use it to display the top x lines of a text file, bottom
x lines, or not the top/bottom x lines of the file. It will also
take re-directed input as well as filenames/paths for its input...

My reason for making this program was to strip out the top 4 lines
of a program that was running in a batch file that I wanted displayed.

Its looked something like this:

today | head -h4 > welcome.txt

If you like the program, let me know...
----
..!csustan ->!polyslo!mdella    | mdella@polyslo | Whatever I said doesn't
..!sdsu ---/   Marcos R. Della  | (805) 543-0135 | mean diddly as I forgot
..!csun --/    225 N. Chorro St                 / it even before finishing
..!dmsd -/     San Luis Obispo, CA 93401       / typing it all out!!! :-)






----------------Cut Here-------------------
begin 644 head.arc
M&@A(14%$+D5810`E)24EM1@``&(0$`3R\3`>```,3;3````!0"4`)P`L(;"$
MU`$!`(```!##P$0.$P$<RI@IHZ>,HS+VRB@LX[&,X3*:R[@N8X$`$Q7`!/!@
M)HJ9+6;*F+ED)I2956:ZF3EG)IZ9@&92FJEJIKR9^F8*@`A``=4*5$%0+4&5
M"=5&5%]1-4;5&E5P5-U153!@HHZV`)S`90-7#MP[<`O![01W%%QG<-G!G0<W
M`(&)$`X#D*$8AV(ABJ$H1J/8C>)"BC,I1J5XEV)IBM$IOJ?X08&)-DX#2*.:
MCNH\JAVI+J7ZF>IQJM&IOJ>:GVH:%@'\"%XEN);@7X*?";XH>*;@HX(7"]XL
M>+7@W8*+"\XO.($#$QF`!Q!A?(CQ*<;3&)]C_)?Q=<8/&G]K/*_QUL:#&U]N
M?``$$QD`(``+#,C#@(T,*,F`EPP8RX"V#+C+@/X,.$`"$R&`(0`A;&C"ABML
M>,:&;&P8QX:*;/C(AI1LV,N&$R@P$08R`M!!C3;4N$.-0-3(28VAU&A*C;_4
M2$R-R=1X3HT/+#`1!4[:&"5,L@"`3P!5(E"$''*\(0<(+8`001)NV!$&&VF0
M`0(<8<@11AMET%&&'!"0:2:::IJ1!AMEN/%F&1K8>6:::X9!!QH@S`%'&6.D
MH><8AJ;QAAL1./$&"'KRF>BBC>I9!AD3&+%G&2"0\489<X#@QAMT@%`&'FG,
M04>EK+JZ:AUG(`IG&U[F444BY<0`C":M"%#E+UX,X,$5OTSDP!7"0J$)-`Y4
MJ4D;U0*@R1W&`K"($03T`%,='R"K++,8/AOMM-EJ0D6[W%:9CBL`]``1N>8N
M^\L&`*@+C+346ONNM?$"D(XB];95AP?Y,LM"O]#^RZ[`\':[SAD]'+9PP[\<
M`?&Z`6L[L+8%KT-$#Z=MG*R^67PL<<CN5ESE.B'T8%$=''#<ALL`MSORMMWB
M`I,F\V`)0"+L="$,1`&X`,"OY>"BA[;%5CD(.WH0XP<!!ES1B!^N6'`%+E``
M(.TW!51IC!'_!"!L(D:P`@C8`-BAAR)&N`(#.7";(C0`.QAARA]JP(W*.@/\
M8P0JB_B!"B![N.)"?-^R`@3<K#2.BB)#N`+%UX:(K4DX!U0)BPO2PE,Z`+"T
MD/KJL'SQNNDP0`%+#M)&@(#I0=BN1>Z[:UM&\'40L/8_WBX>N"EU;#*('ZP$
ML/7Q`/R"2`#/?AWV%9KX84"5<*ORO"H)_*'#^`'00</X`-1AP-RN('`'"NS[
M$<&WJA30UB+0X*TW.3L0QA\BH#VQ_4(1V.->+;[7/N.Q#0!X^P?2E'88`;C`
M!0'@0@!T\#1@X4(*`B!6MP+!#A!JC6M>\\,KQ$8VLVD";55JA"]<X0^Q?6V%
MW"M&VJKG"0$\2Q-28.`-65BVL^T0;Z]`1-[@5[<3^&]OB\`'YUXA+3]`H$J*
MZ%_>H(@/1$SA%4\D!Q*4Z(IU3,,8!G#`1-#XA8G\(A0^3"$.N\?`!`###V>0
MH2OZ84`U+DL3.HSA#&LH1Q;"!`IOC.,0N>>]*N6.@4!DX"_\.+8BOG"'B_P;
M(N&8/16*KI$N#,/JUF$(4*B1BX#HA1JY4(<-`,(':@R`'2@P20`LRY0`V!L4
M-*D)40J2AC;TY-@.^8L>=G*.H$3"(X_5QF6UT(C'&D4<?]%,1M;QCEK0(R&I
M:<MAFNT7TGP6-_\(RF56CY*1/!8EGWE)9G93D^"<9C7IZ,A>KNZ5!=%!'4CP
M2C4*H`X=`,4#7&C%*NVM!1)!Y#HM28H'J+.;ORA%'#6QP"K5(0*P^.9"7=A0
M\"5-&(=)7P#0$(`60`T7=:!:MZY6AQ-V+9.6A&'UAD&`8W[RFGXH`!H'`)%?
M%*.FA;1FE>SH!P>\DJ?M.X`FT<&%?<RM=740P2^.`=1%TK->,/%#`I:Z@WVL
M0Z<&((```G`,(ZP")DC<6^!6P0<S-&X54_R<'Q8A.M+1SG:XTX3NK#6\*M%!
M!YD\Y+=6H4Q[8M$(K]@;W%:QR*^U0G1J4$"51A$``3RO%0"@@U(/B0YDZ&.P
MES/K.B!QM(\>YJ1#JQH`KA:`5QH`(G2@I1<$\$<(.)1DW5+B/]8A@5\$(`"U
MO2W0JJ3;"$YP&"BHPAS"<(8RZ``$($!#&<*@IBVTH`M;0`,=L.N&.K2A"R#8
M`IL.U85,]>E/FI@(^,I!0@`$0!-KN*T=]\DQ!*0Q8CVC&,&"!A&B&>T8!JBL
MC'8Z5C2*%0!HS"@`9`B`?QC2A4JX[2\:0-M*NE"F:'RMMN);)7%E=@#IV`6"
M#?#:UL)2`"VHPPT$*@"Y@J.NL`/![%B'AAG#@@XSUD1?,ZN`"5<8'=OHQSKL
M8,H6?PT8,#9=C36A.M/AF,FKTW'PZ)`#%LL5%$EFG8RA?-?;`8^O4X[`*RE<
M@#GTF,++0D<?A(P!'^LKH\Z,Z0XS#)%UE(#!#AX;1*05X6/!V<+0K!Z:KX`.
M'O3#M??RPB_^C`X%[&.<A#Y'/A``C/C@8L_H@`8^:OG'>@BW#=VRHV9QT18H
MH,,6F_ZMON:Y"<E63]7<6\`"K`7JH0)CU*<Q=2/P@>C,/@!9%=:$K/=KK2$,
MH$I2@$(H*IL+!P3@'NG(1!:VL(-I_,$`?%C`#H)A!Z5:Q-14P`<:"]#3B3@S
MP-("1K>($1Q&"&,4ATF$!2PBK%$\I-X)$``ZW-`/2M,!Q#Q]);D_G(Y\!"`4
M#P&"O070:SJ0`-C+(H8/#A,(J@*@:[A`GK0NT:X#R`P`ZY`JK"5.<8MC7..:
MX+BU/$YL`"!<`"0'@`D2@1D3(Y4.9'CE@>O0A9?O(,`"^,,3?`[T.HR@83&O
M^&&Z!K)V8:OE-$/ZQ`&@](OC=V(B^_A7QSW6H\)V"SJ'+16(7ED_+`$=>."'
MOX^^LBLDW>17A]G3<3NS$$B]Y$N/N\\^[G6"-RL4^?YY9?N0`L`+0.'YCCG&
MT:T)=5<IYB8@1@'<#>^CS=M@C0``NR?B;L@GH@`SKP+,V_WN>%\^[)D].S/V
ML7:I3Z3J3'^9T[5N][9+_/5P;[I^Z:YYTH\"0/*6T>UE+GG*3T3>$$G'/`[M
M@YN#F!(`0/V_#[9:'^0;`'\`,2"JGV_IL?U<PX>]WG<_7)#7'OP^P'W>=:^M
MN9=_^)&??.DM;Y%FO9/Q\EAW6`%@?,M#Q/!(,`KYE@YV\`^]5@>_!FN:X`:S
MQGM((RS^524`H`N\$`".H`V,8`!>0`"+('D3``"Q0`#3@`Z,(`T#\&YB0`"C
M8`8$8`)P!``M0!"CH`8$`&"6T0W\YP!P4(,&(`<$(`XY2`?&8P"4(%8S``RC
M``8J2`8J2!FCP`8JR`<JN#6C4`D$@`L`4`/-$`*)X`&`0``9*`A7*`!:R(4>
M0`A@:`"&<(4C4(9=B`AIJ`A72`)NZ`&,D(:.<(5U4(>DE8:20``>X``?H`OI
M$`!86`);J`OP8(@C@(@AH`N^A0LDX(@?@`NSY0%0@(FXP`W]`@4.@`[8D`"?
M2`0*8(G*DHF[Q(D.X(GH0`RBB`XUH`#+``!'J`P088FTQ8J#4(HKPXIZH``>
M4`P6\(6'N(4?$(P6@(:71HG("(>XT(C&B(QW*(G,*(Q]B%*4&`IX0``+8`!Z
M0`!TD`*[<`H!@`XDX')V0`#H\#"[8`OEB`$N]XWHP$&PH`/H\`0NMXWH\`(`
ML`N[4(XPL0PNH`@'H`"W9@#H@`,`,`3K,`_#$`MD@`[@$0L*@`YU1@`R0`[V
M$`\$4#OHX`$`@`6*0`S#``4CB0XP@050$(+2@`[HT!980`(/T)$\H`-R(`#?
MD46T8`!;.`Q24`=N0`=I`">NPB5>`@(```*&@I0NT``RL@^#P&Y8$`CG\`%4
M=PR6$'W\D`-S,`"_\`__<`6T0`5;N`CL``A.8`$!@`5;D`5:X`5?T`4?<`#/
M@`O(``#3M@Y*A3PSD`PSL`T4:(':L`C1L`#3H%DKX`$;.`CK``&.H($M*'``
M,`QTT``F\)@6('.2.0QU`'K_X`$6,0KIF`@.L(U=^(W$X`$^R`C`L`"4.0%'
M.`H^.`I"6(57*`,^!`4&,`7+\)@;:`*;60<+8`+C-A$F\`\N8!&AD(ZTP`1;
M&`I6"&!6.!'+,`@^,)UU$`#+`)T$D`YG\`^+0`\VX`A$(``FL`.B]P<'P`<4
M<)X%(`</<)[%P0<(H)[G600$<`?:B0O)8#`_`)[TL`+P(`<'$`C^```"(`?[
MJ0P&PP+_4`5F^2T(N0`!,`<2\`]V8`"?:1D+<&L5@`1UH`Y]^9=:@P`S9YF)
MT`4"T`7*8!%=@`NSF`[ZX`\0R@X26J(FL`B6N0@JB@YK$``^R*(NB@O,8##:
MX`^+P`TV0`Q_0`"AP(0S5P"AP((S5P0"H`R'D:1+VJ0Y6@"C`*6+8*4K2`"Q
M21E8"@#H8`$"L`C&L`C7('&4L0(6P((K8`!,.`<G4``%H00T8P(#4!PFL`*B
MYZ?XV0,%X8,M4!!"$*AE1@!Z"@!*,`C'@``+\`]UL`WHX`("L`SH(`T!P*9N
M"J<$(*=T:J<$,`<P\*A\J@(YV@4&$*@JN@/:(`<;D*--T((KT`!S0`"#$`P0
ML`2R>@<]B``[@`P^N`C!L`C3(*F4:JDM&0[:B0[/$`"BN@[QR:.ON@*QJ@US
M0`3,6JEUT`[HD`:?Z@R+\`V)2:<.<*>\ZJO`J@W"*@<A4*QRT`&+L*X<Z`$L
M.`#3,`#!8*@`@*B*^J4$(&\LB`_#8*NXJJOM^JO!VH.I0*^ED*,[JJ+\ZJ\`
M*[``L*B?%WKFB9X&4`<)<)\$4`<#@`[98"7#T*%T,`/[&``7^Z^'2@")NK$[
MX`$I*`<<(*P[X`!**`<4L`-SFI\.(`<&\'-,**S5^@3YD+`[H*)RX`%W`'H[
MT`!R<`'GZ:IW<`-&>YZW>@<O0+&M*@#K8)GHF:`@,+7N*0<9()\&<`<0T+4[
M@)]W8*)AVH*+4!SH4`6K-:G@^@I"RX((B+0EFP"DR81=R(+#@`X2$+#QF0@H
MJJ)5VH*)4!S#L`@^0!F#\`X(0`<9L`CW$`WN(+JDZPX#8`,TN`,VP()V4`")
MD+D$,`Q-NP@V0!G\8`(3F[NXN[D(D`BU&[N82QG@&@$KX`-06`>P:0^82X,5
M1Q##4+Q0.`<",`/@>0^!8`X#%0WOH+W<^PX#X`.IZP,L"+=&J[IWB@"TRX28
MJ[C\4P+9JP[1`+_R^Y`B*`R+H`R!$`[P\`^!(`X#M0#!,`S\D*2,H`U;B@`V
M4`QW0`"LH`J*@`PRT`[S0`H7>*8#S`T%G,!WH`!;:@`VL`A/P,`ZP&T"H`C!
MX,`0+,$4K`W*("-:RJ0MJ`@%D)$63,`&S*0,H,$(((<9^<%/8``+D`S9EPLP
M,0#QL`+!(`<3``0^S(W)T`?3FPS;EJ'(N@[3"PRJL`C(,,$5#"`7G,%,BL`*
M',,-$,&L8`(`4&8F:@P%\`\F;`_0,`#Y<`0/S,4L?!@7[`$ZO*4$H`@,$,$F
MH`@5(`/VL`+1(`<8\#=!3`<3(`1&<`118`57,`^F\`5>D`5T8`!`H`1U$`]'
M^`'*X,4VO,<P?,:*4`)TC`PZP`QV4,+,H`#)D,D13,EU(``Z0`Q=#``7W,&P
M$`"J8`.*<`0$H`JVJ,NCS*0<K,`>O`C"G,5;O,(M^C1FV5X"@&=BHS4*@'&"
M900&H$R?6`[^H#4.T#6?V`'_P&"$A,U=@Z$&D'%F\XG&X`^?F#CJ?`48B@"?
M2`A(6@XLR@#2S`[4_#P6X0=#8,UNYP?9[$U0\"T(X,WHL`C^@,[7C-!=P]`#
MP,V[I'&?&`?RC`XT5,_NS(HNL,\L*LH8?,-_D,S"^L%?T,?/$,$R``SSX,#+
M,,&Q``(JL`PJ\`PS7<$6L<LPG`L%<83SL`K+\,+7!LS"K`C8(`/_$`O\N@X/
M#`BDT\O2``XF@``!4,Q(C<#![,&*<`4$H`+0(`<?X`_"P-1.#=73(-7(0-4'
M8-58K=70``R#,`T`X`_*4`?T4,,GK<$<S*3+W-**\-+M8,2*4-/0[,)*"L-*
MO<--_=11/=55'0!7;0*$L-4_?<Q_(,8++-0`T`H+4`"K(`[Z4,%XS-F>30"@
MW0KW``TC0-KB@`^H;<Q_'<8:S-H%T0JQ7=JG?<>V#<:=G=N@/0^GD,M?C-*K
MW=JC_0JU/-NY?`4#C`T+(`U]T`#W,`WW(`V#,`P!,`C2P#HMH`J^\`4)$`L)
MX`([0`4)>@!WP`#JS0%S<`"#8`P$X`_)4`?LX`_!``LOX`_`X`(KP`$NL`'L
M/0?UX`(#0.`3P-[U/<SX70?DL`C/\`4K\`S#``#*H`D[``#A4`\%``B6@`D1
M(00#!0J&`!,0D!!H"A=DD!$UXEX9<80S(`TS8`_CD`7`V0,KH%D[GF(%\,A)
M,`Y(L.,D0`=$$,@=``CKH`.`,`P*,`<H<`\E`0]U$`-3$`W@$`W2D&Q:SN5?
M+@U;,`##L`43,`U;X-1D#MX`@`<2<`3BT`Q.4`<*\-K;_1*K%=X(V[1',.3Z
MH.2`L`]M,@!,#@),[N10+@<+P.07\.0&,`?0\.0*<`L$$.9R0`W^\`QU8`\*
M,`QP'@WKH`LU>C4@\"T.L`A6``%?\V('@`Y'Z@&@:P$?4**H;@#?P@`!Y`=K
M*@P[H`RZ?K_;!L7(R@^J@,1T@`!1H,6P``(SG043_`&+P,_*X,\UBLV!7,;M
M<`3C,+*`T`,@8+)P?@\O^0\WN>T4O@).H``T+@U:\ZJ06]+>P@UZC-MCS`]'
MN`JX``O7@._;MPKWO@J,501TL`JLB>^_L``$CPS^#@S-!@!%S0H\\`2M#`M/
M\,"S3`HQK0J@#"!(S<',3+GX^<%'X.Y%D,/,;**)4`0.<(15BO)%H``M/(&Q
M<`WK@`"Z(`LT/P"Z,`O7@-1X:Z4],/-T(`$]@/.5V0/Z7IG220!F8'Y2X*,`
MH`4L7[GFF?(NKP"[4!!,E5FO>@Q6JN]GZO/H8)4FBPXQH.%9VMA-B@YJ)++K
M*'->+P!@?Q@F$`A0+/0.4/=0;/0&L/1G,)F[0`$R9_?&<@V:M;CQ\`^[@!%=
MTS7'F0$L.P"V^1Z7*^\)W*1]";E8V`.$+_0-``L"\`\%0/@\3P<"0`L\``A]
M,!!TD`"-4`4PL(5RL`2?APN<P`"[<`D,T/F&GZ,=@(5$L(6X4`\,L`C88`_"
M``AU``&D?PUE7P(`0*2XK_MQC_,I3P&,T`06D*(8D/T:X/4<D`$-D/T>\,EG
M6N-]N0B_+P!"L(4ML'V#H`T`L*OK?K_\H_Y8V/XAT`B5L'VYL'WJ3PL_L(72
M2^/;L`/8T"J`\/\`H`'_QI#RH*PK``VY`);XS_Y;F/X=0`M`T).U"!`$`"SB
MYL$&L3\$3!2KPL#$HB8)%W6@]:-9"#D03"0JHF`&,!/'BB```."#LH`@.9)<
MYVY@P8,)%S9\B,#A1"`6Y1Q8$8S.`%QE`*0<6?*D0((&$2IDZ+!)38FT<%X4
MX'$H29,!!R:-V&'0/@)V"-#R8=&C41.!^@B(=:U.AD$^*@6L@\&+!P-7''9Y
M6D6!"6)]&/PS=\R`7#0`ANW01J>`"44!\`V+XL&*(R_^B/G1IW$O7A/_NE!8
M`,SG*+F:.2_:Z[#OW\!>/F197&<9+`WYAGGY<N!#9P2#T:J5U?9MW+EU[^9=
MS3<A8,&$#1-(D]@$H@!#%M,),+GRY<R;?W\./;KT@-,$4NMM_II!["RZ>?M.
MM'=PE47L-!M`!^)?G0OH#/$/#QK0T<`0/#10!SWHW#"@`G5@APX;H6D%DW!K
MM44!7'(!4(<"XW6!`6EU&&`4+HBAMTX]]^7GQWY"^-<`+`V@,\8_L"B`CA?_
MH!-)A=QLA2%Q=6QXG(<@YA7:B,"4>")U*K*(GV8,H`,)`/[444(Q=B`P0S+H
MN.)/@G0X0"`="@P1A!&($+"#$P;4L<X*\2!2I33^=*&,`0!H5I,Q!0"PSCPM
M4HF.,5ENV>4B</+#B@SDK(",'PE``0L(Z&#CCSCY8+$(,N,<X"@ZS&R:#SK]
MY+DG`+$,L(X"L0BPC@&Q!+#.6@`4^B(Z%629`CHXC%E@!O8$$P`=!)`)0;$"
MT'$`#R#<,<`0ZY`C`S"WPA(`.E.H&M"UZ^#3HD>+6&'``M+XA$X&??J!@`>.
M>.`%`?RH$LD\I'R@IP``S"`-.OQ.LHPC!LS["R!"*=*`#.T<,<,VXR1@`B`]
M1#O`$>+<L\@]$4]<L1T79[S(,2L8@^P02M3AS3`M!L(.PAXT8@<@%GR@B!$,
M*-"D`;1D8)$_P"@"#0%`M&G$,03HP(411M!RA$5S#&!,0#(#XB>C!CSLJ,YT
M&#"$=0&(4X]U'7RP2#EZCM3RRP"@4X5`1@#"M0>`\*-#D3R$(8<`+(#`0A!"
MT^*`18#X(0@`C=&R`SI+"(2V46LCS!\`M.2`C@V.ZQE0Y&TO0+D.Z(20N5$>
M<&E`(W[0+"HK//RQ-RQ_8/(IOM>J\L$P,5M!\P<6?1`U>L-HI<@1R>IM``]Z
MW,$W",KP"PD$&@A(14%$+E!!4P`E)24E!@X``&(0)@2COT4H```,>UI`8M*G
M@8(](`86/`BB84,D18(0<5$$2Y&&+5HT'/(&3AXY:<Z@H0,"Q9@4(&+DP($#
MA)@\()J$D3/FS1P04ER`(%*&#9LP"2DL1*C0($*'(*B@*0/"S!N?;^ZD<7,&
M1$TR3-&$N2FF3!DW(,B\<1.&3ADR(.B\2;L4!)PZ8MBD&1/V39LP4YN^D0,B
MC)L\8YDZ'(H4Q)LZ).DLE<-4+8@Z<\KH!!'$)X@D(!C'J5-F#LDT-Q67!9'&
M#`C`=4#<7<-TC%:JG5F</IS0`&&DC,FV:=P6CIPW9^2$:0-BSEK1GTVG^7R3
M#&@Z(,4@/BM[.>F;;MZ0K.G&#.2S2&\[E*J8+6@0=LK(F9-FK&'3BIGZ!BZ\
MC4Y()@@798@TR%^KKYW1F6%\M?&&<V;,559[;H2V5E>DN5&3''#L519X4SD6
MGUN_!3=<0@>(U]`<:!S&!EH01N9&8L>U%888;Z3GEGK&@>48A%-Y%H9/&-K8
MEG.>18<8@R"(:%5',+T!7V\=UG??#/H19%1A5M!()`PQN``##%K"`()&6#81
MA!0L%78%2'28!=8<<)0Q1FD*^@234WQM2$031X`@A!!3A#?E?@$!FI"4_#FT
M5!AH;=%"%UN,Q*@;=;31!0A;P%$6&ETDR,97PS$%R0E1&HG&ER!P5,>*3?U&
MW(:'HJ4D6TQIRA0*D+:!DEQN#`@)!D:2I)&IJ)JA*JQIX<7&>\3*6E*MMTZE
M*Z]3(J611KF><2&Q+\8H64(RA!JM0T7@<1\1^BG0*@AHM"2K;H)AM!-H</R4
M1VAM);@>22WA.N"K&RH+B6U_FEL&HFG9T%0:F[(K[;MLRDLO4S]Y!D*^SM[$
M;[T(>QIBP.>V0(?!ZW;JD$9$P.MP7Y9)EUA;$9-DL+XW0;)`N1VC<</!"8OL
M;LD-AS$ORL>JG&P:]X)P,\P)*>!MH0TYH5T9.C04Q,I,&;C;BK)M.)^'Q$EE
M678DA3'&=GLQ-C8;,)4&*V-]L5WDGPP8R+9H8,E00PT`SB2V6>O-R)>^DQF!
M6!ULI[<>@Q8O>9Z?#$'"P-;U@>#UL5.-P48=6`V-AUYUHG'>?'&585]"$BQ-
M%`-*?=[DAY.C;%RQK)%&QTU3O462<V;3@7:J=A%;.V*#P2V=&6:H5]Q:J%GE
MUV.1';^;8E-5M>-856V(M))10]*`Z0E-8*T<8H0A(`A\H#LP6BV@00,(/DC>
M4TV[94D''B3MRKWCJ=_4.AUAQ+[A872P';)$\+WP"4@$?7$#6M:0G3&LX3U+
MBA71)/:VQC%@?=>#3QGHET"T"'!#C)%8AEHDP4V!0`1W>)]=RB`_^B&P(:83
M"*$,0H4L0.$BZ'H*&>``'1#T``1>*-&)HK<#@]1&B,ZAB@]Q4H0A/$$*1#`B
M)";`0[[\*VI(K&(1%=`]-N2J-E&;`A6DD`0G'&$+=JM!%[;8O9J<BB0.B5H9
MJ5"$(Q1!"FR$!`2*X`0BY-$`^D+*#\5(1C-N`0<P6*,4#;`NA_Q0"DU\8A2Y
M.$5+E0<I4=-7'B<0LMV`()/.DN(>^[A%@UAA3(8Z7V&PJ$,M+K**8,SAB5Q)
M20-4,0:KE.4.H?-'I,7Q,DZ@HQWQN$@S*.R7Z_IC)YD"RES]<79T,`TFDU(1
M*O3R*[&<8QWO^,R.Q%((3W@"$R+BA#]6ZUH-B1HXQ4G./XKEB]-<YSB#4,Y%
MLB8/8D#++^79SD6Z$56_U.8P_XB&?\+QD\`4)C<7F8:$($".P=PF,6MIEC;`
M(9>:-(A19+@0@T!!"D\80A&(4`5(@D`]OY'#%^8P+UI%"J$"O6,*MBB$.I;1
MB`VY`AGIB((3%$$.*275"6:*TU(%80H7J14(GF"$1>(R:CI-`AV9X(2>)L$-
M=MA1&CRHM^>I9ZA_E`%"HSK5JI[@JEF5"UJ6"=9%SF"L.RT"5:V*5:URM3QL
M<A.<QK"@L;2UENN#:ESG>@*GX8PI>7U3@L[RU]K@3;!2E:M9C9"QN@P(;"?%
MPW,:^R^#0;:L/74:2;YR&)&H1G1[R<-0B\I'/Q85"4%@`A50$(,4&*2UI3P(
M1S6J`"-4P0E#H$(2GN`$`+EI#5]8)@J,*;)FE@$EZ@SG/.NI@%-*P2$)2Z>>
MLD!'RO!)G%7H+G-WXT[MW`2B"IUH;<020)A&=*`,G69,)VJ0FA[AIEQLB&N.
MF]R,*4P'/QQC%8K`QH:P][P_A$&!+V,$$&2W?5ZB`D2<L$@C/)$TG_PA+JGP
M!`=CDP@=MB]^$Y*`)#1XO&780AHF]<,3N.`$29FP%!EPX`S7978@6$%*\ECB
M!COA"50H"8I5/*DR4LK%)V#!"5J0Y!-\H<DP</&+<]#D($CY!%HX01=0(F$^
MSGB_#NQOSCP)8!`8(;9(721NBVKB&]^D?1N6<2W!C-QEVOC,3$#J@ME[T3)#
MX0E3Z.F+98-BHN:7P27A,_M`D`.47!@%BM:PHZ^+`DAKYZ()1@D]B5"2!T\L
M!9->9*45#6%-]['3V&R?HG4\`U`OE=(H7N()AAIC+\]Y*6&V<YGQG&8%K%FW
M^_$H2$5*4I-Z9B]E^`*[4$`'BR)47X:V+G:QJ4[N$KB^-J7PH9O=YQ]R.\<@
MN/*"LUOF<9I1PLRVJ*$=<@4D)&&<'@8+A'<2XFPODMM;2-BDREP%*`SAJ$5(
M-QSR_94M7Q,L9<ZN1F+`6E(6%<4NL.2HRCSK!4-<URT^06[9[6YX_SG0)^!"
MDKF-DGF#6$_VKB7$)6[CE5\*W$Z$0A8$SH(8L.#C/14Y"TB^[G\10:Y%X"FW
M:WYS0.=\Y.JV[:%_[9`V+Y==$;_4%LQ]!'2[7#$I8'&X16YJ3J.`ZE:'NL1+
MGA(NR[DV/Q\G3Z^.!A:`'0E/[U34L5[S=3?DXOYM[@]C/O.AVQSG5]ZYNDE5
MVXTWI,V`UT&2\3[FYRXZPF?_EXBU36*VVYCO<=^-"Y9)],0O'NK+!+44*Z!C
MMO,X[4$/..,YM9O.&_T$BF?!ZMDE^EK^FLT-SKQD)(Y&K<.>UILNR=MU/W<T
MH.2',D!)K2G_+SM2@0A)D`(*)(F"?O\;J<3G?0RVC!*-V(`&LA?[I>R.:,MG
M?/F+=#[TI0^#\,M][+=UN`(V&FP%?#2D(RWI101$AR]8JCYSP&RBTV<.YBS1
MADKZ=2#,E%`2]4<-%5#OM5`*,'FX!P*`1P<C-X!D!WFV5AMJT6UFAF;7=FA.
M!WAHD(&#5VJ4<6H_%F0?B'ZUA%)[L5(M57@56%$#MWVRQF0P6!N(]WI,MG,:
MN&AQUH&0D``RJ%(L%8"UI69Y5@12E`#G9!8V)F`CZ!`-568QL&#M]FX7T5`\
M\$/#AX,H<7(46$MMAH-$!DQ'%F4N,&5:UH-'>(8)P0"H)W0#2'0-M7`]QP!9
M*(9\5'5P1X9YQ`"GQ`0":%$LD#`L<!7/58AMYH@@P`/SUF7,]P!)2(-,J'0D
MQG3_\H<8IF,,MW1]%'^N-7_`-D.]]5O!-5S%509*0F<(Q4_T1%,IUW0-=D_Y
M)(<&`(MF((ME5@1,A0*_0P><V!!RU6NUX8O`^$/":`3,YAEFH'2WEXH=-8&W
M>'@-!@5=!2PDD6"\2(='2%:2U5-5,`?B`S4-<2Z*PBB.L@6U,BF5<BF9DG>[
MP5D)`%NRA0+)IV;R-VT(IV$*5E0O6&96N&!3R$P_Q&M7>'?VJ)#AIG$$.8`V
MQHWU,07005ODIXMHL6LBN&"(UXV'@2H:%HZW>(0<6852,&`\YG1JJ(,MQF1=
M5Q)J*`-%5EQ;`&--=H)*AH%;)H<,P'_^UU4!2(91F(Q02$D,X)(#N`4Z:&0Y
MR9,GX),SF8@#9Y-LF)/AIF1N"(=;)D4/$'Q?%XCH1H:3"`(U8'9&^`!"^7_#
M490:.&-("9;B*`$8EQ8#F$<2D)(>^81@V5K^.$G@XI>U)(X)<)<6.1P8*0?\
MV',)T)9$:96<^"_5B(L@T((@D)*6N$B&>6R,H6R=LEP/Z9AMAIET)F:L5P;$
M%WI`F8E+V)@;=X1[0`))T`)]4"I(L'[9-WX[``*SF00KL!`DUF;#%4)UP`8D
M08D@P(',QP"NV5*M%IL)<%13D`1'4%709`;NIWFAQV._:9M,A%2SE9TSY9NT
M&9Q12)Q/8)S(.8F5&'G."50S^)II&9@@F8ME@$]HL9FU!$GB28QN8#N&5H$H
MD%TJ``(R<`->TCZ[<1=9A3!JR7R]*)]*V%(V,*"']DX0R9`+Y@1%<`4HT"KD
M!TMEUBH+9E`V-I"'5E`C21)EIJ(<YX67"60G%8NX]D#!AYD:2F\H=U\2BJ)E
MAJ*B^$=MIIF1EP"0)!%S58PL4$5>X`)>]%Q.J(Q'F*1$,%?9V:30\:11VG.V
MM*4N`*0_9%!$VF`OF*,TFI!RV&,E@:)A&&\1.F.1V*)+E%W\F1`/0(XHX*10
MFBN3R0!S24EY.EA5Q:==>I2$68<[:I`K>87_DH;>%'QJ*I8HVCX)$Z>4A`!M
MQHPW"I1Z:JA^BJA4R@#D.%>@^HB\Y8,^1J,O>*='V&8L^D9G::?P*8X/$*NH
M4J)"NF-@Z:$@RJ=5U',/0*(_!*R\))>E2$D)$*AU:*O&RA<E>CYY-*P]%*V(
M,JUMIJ:N*@&;:J/')8<5H*>MPJ6A2DD2P*R0$*Z$&J+G0ZZH*JBW9&,F"I;G
M8JUD\*15A*R"B8S_J(TSZH*1RH)I6@;60H6N:@!="&^X2A(F5V\^FIX-MK!$
MZ*GK.JY]*J7*BJZD&E?LBBCNZIC$:CX>&W''JJS0-P4?%W`BRF/U6JPE2V(2
>JZMTNG#V68&8::1&:`!#P`2`%G#D:8HN8!`:`!H`
`
end
-- 
..!csustan ->!polyslo!mdella    | mdella@polyslo | Whatever I said doesn't
..!sdsu ---/   Marcos R. Della  | (805) 543-0135 | mean diddly as I forgot
..!csun --/    225 N. Chorro St                 / it even before finishing
..!dmsd -/     San Luis Obispo, CA 93401       / typing it all out!!! :-)