[comp.sys.atari.st] Alternate File Selector routines, part 1/3

jafischer@lily.waterloo.edu (Jonathan A. Fischer) (02/25/88)

[]
	Here is the uuencoded .arc file containing C source and a demo .prg for
an alternate FSEL-type function.  You'll have to cut & paste the 3 postings,
I'm afraid.  I uuencoded this at school rather than at home with P. Dumas'
great UUE.TTP.  (Includes usage documentation).
------------ Snip snip -----------------------------------------------------
begin 640 fsel.arc
M&@AF<V5L+F, ?T\]   25T$  %<0.[-&+)*"   ,+U0T4 !"!8@P(-R4N0/"
MR)0B3$# 81-F3!DR(-*XD5A'#)LT8T"0>=,FC$808O* ( +""8@E;^30*0-"
MAHV594+BL.%B8,&5;T#<24,'348Z0M&$F6FGC!P0>=[4$1K&#1T7D ;X-(AB
M3AFD5(((F9)$2Q$0/4#02+'UQ< 1&L>PJ4.&)H\W8NJ:F>,"C8^W<>?6!<'C
M3)DV>OGZ!>Q&+EV[AMN(T4BF[U\%<!L+MOMFSF0WE1<K>*M7(TTJ4JJ<!1&#
M=!DSIAL&8?(0!(R!KF$K!!&E2A(J(" 5N(VY].XA3YQ02>)$-6O<Q5_';A($
MBY$D3(I,84V#1@(0( (>%#,'1$D\(&;(N $"Q9NF<LRP></0X9<Q8=B,N5\G
M?AHY<]"10D%N1:<;35<P1P199@4W0 [!&2#>'&GH0=,;9H  &QLT#04:?03F
M%AL120311')$?$$%$LP=D04(-T W@G$T#1&$$T,(405P,HBXVQ-+Z A<5C/X
M2),315SAA(EGT6 D" DZ0<035X!7PY-$2&%%$,$18 .66@K198P&CJCE$%WB
M *85+$%"0 YKGI55#,3-*-UN65IAA(,QM%;F;E-DAP453L# 6H]_TA1H$8,Z
M$0-K128*PJ*-RL#=DY02.@-K5TJ:J1,TL/:EI(QJRB>9=AX(0JF@\JFFI$8L
MV<2C<\()JZR69B5#G30V).NFNOJ9:FRQFABJKH@.NUNQ3=3@H R1*DL3LS?I
MZN2M)K*G:Z?2^FHB#L^.VBVS$.J*:J_792?$$UC4]&JW5#P!A1!!2 &>#+9V
M6P44]4I!97J\WJDH$TD0L6Z[,PC;:Q-6!%KP6>IAN:04_E8Y0[2]Q@L%%:6F
M=^U  <I1QQA(Z69&4'L,E, 82CWE1AAME+%%#EWLD(!X+\<, H8:IL%AB JL
MW#((9>!!AQM;T%#SS085/9,;%+ZQ$<]$ 9V 1DB)])]\89QALWA&S%9;&AFZ
M\092")'Q7TYTQ)0'"R"@YAS9&96GMAQLNPUT'R#L !W+83RE H!?A*S1&7-L
MT05:(*0<M @BP U)!.(9JD*!"8A@(XX011[< N(]>KG*(@#I.20/B&?IZ(]_
M <D"D2? ='H9N4%4&OE)5,87,QFM84P@G*#0'3F7<8+5(@2AP^FI&Q0JZYD+
ML;SDS8/@+/2:3Q]<]3=A3X3VJ(O''O9%@%\]N-@;8;YX$&+O.@(NN#Y [+/3
M"<),;4RT%$TGN[Q0\<B+7U9.UX#0/0I_^IO)[Y[BM#) +0U2*P_KNB2"X$# 
M<Z&S5/]Z]C, SF$^="C/26+FAJF(X0UXF*";1&"$UYU.0@:)P:;LD)\TD&$I
M$-S(!H<'0!42@(4#W%[H0D7#C]R0#CE<(-&,YL"H08U VQM('_PV&@4 [BD;
MVIT-$Q>E!96E"%W80@QN4+/P&&0.<#B;$E% IP'%P 8MN.("2T*'F6 DB\43
MX49(.!76#81C)'*"$9X  L+942,G4QSC')< &#"!!80SG!L0)T88= &2<R@<
M'>1PN,3)\)(S8 $,1"E*//0)!Z,<I6U(*4.X54Z)/(093:#G2$QJDI.3]&0,
M+AG)379R"[8!)2EE4,I3II(%+2#F*&L -S.R1HE.<X.ALD++1_82EY3L$R\S
M*4E*!I,%H1RE,DT9 U22,IFD9"9X5 =-H[F!5@.HIBV[J<MMWO*7WPPG"\9I
MS',JDP7J=.:F-AC-7,43<[6\YB^U.4]?YE*,2@/G,(M9SF.B<YG-%$^H".I.
M8!U490GEID.SN<N&8M.3$=4G/ROJSW1FU"#.XNC1CO71H-6RD"(]Z18L:5)\
M\E2E%#6G*H\YS0&(YR8;A,-2T # DVB,7O9BW10'(AX0>"%"5T5=5A-PU:XZ
M**L$N*I5Q^H%G[B)#Q%"*^K4F@"TNM5!:B4 6D'PUA6TH 7WVQT=\L>AC?3U
M#$7968802!$%HF %C]IA'=C !K80Y*QIW1Y;WZK6 <1UKFAM@7#RRCNC]14$
M?PTLSWJ'%.$<-K' *R%C'=LEM1I K0^8+%UGFY7+@L>ND#  9XL"DC4H9 [E
M04E,ZO(4WH[!MV4 ;GM:,""IA-"&93"K7".[UN"T=;:5C2MNOS.3+ZBA#FY8
M Z):2]W86I>R#L*M S@[AC?,YRE*/>Y%0-#>]]:N?W1,HG1="UO9HA6W$N#L
M=P-DFQYPR Q(B4$/.'D&-"!%!CVPB%6<<I']EE>VN*6 @,&[!C^1-[?]M2YN
M+<#9DUDE/3V80QX"=!CKI;@DC+4PB+>'VP\4I+MP**(-);+)^P5%QT=,XA7G
M(&,#X/8%-]X='/8Z$:0LN;A!(>S^I(O;[N&8M.!YLH_S:K2!^%$!3Q""$HHP
M!. 0#B]J8)LBT\+(%L2 !6^> 0U8<(0O'$QR!G!"<HH@.0P\84<$0Q(1)$< 
M&.!!!GV"P4V'"DX<P%F=KU1;?MYP!N&B!WK$=#,RWUSG*:"F19(;@)Z1U&<]
M2X$ZCPP. VY*3-: <\YO7F<,X_:;[%@ME)K6=)V%%"\GA/HAV2FS6++#!T;]
M1G(-,#6JX:;0AY94!JT.)0AL .>7U@0$F\O1CJPVYUQSVLX[ZO6O(4+FL B!
MV,:F A^(4(2P58$)5)!< 90]&V;G])<R *4JI4WM6 L4!$ 2DM68Z6TZ?\$(
M'!L4H8M (G-G1W(4H/<C36#(BR#R#3N])+3AQLP8$-/?&FU)DF1U%NA1N^!U
M3L*=@S/O/9?Z":>N-\L-;00C))K5< ME.>$<:_$XJXO_<D\=Z/"1W? ,#GA[
M&D8\-)([# AZ-]BTU'<=[N2,.]@.+T*QL? ;/DB!UU9GN<3M?<^'1G3C,((;
MK*U]DSQQ"7J.1CFXJ2!N!P&[W,/6>KJ]#G9?BQWFR\9IV2E9 XU'/>UJJ;:L
M8;22,%DM!U+7]=SKGI6["_O<>N>ZNK]>=;\+9^R"I^<6; #*5A]^[8L'5Y[0
M!#TZ1?[;?6^FY;.^]:YSGNYA_SS@9=YL2I)QGZV&?.)!;A (Y8DEK7^SW&,/
MGMGGO?:;9[[N8Y[JWB<.!X:'F_!1[TS[Y:GDF//XZPW._$F1^_+HUCS?.R]O
MT%M_9J77OMH5W_U'Y6E/K<>U\K]MA(,E/-[.AWE\$"]5, 1(D&Z2@P!C1W&9
M=$AND$C/]G&QQGT9-"F"0BB6$W[=MG\&UW_L\G\L$(#$1H &B(#!H8"[-W$5
MIS8/B''YMD]1UR?S1WR08H&L(CKA1W <6&<>."BE$H+G1WLD>(":EX +N((7
MMP4S$'\R.'S6%@.A\BFK$WXGMX-VQB[R)H):-X0F" DH2'WR1G-%<'./M'&M
M5!/T%SK.\BF;TGI1MWQ8R'):.(!_5H)%>(*@)QQB2(;@-$IG^'%/>!.?\CP%
MTB4[)W<]"((,]QMY!W%'V( 6UX))HW&P)FT4&$/LP2IM6(AN(@-Q9X6)^(.+
MF'6.F((LP("\$XF)5'C@]'&6F(8Q!"ZL0H@JLROCUVF?Y@1'('M!^'Q<J'ZW
M)VX+F$5?L$49EW%PPV@QT'%/""',\B@H8#8*5!1+H40CT1$<(A>]936(=HM?
MX&E2 &K-UXL"^(NV%WO#Z#-:1 :>%$8\M4JNMHRP6!.&PBR6@@)M(Q0QL09P
M4Q3)=2%BD&8D4QYM4 <$AFF99H7@*([FAW6^6(=$>([LEXX<4HSLN 7YAHSP
M^'',N'B(YBU-L"DH( 8T@8OAJ(L' 1KF89!(H11-P8WZ-W7?F(N[.(X.68X0
MN7?!:'44N8Z)LX0:N6^/-H_0!I*AXAYB\ 5<@SA+5!%$IQ)A4!YS@ ;TX08N
MP(T;*),+J8N\>),CF)/ B(ZF: +$:(Q*$Y0SV)'.!"T@Z2PH< 5HX$ @X!79
M:$=P,QD)YBP\@VDZJ)4TV95XAY,%&)'1-Y%C698767AH:3U#28,R$"K4TA[X
M]04C44A?T1\;,12,A1*SA#DVX8U;69,-&9A?.9@Z*99@2);J:)&)0WJ+V6]J
MJ3K.PBSLT15?D1$9<@9G\S0H 97<^(8*^9<V29I;")82B7N^UI.LN05DM)@Q
M&)L&81,@"2XH<(T>D1,?<5Q7B6F?Z)<G*9IS:(Z%B9PLH)S&B'V+Z6CRZ)CL
M02Y TR7X F>0MQ[D%X>Z1VK!@0%Y: "&!@,QD!6*EFJM!FL=ITJJ R[I4@0'
MTQXGA!YI4!Y*A3<GMD',,@=/ASDS,$IPB 7MYW+YN9\T9W,>%P,"FG-PII[6
MAB]Q(R]0=6L<*'D'8X#U C?B*3D3D(>%A@?^Z9]9@4J/-$;SEQ[SF*$@L"_]
M$G1A0 8#AA0J45A.<:$J<S&M.*6[9I\%4*/!<:.F&"']^9\%\*.'ITZA='@"
M]2@.8S#LTAY)NJ10 5K[(P=0&C0)XXTK)QQ8"@E:"H9<JJ/_.0 !FHR *J0T
MJ!X@P#!G"G[!H0%1FI4PRBXR*@4T:ISQEJ4XVI^[TJ=_"J3B)ZC6=C$K,3$5
MHZ9*RI)M6A48811."J=6LTIR!X)=P@1!X&EA)CD6 'JHZ(")1'HF*JC]YB#B
M(6<KNC$=(U54)!Y9(59>Y299M0!9Q0%9A0#+BJS@X55F50"815O3]3IJQ0%J
MA0!JM0#7.EMVA5=X\05QF08-UI)E@*X.)E@[$Y#M838,,61W.735>JVVI:W!
MP:TG^*WABEL$\*Y?,!1D$%A"84,&RS-HUAX%26!CX 9V@!3Y" =I@ =EP 9$
M]EC6"AYO!5GZ"@G\ZH7^>EN:=0 "JQ*YI1+M-5R665AI\)(3&S@.A!3WRK'8
M.K(@VZW?BEL$4:[HD5OHL;)R@!%XX[(P&Q01.K,@4+/8]6'@NJ_=BEL5 ![E
MBD8YX2 +6Q<S(0=M8!H$6095<3CM 0=]T@(UP$PV  .L)1SXZK3;BEL>0+5)
M&2#[ QYCT!\2BA1TJT *"Z\H  <N4+8V\"A-T 1KN[%-Z[$+@%L[(+=*21%,
M>1!UQ$EB,'3)I40+^[>!&P,MD+:%:KA,V[$$@%M'X+ATD =P0!-9@69L<S^H
M2Q.:RQJ<6P,04KB'>ZVX%1$"2P<FP08.HF7Y2!$.BP8^@Q%]JP8[\Q1NQK2X
MY1("&Y=)^KL]EH^P 2!(P3+%ZZX+"SS+J[&X%06.JQ"^DQ7 &Q3BJ[=IX!%B
MR[VT@@#0\658 P)X(&ELP )Y0+\L< ?XBP;X>X+BT5XMP+(;1+^49FGOZ29X
MP'3VJ\!WH,!HP'2-ZX7BD45S>;%Y\Q1,!R+.12&#<4)#ZQ02Q(D7,!#Q6[T!
M@A^;F19R4P0VXR83##PF3 <M(#(;H1&W4T-Z@$-2 S14)1 $81!;T1#@13))
MM!<7VQX# @F1\A-40+PB5!YWH!1(<0?&@S<@$)=6O$$AD!5!/ 15<0)Z&P8J
M49 L8QXQ01,G<+=Z\+E$HS9M\Q0/>A!LT :=43*+Y;L\<T5."<(]\<-+^\,%
M8L1L@(]$P2$LH%1%P0)DP$EVP )>X4XL$$VC%$UO5E"1W%&7/%,L8 9W7#R.
M-1!RI *(C 8LD  N;!!)0$@VC$2Y,\ISF;HAP04@@!4#  *R;#8BP<AET+A)
MAYE2:<$D,U^N##T%P<F,53REG!7B04B620>^3%\D,1%?01.N;*H<U)DJ<V.%
M7 9P8\I&A<K@H39H1!$J@41$QS_ TZ"KJ@*2S +L[$ZQ)ASBD03@T4 /M,-8
M)HVUXQ@L6&DBX (51% 5810\$P,$MBG19&F7N\Z6_!W",3MNHF<<HT3YX;O.
MTJ"7RUM2296+A1$D23M#!EI2<P9P4P9-4<,9@D85<;G4A#D%$4VA],XS%<$%
M,,^$9,].Q&4E SS"^V!+=#0*71XH8'&\>YUQ"AU8\QTJL,@OF\P$8-,57)=V
MH\L@X&8]H!=AL%A( 0,]H#RS?)4UT /JL\Z/?#0M_,T@D,HH010E 0=1S3;S
ME= 871XZD,VFS)\Z.B>,(\F-E-<#8"EI0<E]#0-9$2J![4Z(8LH'T)\]NM<=
M-=@[ZM@SE<U>Z,VLXS@@LTDC4S(7=\V)0QW6@1W:L30.C=94R0;LF!"R5-*0
MK#58!#P5[=D\;$5#$TLQ(T8O:,H%X*L&<=JI;9!.T0*GF[H8T4,N;08Y(T9+
MF,RZI<P&H9F^6[G9V\MRH$/J"$!8C,U!0U\LD,U,;0<_>4EWS=OTA;=*>S<'
M(94CE1$N4 97*0+24T'$+,ZC+$9DU,*[[=Q:,\YB' ;7*1%+!4#X2,,AD8]O
M1%\M0Y!A@ ='K0#QFQ&;# >0]!4L@ ?VF[\L@ 94].!.F4,)Z-#5LY0'7 "5
M6T=2(SD;(!XEWC8;T5Z#809R0!):,VF5IL[$_$$V! =SX :2HP$38D1.(1&=
M<3L[# -N1MBUK$(%H)MO0 99]-G5D:!3(-Y90=Y*H4=J8Q%ZE(\G\.2*<SP\
M\^3FL138.TD_O1%6.P9D Q(Z_$3$7$)M\.22DP'BT3:\Z[MP3I)/$>;JJ$?!
MX^5=<#QO7@=MP.1DP-SDG>=!SN<<4A[2.%\G<0*&#NB"[M)WZQ_6B^CZ31E%
M4SM</NE]_N7N&L/[K3]YX-\_0\'$C 97E,PFJ]_GFJ[NJL?!#,<;0;$6B[&K
MV@9OH]CD3<? +>04@D0[K+)O,%P:4;?S+177J8W'E<SYC=8KC)LBP>P<$D?9
MN0;SM<-$<1@EC;'3(C;@E\U$#1L72P8MW-QHS>GHP>?GOF5$/=N Q!R#5!!P
M0$4J$Q#9;!!/L!'^" +PH1*DCL*^FX\:/9<=$>-#%QM4O)($5IES0!(TL>\5
M[,QN'2!U8 9F0,O@ 06<5!*<Q 90.:H!0D(AM&7_CC<1WQ\6<3^H'EW;;1#Y
MN*:DND%S, 9X(Y<J[UX+?^(IB1$S3_)(8<$F+]+X0>Q00_%1#!)&49GZ_!$O
MN<,F+9>TOK7"!5XWQ$G)U<=*C3ET@P(Q3/ #PD@)$/:QG19A0QLLK#(J4_8Q
M@0)IT ,PT+AIP ,](&=TOP(K," JDQ4 (@?[@1>P@0<H<&8!R38LD 8I8#.S
MPS*5)K1W%.-M@."!LV6X?L30X] 0T/;Z'C1*+<<1?Q!"/Y<5<B$9<J8+:LUX
M@ ='>@5;'A1*P09F$$=#0R$6DK&R\Q,DB1_!_BAR=.>^&\=M$Q13&1,2&Q05
M#2(-^OM!0=_D?#]Q>1!R$.-W, ?=[?FZ/W37%M+ +])OL 92Z3,BS_5=W_9Q
M?P9R$ 9F8*ZFRB$H0'$4;@*LWC*GF'3U_Q6+W_:&+Y!TL 5&2C%4T@4N4*ZQ
MWJXKD!;S'S@O( -4)#O[KV9$ *I4T@4N4*XH:V1I,?^!\P(R0$6RL_]J1@2@
M2B5=X +E&NOMN@)I,?^!\P(R0$6RL_]JAOKLT@4N4*XH:V1I,?^!\P(R@.^>
MW_FY;Q#63"%=2Q%R(/)P0_,$ED;#GD2,[D"RY.=\9&EM_Q.A3XU( 2&P@12V
M8Q$B[^G(;\#4*+'L^I0]<_)TTO96\QT;!/=R3_<\T$4,PL(9H?>.E?L)L/]J
M]HPKD 9=X +EJA(KD!;S'S@O( -4E !] !T)@(22:$DN<&5.PS@F8-N[#!XJ
M@X22N$LN<&5.(]G2U#<J@X22F&\N<&5.(]GOU#<J@X22N(0N<&5.(]EN8"E4
ME !(*(E*XP)7YC22[0:;0D4)@(226'@N<&5.(]EN$"I4E !(*(FDYP)7YC2,
M0]]+!1[X7D5N_Q1P+_=T;_<VD/=[WSCZ#XDLF$AIT 4NT%UTX%ERF18ATU>%
M#XDLF$AIT 4N<&5.,R K\$Q4E !]P/9!L_]JMDLN4+6P#!YI8<X<0D4)$#)C
M  =Y$(W_L]KOMX3Y'S3V,<J:W1C5^:"C?,A+E?]!LT%P+_=TSP-=Q" LG!%Z
M/R A,P9PD ?OCYB)DP;N:$^BYW%=D/]!4^YI\.YI@21*PB14E #Y[L.?GP09
M MSP%95>X=$4$5[E05!N_/(_W40Y9/W0'\=Q;.C5:A E?A0'NYGS\?T: EYN
MH!)WQ1%(<1*KC#N^B_4@W%XJ7SLLEJ37__GY$?IT$_ULJE3 -5_@=<,?82$8
M,=3Y<[H#TDW5?A0^]@9<_Q-70!,-BS; 1>@T08UZN][0S9DB;>8.)!4-1LO[
M[O5F@ )#W5$9AQ9I<3PGD )\P ==L4E]-=0=-2 ]D!9J.R A,P9PD =#C<DB
M(#\BD/]!0S8H,-3N1 ,9AQ9I<3PGD )\P ==L4E]-=3NM!9HD19J.R A,P9P
MD =#[4YS)@+R(P+Y'S30H3)?KP)EO1$F8!M^'0,#LO]J]BF6Y )5R[L*Q =I
M,7L,1T57DR$HH )EO1$F8!M^+0,#LO]J]BF[Y )5R[L*Q =I,7L,1T57DR$H
MH )EO1$F8!M^O1:"Q[HDLP52V 4N4+6\JT!\D!:SQW!4=#49@@(J4-8;80*V
MX=<X,"#[KV9LV 4N4+6\JT!\D!:SQW!4=#49@@(J4-8;80*VH:,[.B#[KV:#
MV 4N4+6\JT!\D!:SQW#X7D4J\_5+S<C@T0-IX69)7 !+S<B,0P2&00>+; <H
ML/A=(COB81C7VQ\B?0:&@1'?31-THQ 7,5^7DP JL_]JA@)+S<@IL )NUP4N
M4+6\JT!\D!:SQW!4E #?G3B6Q#@HL-2,/" K< )!<#P13 #?W8Z,<P(Z<#P1
M/ #?G3CYQC@GP 4P<#SX'C23*6%6__[[C_@F,+^X4[\F<+^X4[\FH+^X4[_R
M3[_Y'S1XT -YT -WT -H(/=4Y/9<2YFXX[LH,$H6_C9WD.$5CK_WBSOUJ[^X
M4[_\BSN-U;@@,#LJ[Q0O&>,R#CV32;_M\686_C9WD.$5CK_WBSOUJ[^X4[_\
MBSN-U;@@,#OHK_PH9#5HMA^+' 8,\?[[C_CB5.'X>[^X4[_ZBSOUR[^XTUB-
M*QZ+' 8,\>\$7.,H9#7V<3=?@#=)6IV,;/VCO,E]?HIP+N?TO53Y'S3V<3>%
M \QT\ 6&C@(J4-8\WLZ4G,EN0$PPG<EN,&=]7P!R#N=R#NJ-?HIP;NBG>.DQ
MG/]!8Q\HO!\X3@9?T*#12.B&S@*7'L,LD/8/L?@@X,W_FQ]WZZ2U<\.^B^/$
M)>Q$OA%?E@#V<3>4^:!@W^<L .J-S@)P;N@L<.DQG/]5E  =OL-I@1S*P1RJ
MT<(!FQ6Z+1[S\?VPM! H,70L+A$J'\(JL_0_@P(=OL,]D!;(H1S,H1ICG_M9
M8<I/;1#S\09NO?0_\P:IF_YO+!'D',+0(3M?O_]JQH9=X )5R[L*9 *C668,
M-R"SXQ46/Y>\Z\SEP3,H$"@IH(GTE>TMX-\^0Q0J 3U^GTFL2S);H(E=X +E
MNI3EH<*22D6R<[%>T?<#L/]JIHE=X +ENI3ED1:CF'?X[OE?O_]J-HA=X )5
MR[L*9 *C668,-R"SXQ46/Y>\Z\SEP3,H$"@I,(OTE>TMX-\^0Q0J 3U^GTFL
M2S);,(M=X +ENI3EH<*22D6R<[%>T?<#L/]J-HM=X +ENI3ED1:CF'?X[ODK
MOL-I,9DC\?[[C_CEG@;GOOC>+!XE\3*& 0+ +0<G4!X='D$@ %Y(Y+L(L>([
MC'3)%<()8/X9,I)#Q^(@8 *V@0>HE!5CK]CB03?6>>W.O@:S7.70DQ76F8W9
M#AXJG!IK'S19L>([G%LFD!9^8&BHE!7I+AZ%?QCO01/6>>W.O@9K73*2+UPF
MWN)-7@9Q*CM]T/87ZQ5]/P#6F8W9#AYH+^Y4Y,UM/P=#00=E/))#Q^)C;\H(
M@#,@@G1ED+1;YI0@4 =IM!' +0<G4!YX$P=UD%Q( 3U9@1]>@6TWHFU4H ,'
M0<0[G!:]\1N\G$FL2S);D&U"T@4N4+6\JT FD!9^,'L,U[AB@#=AL 94Y,WX
MX14 %R0[H@,.TN$[G!:]\1N\G$FL2S);$' [T@4N4+6\JT!980)IX0>SQW"-
M*P9X$P9K@.]!DQ7XX16-MR5U'319@1]>T7A6(#U]/P#XX16-9P5#4-=!DQ7X
MX16-QR9U'319@1]>T7A64#Y]/P#XX16-IR<Z  +?41#?S3@KOL-XY7:-V_>Z
ME<LOFSB6Q#@HL-2,/" K$#Q!< *-^]WMR#@GH ,GT+BY_+*)DV^,<P)<  ,G
M0$7C/9>;- 9PD =_NU0L( )<P 4BD/]!DUO@81^CK-F-49T/.LJ'O%3Y'S2Y
M!1[V<3=?@#=)6IV,;/VCO,E]?HIP+N?TO53Y'S2Y!1[V<3>% \QT\ 6&C@(J
M4-8\WLZ4G,EN0$PPG<EN,&=]CP!R#N=R#NJ-?HIP;NBG>.DQG/]!DUO@81]W
M0YD/"O9]S@*@WN@L .>&S@*7'L/Y'S2Y!1[VX15'(TLHH&FV70;Y'S2Y!1YB
M@#=AL ;X'C19@1]>88.- @-U'319@1]>88.-$@-U'319@1]>88.54M=!DQ7X
MX14VV"@S4-=!DQ7XX14VV"@TH ,9P3A=2A@\P*!#Q^)5;8.-HK94--X%4=8;
MX05ID09]\\?CW1!30)G_43C 3 =?8.@HH )ES>/M3,F9[ ;$!-.9[ 9SUO<(
M(.=P+N>@WNBG".>&?HJ7'L/Y'S2Y!1[V<3>4^:!@W^<L .J-S@)P;N@L<.DQ
MG/]!DUO@81]><32RA *:9MMED/]!DUO@(09X$P9K@.]!DQ7XX14@&0-U'319
M@1]> 9(R4-=!DQ7XX14@.0-U'319@1]>891U'319@1]>T99U'319@1]> 9(V
M4-=!DQ7XX14@>0-U'319@1]>,9UU'319@1]> 9(YH ,9P3@KOL-X]8Q4=-=F
M  =I >J-O@67'L,KD :+T\('(!Y@[]9IA#6O[]F*$Z=W_?5>;@9PT 4N<#=+
M.?:*+1YTDS9K0S)ZPS-5(? 480?  SV0< !?'S)CD#]@'^IF  ==X +(_,\B
M," ]D!9J"P+>_+_F?6)W<\$J 3VY!1ZR(QY.?S;$:^9ICCN^>SE]T_>Z!0()
M<+%>0>U=L4ECD#]@'^IF  ==X +(_,\ /2 ]D!9JVSBSD[0G=C<7K!+0DUO@
M(3OV,<J%0Y4RX4!_NU2*_*"CG/]!DUO@(3OV<3=?@#=)6IV,;/VCO,E]?HIP
M+N?TO53Y'S2Y!1ZR8Q]W4SC 3 =?8.@HH )ES>/M3,F9[ ;$!-.9[ 9SUO=E
MW^<L .=R#NJ-?HIP;NBG>.DQG/]! PD'T =]?P 7ZQ6-8\J@8Q!5<398[-H7
MK!+0XX7V,<I?$%IQZ09_NU01OLE]KL@/.LKY'S1>:!]W\P5XDZ35R<C6/\J;
MW.>G".=R3M]+E?]!DUO@(3OV<3>% \QT\ 6&C@(J4-8\WLZ4G,EN0$PPG<EN
M,&=]7_9]S@)P+N>@WNBG".>&?HJ7'L/Y'S2Y!1X)T =]KUL@D #V<3>4^:!@
MW^<L .J-S@)P;N@L<.DQO/BSXX\;D1]W(,9V\Z"F#OTT09=PC1%W<\$J 3VY
M!1X)8!]><32RA *:9MMED/]!DUO@T0>F7$!-HY(\<P)TDS9K0S)N<SP8K_%6
MDUOU#.Z-8\J@T]L4=A0.CQ0?S:8(H>J8DUL@D #VX15'(TMPSP*V70;Y'S2Y
M!0)7DR'5:>W8V5MC;\H((!YI8^W8N8V\[Q5V\QI9S09($7#;-OQ6DUL@(#L=
MOL-9D1:]\1M4--ZRL^([G!5I$7 [0D7CG0!]T/>Z!0)]T/>ZA1)X$P9K0$7>
MC!]>4:@-0S#LI@/47OB9Q+HDLP6HSRY=X +E&NL.U@,+EDFL2S);8*@$PVY=
MX +E&NL.-B!B@#=AL :-.SM.?S;$:^9T8\R^:_O:/=YS:40ZOA%I@?[J7SA 
MWJ#OO_^(C_I8:*@$PVYPEO]!DUO@81\HO!^7'L-=840ZSN-P;NBG>.DQG/]!
MDUO@81\HO!\X3@9?T*#12.B&S@*7'L,LL,+Y'S2Y!1[V<3>4^:!@W^<L .J-
MS@)P;N@L<.DQG/]!DUO@81]><32RA *:9MMED/]!DUO@(09X$P9K0$7>C!]>
M88$%<S Z  +HK_Y?T ;@S[LS\?[V;P*\?O]T</\"0D7C3>THP.L@X /M<;^X
MPP8KL/]JAOKLT@4N4*YYL +[KV:&2C#LU@4N4*YYD )\'S208++V,95D0P?\
M@>D!\I8*PB!\!N>&?HJ7'L/Y'S2Y5<_@WO>Z!0+?81]3239TP!^8'B HT )=
MQ"!\!N>&?HJ7'L/Y'S2Y!1[V@<+[@>-D\ 4-&HV$;N@L<.DQS (KG/]!DUO@
M81]W0YD/"O9]S@*@WN@L .>&S@*7'L/Y'S2Y!1[VX15'(TLHH&FV70;Y'S2Y
M!1YB@#=AL 94Y,WXX15%RB\40R4ZT!!34#C$BV#\@>D!@@*:!N>&?HJ7'L/Y
M'S2Y!1[V@<+[@>-D\ 4-&HV$;N@L<.DQS (KG/]!DUO@81]W0YD/"O9]S@*@
MWN@L .>&S@*7'L/Y'S2Y!1[VX15'(TLHH&FV70;Y'S2Y!1YB@#=AL 94Y,WX
MX16?VOHZT!!34#C$BV#\@>D!PD8L .>&?HJ7'L/Y'S2Y!1[V@<+[@>-D\ 4-
M&HV$;N@L<.DQS (KG/]!DUO@81]W0YD/"O9]S@*@WN@L .>&S@*7'L/Y'S2Y
M!1[VX15'(TLHH&FV70;Y'S2Y!1YB@#=AL 94--Y_/-YFU/?J+O-!81C'ORJ-
MLBG^N!&:Z/ M&08O29)R*9Y]K^[/3;QE'#-541[4B!1LZ/ M&08O29)R.7L,
MQ_6YY2 & 9=RV?!M,S)Q:;S^'OV:V#/OWO 4<@:V8P;E+,5" ?/C34U4<6+Y
M&.]5<U?03V']TR$T 5ZS!_TTH<X1W_?J+O-2+!0T@1\Z%!,MGS9K0S)Z@S?1
M&\5R637G"P*&<?)T"=>5T??J#CU9@1]>L2J-,@,Z\!V"Q[HDLP6:V 4N4*Y+
M61YI,8IY1T7C_:YJL!^ ,TEE\/[[C_AL2$KSBSOU>[^X4[_ZBSOUR[^X4[]C
M%P/Y'S2Y!1XJ4-8;80)IX0>,/0 X0$7CW<9$8>ZHS3B:2$7CC1)X$P9K0$7C
M_<?C[4P4TK44\13S<08@<<44QO'0DQ7XX16KTB@TH /?(7BL2S);,(M=X +E
MNI3ED1:CF'=4--[OJ@;[ 3B35 ;OO_^(/XBD-+^X4[_WBSOUJ[^X4[_\BSOU
M.W8QD/]!DUO@H0)EO1$FD!9^T)\[2D7CW<9$8>ZHS3BS2$7CC1)X$P9K<-;@
MT?9\<\I$HY(\,P=#00<L,Y)#Q^))3 #0PS<2W#0JR3-+[_X=+C5Q"AXJ,YGT
MVQ[$9.%O<P<97N'X>[^X4[_ZBSOUR[^XTUB-ZTQ3B4MK,./S4>,H9#632;_M
M$4H6_C9WD.$5CK_WBSOUJ[^X4[_\BSN-U;C.5+1@ZQ5'41XQ+N/0HS(;!/=R
M3_<\@ -YO_>-H]@J7@?9BU]+84?7#$ P+N.VK=VR\_4H, 8]8-LRDP9=," ]
MD!;'<P(#(@9X$P9KT#?>+!Y=@1\; 4 1BA3@A42^ZT"I78TJW?*9__7TA19I
M<0)?<#P#(@9X$P9KD.[B@0+Y$?H!\@8Z+KD@\ 6U0U]121.X#$!W$)5$ Q]O
M'<QD$ )64_;)G0:+DQ5I,094)#O(#3-;D :(M3AI<0)<  ,G0$4)T <J0S8H
M$(W_(TM;@'T@$ )I<3PGD (F8 +1^#^RM 78!P(AD!8G\ 4GD )C/SMP/UC9
M73<I^=--E$-Q*CO(#3-;D 9ZOSAI<0(N< )4)#O(#3-;D :+DQ5I<0)<  ,G
M0$6R$S)'__[(#3-;D :79 *V+3/8E_]!TP=L'S0A,P9PD =@W\FK_=T6VL('
M,,')SEAO@Q)UD+T(0=TO\]\ -!2!9<R^Z\J=/?Q6$S)'#_:=O-JCG/]!$S)'
M#_:=O-K(#3/Y'S0J\_4KOL,]D!;9)B0#0MT;@0)JV\)/+?-QN1'4O1'00]UN
MP$;YKP!] !WB$<2<W!A(WQ!34#C$BV#\@>D!@@(#$L<$/U]1+)?_CN/$%<1Q
M3,=-X=%0N1&!0_T@H.TJ =L ;AAU  <OH%2&008;@3=Q4 ?)=15!7#74_40(
M,3P GQ]U@,Y/<>FD#O>@T>E8$Q2@WNBLQ3KV,95D0P?\@>D! O>-P0)P;N@L
M<.DQ[%@/'A?07N>HR^:,I1*:!HV!0_TI #<M 'DK "%*91ADP.-*91AUX-:#
M7NC'?NBF_-0R?S:YH^A[GIO'?D=]OLZ7'L,M_-0&0=U/-#P GQ]U@,Y/<>FD
M?MDJHP*73NHKD!9QP?C_JQ231!-5$Y66&0=UD%QV9#5>F.\R'Y?6[:!(03<*
MH>5S$#@J 3U?KP*73NH^$*^$;N@MT$4,4@0I\'273NII >>&W@)=Q"!K'S1?
MKP*73NH\8!M/=^FDGA9S+T70T?D_P<F-@?0-,07WD1_[<>DQC (#$L<$/U_J
MO[5!C! -BN.#\0:IF_Y(OV6Z4=P+ ?#Y40?H_!27'L-]##3V@<+[<>DQW!5&
MI.,\#N>&S@*7'L..%;\X3@8ZSN.R\^/0!5\[GM[-C)GS!>,RCO[J7SA&I,Y&
M3B=5#CUP;NBE/#MVGCN*ON>Y>>QWU.=6HP*7'L.,+Q[4K1 8P>Z>'A2@WNA 
MPT@J<.FDGA;12.B&_A-=840Z[@8OT$8#@F1T8B@1C-:<[ 9NH!(W7T-F/O-V
M\ 8[%CA$0=#P(1\@ CU?KP*73NH^$*^$;NA5#24*PB!%D )/=^FDGA9P;NA5
M#24*PB!KKP!] !U5%<2<W!A(WQ!3<!_YL1\X3@9?T* H,"!Q3/#SE8\H?+=.
M&L3#HS4DY$3EL4'_3L=V(+8-"C?6O,AAP!!50S<*H>5S$#AYT,= 8Q\HO!\X
M3@9?T*#12.B&S@*7'L.*G/Y#(2 D?&)P;NC)C-:*ON>Y>>QWU.=6<^DQG,SK
M#AJ=CC5! >J-KDC0L\AA,!1TT,)/;1!I7QMI,1)N ,:Y' 9W0*.I<19I(<U1
M21.+' 8,<=DJ\_5P;NB$D19=Q"!%,/9=8LI/+?-QB>9&)+;J',?&[+NVK]VR
ML_]J9J@$ Q"VK]VRL_]J9JA$BG1Q\4;,ESP@(!GH 0+&C@0)7J@  >?-G#1T
MTKQQ R(,'1!TWL !@4).&38@WU ,8](-G10@5+QHH "BG#E?"JHI,X;.EB96
MIC!)$G!@P2]HRJ0Y@^8CPYLYQ>SLN44H42%/L!@UF'1ITQTT$_0)>W).&1![
MPB: JI.G3Z!6BQ+DJI2I4Y)LI;JM.I0(5JUSD=9M&A/$E21.B$Q)HJ4(S!<@
MW-1I<^;-&S(@P-9<B[,M5;A]!09&J)!AR<YZJ<;]NU6PUX\3Q]218R;-S9<@
M($NF;!FS9K$TPZ8Q0Y*,G#!W,,+4.>:+<>0H3.2=2H?%ZJPL9+# 0R9-&#8L
M\G3_SN+.>/!HSJ?0W =$< 42:18V4\=-3XT<C4SY8I:.FS!ME($"3/W-T1$(
MM;%1QG\!@O"&'""(P488;JQA8!HNJ41'4B X4<053@311!$(IG$2&?)--!P(
M:?3 4 LQ@)041Q)2:&%')H'0'PL.;EB&',F95:*"7Z1!QAQ;I-$%BP;VE^),
M"NC'7QG^ 2A@&BRX4<8=#):1 DT8?L2B9F.@P5),6G)II69IU;0B"FF X"((
M,,*DUAQTR#$&''F@D&:7+$"%IQP8GH'D#%VL1Q8;0K8)T:#V\>GGEH":D& 9
M11Z99!=;R- %"S@HNAFD>_9IPI]6;H'#IY:F0:212"JY10PQ?#J#J,#5Q)QS
MQ]T1W71NL> AB"(6P4(,VYT7GK+F>8>>>NR%]5Y\"LQ7WWT;@2!E=W)\85(8
M9 P(PK='Z@@'3\.9B!FW;CV81XH=N8$9G@^686"7%W)TPJ5SG(#C<7FX  ((
M03"J$KAJU('GO9/QZ\*3-&UKF[=E@(N"<6G8,0<+<'B$!@O\9MFPJ_:RT-T<
M'6^8 D02(7AM1MF:1,=L;A@(@X,<_2C'@R#$F.T<=8PQAKT&RD13F6="DH *
M&&O,@@HI?\QT&BA[K-F@07]4FQMFJ,3O%EUH%F9""JBP&[^:T=0FTA#2QP8;
M7<Y*0]@)0') RVZCU*6#Q%V*X,YM@$ &'6'$!.78@K]!>'4Z/\@"EKMQNW$9
M>)1)IIEMU_%VU*K"\&G==T^4]TH;FLL3",F5WC2/4;-!=77Q8J:""Q,9'E9,
M<+ P1MHUF3VR@@8RY!#H+;OA-<D&=ET?9GE0:7M-(YG&M@HI&'$&E8.',2#O
M"9"ADJ,)#%HJ"GE';3*A&N,:?IYC>$2^YFR8'[7ZXKM?OL<LB#"["B*HWSB$
M##'"'&ISF_=M#G\PP$,,8*"^-_U/3B^:P:W0$A9(#"!.#.F:'-KPA>_\B XH
MT(X(9L6I++RA#B PDQW.@C)TU:8,F%&*C^3 !PJ!H QM@ ,=$'*R-3@(0H4S
MGI;P\#H*?21J+K @IX;P!"=0 3%5* (?I% $*D@A"WP00A"&L(0J0 $$4 @"
M%9#0A?[]QH)S2%V9X 031T&" .T34@QT,"XJT0P%,5A/W0;0LCC4 2,LDE<:
MVI<1-YQ!1T$;VAP,A((?P,1H-7EC',\B SJ*X5MK>,@;6Y8P/"6.11\)PQG"
M@*'GU0V.81#2#.@HI:CQ!PT/HL."4&"^D\UO!^Z)Y #&LAE>0J0L9W&@''8&
MH1 (KXT5O& /-,C!_Z'@?[BRH,SNR,#?Y$HLJ$,#R4CRP#FU0(*B"LL=M*D@
M;@Z39W-B( 5'Q3Y)Y0U0<%C!#*JIEN$8$&ZI\AP$07 "%YR@C0D9P!Y;YB..
M%(Y=/7$7" 3&,Q<(#))[%)\[D;<%W[6!7P,!U#NM%,T!2+1/7[,H1EU .?_D
MSXRYA(@O$P!,M 3TE"^U8,L*]RV4^ V2R?3>XN2DK?ULC0Q?F!">G'.2-+0!
M!?T\ <C@UZ6.ODFG'MEGG5Q:00)\E'P4%2GR!E)2-YPTFE9M)TBS>K:MND"C
M3.7H&7>9S):Z,:QZFBCP*EI6X'$5#R:U5%H#M 6HTF$%M0(KJ>1J+[K^SEX9
MM=)2WP8HOX(UI'5%[%E3Y=<E,>0$7(#!"=:ZTI5"]K!S& BWS#"A0YI&!;1<
M@0SR" (3-$2!ZOP!"*P811"P,@A,F *)K(D"K0(O!2M8@281T+(QG- E,CK+
MR8R[0I-@YJ90@LB;?&LO$/@ !$T( A:,D 0F%&$*4]W#*5M&-1F5MR*+3(.$
MRO #"YK2@M0-'G:URUWO@C<&FBP >8DSAS?PJ),?68KQ<C0A6;8->>\=P#3E
MX 8\ZA$2Q)W(&C!$AL+-@0TBX5,*ZX &$+1W *:\)DO/"4!MS6&(('QPZ)++
M$0R_P8<:C)?BD@(AB/HR+,5[PQU*)*^.O$UPMFD7H:I+(<S H0ZA_(@8RG &
M#+FA4'P#@>L\"='(V4:^#@E+C.'4 X>PB =H BTNTQ!<9&[&GE]3D@M&6UHS
M[U%*E"L3AKH6G:]9^2:L2G.B<+E?(,N!1VD,PTA"$B$F.QG*;R#.E&$370O>
M>0[!'>Y,>VS<^@28T6KQ)2]Q/!'C[;B_<OB(C_PL9!,5+;IO\M-D) >3Z[(6
M?-Y;YQ[CW.$ XE:W:]4@E[V<!AX\&D9C+C-:!BHZGGT')0@-R9!/755[BB^'
M6)VKFC5*43+7:K(!:G5#W R) L"Y<MKDVAOJ7.T\5QNP>ZZJ+RW8V6QN\YG@
MWB=M'?.;&]=DTICQM(YB6<?O#*FZ$$UU?%OP:&V_6BVQ=N, :,U3(]RZ"+E^
M$)<?/68P#QR_+!*V>/%F[!_SZ[T$<#;[H*UG;)<!9.>^=E.MNVU9=_O;<A8W
MN:5M;FFC.YH%8#A#YGU& JR;K;UT=SGA729Y2R&*N.K#'I/):1\C>R,L5,F"
M.8(GCRC,E,(DIE1ID .83)TDK,6EW8B-2*$1C47$Z28(1& \$+2A7O^>@PB>
M!X*UV)'!**@FZ.HNTXFTM'!PV-EZ P?)3<-G(O"BCWU@EI_]<&M*"NK)%RIS
M&7'-H7TUBSO8$,2SC[?!(S$_9%05E,J/0)UO\&KA&-(%PQOB=4$7V<@<! :"
M(1R7#@;Z/!W*5-U2[H;R9 "TLGLO+\J1)$S'FVNBX%5*X']M( 0SF(ZH9"#9
MT.;*=[E9?Z7LD1\!&6430DAR?ESU4'=$R89VPY,-^;!J05)BW3)+Y.DP^=Z@
MP"QX]6I78<""KB*KJ]K153/0?_E' R@'/")S4<C# LZW@+_7&[HS&P2$)U^B
M &,#"0J ?_ZA21$Q$:/V>7/@0ZHW''D 9;PW!FL0!NOE>K)4,_C!; K -@FQ
M-/OW-/YG@_FG'2H@@#CH'S3P$ 3%(24%>R^8$B A!PBA>Z'W/%C3$SS6-9H7