🚀 go-pugleaf

Last night on BIX (the Byte magazine Information eXchange), I saw
the target of the discussion about the Monkey DA.  Monkey is 
apparently a DA that asks you for a seed value and then generates
random events on your Macintosh.  (I say apparently because I
choose CANCEL from the dialog--I do not need my files renamed, 
for example, or anything else that could go wrong.)  From the
description, Monkey is very dangerous.  Use/Abuse with caution.

Since it is very short, I'm posting it here.  Since Monkey was 
available on McGraw-Hill's BIX bbs, I'm assuming it is freely
redistributable. If not, you have my apologies.

Are we having fun yet?
-Eric


To retrieve, cut everything up to the cut here line, and from the
second "cut here" line to the end.  Run through BinHex 4.0.

===================cut here======================================
(This file must be converted with BinHex 4.0)

:"Ne[EQYPH3"%4NP-4%e29J%!!!!!!!!!#%9Y1!!!!!!"!!!!"mm!!!E2!!!!GQc
rmLmU!"j)HJ"3U4Sr2!!"6VVqX&42B"JNE2rb,bS!#Qe[EQYPH5jLD@jP!J!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!SB1IC!!!!!!!!!K&C5"K)%CTE'8!6PB!!%kk")BNE2rb2bS!'+Qh6Pj1G8j@!!!
[#b4Xrr)LDJ!8*P%hI!!)%,`[+`!%2c`!rUPG,bX!#$mm!2kTA5mV!!`r2!$qU9e
1Z[e`2c`!!8kkrIK86b4Xrr)[+J!H5(S!i+ND2c`!"6mm!"5SNdKk!1bSK%Kk!3!
!"FiN!!!HrrX!!!!D!+B!eJ#Q!+S'6@pZDf9j)%MR%$JS55(i!UB"'%UX!"4Q@MB
X!"K'3qY,!%2!!&P2,ca%594-2`1TS#"A5TpR%L"3-$`!b!aB-$PAb2rkCJ)a!eP
22`0#Th$r,`#TI#PA!"iJAc&X!"J!E#!m!!!"0+%L*%JT5!!83RJ"!#4X!"3Q8L(
i!US"'%*V!#T#D`!X*VJ+!P(V!6*-ha`)F!"1G8MR!$JS55CX!"3J5k!M,b`!(UQ
$3U`!&&P2,ca$4%9'3QHTS+QM60mF!'$351Frq#K**%JJE!!8S#NQ8$!U!"S%3!!
3Cai%3!!`CfC63'FL)'`!&+!U)Na-harmF!!JH!Mm6Y!m+J!J*'S!('%!!,jJhPQ
2U53J(fF!!"U`V!!HCJ!!%N+R5'm!!NKi#IS[&kQ!@)m)1!!"!AYR#P$i#-p#H!M
HB+T4q!M2-Icrr`MHB*j96bmU!"a)H!Rk5'X"-+Q!5KpRLP0V!6"R'JLX!!F!"8j
@rmiJ6c&X!"J!'+!"6PjJ!2pb8IJ)cc(mrrm)hM(X!"J)k&$V!6)[,!!H2c`!"8K
i#IT)D`%X5(J*qUQ0)'X",#"3)"!J95&!ri)[,!!HUB0#V!!HB!$r*L(6#$"3q!M
1-#X!+Qi'B3!!i'$X3qX!,$!V!#U`D`!SCK*6D`!QDJa4D`!U0h`!#`!QB03hD`!
U!#M5`$SC$%B!!'FD$%B!!@FD$%B!!QFd$%B!!fG#$%B!"'G+pmiNZ!&U6R8J1!&
UX,J"DQIk$%8!!@B-8@X!+LD4DJ3QZ!U3!#566R8-43!#CJK4D`!U&e%!""5V!!4
1G8(V!!BNf#6B*0JNf%jeB3!#+Ja&!!4Q-&&V!#S`'6G!!")-3!!"C``-3!!#C`B
R@3!8B"3R83!F*TPU"#Di#T!!!N!!!4G!!!3L5N(V!"*`%+!Z3QX!)%je9BqSB6!
I!N!!(N(k!D$3m!!!6Y"`B'%!!TBb!!C"!#"K!!(@-[`!"$,m!!-LJ8jeB3!"eQ%
!!F)br!!%-[`!!L+#B3!"Y$,m!!3br!!")S*1G@%!!E4K!!'J-[`!"$,m!!)LJQ%
!!@CK!!&LB3!"QQ%!!BBbr!!%-[`!!5+#6R9K!!)LB3!"FM,m!!3br!!#)S*K!!%
iB3!"0'%!!@aK!!&B-[`!"$,m!!%LJNjeB)"1G8(k!M`Kb!SX)I`"!!%!#T!!G2p
K!!%b-[`!"$,m!!)LJQ%!!53br!!")S*K!!%D-[`!!5+#B3!"%$,m!!%LJQ%!!C*
K!!%#-[`!!5+#B3!!q$,m!!3br!!")S*1G@%!!C4K!!$N-[`!"$,m!!)LJQ%!!0B
br!!")S*K!!%1B3!!b$,m!!3br!!")S*1G@%!!-KK!!#d-[`!"$,m!!)LJQ%!!+B
br!!%-[`!!5+#B3!!Q$,m!!3br!!#)S*K!!#+-[`!"$,m!!%LJNjeB3!"*Q%!!(B
br!!%-[`!!L+#B3!!D$,m!!%LJQ%!!3TK!!"D-[`!"$,m!!%LJNjerS6qK2k%rS6
qD2jSrUEqT[l8rQMrN[r3rf,r![m'r`CK!!!kIJ0K!!!N-[`!!5+#8Frrp%je3QX
!%LGi!@S!'#G6!"`AD`!%!#&1G9"V!#T$k`!X-#X!+Y,!6R9+Z!R@C`!!PL"i#GC
"k!!3B3!!V#"i#GC)3T4S!!K)3T4S!!TC6dKi#$3[!UP1*"p1G8Ui#GCR!!"N)(J
*eN(S!"!ad!Rq-HJ!!JRm"RJ!+!Rm-G!*qJ4i!"!*qM(S!!B+!%(i#ITK!!"@)(J
*eNK#P'J!#%K#P'J!#Q#S3RJ*qM(m!!3*r$(m!"!*rM(m!Ii+!%(i#ITK!!!QB)K
"q!JdB3!!(%je51GJ`$m!9BqSBA!!-"q!hdK!60m$"Nje-#J!"*!!8'(Jd&!d!%K
#-#J!"T!!D!!#BG$3D!!#0!"C6bm),`+T6L3I6R8JE`!%51GrIf(-)F)+N!"-hrl
qF!!ZRdje!!!!J!1!!!!)B!2!%"Mm1&'%X!C54)ik)TLa`M*%[3)4!Vd#'B+p!J5
L[3)3[,d#)N#&!N&!J3*#J)d'N!"!J4+#)(&'J"!21-3-!F(#JR)!`H'Z!H$F9B"
"9kT"B1"e`%&!Mi&K6`B#32#!#+#!60$#"M9JS"8#)%T)bN!e-$@!(X!!!!!!!"F
!C!"N!,i!qJ!"!!!"!!!!!!6$3!&0)!!!!&S!"!!!!!!!2!!+!&!!4J3&8h4KFR3
!!!!!!!!m!&!!8!#-"!C$B@jMC@`!!!!!!!i!'!!Z!$LJ!Lrj!!!!!!!+!&d!'J#
#L!46C@9N!!!!!!!F!&`!,!#!N!!!!!!"!!!!"mm!!!E2!!!!GJ!!c#J"f!!!!"`
!EJ!$4&*@8J!!!#**3dp1!!!!,N4-6dF!!!!k4%P86!!!!%B!'J!!!!!!!!!!m6$
$32rr)!!&dJ!!m16$32rr)!!'9J!!m2$$32rr)!!'F3!!m2J(!%e[EQYPH5$D:
---
===================cut here======================================

-- 
Eric F. Johnson, Boulware Technologies, Inc. 
415 W. Travelers Trail, Burnsville, MN 55337 USA.  Phone: +1 612-894-0313. 
erc@pai.mn.org    - or -   bungia!pai!erc
(We have a very dumb mailer, so please send a bang-!-style return address.)