home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / talk / origins / 14431 < prev    next >
Encoding:
Text File  |  1992-11-18  |  5.5 KB  |  122 lines
  1. Newsgroups: talk.origins
  2. Path: sparky!uunet!destroyer!news.iastate.edu!IASTATE.EDU!kv07
  3. From: kv07@IASTATE.EDU (Warren Vonroeschlaub)
  4. Subject: forTun 2.0
  5. Message-ID: <1992Nov18.183951@IASTATE.EDU>
  6. Sender: news@news.iastate.edu (USENET News System)
  7. Reply-To: kv07@IASTATE.EDU (Warren Vonroeschlaub)
  8. Organization: Ministry of Silly Walks
  9. Date: Thu, 19 Nov 1992 00:39:51 GMT
  10. Lines: 110
  11.  
  12.   Announcing the long awaited release of forTun 2.0.
  13.  
  14. Improvments of forTun
  15.  
  16.   o More quotes!  Now up to 30!
  17.   o More random.
  18.   o Shorter.  Now uses 50% less space per quote.
  19.  
  20. How to obtain forTun 2.0
  21.  
  22.   Save this posting in a temporary file, say "Tun", then, at your system command
  23. prompt, type
  24.  
  25. % uudecode Tun
  26. % cc -O -o forTun forTun.c
  27.  
  28.   If you do not have access to cc, almost any ANSI C compatible compiler should
  29. work.  If you have any trouble, try the ideas in "If forTun doesn't compile"
  30. below.
  31.  
  32. Instructions
  33.  
  34.   To use forTun 2.0 just argue for any position of evolution.  When you are done
  35. type forTun at the command prompt to recieve a witty, and pertinent reply.  It's
  36. like having Lionel Tun right there in your computer!
  37.   If just one reply isn't enough, just type a number after forTun to get that
  38. many comments.
  39.  
  40. If forTun doesn't compile
  41.  
  42.   Well, I had to use some proprietary random number generators to get the
  43. randomness up into acceptable levels.  If you get an error saying that "lrand48"
  44. is unkown, replace "lrand48" with "rand" and "srand48" with "srand".  Since, to
  45. reduce transmission size, the code is nearly unreadable, you may want to use a
  46. text editor with a search feature.
  47.   If you are using a PC, you may need to remove the "getpid()" command.
  48.   If you are using a K&R compiler, get with the times man!
  49.  
  50. --8<--Cut here--8<--
  51. begin 660 forTun.c
  52. M(VEN8VQU9&4@/'-T9&QI8BYH/@HC:6YC;'5D92 \=&EM92YH/@HC9&5F:6YE
  53. M($Y1(#,P"F-H87(J;&EN97-;3E%=/7LB179O;'5T:6]N:7-M(&)O:6QS(&1O
  54. M=VX@=&\@8F5L:65F+B(L(D5V;VQU=&EO;B!I<R!A(')E;&EG:6]N+B(L(D)E
  55. M;&EE9B!I;B!E=F]L=71I;VX@9&5P96YD<R!O;B!H;W<@>6]U(&EN=&5R<')E
  56. M="!T:&4@9F%C=',N(BPB3F]B;V1Y(&-A;B!P<F]V92!A;GET:&EN9R!A;GEW
  57. M87DN(BPB179O;'5T:6]N(&ES('5S960@=&\@<')O;6]T92!R86-I<VTN(BPB
  58. M179O;'5T:6]N(&ES('5S960@=&\@<')O;6]T92!G<F5E9"XB+")%=F]L=71I
  59. M;VX@:7,@86YT:2UR96QI9VEO;BXB+")4:&5R92!A<F4@;F\@<V-I96YT:69I
  60. M8R!P<F]O9G,@;V8@979O;'5T:6]N+B(L(D%N>6]N92!W:&\@97AP<F5S<V5S
  61. M(&%N(&]P:6YI;VX@8V]N=')A<GD@=&\@979O;'5T:6]N(&ES('5S=6%L;'D@
  62. M8&-O<G)E8W1E9"<N(BPB5&AI<R!I<R!A(')A=&AE<B!D:69F:6-U;'0@<W5B
  63. M:F5C="!T;R!E9F9E8W1I=F5L>2!C;VUM=6YI8V%T92!I;B!T:&ES(&9O<G5M
  64. M+B(L(D%C8V5P=&EN9R!T:&4@979O;'5T:6]N87)Y('!A<F%D:6=M(&1O97,@
  65. M<W1R:7 @:'5M86YS(&]F('1H96ER('-E;G-E(&]F('!U<G!O<V4L('-O;65T
  66. M:6UE<R!T:&5I<B!W;W)T:"!A;F0@9&EG;FET>2XB+")%=F]L=71I;VX@<V%Y
  67. M<R!T:&%T('=E(&%R92!J=7-T(&$@=V%L:VEN9R!A;F0@8G)E961I;F<@8F%G
  68. M(&]F(&-H96UI8V%L<R!W:&EC:"!A<F]S92!B>2!P=7)E(&-H86YC92XB+")7
  69. M92!H879E(&%L<F5A9'D@97-T86)L:7-H960@=&AA="!E=F]L=71I;VX@:&%S
  70. M(&YO('-C:65N=&EF:6,@8F%S:7,@86YD(&ES(&UE<F5L>2!A('-Y<W1E;2!O
  71. M9B!B96QI968N(BPB3F]N92!O9B!T:&5S92!%=F]L=71I;VYA<GD@=&AE;W)I
  72. M97,@8V%N(&)E('1E<W1E9"!L970@86QO;F4@<')O=F5N+B(L(E1H97)E(&%R
  73. M92!P96]P;&4@=VAO('1A:V4@979O;'5T:6]N87)Y(&ED96%S(&%N9"!U<V4@
  74. M=&AE;2!T;R!J=7-T:69Y('1H96ER(&=O86P@;V8@=V]R;&0@9&]M:6YA=&EO
  75. M;B!A;F0@9V5N;V-I9&4N(BPB22!T:&]U9VAT(&ET('=A<R!C;VUM;VX@:VYO
  76. M=VQE9&=E+B(L(D5V;VQU=&EO;FES=',@<F5C:V]N('1H870@86QL(&AU;6%N
  77. M<R!A;&EV92!T;V1A>2!A<F4@9&5S8V5N9&5D(&9R;VT@82!P86ER(&]F(&%P
  78. M92UM96X@9G)O;2!T:&4@9&ES=&%N="!P87-T+B(L(DQO<F0L(&9O<F=I=F4@
  79. M:&EM(&9O<B!H92!D;V5S(&YO="!K;F]W('=H870@:&4@:7,@<V%Y:6YG+B(L
  80. M(D1O('1H97-E(&QI;F=U:7-T:6,@<F5C;VYS=')U8W1I;VYS(&1I<V-O=6YT
  81. M('1H92!C;VYF=7-I;VX@;V8@;&%N9W5A9V5S(&%T('1H92!4;W=E<B!O9B!"
  82. M86)E;#\B+")4:&ES(&ES(&%N;W1H97(@:6QL=7-T<F%T:6]N(&]F('1H92!?
  83. M87-S=6UP=&EO;G-?('1H870@979O;'5T:6]N:7-T<R!S=&%R="!F<F]M+"!T
  84. M:&%T(&]F('5N:69O<FUI='DN(BPB0VQA:6US(&-O;F-E<FYI;F<@1V]D(&-A
  85. M;B!B92!P<F]V96X@+2!I9B!Y;W4@<V5E:V5D($=O9"!A;F0@2&4@<W!O:V4@
  86. M=&\@>6]U('1H96X@:70@=V]U;&0@8F4@<')O=F5N(&9O<B!Y;W4N(BPB3VYE
  87. M('=A>2!T;R!R961R97-S('1H92!B86QA;F-E('=O=6QD(&)E('!R97-E;G1A
  88. M=&EO;B!O9B!E=FED96YC92!?9F]R7R!C<F5A=&EO;BX@22!A;2!H;W!I;F<@
  89. M=&\@861D<F5S<R!T:&ES(&%R96$@:6X@9'5E(&-O=7)S92XB+")!;B!E<75A
  90. M;&QY+"!I9B!N;W0@;6]R92!V86QI9"P@:6YT97)P<F5T871I;VX@:7,@=&AA
  91. M="!O9B!H>61R;VQO9VEC86P@<V]R=&EN9R!I;B!T:&4@9FQO;V0N(BPB270@
  92. M:7,@;F]T(&5G;W1I<W1I8V%L('=H96X@>6]U(&-O;G-I9&5R('1H870@:70@
  93. M8V%N(&)E(&1O;F4@8GD@1V]D+B(L(E-C:65N8V4@:&%S('1H92!S97)I;W5S
  94. M(&9L87<@=&AA="!I="!I<R!S96QF+6-O<G)E8W1I;F<L('-O('5N=&EL('=E
  95. M(&MN;W<@979E<GET:&EN9R!W92!C86XG="!B92!S=7)E(&]F(&%N>71H:6YG
  96. M+B(L(E1H:7,@:7,@:G5S="!A('9E:&EC;&4@9F]R('-P<F5A9&EN9R!E=FEL
  97. M=71I;VYI<W0@<')O9V%G86YD82XB+"))(&1O(&YO="!P<F5S96YT(&5V:61E
  98. M;F-E(&)E8V%U<V4L(&%S('5S=6%L+"!Y;W4@=V]U;&0@8VAO;W-E(&YO="!T
  99. M;R!B96QI979E+B(L(DEF(&-R96%T:6]N:7-M(&ES(&9A;'-E('1H96X@:&]W
  100. M(&1I9"!.;V%H)W,@07)K(&=E="!O;B!T;W @;V8@82!M;W5N=&%I;C\B+")7
  101. M;W5L9"!Y;W4@<FED92!A;B!!:7)B=7,@=VAO<V4@8V]M<'5T97(@<')O9W)A
  102. M;2!W87,@;6]D:69I960@<F%N9&]M;'D_("!4:&4@=&AE;W)Y(&]F(&5V;VQU
  103. M=&EO;B!S=&%T97,@=&AA="!T:&ES(&ES(&AO=R!I;7!R;W9E;65N=',@87)E
  104. M(&=E;F5R871E9"XB+"))(&)E;&EE=F4@=&AE('1H96]R>2!O9B!E=F]L=71I
  105. M;VX@;6%Y(&)E(')E:F5C=&5D(&)Y('1H92!T:&EN:VEN9R!P97)S;VX@=VAO
  106. M(&-O;G-I9&5R<R!A;&P@=&AE(&5V:61E;F-E(&-A<F5F=6QL>2XB?3MI;G0@
  107. M;6%I;BAI;G0@87)G8RQC:&%R("IA<F=V6UTI>VEN="!N=6T],3MI9BAA<F=C
  108. M/C$I;G5M/2AI;G0I871O;"AA<F=V6S%=*3MS<F%N9#0X*&=E='!I9"@I7B@H
  109. M=6YS:6=N960I=&EM92A.54Q,*2\R*2D[9F]R*#MN=6T^,#LM+6YU;2D@<'5T
  110. D<RAL:6YE<UML<F%N9#0X*"DE3E%=*3MR971U<FXH,"D[?0H*
  111.  
  112. end
  113.  
  114.  |  __L__
  115. -|-  ___  Warren Kurt vonRoeschlaub
  116.  |  | o | kv07@iastate.edu
  117.  |/ `---' Iowa State University
  118. /|   ___  Math Department
  119.  |  |___| 400 Carver Hall
  120.  |  |___| Ames, IA  50011
  121.  J  _____
  122.