[net.sources.mac] RaeDA binaries

baron@runx.OZ (Jason Haines) (09/09/86)

I have simply converted Steve Hawley's Rae program to a DA.

/* Jason Haines            ACSnet: baron@runx
 * Sydney, Australia       CSNET:  baron@runx.oz
 *                         ARPA:   baron%runx.oz@seismo.css.gov
 * UUCP:
 *   {enea,hplabs,mcvax,prlb2,seismo,ubc-vision,ukc}!munnari!runx.oz!baron
 */

--------------------------(Cut Here)----------------------------
(This file must be converted with BinHex 4.0)

:"9*KC84"!%4'58a%68p@!*!)%GaBDJ#3"!%!N!-4N!!!!"#3!!#3!da@!9!%"89
UC@0d!*!'A3%!!'m"8!3&4(*TGQ8!!!45B@A*C3)!N!0%4NP-4%e29J%!rmi"!!"
$!!!"03#3"%4'58a%68p@!3$rcJ%!!%-!N"#EJq4X!*!'%GaTEfiJ-bib)*!$-Le
+G@iY1$B!!"*X6[S0@P"83dJ!D3!B$+m!32em!"aQ"L&%!#4J'Vhm!%"("'B5$+m
!3%AQ!"aQ#%hk!!`KcJ1H6[N!3"1kCKJVF4!!rrBlF4!%rrSJ"H#)iSJl32rmF!"
1q3"!4`6Ae0A86[N!30li*#m!*1#+!!!1[J3!N!-"DJ#3!cJ!6J"J!()!K!!!6[S
#iNlk!841qJ&86[S"C%lk!Aa1qJ'Z6[S"bNlk!HK1qJ)%6VS!B%kk!,j1ZJ$bF!"
1ZJ"J6[S!UNkk!%T1ZJ$JF!&1ZJ"16[S!ANkk!$K1ZJ$1F!*1ZJ!m6[S!6%kk!#C
1ZJ#mF!01ZJ!U6[S!1Nkk!"41ZJ#UF!41ZJ!B6VS!YNlk!&iJ(dMR!$JN5#C*)%"
1d$m!,`X[#Nkkrf42l`!+08!!%%je$%!!!@F@##S!!3!'CK!J5L*,60mF!#mi#2a
1GA!!##X!"J!%CK3JD`!!#*!!!!FJDrrmdIJ#TJL3!!!(60mF!%je5UX!&'B`)$`
!!)!!S%!`+`!B4N$V5!"!`!"3q!TH@Bm[2%4"9%%r!+QJ)"mR3!!8C`3[!+Q56R8
J+`!8C`iJ3#!3`,J$'LK!#0!!"dje2`!J+`!8C`K#U`!8)%#J)c!I6R8JAc)B0"L
`@&I*rrT+3QIq6[!Jr#"I-KJd',#B9mRrqNT#Crj1m#$k)&mb'$3BX%*Z#T!!3@d
'd%""m!!#-""RrNl`!!!J,`!%,d%!"#)[!!J[A`!%51Fm!#3!*J&)3X6$+!!U!8K
&b-A84%K#N!2!`G##60m!2#)I6R8J,`!%,d%!"#)[!!J[A`!%51Fa!%kk!*a-h`#
-)Kp1G5![!!3[33!%)Lm!##pI!!4)jc%!6VS!I#!"60m!M#)I6R8J,`!%,d%!"#)
[!!J[A`!%51Fa!%kk!#a-h`#-)Kp1G5![!!3[33!%)Lm!##pI!!4)jc%!6VS!$#!
"60m!M#)I6R9+J'SF5S&U$%5!4)&1ZJ!J4)&1G85!6VS!&N5!4)&1G8U"DJT%J8k
k!!C%J%je,M`!!2rrXS"M"L)!F!"1GE#(BJb!`8K!-J"#3%K!6R@bKf)D,J"#3%K
!J-&)3%K(2J")4il"-!G)4c)(6R8N!#B"iSMLLE+(B[L!`F#(-J2#`#i$5%I1`%K
(dSGP#*+#BJ4%J8je8d"Jj!#3"%j@!!![#bCZ!!a+U`!8CJ!!'NTZ!""Q!!%b9Bm
r+`!B6VS)aM!IB!!")M!Z!""1Z[ci!*!$"!%8!!S"%!"q!3`!k!"VB!!!"%*V!#)
hI2rr!#4)E!(%U4!JE!(%3q`"X%(S!"!Lf#,B1@`"YJ'X1@`"Y!'Z@Bp#TdKX!E"
)E!()(c`!!6mm!!4)H2rr(c`!!8+RU4-J(bP!!F3JE!(%,bJ!'%KX!E#Shb"X!F3
aD`!B!'a1ZJ#QB!!!NLmX!F5SFb"Z!!J`+!!D6VVmAJ"!!%%!HJ!%!(BJEJ!))'J
!($!36VVm2J!#!!S!#!!Z!!%!A&Q2U6XJ(bP!!F#T0($r+8!"S#P!!Ca#V!'S3U`
"T%KX!CbSR@!!!$49McmV!"K1ZJI)-"pJ!!!N5'`"R+LG6VS(4LmX!F5T&#mX!F#
T2#mX!F"1ZJMqU6HS8h!!*Pp1ANje68&*6L#3"%j@rpK)j`-!5'`"!UK[U&*)E[r
i3QG#Ccmm!J!r2!&@U+G)E!'FU*e)E[riU+*)E[riU+4"l!&Z+8J"MR!#18!"NNK
X!C4#Cd*R2c`!%$mm!"#STdKX!D5SR8kk"X")E!'FU*eq!'!!!(i`"qG)28$rlJa
Z!!MrlQm!!!`-EJ(hrqjY!!!8-!G)`0#!3H`!!0(!3P"J!!"1-!G)`0#!3H`!!0(
!-,`"5`J(!!"R!!!f-!G63%M!d)""l!!!dF"+8'B!!"3`"dM!d)""l!!!dF"#8'!
!!"!`"dM!d)""l!!!dF"I8&*($%F!J'd!rhjJ!!819BqSB6!I!N!!IcP!!3!`,!%
!5-$3J%(X!!$4`%T3EJ!!%NKi!!&)E[rB6VS*,'!!"0``,!%!jdJp32rZ9BqSB6!
I!%!!!3*!!!Gb"**!28(rjR!"28$ri%*Zrq4#E[rUI!"9MkPd%"p+!'B!",Jr,[r
U2blrlNkk",aBMceZrqlrl$eZrqVrk$!Zrq$4E[rN-#lrj0&ZrqS`,[rQd@lrlM!
ZrqlQ3%M!d)""l!!!dF!`,[rUX&"[!!)D$'i!"IrNE`!!4MmZrqJr,[rX6VS%CPL
22blrkMmZrqj1ZJ4B@)p)H!!"5'lrf%kk#'ir,[rU2blrlNkk"$jBMcmZrqJr,[r
X6VS%-&L2-#lrl1C!5-$3J%(X!!$4`$!ZrqU`8'i!!"BpE[rXrqi`,[rQ4%!p32r
QB!!!8$!ZrqlQ3%M!d)""l!!!dF!`,[rSX&"Z!!!@2@lrk2rU-#lrj%4!28$rj'!
!!#)pE[rXrqipE[rSrqS`,[rQ4%!p32rQ-#lrj%4!28$rj(!2`%C+3'B!!"!r,[r
Q6VS%8&5228$rjNTZrqCQ!!%L-#lrlZC!18!"!$!X!3"63%M!d)""l!!!dF!`,!%
!5-$3J%2X!!$6`$!3X&&X!!!b-#`"!%M!d)""l!!!dF!`,!%!8N")`0#!3q`!!02
!-"#`8@`!!!a`!6e!rqCJ!!$#-#`"!&0!5-$3J%(X!!$4`$!X!3")`0#!3q`!!02
!-"#`8@m!!$)`,!%!5-$3J%(X!!$4`$!X!3"53%M!d)"$l!!!dm!`%,"4E`!!$($
r28$rjQ!!!'``,!%!8d")`0#!3H`!!0(!-#`"!%M!d)"$l!!!dm!`%,"4E`!!4M!
X!3")`0#!3H`!!0(!-#`"!&*!5-$3J%2X!!$6`$!3X&&X!!!J9BqSB6!I#!#3!fF
!!!a`!6e!rqCJ!!!)F2mp32rQ2blrj%kk!aT8Mce!rq4)H!!"5'lrf%kk"R`r,[r
S2blrl%kk!NaBMdTZrqCQ!!!Q5Qlrj'B!!"i`,[rZjN")`0#!3H`!!0(!-""C3,"
ZrqTY!!!)8NCJ!2e'-#`"!&0!5-$3J%(X!!$4`$!X!3")`0#!3q`!!02!-"#`8@`
!!*3`,!%!5-$3J%(X!!$4`$!X!3"53%M!d)"$l!!!dm!`%,"4E`!!EM!X!3$R5$)
X!3")`G+"3H`!!0("2a!r!%kk!E"BMc!X!3")`0#!3H`!!0(!"P$rkc!X!3"63%M
!d)""l!!!dF"+8'i!!")`,!%!5-$3J%(X!!$4`&p3-#`"!&*!5-$3J%(X!!$4`&p
3B!!"1$!X!3"63%M!d)""l!!!dF!`,!%!5-$3J%2X!!$6`$!3X&&X!!!`-#`"!%M
!d)""l!!!dF!`,!%!8N")`0#!3q`!!02!-"#`8@`!!!T5E!%!B!$qpM!X!3"63%M
!d)""l!!!dF!`,!%!5-$3J%2X!!$6`$!3X&&[!!!`-#`"!%M!d)""l!!!dF!`,!%
!8N")`0#!3q`!!02!-"#`8@m!!!T6E!%!B!$qSM!X!3"63%M!d)""l!!!dF!`,!%
!5-$3J%2X!!$6`$!3X&&[!!"'-#`"!%M!d)""l!!!dF!`,!%!8N")`0#!3q`!!02
!-"#`8@`!!#"9MkKK-"m)!*!$C`!!#P*X!3"J!2j!8f`"!'!!rMJ`,!%!jdJb,!%
!5-(5J8(X!!$4`6m32`"1ZJ!b@)p)E[riU+*9MkPd%"p+!'F!qZT)E!'FU*e1ZJ%
+U&0-h`$!6Pj1G8428N&&)*!$6PErpNTZ!!KX!!!)F!Jp3!!)5Qi!#Q`!!!K`#$e
!!!S-EJ(r!!K[!!!)2A`"p`!)-#i!#1C!18!"!$!X!3")`0#!3H`!!0(!-#i!#V"
3E`!!&$!X!3")`0#!3H`!!0(!29!!#NKZrrB`,J!)"N$rp$m!-#i!#P&!2`!`,J!
)@%!r!$!Z!!T33$m!U+G)E!'15'`""%KX!C4)E[rf2c`!!N+RU1a1ANje4&*"9dP
8)#"19J!!,`Fq,J!)5NGQ!!!)-!GJ!!!N5NG[!!!5-!IQ3$)(NN"635!"B!!!$M!
(jN!b"j*!8N%J!5iI6Pj1G84&3d&C)*!$6PB!!%*R3QHSNd*R2c`"9DL43QFr2!&
9U*-r2!(r2c`"9DL42c`"rcmm!9@SNcmm!Ip#CkL46Pj1G8423Np54%95)'m!#(!
B3QG4b2rm,dJ!%N)[!"XJ6k!!-Lm!'0lm!$)JE`!%-)%r3!!-)&p36dl3-#m!"*l
m!"ir3!!B)%qJ!Glm!"ir3!!')&p86dl36PErcN(ZrmiaEJ!)!"JaI!!"!"UJ"5e
S!"`!#NjH)&p86dl36PErcN(ZrmiaEJ!1!"JaEJ!-!"T+VJ!)Ca"$k!!F)'i!#(!
@S#j"l[r1S!3p3!!36PiLAe#26Y&19[r13HlrcM&Z!!i!'$&Z!!`!'U!&28!!%%(
ZrqSLEJ!)F"DJ,NjH)Pp3Mdl46PEri%(Zrq!aEJ!)!"LJ"Me!!!T1AL*I9)p1dD!
X6[S"d#*I)&qJ9dlk!F3LAb"2S"RHr!!16[S"YL*I)&qJ,8lk!Da+1!+1DLSJH!%
`3rJ"&#!)N!#4G!b`JQ8@)P%Kb!%8)S"#%5*i!USLL###dDN!$%jeS'01GD!f6[S
"G+%D,dJ!"%lk!@SLAb"IS"Y1qJ&H,hJ#TJ!%6[S"A#pi!US!"%lk!9)LAb!IS5)
ZL%lk!6iLAb"IS#01qJ%d)PmJAk!P,S"U"N+A6[S"*%lk!4iLAb!I)&qJ*%lk!43
LAb"IS5BZL%lk!3JLAb"IS5JZL%lk!2SLAb!I)&qJ*dlk!2!LAb!IS4iZL%lk!13
LAb"IS"p1qJ$D)PmJAk!K,S"U"N+A6[S!bNlk!-3LAb!I)&qJ)%lk!,SLAb"IS8J
ZL%lk!+kJ(#p!!!41qJ#X)PqK(5)))&mJJ5k!6[S!NL*I)"qJ6#k!6[S!KL*I)"q
J3%lk!(iLAb!IS%e1qJ"d)PmJAk!V6[S!DL*I)&qJ+8lk!'!LAb"IS#T1qJ"@)Pm
JAk"*6[S!6#*I)&qJ5Nlk!%)LAb"IS%Y1qJ!i,hJ$+!!%6R8L(b!I)PmJAk!Z)N&
1qJ!J,hJ"#!!%6[S!(Mpi!L!!"%je,hJ"-!!%6[S!$(!!,`Na`!)J6R9`!'$f)Pm
`(bm*S8B[5!!%6R8LAc!I)&m[#D"(6R8J(b*I)&m[!+!l)S"1G5"I-"qTbDRr3Hm
!"+Rb3Hm!"+Rc!!!"bJ#3r`#3E`IJ'"JJ"%+3")*"J!'!!B3KL"'8+82#3!)J""J
B"q!!N$i"!*!$%C!!!!!3N!!!N!0-!!+MmJ(B!*!$(!"'!!&%8PC5!*!$%N4"9%%
!N!-H!!`!!#!!N!3#T%V"J2rr!!!1`J!#Sdi&!&*KCFQ!R!: