From: Ben Vaughan <benvaughan@mistral.co.uk>
Reply-To: yourusername@mistral.co.uk
To: Psion Binaries <psion-binaries@iddth.it.dtu.dk>
Subject: Bio_s.zip - New Siena programs
Newsgroups: comp.binaries.psion
Followup-To: comp.sys.psion.misc
Path: toga.it.dtu.dk!ej
Message-ID: <ej854271891@it.dtu.dk>
Date: Sun, 26 Jan 1997 09:44:51 GMT
Approved: ej@it.dtu.dk
Lines: 282

Hi,

Attached are 2 new programs for the Siena,

Many thanks,

Ben Vaughan.


begin 644 Bio_s.zip
M4$L#!!0  @ ( -UA-R(^3TT=51$  (<@   )    0DE/,U,N3U!!Q3D+;%O7
ML20E2[6[<+$\=4BZ!4TQ9$VR+%O3;1@0)%L"=$@**G$;+^D2S-H*+<F .MB&
MM5V<6 $VV+46[9S[WJ,H6QDR=, (Z;U[SSWWWG/./9][SN.A()_XBA[-WYM(
MZAT=P."OI.U![C]\>.#P& Z.=??Q \.=V()Q*=3G_R>/1X*A Q[P@,)< /#E
M@V9;80";)'"/0 ] 75W]+PJK=YRI\BZLRG7UL #.$<!G)4#W:_2<M]MO++0B
M_,*E([!0D#.9P@]7V:%+<'[UM<8%. _GGWC]VS^$-QI?JUJ -YYXO1Z?"+>?
M%Q!SH7 ^DX&%U=<N';GZT]6%A=:5([ )O*X,.."2:URTQY%,L)]7H*7+E;G*
M\]!3<HMSI?7J?.VG*WSY4?\9* !<@KZ^Y^K[OOW'W[WOON_>=VRHK>W^Y^#F
MW\)#]+RT"FZ C(!\$0INJ/+@$@7P/(PR!,]C7[U4"Y["\I56\"SL[X*Z%U:5
M70 O/)2IP5&X4NG9@R*OQ/^"^=Q/SSE\>JWVPOX]AZ"PZD%IS#_D*=1^6@L*
M@)/V*\@H& "YRNL%\#<">$%NG(&:%KEII=!Z1&YQ+9R5K]?"I05VW3DSON"1
M"Z_[#6VMZW.X_V?Y[('NA-$=R>F=O*<;^ZB /6,W(M7-(R^MM[3>DL#W&S#!
M'FU&Z?P!2/UM\ I(1]L*19 >;(,?@338!A= .MX&;X(TV@8_1OA>]C:PD'01
M6$!Z%UB?] $PG_1S8-W2,C"_= VD[KV,,:EG+ZM@TH-[Y$U,"NYEVYGTP!YY
M!Y./#K6!FTD#>UD'D_V(U<FD8WOD TSR^:1>)G5W2R$F^?W2<1P>:8-Q5@<.
MOR\T+$M'>\#1&PB& *K9YF;FNHO5 _P 9.+J%>#5WO FR,AMO[[WD6^I6]'\
M7O^0J:#N&S6FE-14+J]$LWHDKRL1)9;(HIT;V5DEBK/TF&*OO^\R $W)QQ,Y
M-M'5@<A)7<E-975E%LF+1Z9Q73T2$QL,!7P] X'.D>,CRB3ZHA)-1M:8.A%/
M'BY'?.W/P7F J?4=2E\P&#CJ"P9'E5Z?OS_0HW3,JTW"H?:00Z6E<F/=W4.!
M TSTM;_5V.F^<]2N]X;?7S5'W<?RI^_G3AS #NJN+[P;U)HA_40BE]>S*#&4
M%Z[0OP(.-W._Y)TK?AG4YD V:V11F"AU0LR:*D>27P'>]?)GT/ZG:M/0C?A*
M3"<=C>&\NUZ>+LZ ZCHVB+A]PR.!H4#/"I! JW&=W\AU]@9#_5I5+#P,']+!
M;F\G\#"!VY6!8\,C2G= Z1LT3[V^O5P+VY5C@R-]07-H\]KR]IFCS#C,J2Z:
MT^<?$^MJ;E;@[ *OYDVKCHN.-X'?.N?X,0IRCK/ZHGA+UEO&MSOIG%.;;^0[
M% B$AN_J-&(3>*C[D>:-$5X"61K< U)/&T@#;>2<5HM>4&MOP+[Z6?.?NWD^
MKWY'DSD<"E="L9I=5#<%!I%E9= W$/B0.3>A3[A<J1WDX"6$GP&Z-:V>RY[P
M/E!O'XRD=--9H-FC?27U"+8/*-%X)!N)HE[D5J#X_.I%WL)W+;H? QY_G^_D
MK8ONWP4^^3[?Q95%]Z/ 8^_S.WG7HHJDM=,&\]3:#4NJU)Y;PJ'8HNKJ[AL:
MZ55Z?",!Y<@2"=DIA.R<&WX1'D9==>]FY :'7X:'BQ^MEI_"1179W8.MNB(>
M';*-;<ELCU);IC9I>]8;=L(/B@YXF@0B^/WD4\<XPQ/GF]^ZR+N0"77+<" 8
MD-WP:@YS?M?8>/#T.?YK[M^'157V'0TL_2/&GY]HS9P="M> ^R7 ;7FCMK"D
M6&\,45XH_K6+8( PVI9@SQ2?$S!<70Q)A\;#C[NL)LGK7?@%"//WAA\$U<E#
MCL!,(L]G_KVB^-7_RV6WV_Y+<8]B+,B0_NJWW<&SI0TK27)?FK-9K '3:V(G
M.6$8Z# 3:#R3Z!XQI)D.9V<F/IM+4)#%H$7!)Q'3(TD3,6^8.(UD:=%\8EK?
MR F=/&;QLBF!^)F[PO\I&+1%0+&>&)S0T5_8@C"7V47\E LB,:GH,WHVFL@E
MTB<L4G?FZ4(01;:)T\BTD:"0_94IO& H]D+-F:E<'*<(5G-Z<A)1#?16T;BU
M2,LZ&2CKN2^)Q):!LIY[2R1KMYX)/6F<6L?]QX**4=K$YD?)QF?S\930 NM$
M=OB'^D9(89#3/ W@-<-(I?1T3+>(V"'N+K,8" 77^@S&19/WQ*0ECE@V,4W2
MGG!ZU$CG$^DIO;.S<X6")QE'8( +TQ7&$3*-X^//9QQ->LH@8DRE("4A:B83
M<4H<.&YEH )G!:%X^=7UU,UD*F@/6332)(K\A%")_S"Y)H/X2&!_ID%8Q%@B
MI%$W33+CB4RNI"O6^0AQV9)"?Y] JJ<R.=T^WXE9])P&A@*A%VLL6V;4/&)J
M9QDMF*R@CT=;G3+UP\QW3&6RN"K-2D5.DG] RT4'@6F0I6<QG?RK< =Y$T.?
MJ.*H/Y0U6I%C.I*<,G43R10J<]T4 AG*+S^/H338AG*#+"SV:1::_+IX2J*P
M5*(\(2Y_2'$VET<4#BO,O,R;%]&>L?"KC!)@F%==9D(WY*,8]*& -IC;"";3
M%7UM+GK$I-A <%&\@YESZCWA1LK]L:<RA=<+:%#[N_YY\U*.N3?N=.Y73=6?
MR\7= I@K PY_4JP1P!EON *>G:9FE==,;\;#$V81H+('\[:1@%MBEX'J7")E
M\Q9O6 61[IOYFYGRFTF=F?:;6=_<Q>(V$.E"%R9>Q0 KXBJ/+UNJ&KX5*AB.
M<89% LU[KMAH]C%!%1FK2%41?I%7O\7OY5L7U<W^7M_0B$B+#R^)?;1=YMY:
M F_X7U9Y!<\OJE5V]K3$*]S?P-RWRKXQ$N I!%27(N42'8BT<?Y/9[*#<MOB
M1Y+1*;QCV%>3)HH^$XDLWI%BY)0\^[^ ?_OO]GBL^%#*,\E[GM#S^)^>2J3M
M\1C!0R;\782WE,./F_ /$'Y;&9Q4O*-,Q?^_^*'M69"LJX%7<?93#N_PBK?P
M(P1&$5]XFR!/ZN6#6%0:Y-I2,0 XYOZ9?'J_^8Z?OGLL[ %KF<%%<^;=:%@J
M4Y>*3GS=N42CCEYS5//]!'4"#Y<P*1;A^=/X\"+?QFN0 NI$%K$DI;V^A(H!
M%T08HY>3[%'HBO (DS2CUIHQM5CY<]CP9/"3"X_BW=@%JCS@.[Y4Y"! =%,4
ML+[!I>(] E9[YB[QBI\Y/";&.OP=2\56X'<2F"&82Z%>+)AA5RMP*:Z](WC[
M6ADE[M^!Q<IEV% 9\,//3:0L;T#*LDG*\L:D+*\G9;F<%*R3EM/R--)R#394
M0/S^=!,MUS:@Y9I)R[6-:;FVGI9K)5I,+R .F CY&^@*U_\7^5\J<F/WCXI?
M^^7T#G@57?$F4WOIJQ=\!_!#X7;P8=_Y)&S>"N45^GGY2: J/5[GMI&G$A> 
MA/EI2MP .%MAW/WR= 66-MGI<Q7?%R^,:HV@H2+NQOG]3SKJ@1_2FN8 WSLP
MC=OAC!#B(X]Q"3O:V]B0L?&-;P%B.D+<$43D7L)V-8HR;0NT; =\(E)5HZC*
MQS'Z?0^FS6WP6><&#UY 2IO7X6V%0F=I'.O4X;JR<3?,O;@+!(.",<&4YOTM
M4;C"_ )Z*WZQ#4KX0?0OL3&&\/\&4$L#!!0  @ ( +)^,2()L"3+DQ(  +LH
M   )    0DE/7U,N2$Q0=5K-CB0W<B;\)]MG^VB8'NQZNU?5I>F>U:PP/MC=
M,RUI8$DS5DLK+[# @I7)K**:2:9(9M>D83^" 5\6\$'WO?C5_ Z.+X*95=6S
MI]?T)*E@>KO2WX^@, V6R09M0JN&9'/6MZ'8M-:_KKL5T0P'$EU,0J8UQ>K8
MF.B922GNS_6]G?**7R:WW15%?&MO.Y(E$E720Y=B_X>/6G[IR9H$(GH<F$ ;
M]T$+)RI;;YM"D@Z&M&BA"_4=5 !ULJ;G%5!P$OF9]Y5F!:I'"M0A[DD=2O1'
MI\M^;?1@2;2P5K\&'3'+J5:9.4/JF56:=\3I6ITQ0WU,9&T;!T_&271 V]J6
M>(W-Q%E;E?5(Q]=ZXTVXA^U2.777@ZSLV^\' SP9![S\_/KK;_2KZV]N5R+'
M2'*$(J:H6Y092^Q-<8WQ?CIXP)GKCOVB'!315 (N2+BP"LXUN]_6!IOPTBAA
MZ"Q2G-Y;>Y^/6%$&$;CU)C16! ICO[$IJ\5Q(  TT]B6_MA,RNC!CR1GTKT+
MUHB^:5ME2"?[A0-.&FIQ[:7LKO39F/] ;; F>6<3'?9-I,?>PD@S-497!PI5
M=A]U]4QB@1AJ(H0HXL+*%6VZC@C 'S<IFE8G!J- 6S.ASC0EIKPB)AL_LB))
MS8?: )\FO:%XE&3#%OBQB3'12@..Z?E@ ?V88O1Q.ZUT)/Z38COH36PGW8V!
M46 ^B)=MR&9&AGN25'$L5J"PZ$,D5=OX0"I$SK (2U>FE0(%5__0P)7&JYTU
MEA2 M-E8]X"4,B8&" M@&G:DJ#R7GEIQ7I<:Y5>?S'8B&KTEG7B2SB6L4NI3
M$FPF*0$[!E$9^+@/<>]MNZTY#UR3 =DO@ 6)HTER_6*_I?]Q"![U)E1@.!TU
M;0R\CH%)1@PEN&'11@4[ED0G;$A9W@6 &OUO-D4I*&O]:8H]]B;20Z<V=NL"
M.W=RF8&O.0 &5OAJ-D35$+PGV+1U="["P&R<I^7X*^?8.(!-O7=E5ZL+1Q+2
MP\YM=VOU63+MR'B\M0WQ1Y17!WO" V,6U'%@FM31,B:1'@29PZ4E&JMI\DI=
M-Z:CO'?(>9*NCKC2C1D6NPEPB/L5.V71WII<% )UCYS<.N"DO$,+\1UQXYI[
M"E(D*3R#)*4'\1385C^=8VR_BYXG*@T*FGBX,EOC F""X\0+#(3B,4>0A\RP
M^B'=S,B$3#4W*7;2#S9-.I'*_*0:8JYQK<"AQ7'5$GDDGWUGFN(G 4NFMS+_
M2B^X40$R 0>0E45KC&$%?$$)GJ3U_\"S!918^BOHCC0&]>?B)!FN5"0="N>T
M;@+(<@)_<TDQ;&GY49/VR!VXL3%J;^F TW6G7GD.Y!%F.1B%0 G;*.CS,/0 
MM;UKN VL&""?(RD83GB0T59)LJW%D5'%;.'O&)6WL1>CF$V.?BQPUWT$,.M&
MJU5 B%V ^3;UC!<,F\4UHS=)*/L^8H@8W \C)C+]IFI@+HN"]P3X2."NW\>I
MQKX#8P>PAK#D4),I%"S2 M<F!EMF&)"@A,)"E5."9(E9[[Q@.R(]HBYY!])G
M7*90RDAQ%4LE1 +QTMH!E<!DU8^D"K/,IG*QIIW4,/J#LG?$1#E'YXQ$-08R
M_\9+9$Y*3&[[(2:B[B=B -&OB-"PDN+$83V&QJ9B7*APRF&^,6(*6:>J2IQ 
MQJJ8WM!!MA0_=Q]6V\V&7;?S<7\H@,Q'YN$YET4VZ 4#2DX,2&R2I=#\!<'S
MR.&85-KV9,R0U^JNC*VM%7;Q;.*YV,!) 3N)1#\WN(N;%L$,BK0KSL.=,R9S
M",-"1ER $,5]K.[*K4*J4!Z=,6H'BK25"418J1/AV4,W[,^3<K!H,4"Q;\+2
MMZ9K]2^C2<EZVM]!JQES1>G]T8NQ8Z"+LAY I$MC+DGR&4]9IT%:@>X U1[+
M>@HNK\43P42\HQ 4!I0P1AG;"31X$'^4SY&VVP>P(9=E<!#0E<.(,Y%9N,?+
M-FHD%*1)\Q!=._>IN3 L5W7@BMI%6B!5D)949WHG=<&5W?&@ X %E8LQ$)DN
MV6X4Y44>+9,EQL8!8L= UFY*5F3O(P.S5YQ95 .'O\]/^H7W'$"IZ[)#FR.2
MXEDM@3UQ/'$,'E5#(NK"]V.:UOK:>\4S&A(;XU(Y; S! H.;! +;D;.2XE'0
MSM/B=#H0@^ZBSGL&\^SC*&;)#=X^2G!<X/## 2M)(T<+B>MZ>,^W/IVUGCLT
M'BF#SQ@'Q?W1U=.?SN6>NXK(UW:)#^,LHI+M#8\0]">TEG,^MSNU## Z0X-,
M X8GG"I.TY5KT(=VZ+ P) @Q7#S*[Z\+IY3, SN[XF4N2)[EB5E)D]P_%_3 
MRQB (RUJ 5*LU AQ/?WX3(4S3R]D!%,]:KBREF8&!80D;:L7'H;N9 EX?H.A
M D?-R(5&\?<. !TSU#_NG=;Z#8.HFLRY=N_B7OINE)*3\.3:Z'HRS8,]^!1+
M$3?H#O(A&7!.PE<6#6S,0[OLEBDD<EF5@)\=.IH_Z 0NJUF]FGV\)FO,@3B@
MOK[];/WFU<T3=3:O&H<8$/ENQFGG*_7D[>WMV[NKNI)]!9= W):1;/@ )*N_
ML=<K1Y?TW7>D#%6WK>1<>&;M 7EOYKVO T<<UXTO33 8PN38E;W!)*HA"]^K
MEQ\#63W85 3R<+[UD6>X?$/90#?7GJ^$D'7XRP\&LM^N_WFMFQV^5^!0^/$3
MLDF+.\>IXAEUHW]EQNT.M\LQR;[&Y)WZ\1/]D9;3<75<7;H>Z"1[R_ 1GOM@
MEOY%,I[Z]-LOOI"]?/E'^C4>7R,EOLDX67I[\:5Q7M>76CZ?D5(2 ^Y@)(-@
M$?0VKV=?/ XGU<365J.1",<6UW@E=23++;-#U0&<,\!7  6TL<[GY4,X%V <
MJU\KDIA([*)W/*TO#<*#"\+\85U6'WP1XSU/ F# <>!893#.]ZZS&YJB^XE(
M4$L#!!0  @ ( -68+")W,>%&N@$  #T"   &    0U,N3U!/35)-:Q-1%#V3
M]ZP?0]#8H80BR1BF\9%B4:B;0&$T4DK3>D(C'6&*&B68JD3Q$R&++ 9<N/,7
MJ+]"<-%= D4*9J,BJ*7^#"'>-W'1QV,.[]QSSSMS9]A8XYW[[;O/EK<?MBL5
MS=TLOWFKSX />NYI1%ZOD@IP-MRX]BK1!1QF^Q?##:K>JA1\0)J.K"2Z! ;)
MFNL+-QK+]<@X?25>KG_>WVP_>;K]J.O770_UOZ :4MODDTZUS\R0ZK^U^FWC
M!",40(_.KQ1_P <71_(&7[G$ZR-J\UY$;/.4;2_RI5!B%Y@/F%"P@9TA,X=2
M8<_V&0 !Z(B#0"$UEET:'SAT=XD]Z@'5@)F!U2.97&GU>A:8A8PG/4>?(R=-
M(43DA?'WL11-5U^--3Y]>:%KEQO-1?EH\A_@'U!+ P04  ( " #)@3@B79<W
M[F,!     @  "@   $=$051%4RY/4$]-4<]+\T 0?;L)&DHK[6>II98V*"FA
MV'GSYKW-S"2R[\F3B]/_U]OG@]-Z'0QK6/+D9KN]VPY)#+N=C?VMO0:E  >J
MN6KNG0$N&GAD"X@??N" ']+I.K=\Q]&E"@S4Z !1"E>&<U0;C2=,LKP-656$
MI<2@Y'X,\IM]:7ID[FEWN@@_I:A<+H BF:PB7,9$3R.8\'0/4C0UF- O8*TP
MH4V"AHN>9]'+QY!W.ZWDS^$34$L#!!0  @ ( .V#."(8%)=3?P(  -0$   *
M    4D5!1$U%+E185'U4RV[;,!"\"] /]+0W710Y+Z"H@1[LQ&U<-(X0.0EZ
M3BLXOW0U_& 2OGR.HSA:U]R"-FIK6 ,-Z^ 986,010>ETIP*N$LLO3=:H$-@
MLH)6&MQRZ] 0O%&F2>.(6;"MUH(J,L_[K14"N+3.M*7C2EI@!ND 7(W[?N'B
MAN;%KV*]N(7GUCDE/:1'Z':Q>H 7[/SI@ZS00'+-[4N2@J7YEPZ26_:"AY9)
M;Q'8T?A*&C\%F1?+]>+JIDBIC),=3G74FLLMF1\PD.^E^8"15: V7F#H_51C
MB*.?<=^N\DKLD6\;9 \?V/_3'3\"CQAL&)<D"39<H 5\*U&[7C"%ENX91KTC
MY<7Y:3"SD']4EPW.XFA.DQWZ9I_^ E!+ P04  ( "  TO5PA!DC.?'<"  #,
M!P  !@   %--+EA01JV4,6O;0!2 W\DFRF DCRIQ++E+N]4BI=40L-M.W;IV
MK*%G+'V6/M\][MY[KUZ^N&DV"=#7#?(8OHB0C#)^VSL O!@O2YD+ %$L HW?
M<P'=WS)X7V,N@*5""T(R+7$ @(K0Q0\5.8 1$IA"'4#F . =1;S7.0!@XJ($
MYZQQ ,#0P.Z5A*K! 8#CD'YT>W*WPP&<+O)E=Z NS1QN?&G[R2WK,%A9#')+
M6L[5P&O%OO1]7@\\P_6EO2,EA>0)OD(+_Q!0=>FE<!AX$LZ5POH56B$5 TON
M>CF,Z=[V$[0T( $(58\#:.&)!RS-. # $O84DE,'/-H[@21S+7?.M6O%*H#_
M/RP!]@,-+"])"W )9M =@);; ,O\I_4,VF:M#.4$,'.P0%S,_TX.5;#='FEV
MCA7H)8!9")+5PY<&YAI"23&,$XJP5\D!%[!T3-M(K)E>O *KA1"6<L#J:+>Q
M!(1]?G44J[1B55NL Q3K)@4[4[$N5ZACQCM&*YF)P.TA;+"67&<LNZEJ8>=F
M7W^+%EU;+/I-2S\)WYB4]F=/,ZNU6A&M168I=## %9N91=+HG61D%I2&VQ;N
MML7:3BO,3GM7YJB)]1=02P$"%  4  ( " #=83<B/D]-'541  "'(   "0  
M         "          0DE/,U,N3U!!4$L! A0 %  "  @ LGXQ(@FP),N3
M$@  NR@   D          0 @    ?!$  $))3U]3+DA,4%!+ 0(4 !0  @ (
M -68+")W,>%&N@$  #T"   &            (    #8D  !#4RY/4$]02P$"
M%  4  ( " #)@3@B79<W[F,!     @  "@           "     4)@  1T1!
M5$53+D]03U!+ 0(4 !0  @ ( .V#."(8%)=3?P(  -0$   *          $ 
M(    )\G  !214%$344N5%A44$L! A0 %  "  @ -+U<(09(SGQW @  S < 
M  8            @    1BH  %--+EA01E!+!08     !@ & $8!  #A+   
"    
 
end

---
Please mail binaries to 'psion-binaries@it.dtu.dk' to put them in this group.
This Psion binary was approved by Erik Johansen <ej@it.dtu.dk>
               Also check out:  ftp://ftp.it.dtu.dk/pub/psion/index.html

