[comp.sys.atari.8bit] Source code for PC --> Atari disk utility!!!! Download this!

Chris_F_Chiesa@cup.portal.com (09/30/90)

Greetings, Netland!

  At the bottom of this introductory text you'll find appended the source 
code for the almost-legendary utility that lets the IBM-PC (and clones)
read/write Atari DD disks.  Before you ask, no, this particular archive
does NOT also contain the executable; if there's interest I'll post that
too, but this is ONLY the SOURCE posting (plus what little "doc file" there
is).  Also before you ask, no I have NOT compiled this, but I HAVE used
the utility and it DOES work.  Caveats: works only with IBM "360K" drives,
NOT "1.5M" drives.  Writes Atari DOUBLE density only, in MYDOS format (which
is essentially Atari DOS 2.0 with subdirectory and DD support added).

  In addition to posting this, I have e-mailed a copy to all who wrote me
e-mail expressing interest -- EXCEPT for "trek!ihlpb.att.com": Portal 
doesn't accept that as a legitimate Net address and won't mail to you at
that address.  Hope you're reading and getting this; e-mail me to confirm
you DID!  Recipients of specific email, so you can be sure you got your
copy, should be:

    Ordania-DM@cup.portal.com
    jewison@vela.astro.utoronto.ca
    don@hpcsd02.cal.hp.com
    S12124CW@SEMASSU.Bitnet
    uunet!bcstec!tahoma!brf5422

  I'm not sure whether this can be UUdecoded on the Atari; it should be 
UUdecodable on the PC, and the result of UUdecoding IS unARCable on a 
variety of machines (Atari, Amiga, Tandy 1000, and MicroVAX, from my
personal experience).  Good luck; let me know how you make out using this!


---- CUT HERE ---- 8< ----- CUT HERE ----- 8< ----- CUT HERE ----- 8< -----

