From: kv07@IASTATE.EDU (Warren Vonroeschlaub)
Subject: forTun 2.0
Reply-To: kv07@IASTATE.EDU (Warren Vonroeschlaub)
Organization: Ministry of Silly Walks
Date: Thu, 19 Nov 1992 00:39:51 GMT

  Announcing the long awaited release of forTun 2.0.

Improvments of forTun

  o More quotes!  Now up to 30!
  o More random.
  o Shorter.  Now uses 50% less space per quote.

How to obtain forTun 2.0

  Save this posting in a temporary file, say "Tun", then, at your system command
prompt, type

% uudecode Tun
% cc -O -o forTun forTun.c

  If you do not have access to cc, almost any ANSI C compatible compiler should
work.  If you have any trouble, try the ideas in "If forTun doesn't compile"
below.

Instructions

  To use forTun 2.0 just argue for any position of evolution.  When you are done
type forTun at the command prompt to recieve a witty, and pertinent reply.  It's
like having Lionel Tun right there in your computer!
  If just one reply isn't enough, just type a number after forTun to get that
many comments.

If forTun doesn't compile

  Well, I had to use some proprietary random number generators to get the
randomness up into acceptable levels.  If you get an error saying that "lrand48"
is unkown, replace "lrand48" with "rand" and "srand48" with "srand".  Since, to
reduce transmission size, the code is nearly unreadable, you may want to use a
text editor with a search feature.
  If you are using a PC, you may need to remove the "getpid()" command.
  If you are using a K&R compiler, get with the times man!