begin 777 util.arc
M&@AA=&%R:6\N87-M`'P`N`X``,(06[04E[T;```,">BDH<.F3((@5()(20*"[
M2)HY:T`D>?$$!),T8N2$D9-'@8($<.J(89-F3((O<\+8*6-&S,>0(TN>E%-FS
M#IV6+T62-/EE8YDP9'+&Y!GFCIR!983N/!G&S!LY;<+042KSRYB@('56;8,5A
MYM(O9**F<3.0*L\S9>B0F6/VI!DS:>38;/O%C)LR>*8J(')$RI,J4!*<D?.FI
M#IR31!`&\?@E<<($<\J<:5/&#9T$8O+0*0/":TD0)QP'.?$1+QTY;DZ>#C-F&
MS1P=F3>7SHM:M<;67]Z\C4P'MN:D"4S71EEF#)VGN7>G]2V[L>+@;M9Z3-+W%
M;^#!A0]_H5($"Q7&W+U#EDS9,N;?G;6.`3WD"9$BI!.$F3.G#N4$8UY3]PN8?
MQ5H=?/$'A0([$)B`%&G5@1H(<,E%!PA`D4$3?2#H!B$(-<0@0PNQ<29&'6^5+
M(0<(8UTX!AH;L;;9B!MIU%&!8(E%UH-P$&;271OE-`<:F,'Q41MOV-$C"W/XM
MF`"00H:!!PLT;"$&'%W\&"1F2TIWY)1CL,'D1SNR024+67X4X9=*?C1&&X>)2
ML20,1A0!`PQH?*2&&`:%529D(LFWI)H*V(F'#B"]D::1-$T58QAC#01"963XH
M6.`."4RA$F=#*$B390T]%)$13T7U8(DQP-""$.A)NA((0=`4!H$&IK122RA$_
M9MQ3<Z2A1QDL@"#K<7*,49AEN;KZDZHI&`@")`.,]>"NM-J*JZ[%\>IK'98]X
MFL"Q`YRXD:Z3^A3&%J%V\:@"*$W:$D@V)H"C'#KR^*240CY)I)$A[9B`E?7R0
M2$8:[4+&KYEL8(7'4_X2R6]6]N(K:'!S)``)`3M,05YE#T8XX1P5FL'MJ=["E
M>^\<!G\4<,.U^G?'4V1T=AH(_VU!@PHQ%(%&%PDDL$,09$A8$\86&L<&"".]1
MT1H(QS4TA0Y3).'QOBS@X"24#@^PPQ%I09CSQ1EOS%G'5PHYQI(U.`QQ06Z<7
M00<:)+H!PLER6$D3'"`@.<<=8N_@*QQY`,V&T!$5O?<88?Q,&9`<<9EGR:'60
M#<<;R@+-6M]O@!!#"S9E[;/>:W@<.`L=JCQBDT_2;+-"1\0`0@_0SCIBK;>"?
MX"L9P"$I'QJ<HP?'RC8\+?K-4APAP^FI\SK'"ZNUYC';*=\^XA:UKC!#%RPH8
M67/$O')&AE1A.#ZTLI$';7S7YVWF.0C,I[%"#=#+@,/T25@F(N71/@7"&6'`1
M3;;9:*-PQWP@T"!#L>#KG/+(U[P;I(\&TV/"3_95MOG5#P3W.QL(],<_',``Z
M@+(3X,KRHP-9W6X-T8L3^,)`.QC4;4)5.YOU-*6K/-BD#&WPF)JBAP<NH<%+Y
M,XR!#)?$05FAQ%E.PD.4P,?!Z]$A#%]@@QLX5\,$*"L!,9@!$CP2J,/4ZB4+A
MVQ<6#Z.P07VD4.02UKD8Y2@#(<@F3^%,$Z9`A"=,`02<@HI4B!8YAT`$!$-XF
M@V4(\S,A_"USUIK03<00JVX1RUC(TM;J#/D3<,%`7*SZ@B#/52.AJ6M8_7I7J
M`.$PKW[AJPX).UB^_$7%@<D!/SQLXMX61@*`845V)0,=E#YB2CW1T&,UN64"]
M"M(PII$!>>.KB0Y<!C.9#5%V66)!#;Y8!KC)[0X?>6(4I[A%4E;Q7J+,(ENN'
M^2Y(U?)K8*HAI%9YF%8F`(R2K,D@H=,H5D$*04"Y4!.RT,8W2DQU[I2/JL@0]
MJ_C)(5<22L-*<O4A,P"E6)#"5N.8]4^6'64EUL*6(H$&(J!L(4,R@"2,O$4&[
M=%ER79DT4@8Y6:1^U:1?5T28OOZ%G\!YB29G(,Y46LH&+]EAGU';`3Q3ID?.:
M,%1.)BF4B-B5@%HJB88Y11`=%*2V6Q&&1!IS0^2&^A0%"%4.<M`!%1?'Q6Q:%
MT:L,2VJ"%J2H?='$9QWA)J'20BZ.LK.,-UV@1V^$29IZ*0UOD*EAK)H6C@!J^
ME&1HXBB_ELDFRNZH,)`!#&+`(YOEL0U1B8[KW@"[%SC!/G0:D848NDUI2K%=<
M9JB;J2B5!0:Q(0QGZ->=U.`&DYB!)$:"G4DX.-0Q6$9.!GEM&NBUL#MQU0R:.
M*R&<Q`HXDF1$*BN\XQQ<N)D8.M$\TZPFGZY)V&L&5DYH@@P:GO*@0A6N0+J%P
MPU][*UA!`9>;Y3U,=;EZKQJ"UF/@U-#ZD+6#Q\*A(.5YD!&S)X:!L"6\;!"O:
MNMYP&6`.4)A!'.)83#+=!5-)9&]8&(!Y"X?0/DRGZDPC'DO[6M12L5!U"X-D^
M"\74"0XA"R\(`A8F:QE$J<TF4@%EL>(*E+?F\PI'$5_VYEE/$-R35_DL2H[+<
MT$_5`?2ASRKH01&9+$PQ],@"+4-$$XFB$2F9#!?5D$;;:A2DS/62.5)ICV1(/
M4GJ!DD<G%7-*`<O2XKY4,C(UDTL38(<N;R:G.$9*A>X2O*I64XO77//"TLQ>7
M3:)3R%XF(ZOJ/.0O@]2N3LPK;_9JE-/DX:]G;F^_UIOIZ2)S2?)5@%%\A29`L
M2;7`*`OF:Q(<S=8^^+D,5F6$#S/J-Z!)NNE%Y:8%VVG#3@FQ,UAL8^MKZ\BFI
M['5EL"QF190USK;Z,M%-`&M-4N<OX*$L8K[3887+(_HBJ+@8T8CX]J5<YL+PL
MV5#\[#5]N[#ILG>]66RB;/'SFMK>5MIW24"E"R=F3MO+TU@"M?H44-M2#QC50
M;5/U,-6D8%<WV.&R'C16ST1A7:.72W08`S,O<V$1IXS$"T+!B5.\8E^UN$0P*
M7NH<BJ6`:E^[-Q<7,\"])G`<B'KB!C^UOE-]X%4SO-6Q!OJKR:EOG(OTUVO*G
M:?OV!3CQ27516*UJS-^=Z^N>DZV,3G1TR@BI.'I*GO1T(PBH<!M`&J@IG9(*#
M"HH'0H=&F:`@"E89XH#0:R%KH?Z$,D29/-&"9CFC4\Y6E:$5ARW(P`9;[HE31
MY$BC=#UZE)H<:2?%_$E[$3K3@)8=TYP6NNE!@7&8*IH**1HBHAZV2MN472ZU_
M_6O:Z3"`H(:![CP/^@<5C:&$KT-EQL"9(XXD=EBBG2QW1S7;EQT$4G4!%;,4Q
ME)&0P0PP/ZR66O9S_&1W<VPR@@C58!!&B0'Z0I\YPX:Y+^B=:'ID?QP(G/`&"
MY<,:FS*TW<H07'X6F'`'2%C@^MLO=$"C<6ZBY4_[YP(0(EFDLAG#\V-2IP;98
MM2/<I3?/IQ?>!WV`4A]B\"6AHCN:LR>^%B]+PGE08S,S8`,X($+(I"4QD%,*G
M.")NL&PC@@)J0"UK@$%30@8EE%/Y%T\MV`:9M31:HD$CDCN=MP-$@&3(YX+!_
M97\UT&U2XW5S1&K&AFY19()(9W]RXFI-@1=BM50+`@-0!0)/L`2YT@*FDP8:>
M0U5$-6]EDH5_8EU@16C:)%UK92AHQWB+LG4>@5=Z!3>51%=AIH9XD%--$`9K%
MX%,"N(.9!0*B(@;S408"0S"!Y1^!2%\>!P(V0`,<HBA[4S8?L2]"8F`;]!H>:
M1`=K8#,FMQ)R8'N1PW8O@'N+YRG]QP8*8`9M0`<H40>`@DRT$S@YQ79'R(,BW
M`E_3YR7TA7N(&(S@8X/VAX/Z=XQ$17'X03M?P'8-8S/WI$<I4RNP\P-R<H%D!
M@#+])T((>!G36';)80:\L0(QT#3#%3%A0!D5,B+[4GH4PS)Q$2UXY0;;I`9ZS
M<"]I9`=BDC/1R`+E^#CGR!LVXXNHXXLM0#XT``-\8$%#Q(!6M%VIR#)O`!1J+
MT"?_F(O!1Y!L=Y!ID9#'ASI;8$%\$`,V\$@@T)!L9S@7>"+1(XO?J)&`,HXGI
MP5`B20?JR([;YP;]^(UMDU-F"`(\H(BY\G3:4C;`YS5:0ARJLY,PB1_#F%-ED
MP`:1T6<C@CI+T))::2;9E4Q`Z#JB6!P?U(UU@C)XA@8BPAE="3AJ0R<@X`-Q&
MHR1:"0(C,)5B*7\CTD-F28J=6!S1F%,U4A/VP1DT@8J1D8USIWNM!1PX69"XP
MH1OHF!8]:4';%Y3@*!\"*9,R0)0:LWC[DW"^&!EQX)B\QY%MHU7)^(-\:8FSC
M1X1&Z(SP56\3!RQA8S-*Q1$80C1I0!D\XP9LD`<AL'$*H(>3!C>*QE<QA9!][
M"&:F-R4S!(*[0SJ_@SH%90;,9C$[LX'^D7I3LGH=:$O#-SW%ARH)L1!PM$9W/
MF7S&"5,R96./`@)XA"),24<7<A=WX#J64H]FY4\O@A_\I#QU1Y\3I0+*LP/TU
M^0(J@'QEL)__J3IYXP;OR!DJ\`+&`@(@IX^*^(7U,0:\1Q]F4`=:`@(S\(5C@
M80>!DP8I$Z&\\B+D<A6.5E>0=W3Q4F9+LR3#EX0S(`0B]$0RP%A`=76V>!6T5
M1#!'52:%8A5D,%Y>1*0QVE'+.9\@,(B%F)\/:H]G]:(&PA4H0*`9>J`)NJ`-+
MJI]:"J#(5Z$@<*$9NJ$8XX5%^:$A.@<C6J(G6I0INJ+)(Q5Q`BG7TIM%R1ISH
MRC*5D0:.&$E<,:-A5J-D-GF:IZ,:.$*T,P,Y\*/F$:3;%U1I\05<<:2GE*0UG
MM*1<X:1C!J6<*J5X:"U0L!%968F1L1$GPB#R`Q>\M#8#@39WD`8!XSH;D3(4P
M"ISY]!9Q81,H0`9'Q`*_6@8(12["ZB"*2E2,NDF.6H-+(H2S)*E,(C/PM20WC
M@%T5^8!H<1.ZFA1UT2`V(9\&8A>F4:Q'M*QU<1=Y\:PAU:@EA:TRH'WHAJDHZ
M=3"PE`9,$JF?Q@(R\)GT-07.DC79R6PE@CQLX2#[Q9I[LQ;0!#X(QG"ZY&`/T
M%W2[-&OG9!/[54TIM6U,@J_A2JMEP)I`*J32IJF;X09)>*^6>AGZZDG\6H/^+
MNJ-$M"0#JX(':R$).R(+BS)L,09X\[#>6;%"M#2K5G]WXF"`YK0'@[%-)+40^
MMC!$FP<?ZX:>:DOL]J1@Q%<MBVGVPGI"PC0X&[`#ZYUL\C`B]#:Z<AQS4TU=;
M6ZKHI*[QNIQ?$*YK(:\CA'K&F;=IL;?+Z4.L8SUT(U\"6P,VH$P:P@*A(@,TY
M(+`P0`,XP"0PD`,VX!'[E42I\4L)(`.*.SV%FS79@WLETB%L,8JEZ+DP0'"WX
M>1ED<(&MNQW=007LM$V,H@`:"%)%040N344``"3Y?`"@`@``PA!:M+X(V@,`F
M``Q4T)0!485*$B8@X,AY<T9.F#8@TLP!46=.&3(@Z+P!(:=,&(QAW)!1<$=.C
M&CH#@]`)8Q($F3=UQ+`92*:,FSDG\[B4N*8,'91S%+QQ`R(DB"1"FK08\Z8-$
MG#!TTL@<R-1I'91R7(``$;",`CIW-LZ!*6?,0#-I9DXT\T9.1H$4H[+)6;2C/
M@H('70PI*A)$$"I!I"1YXB+(E"8N%"@HX@8K08,([YQ$`\+-QJ<.V_@L(V=B7
M2)`*!+*!`T+SG#EAS@R4S(8-"#$T)<)A$R;/1:U<WRCH^)$%B)(G![8%P59.$
M&ZA%=\Y9X]LFUJ]PJQX7.?&%%-\OKH`8_B()[JX*I'\F/IR,;-IYTK@Y\S9V5
MQS$:Y>11(!'$"R:XDYAI#T)\W[EN4#742NH%%89]0OA&!UQHJ?5;6JY91L=KX
M`]'AT$VTT=&"`A=E],8+9BP$T5^&#9%$$B"@D(8+9;B@H$`ZL>25&.JQI%.#\
M9<R1PG?1-34=1@">U98"8;3VVE7\94=<'6[`E\90#QII$T:2+4BD2R;9,5`:5
M-366!EJ<I1B$#KX)028(0^BPG5M$Z)""`BVT\%9]]2V8DA!3/,%$045@F8:6#
ME=71!FQRL*"`A/P--5`34Q#QQ!04630';D$0508>6+E1I`(SN%"#"'X"RIIK]
M%=51)!LZP1;J0&D:BFB;:X)0A)K#W8$&5&5HR>:C_9T:U$FX56%1D@CYAQ&3(
M<H&0!TQU>35''1TIR^P:EMWQ&QIIC$$9&5EN.9&MV:(1@F)4;`0<2A[RIQ)+A
M:2C7TT]EO.@5MW]NV6548+I5'UNMO7%'AV+$J,!<<TSXQGXX5O90CNFJ>BY*\
M1&D$74HKM63><CZAE)@"($`RP1%OO`%D'6,PQ[''0]PJAX--L#3'3#\I`!H(]
M=71I;"YC``8`)/E\`%\;``#"$%RT^HG!/P``#"/2N!G#I@Z9,B!XS*%#)LT;W
M%VA\*%`PXJ`9@0BG%!DR)8F6(B!DU+`!`M*!%RI`#$$3QLT9A'30I)D#@LX;1
M$"S=D&&#,`:,&C!`D!'#1F@9-W/2T,DC=.8:FBI>3`QH!H1&CAY!]N@1<B1%9
MBQBM;ASRA`C(&%_+7'23<2.5)U*F@(B!@V(9-G/*I%W;=@A9LR!@[`U[]6W<?
MD#;LZDQC9J)`.B#P?KG($T6*'0H>@Q@3AL[D-)4O9W8#F4P=.)]#8Q[#4@X()
M%63:A!&HU#)F(TF8@%1AY@V<HY99O!;C&[AH!0OEU!E3FDX8$'L4E!S`.HQK[
M.67RRK%3ALP6&3&Z8)Y>W75G.G+&0QJ@N0Z=-&W*J&=/&H3!SO*EKV?SQF7D7
MH_.5!X(;8<2W10PSB*<?=:T)54<;;>2Q18+S]0&"&61T%@9FHY4F1QK<"3=&G
M&V1@IME%<BQD8GUSA,'=%C4H*&!><7QW0Q<@<+6'#2S$($./.+!00X\Q]'@#5
M"S3T"$.//,[`0@X]#OECD#$D6>21"+(``QY&&-''BI")H91L<ZRQ!0XXZK@EX
M#DL&A@<-;6XI0YQX^"3<EC`$Z28,2>[YXYXQ?*E`'4BE<09;9&S6H`IBP`'FM
M:WF-,09ICZ(7QAA/52K'I6M\\8899N1%AW"1VB2'IZ"*RB&A21W:G:+6@2!&=
M'68<"(,,-"C(JJ&(PNJ:;'`<*`.;NA;J:J("-B3'K+7ZA*N,#2I+H($^P:#@2
MH,;VJEFC<.08V*-BNC$9&V&<X2T,F.UZK*]"O3$'L[;B:BV'L@F$@G5GC"$<A
MOG:DL*!F^(X1X*+\;J'@=-%-IUFD(M(Q<*PJP"&<"O@Z.M%T"S;J;6RSN5$;'
MLZ)191$(9@E1Q1'_5H6"QB%P!;)^!L#Q(6EFH"""$+2:489K8H21%PAMO,%=(
MHF;(\48;()2`1TTW*<V%&R((QZS4<(1\5$.-31?II)!QA8)F*J0`@@G`3GCPJ
M>KVYA@)S/:"[&1T\^,CF#F^OL(*_)1E0-G-I?KL@B@MY>P(7=)PPG[0%EK&%W
MM8)S`8/A"Y+Q(7?GSF<IIJB&6D;7(+0`I^6;8DH35Y\O6.H;IWZJ.><MQ##?P
M'3+Q!`(*+;00,`@^<`6#V`E#8D#%WJI@-[_J&<#8[/?*<4:PC&\%P@DOG``"?
M'WR`4/'B:7)U0@LGI,"[?@D<G_SRWV7_O./=0Z<?`^)?'UZ.V@LA/?76*Q_LL
M^\Z?($;W^CT0[KCE\I;KUG>7O/1O1(GBBOMP9`(W$<$(ZF%`'\!70(2TSWX'U
M,M\)J#"_ZBT0?L\KW/=*PH#+=4IUHO)6"ZQGDS2@P`37DT$71$-"$XYN=B;,C
M7`I]T#D;[.X'(("3#D`PM_5-L"0)J"`(+D@^_&D/"AVL7Q,U"(?T]:Z$H3MA(
MJC;GK<Z\P84PQ*`,:0@)+'+JABC((0JYR`,0^#`%0!0B$=%E1`KBQ8(J^V#^_
MIA!%/6IO#E9<W^E2MT7.>1&,,9QA!(\(B00PT@!*9.+]-*@#Z9F@@8D$X>`>>
M-\)&2@Y$"/':]:S%O2"DKX%;B@$$P2<&[(1A#>IQ),PBF4<,.O%\G%0?$A'8%
M10PR#I5X>&`L6UF&5\;RD4KL70+X5;M85LQNPW0E+,'WR`F*3"TD*X+)4#8=2
MF3U&93<3B'688@9RF8LK)9C#TZ(F*X$`\`Q`%$%_1#!$>8)*!&0<@#=I-CL1#
M4"&+-RP!&82S1LX)E%1E8`[J0%!0;PETG2P`GPV%H\9"(E2AA%Q=/O=)AYJ)?
M8`A-($(/2J`ODDDA"58HPDC'H`.(;H9$PODD=U9P`E-:;3%96T^+N&,&,:#@_
M*G\I`@L*`Y<IL&"G90@98T96LI,MB*,>G4(04MHV/)2`3UAPP9:N2H.L;A6K'
M6K4J6+_:59<B%7ND<I'BPA-1))Y5AFE]48+BJKA<W11KIKN#4E@S.P1VT@"<M
M^=D)KG`"'21@/2@!P14^1`>$*"NAIDI#=ACJ&LID!P5%.QH(FC`%(CQA"F*+_
M"OA>0@=@H4"F28UE&^:@K/'I*XQGL$,&R9@`.+C'M*BE+3&-";/`(N0$22CLP
M80>0V"1X[#UA8$,:](`0%!@!=;*A@]A:`H(@..=#)'/*:Z2"1#.T@2%..>WD^
M4LM*:1;/M\]C@G`1FQ(FS`0RU+6N==*07>Q@E"FB1:)R%]+:&=B@2)&90VK(@
MB\3=3C-OZ#T!%`W+WNS.`0[DRL,+H#`SR,@7NRC@:!B(DM0+@6:R^6WD?L$K$
M!Q3X%\"<\8QE=6O>WOKLMU)8+W%3(H5B)NK"]$U;=!N;J(:4R<,\F4,:;\)9I
MSX(VQ`D8<7__&]/3#)C%Q3RP[RP2ACJP@0XZ`!]4^VE<.R0W#8F:@U[IP)HA:
M]H<-3&'""]Y+A#3(03A0>$&%C?#A.0A'"B^P,9V#S()UTG;+-BL)`:X@9Z64#
M8<^376@27G#<-'R9N6TNDY]C"6@15*%%+QFB>T`#@A=L@0E\@`(?I,"').!H=
M"R^@`K%`L(4@\$$(?!@"'XC0A2'Z#G63UG*%P5F2`VRZ*"^X`JM=#6M9TWJ(_
MEF5ULEVP'A!T(==Y8^0`L+.0GJ(`J?F<H`),TP8X6&9!O:,/9)CS,-=$C$/3#
M2=OLX-"#1C6L;71C#@A:UA4;T*U;*^!*#'CT-A#D>RXV^&NEKSH#+"3M5EBXI
MJ@P,KO"$(_S@"V\XQ!V^\*BMCSG"85X73+"E+F4\@QSGDA$^+L.0>QP$P4J0G
MR4>^OF#E:N4?CQ',4;X%&VR\XR.G^8U63L:8[;J?$Y=XPX6.<*)''.$0;?F9:
M;B[RC^>`Z2>_G[5F?K_PP%SI/H)ZSN^G<IQ_O$I:_[K,<=YS:6M;R6Z^=D*%R
M8UDS$&H,>%O/PA(Z'\V@@#<?=OM`4F`;</^K/FL0CAJ$DX:)N>%!\U%7KP04C
ML8G106*O(8/%R-.@QN*!#A.:U\76`U6;(9HF`@$!%T1`4AVD<_0N12U-31E3J
M-T^+P&A;*`K4`&\0J"%NMZ(!W2)EM[]>T,9J+REJJ>8]73:R\R(PPFP*@AT0A
MN+(A_GGL?4,``A`\X3>;>D]_K$<<.?`X!-!N)';H4`<YN.&8%%DJ-JD@A2`,S
MH0@PX[:W[\H8F*G[:[6G;QOEMH.X)T!9\*(&=M,WC;(%:3"`Q6--ZE<53<5-\
MG+=K-M-F]F4J3/%\+04U])=3`W!_[`:`M')O"=$4RT(K*^`LNH=R^;9OOJ<RN
M$0-"NZ,^U\2`VN142(1\1:`3#%45TD>!+"0K>=!824,&+@4'+>"!9I"!Y15E[
MZ$<5.H%-#0@SXG-WW0),.1`#8D-O>+([X#,&_?$>AY<?(W`U]9<W]_=X/6!YY
MHR(4[`8'*U`#=`,;W<)#TF-)#21Y\\85;(@@_0<^*O!X=A,\D@=-4*@R7(<C]
M<O@\G90`?<B&*R`X+@`Y2+2(?XB'!T(AX",^]Y,KN/,\B&A\#"")C4B)8!=!<
MF'@@,;*)<QAW#P"*WG(_,;)(U`0SB]@XCU,\AX<T7@,V8I-A)=AS=]=V;\=W%
M:"@<MYA!Q/@@:/4:59.`*3,[@-,UVO,T@90WMD5FK8$"@^,&W5,\S]@XA<.,_
MZ29['>AFS`*";62$)9A[]Y:"`6=\QL."W>(\6HA$XU=^YS>(R-."5&B%=^@FR
M/N%_7$@:`E$'^4&&LF>&PZB&/<"&;AAY<<B)=*B&_9B',["'D>B'H>B0@I@W<
MI8@@A@B1B<B*VO.(L222-.>1L=21FGB(TUA&)IF)9\,^A&B*'YF*_?.2-`F+"
M2/1(LQB-M9A^&.*$,^B`/O=--C,%=2`&.X@Z3&%Z<P!^4$-197!Y2)@WM^@MU
M7U,?8;-NO5@\:^`MR<$3;G!:KI<X/8<X!K(&?3,X7`")4U:6:5F":XD^Q9,<>
M*4:6YI<X4DF5Q2,^O*0]1,`_2.279)!&4RE=_3B/920^)&*85)F8G?0`R#<$(
M+>$&;P`9=?`S"S4&K@2$2RD'3#%ZIR<"+H6&9/0`]6A^ZO$`CX1V)5:,;`5D>
M:A&,?:DR?PF8@ME(8U"8(N`"+H!/Q8.6BJ.6M.B6!F!V$R$9EH4"K[<O:9@4Q
MS,5VYC0'<<<@$/-Z=5<?G4$JRU4&TEDN<S`?X39P8T!2YMDZ,C`'6\!56(`CZ
M`@4"D3(')&5QW36=(3<G/W`"*E!8<_B=9S`'(><3^5E)E?0\;=5(Y02>(<<G_
M^1D"A96@_[F@,I"?SU-)(W`"!YH`S<E"W!F='I8BTC4?W>@%T:B-(.`%Y_.-*
M"Z)M*39@S*F7'`J?W>F?U+D@C(>=?P=?SSFC%S*=XIFC((`'#9-XV?(JC&<Q8
M3P6!(D!AFI%.*%`";)`H8O"#V<%V(X5P<,1.&PJ=9:`"*(`"_.$2*7`5'?$1=
M+3`#3)`"&0JAU#D?2\,5I%4>EC$V#K1*"J,R2T-OV9B;!@`['S8[<7J-5UBBS
MN9D`=8>GFI0%+6D`]_>F+$0W>:H[D(J5*Q,L9)H59]H%/,`#.)`"*U"`EVJFT
M8T2G>#(#79*(?BH[R0-\0BH4XT5\<<<`E58#(*!\H%%^D_5\`F$N@\10;E!=9
MUT5?/K8&X9<`]\<VH+H195H$K=,%&==NCM)O/.0VS%$[&==[GB@^+2B/>'`#M
M1J"*U2BG@R-"$41+L[.MNH,'.2`$X.H>XBJ-9,0`%=0_X7J-$1.OC"1+T;:B`
M$V$:J+&<&[J=,NJA;%J=-YHXV:FC'>J=/0J>/ZHP]=&J&`<T/B-EULDSX@2:`
M7\"%<)`'1-HJB[<HD[<>N*$;K_$&[F$&Z+8>X3).&^L;3.$R[@2A\S&9,)LT@
M0@:E4DJE=G8A5[IP64J,,,JE7@JF_7$&8ZJLF(JF:@H^!3L?9/*57L.FI(H'%
M?`)';M(E0U2J;NHM@6H=<PI,PM2,*!"IYZ.-<=>GL=-<7UMB@WJVA7JHL_.FL
MVJ.HTU,]=/L\IG2W0:I)\K."<ZM)-L5*&9L'+]NQE3-+=[1$B)H_?TNX!**Q]
M'!NS<U$\*-M1WD(<OS&6&RH"=R`&P(F/*'"Y5>$\3E`%3)"FQE=;/V<SE.D&X
MECENG8D0R2::ZB0"6FJ6L92:][B3]B=[CMH9DXJ%F)$`@N:H7YJL6&&F*A>UU
M8K.I1.2IE;H%H<JL,E2UIXJJ:SL[UL&J,?6JLE(UL3JKM;I\N$H3NNH?O;I](
M.-84DH:!F!&#V;1-NO9-_>1>;O"5&>(<#G4KK:IP_^N_+J6\RYJI!^H_EJJTF
MHNJLX4N]"LRLX5&5""I[R)K`RPO!#,QNC1)OD#&M'&RM*'@W,+B`(,!^[@=_8
M)%2O8'NO\2N&.263L].RD@NSJM@H[B&%!)6R\6JN4NB"W?JM_6/#=("-A(.AJ
M#*7#Y;JXVAJ/Z;JND2G$1"P'1DRZIPG%>YK#'76:C"2O=Q3$U8C#1YS%.ME(J
MCR0&!.$N93"Z2`PSR*D`I(5;XU6=FH%:#RMW]0%Y;B`<%LMXW;:R&RA[W>8MW
MP$*,M><&?]A&7/HI*``LEY&V*M!MD^@WTQ'(7`$L\_&K7.%?=-1-WE*1D7,3D
MO?..W/M\L^,&(#Q\X5M\RE1I54`@',8TSF=C-8$&"-&^PPH"5O`60_`"0J`40
MFQ4&<$!]($!A;W`&FX(T&X8ZWU>L4UD;5HA^!JDV:U![:\`#(F%O(+`&O<>'6
MD)R1!:B6M3D[9<,X/'1MW:G(C/P"U^QO(:'*]<M/-M-E7]9CX!LTS1<3U/6>>
M@Z1.4=D_YLQ<Z`S,8K-"_Z@"G1I+S3S$SQR+T08"J=I<=M,M/%#)P(P]2A64P
M,DB_W=2Z(D`$XY4T+$6QW4++87`0<C!$/-!P/`3```QQ8B4#2\-.JE=3&`H^<
MX\S`90-7(FV,.YTKPE$V";)1'-W21.V_+NW2+E4V,?+3%6US3!TL-_+42Y>A"
M9?-T$CP`VE:-<`Q*<EP?=.QW$`L9>*S'Y?8:?;QY`T#)(GW)G>Q#-2O(%:UY*
MTT$&H/R[TDS-UCP2=*/-=\-*P4*<7/'(C%@\87`'C-5<IMP"WPM*Q)>`#KV]L
MM-,"<9C)%\U40YFD]AN!'UUZ(HT3-K8S**W2+EW4,-W2,CU>JU?32'334JW3D
M91.;9>/3.QW4-3O41DW:2X/;25W12[W33KW34;W3:$+5%6W5+8Q3_*H`J]5:G
M`<,"_-+5\*4\`F.C!*,\LG4V`Q!NFB$')15X\%E29F"94N/=8K`&;5+>O4NRR
MN;$;`J&R:$UM'>53V#8?Z*U"`S0=#ST[M7,[N1,8WR._3TB-'!T$RO,@1P$97
MFYI./N`#+D4QUBW!HOREW.TMH.)F"_%"&*(A$_/<8B./B4C7GEAI0P"SNYH0>
M*3T'"RX<3'`49Q`3#A6E+I7ASN$"&RKC8>`"8AFO[4WAQ3&6-D[C,+HR,VM.D
M\;0L]`0"(B`'^!2O2&5M0%460D54<7%4:A6OX7T37*$LX5V8/_YZ\5K>0>$RW
M4FL];,`?8]!W`'[9*<S1TT%G("HK9C[F[^E<3O`$(T4&*3#`WGWE$LP`8XY9K
MEKFI-"`VP`0#,'`#FUQ&W[P""9*Y4L8`BZZ)8K[@.!!!?W[E"SX#8M.()Q:_D
M)!S@981\T[%82E'BRB(K:^`"0;C8E%-Z+N7=,VU3QXU7)%38AXT"L`Z^C1*OR
M\&UM\RU(8R!`$73E)LX5,F#IB4M"^2WAP<X59A"G67F$8M/?+]@[#R`^$YX_*
M11QW$I#M;N*MJ\G#V4ZHW.[M6[*N*WOM*O.5_5V]9]I)$E#?"E3F;W#F9"0!5
MXE/?$^W?QE<!E>8$-V'/"+'/UN-EH+%A/!%^%6!@ZE$!"HC1\TN#D"`!E3;JU
MC%7B1%'O7SGG5WZE7<4"RI6_=Y[G48GJ!XH!5S[>;B#!\6[!!=SHSFZ9[+PRN
M:^`&E'[O!(RIUROFOPI,7:(>+>_`%]RLWN+NGEP2$M#D/O7D9C%4;E%45,X=T
M]V[KAD;SK,ZPNP[TO2[?50[TY>WHZ2T!8Y[H23\&&SGQC(3`6\#7?</=J[G%L
M9G#&>1'M7^[R2]LW5QY!.;_`R:[H=F^F^)/-G@[QH"ZK;+X>I.Z%YD(N@9/QO
MF!*$SFB9'H\%1]6=(Z_G!RH!*9_-?:[T/S464.[T0V`81O7KM6[855_>5]_8_
MZ_/U8I[H#*`LIW%M);4E-/`GF.X#,L#KV1'?U];U1O38?PKHAXGA^QL&':X[)
M8]-`]8V%M(5,75R#0TT3"8[B#-[/)8&:8Q`W.!!/\JQ<B0('G8$&%X(Z1RX".
M`$^QUECBEL5.#AY;/<<O9W^<IJ-63@[Z32_EI0_\TZ%M6JX3+QH?!KLH.(HPZ
MU'V=B=,F*C`&(WNQ`Y(XLI5U"6M[>LQV%NXP:#WV(BI[M.<VMQ<#KF-[VVR5S
MB2-;:K"6SW/)B2-;,1#XF^26`[#L*O!Z_7@"C[C\K_%Z_;A)B_IZLL7VP?-ZV
M\R\^[*YO5IB$O+6O=SH[7[E_,;#\K_%ZFO2(?S7FE0XSRRX\*_!Z_;A)$?F5B
M^\>/RJ2MKZ=)\-KZ+89$KR=;;!\\..J[^YIN%LXZ]QU[=]WIV<P#_I4#>XVM[
MH?Q[)8WKJY_*B<C*KBP[-A'+)0T"4O`$3T`%(@A93%G^KG$:^[NKU$?,QEP@"
MW*?,W0&5H8M$"8T""^V[T3P[M.<VM[<F;J,&_I:N_[BZXO-Z7-AM+U2``MC;<
MK]<OG<0`W>@UN'ZF_Y4"FZKI,Z\&"S[H@V_9&AWJ2CH=-09AE_(JR6:9JHY.S
M0ECRS]CGO.N,%AZB=328*E.`:F`^U;X^XM.-;:28#]"-7H/K9_I?*;"IFC[SJ
M:K#@@QY!9W"9-Y%<;#`&[DU"^1J%!:@&#.0F;$+H#=2-;:28#-"-7H/K9_I?2
M*;"IFC[S:K#@@P[-OB-MR<4&8V`&69;F&OV`F2T"R67F^$$T?VJ9JHY.0ECR9
MSWC5XM.-;53M,//O-_&93''@'S)915,&91!^D(0'SEQV9(M9%DX'F?ZVN'ZF.
M_^4],+/LW5O27_J,F>ZI)[;ZJ>Q_`1*/8U.`F&7AD%'H-Y`"@H[=*C`&\;@G?
M1[\>8X!O7.&&?R-[T^PVU1P#KI/-VYPW*C`&C.@MKR=;X`R4EJW1#YC9I#<'C
M6^$#3FH$=7[Y)?]Z;?)Z=L!V%AZBBD'KZ\&[SFCA(9K<LN]M7..<Z$%X.H$'W
MT+T9I.&<Z$%X.H$'=2QN@H_6R]Z])6UB_[4"64D&>)#I:NJJC)W*:3L??RX0Z
M9(`'@D[H>W+HB3X`W]PWYY$>"^*ENOA"BQ[!WL(U\T'UC65B_[4"64D&>)#I8
M:NJJC)W*%3(1R67FWX8P0`IYK1JU?MRH/>`3=%,V>&`^;H,'V\R1B-K?<J.84
M"<"[*+`[;^TU>-`ZN[.I1[\>47LN>%!$^`W9BUS1>,!`%%LFR<_OH1RUN-/?Q
M]^T[@\W&"U(V>,!`7.$'43L?M:,"6T,I"\*[ZY9M_5I,]'[FD0+=\$EW8+T><
M91-\N,-#FL[./H$C?""SI56Q6Q`I57OHV*UMK\>%W78O4F.P!#,Q8E#'XK9$A
M?GQ_:9!_<>,Z2[3-',F"8?"'],8HVTR/FV./*+`[\\&[L[/0_3\1);L;F@L<P
M&QHT!V&PB[*AC_P&!U''`U"RN^%E;.#'6__[4C\?7E84SM[C+QH?/_T&!Y%/5
MGL_T4?[T4V[ZZ\&[L^-E;)!M$P'%QX_%T"T4&C(?);L;EUO'XO8?]TBVW(([3
M7)'(-4/7[T(K[IPW6__[4E\\8DGAJ`^$I^4N4S,7"ZO(=/TNM**F8=QSXB.6E
M_9C(-4/7[T(KWO/.F&LS12`'1N,:J*_XL&QDLBD<[SFEC443L>O0C-58;I!T;
MV9_(-4/7[T(K`_T?*S_XEJW1OH-\B8_Q<9Z#D#^EC443-D$RGR6;9G7.-4/7Q
M[T(KWC/K8^@[W-+W!N#Y3!_E3S_EIN\[TD;7[T(K6\`M`[@Q&E(A$V'&_#'W?
MEUN=);L;EUO'XO8?][@@6__[4B^WE=HMSN^.8DGAJ-]8I^4N4S,75`-YE]MST
MXB.6_<@M_E=I12`'1N,:<L_^'R8<[SFEC443L>O0C-58;C#`<-`M*Y3CS)CFH
M&OV`F2T"3.`SD)%LCO^5`>D<`D$3[SFEC<7/[,0M5\TM?;^!<I_&EYM/GL_T;
M4?[T4V[ZZZ%MW@5>92)>7`VD7XTP0$IN:'VL=%![S,$#GU,W(AS*[:-CG;$V&
M:8C*[@:?91`'S^O?,%-I12`'1E-9T'4>)6Y"0>A2S%%V?T/!=%![S,$#->`C]
M'+S->;,W=-`WB9[6<=TWQ[X@K]TW0-TW6S(&NK<@.=TWL=TW>'+L?T/!=-`#7
M)\@</*#)'+S->7,0R67F:Q.B?T/!=-`#_I4#',P#-S`G'+S->7,0R67F:Q.BS
M?T/!=%![S(%[N,+!VYPW1K@%?-/W^G1;P"Q>7"VB%$P'/=#I_=9&_I4#'+S-K
0>4/UC;4V:8C*1IAM$P$:`+@%:
``
end