--8<--Cut here--8<--
begin 660 forTun.c
M(VEN8VQU9&4@/'-T9&QI8BYH/@HC:6YC;'5D92 \=&EM92YH/@HC9&5F:6YE
M($Y1(#,P"F-H87(J;&EN97-;3E%=/7LB179O;'5T:6]N:7-M(&)O:6QS(&1O
M=VX@=&\@8F5L:65F+B(L(D5V;VQU=&EO;B!I<R!A(')E;&EG:6]N+B(L(D)E
M;&EE9B!I;B!E=F]L=71I;VX@9&5P96YD<R!O;B!H;W<@>6]U(&EN=&5R<')E
M="!T:&4@9F%C=',N(BPB3F]B;V1Y(&-A;B!P<F]V92!A;GET:&EN9R!A;GEW
M87DN(BPB179O;'5T:6]N(&ES('5S960@=&\@<')O;6]T92!R86-I<VTN(BPB
M179O;'5T:6]N(&ES('5S960@=&\@<')O;6]T92!G<F5E9"XB+")%=F]L=71I
M;VX@:7,@86YT:2UR96QI9VEO;BXB+")4:&5R92!A<F4@;F\@<V-I96YT:69I
M8R!P<F]O9G,@;V8@979O;'5T:6]N+B(L(D%N>6]N92!W:&\@97AP<F5S<V5S
M(&%N(&]P:6YI;VX@8V]N=')A<GD@=&\@979O;'5T:6]N(&ES('5S=6%L;'D@
M8&-O<G)E8W1E9"<N(BPB5&AI<R!I<R!A(')A=&AE<B!D:69F:6-U;'0@<W5B
M:F5C="!T;R!E9F9E8W1I=F5L>2!C;VUM=6YI8V%T92!I;B!T:&ES(&9O<G5M
M+B(L(D%C8V5P=&EN9R!T:&4@979O;'5T:6]N87)Y('!A<F%D:6=M(&1O97,@
M<W1R:7 @:'5M86YS(&]F('1H96ER('-E;G-E(&]F('!U<G!O<V4L('-O;65T
M:6UE<R!T:&5I<B!W;W)T:"!A;F0@9&EG;FET>2XB+")%=F]L=71I;VX@<V%Y
M<R!T:&%T('=E(&%R92!J=7-T(&$@=V%L:VEN9R!A;F0@8G)E961I;F<@8F%G
M(&]F(&-H96UI8V%L<R!W:&EC:"!A<F]S92!B>2!P=7)E(&-H86YC92XB+")7
M92!H879E(&%L<F5A9'D@97-T86)L:7-H960@=&AA="!E=F]L=71I;VX@:&%S
M(&YO('-C:65N=&EF:6,@8F%S:7,@86YD(&ES(&UE<F5L>2!A('-Y<W1E;2!O
M9B!B96QI968N(BPB3F]N92!O9B!T:&5S92!%=F]L=71I;VYA<GD@=&AE;W)I
M97,@8V%N(&)E('1E<W1E9"!L970@86QO;F4@<')O=F5N+B(L(E1H97)E(&%R
M92!P96]P;&4@=VAO('1A:V4@979O;'5T:6]N87)Y(&ED96%S(&%N9"!U<V4@
M=&AE;2!T;R!J=7-T:69Y('1H96ER(&=O86P@;V8@=V]R;&0@9&]M:6YA=&EO
M;B!A;F0@9V5N;V-I9&4N(BPB22!T:&]U9VAT(&ET('=A<R!C;VUM;VX@:VYO
M=VQE9&=E+B(L(D5V;VQU=&EO;FES=',@<F5C:V]N('1H870@86QL(&AU;6%N
M<R!A;&EV92!T;V1A>2!A<F4@9&5S8V5N9&5D(&9R;VT@82!P86ER(&]F(&%P
M92UM96X@9G)O;2!T:&4@9&ES=&%N="!P87-T+B(L(DQO<F0L(&9O<F=I=F4@
M:&EM(&9O<B!H92!D;V5S(&YO="!K;F]W('=H870@:&4@:7,@<V%Y:6YG+B(L
M(D1O('1H97-E(&QI;F=U:7-T:6,@<F5C;VYS=')U8W1I;VYS(&1I<V-O=6YT
M('1H92!C;VYF=7-I;VX@;V8@;&%N9W5A9V5S(&%T('1H92!4;W=E<B!O9B!"
M86)E;#\B+")4:&ES(&ES(&%N;W1H97(@:6QL=7-T<F%T:6]N(&]F('1H92!?
M87-S=6UP=&EO;G-?('1H870@979O;'5T:6]N:7-T<R!S=&%R="!F<F]M+"!T
M:&%T(&]F('5N:69O<FUI='DN(BPB0VQA:6US(&-O;F-E<FYI;F<@1V]D(&-A
M;B!B92!P<F]V96X@+2!I9B!Y;W4@<V5E:V5D($=O9"!A;F0@2&4@<W!O:V4@
M=&\@>6]U('1H96X@:70@=V]U;&0@8F4@<')O=F5N(&9O<B!Y;W4N(BPB3VYE
M('=A>2!T;R!R961R97-S('1H92!B86QA;F-E('=O=6QD(&)E('!R97-E;G1A
M=&EO;B!O9B!E=FED96YC92!?9F]R7R!C<F5A=&EO;BX@22!A;2!H;W!I;F<@
M=&\@861D<F5S<R!T:&ES(&%R96$@:6X@9'5E(&-O=7)S92XB+")!;B!E<75A
M;&QY+"!I9B!N;W0@;6]R92!V86QI9"P@:6YT97)P<F5T871I;VX@:7,@=&AA
M="!O9B!H>61R;VQO9VEC86P@<V]R=&EN9R!I;B!T:&4@9FQO;V0N(BPB270@
M:7,@;F]T(&5G;W1I<W1I8V%L('=H96X@>6]U(&-O;G-I9&5R('1H870@:70@
M8V%N(&)E(&1O;F4@8GD@1V]D+B(L(E-C:65N8V4@:&%S('1H92!S97)I;W5S
M(&9L87<@=&AA="!I="!I<R!S96QF+6-O<G)E8W1I;F<L('-O('5N=&EL('=E
M(&MN;W<@979E<GET:&EN9R!W92!C86XG="!B92!S=7)E(&]F(&%N>71H:6YG
M+B(L(E1H:7,@:7,@:G5S="!A('9E:&EC;&4@9F]R('-P<F5A9&EN9R!E=FEL
M=71I;VYI<W0@<')O9V%G86YD82XB+"))(&1O(&YO="!P<F5S96YT(&5V:61E
M;F-E(&)E8V%U<V4L(&%S('5S=6%L+"!Y;W4@=V]U;&0@8VAO;W-E(&YO="!T
M;R!B96QI979E+B(L(DEF(&-R96%T:6]N:7-M(&ES(&9A;'-E('1H96X@:&]W
M(&1I9"!.;V%H)W,@07)K(&=E="!O;B!T;W @;V8@82!M;W5N=&%I;C\B+")7
M;W5L9"!Y;W4@<FED92!A;B!!:7)B=7,@=VAO<V4@8V]M<'5T97(@<')O9W)A
M;2!W87,@;6]D:69I960@<F%N9&]M;'D_("!4:&4@=&AE;W)Y(&]F(&5V;VQU
M=&EO;B!S=&%T97,@=&AA="!T:&ES(&ES(&AO=R!I;7!R;W9E;65N=',@87)E
M(&=E;F5R871E9"XB+"))(&)E;&EE=F4@=&AE('1H96]R>2!O9B!E=F]L=71I
M;VX@;6%Y(&)E(')E:F5C=&5D(&)Y('1H92!T:&EN:VEN9R!P97)S;VX@=VAO
M(&-O;G-I9&5R<R!A;&P@=&AE(&5V:61E;F-E(&-A<F5F=6QL>2XB?3MI;G0@
M;6%I;BAI;G0@87)G8RQC:&%R("IA<F=V6UTI>VEN="!N=6T],3MI9BAA<F=C
M/C$I;G5M/2AI;G0I871O;"AA<F=V6S%=*3MS<F%N9#0X*&=E='!I9"@I7B@H
M=6YS:6=N960I=&EM92A.54Q,*2\R*2D[9F]R*#MN=6T^,#LM+6YU;2D@<'5T
D<RAL:6YE<UML<F%N9#0X*"DE3E%=*3MR971U<FXH,"D[?0H*
 
end

 |  __L__
-|-  ___  Warren Kurt vonRoeschlaub
 |  | o | kv07@iastate.edu
 |/ `---' Iowa State University
/|   ___  Math Department
 |  |___| 400 Carver Hall
 |  |___| Ames, IA  50011
 J  _____
Newsgroups: talk.origins