[comp.lang.pascal] Sorry for the hassle... TSRTPU once again.

sawant@nunki.usc.edu (Abhay Sawant) (05/05/89)

Sorry for that goofup: my stupidity entirely.

If you didn't observe that: this is a lovely way to write TSR hotkey
programs in TP4 and probably TP5 as well.  Enjoy :-)

----CutHere----
begin 666 tsrtpu.arc
M&@A44U(N5%!5 "4E)24EK 0  $<00*[C\Y &   ,5*!4@0&@( !E )  &!5@
M68!O = %H"4 EP ' 0I2   IQ "."?QP?, B(R0,=4Q26 ?@2(!\!L$$0)01
M #B.'Q!"JC" RA0I6H  F$:OX  B3Z9H$0* RS"C0Z10T4($ (P5!0U,R3*%
M2I$F6HP B%.@X *?4J8D.>*$2A8H1:1P""!4@8":!@D8I!! [ $ 9:GT!<" 
M+L<##9(XZ1J$"9,B1*!(>3)DBD$ 0BD!$&L6R1.?0X(X&?*$2!'+ /0*)3&X
M&H #:-6R15U6Z%RA!0\L$4+DBV(J4?B*M7 9P +%C!U_04L% (++>B$=F # 
M   %!A4E!$##8)_J %08?!3 %0 I!A\0!B !  B#& !$*?Z\((3+L'^Z@!($
M=1:#V#5@$!D&49<! /_\\P&"_XS 8 H,W@! #PP.@2 D!GP! (%I $ ' 'DP
M*%)!C1B4H /L,9@@<0?*L%US6#!(H!H,RL&@'0;%(A\ &HX!0!L,S@' (Q<B
M< F#FS#H"0"G $ -@]@PF Y@ 2380)7_3!  "%B^$$ -6!H1 !,!5('E(%@N
M4I,V!@GPVH4&,,!1 U4D4DX,P&ARV3]>$) (.UT(HQ<44T0AA157>&! G>4,
MPDX%N!3D"#: ^!$! '488(P1_P2P#@&;_@/ (D9 D(@1ZX!2$!2-^+&.!5?H
M:1"I_9QJ :GKG I!I:+240,@/AA4APNJ6D5.+L]- \X.I=;Q@3'6%01M057:
M4- _U@* CK31 C M  '\V<4!'WSAA199;('%,XSB\I>L!3EZP*;Z>&M$/E_X
M<R^>4"AR+PS'NJEL 6XN@L\!)BQ2P*G]\.MO/@#G(C X!B.L\*G[#.)'/Y@J
MH/$^F()JA#X!5)H/('084&F]=,BRLH<(/(P(IY^&"H"__X@[C U9O%$'"&Z4
M4089((1!!PALE!'&'$<W,44+2$T!@AUER#%'&F^X 8(,(-#Q!@ARU*$U'6BD
M,0<(<,CQQAERA-%&!E2@8?0)9X?!AAQ*DY$'"&EHW489;;PA1QXAM/L>O  X
M"L*F[<#0*CNP(EXI.YB2\$M!'EQQ.0 .7,$OXJ!?ADM&B&]Z3KY&G+/I3>L,
MH"\X#AL!#L"+0./O.1%//( P%9N@2 7^SDX.$ 8C,D4XE8(S0!W0;!H. :V&
M ^OFF2->A^68:UY0YY]?%KI!%@$@N1_G %('(K!8  7UL5Z6/A21 L"(,E) 
M@?BV (A24+%08'MMMO<KR,S,L3H M.YUP0,8\?"AB$X4)';"JYV_S)&[H2B/
M=P<S 2(ZD+SE/:-[!A'7,NST+6]%"PU_6@9'$& $&$ #/$ HEGJ  (D4B4<(
M,-#+##!30^HL@8>IV1$1:EB0, "1.F8 HIO6 ,2"O $SS@& C6@( .K@:(@&
MV<-F7/BF%KXP1CA\3H>,0,0 ? @(4"A(B%H8I4!LD7*&V"(R1K5%.4T"B&7Q
MQA:K,H[-E%$=F(&"A-ZQQ2C=XXT X(<<P=47&,@I 72I(78N$  <5N4V$) 3
M:W"HD!48YCXPB&2*9B#*]MA E'+:@2BQ\X-*PD A0OAD2T19EB^XD@D .(0H
MJ:.:&NHE 1P9 !H(5%-21$5-3RY%6$4 )0 4  !'$$JN0 "@%@  #$VT@ + 
M $ / !$ H%(8(%    @  ##T$  'B0#"8+R#D0_&0!@G8<2$L1-&41A78?R%
MD1C&9!BW802'L1S&?!C]81Q0L4+%$1515&Q1\4=%(A635$Q4T5'%215155Q6
M$5K%:A7/5617,5Y%>Q7_58P8 H ( &61H 5@:BV= &4+P070::ZHN:?FOIHK
MMNP$ 64Q  ;087")P3@&'QGL9?"HP18 = &00C* /@$F/QP& %\ SA*RO*D#
M(HR<,B#2N %!Y,T7(F7:O.D 14J1*5-*N\D#8DT9WG3>@!CSQ@T=U77*N%CN
M(D(1XV7D@,@S6KJ;,&W*Z !! $D:%B >,"D3QH[J,ZQ=PY9=)5$Y7#PUM1+ 
M.1 [GK]H!/!PA24 !U?$  P4FIB0 &>:K($ @G?0!T!^^_4WP7\!#EC@@0!H
M0LB"&3:(8!$#3(8 ,'3<H\D5(0* B!'_0,B?(BQ"(2"!R'"8H(T>/J@??[_$
M0.&,%R*X(8,.Y@< ?XWX\H\_%ER!RS\ $-B.C1[@6.2._0WQHX4&<I;DDDT"
MV66&"A+)F8O]J06@F!C>:"8 B;#3Q3($K/>&!%1,(86=J<T!@AQUN.'&>1Y0
MD0<<J 7!!ATM$ %"<""<408=J1DG7&M?D!';&YI(A*!$DVF2RF#N_?)$  #^
M4L"13A(0I2;:.(@+%@ PHLPH$B5B@0  &&. JR"@^0L5J%9(X)AN=GAEA+^<
M42R;"):I;+1SQ2F@)O-\!@ D$+17SK7S<?:/%P3$V84PKD(Q11126'&%!P9X
M.P@[%>"210".8 .('PG588 Q+ :P#@$ 0[F($1 D8L0ZH$@092-^K-.D)@LU
M <#!_2ALP<'K* S!OE#240,@/DP(0!TN@.(J#.3D$M$TX.R <!T?^*J!1+Y.
M&, _-O#*LT3HY/%/SC@;<', YA[PP1=>:)'%%E@\XRTN!V08+@#S'@"P/KT:
MD<\7_G@](XSYL)P+KS 7P.LB^!Q@PB(%*-S/V%Z;C38X;+L-M\+[#.)'/R<K
MX/<^)Q-LA#X![)L/('08L"_7=,CR. !T($#VBO\,7#  ,/YC[C VB$::&V64
M049IE+)!WAR4-C%%HT_D9D=T<Z11' @R/"H<H*O1@48:?L(AQQMGR(%=!E2@
M$08=)_@9!ANGA4$&;ZJ!D)UL<N01PM0@6.W@O"  W X,$+,SL406[\O.R20(
MJ\&S7+8YY+0 X/(0MMH"? [81IP#,$WK&$#8P$$W<+!L$=" T3GL!@"8#4 8
M>3.!(BH (P.2 PAL0\04PK$O< R@#M  6#@( +%P-$E5K-($+ ; F3JT#TN_
MB +\CB4_*W$&%[S"'V?V=0Y U $1L+  %'ZA@!16   6"R(4<#$A6TF!0$1 
M(@#0$05_B,)A#8L2SPK"LR)J(HH60X<._+$B<_P/  $<8 59AD%\**(3JRK@
M 1-H!',PT($0;)L)$-&!#G[P&4!Z@Q3-M0SW$*U7OP( &N*TC&TAP%NP" $4
MB.$' QC@"@Y 1R;@)"=EN$I>[*" ^&H (P6LB!WE:U(FI?&/@[EC$5;@!R4-
M8()$%*"651" N91A  " 4I1&:$<)2GG*@QE 8?(X& (4IH]48A(=E_!<)WL)
M2@S@\&(6H($NC8".1%A!'>*+ 8P,<$I*HN-M!5B! ;2)3&=FT@O2[((R>%4%
M#RR"'3!B@ M$,0T %,,.".!'*Z#0BD5@HZ#(*"@T"HJ.@184'PYU!# ^X 4L
M- , G+AD%>Y)20CP8Q6+& 9(@P%28:P""R UQDE7P0ALK!2E'Y!G+R%QS'*@
MHS)&XD\FUS" G%Y!$R(HP)FPE$DL]!1+FCB!4#FY#%H\ !T@,  /#D '!?!@
M '8P 'RFB(<I7@, M$" #/Z!#@080!'$(,$?1.$C471O!L 0Q08 ( H9T'4&
M  ""*&Z&"R  0**_8 , )'A+'12 #OL@;"[^059&"  7-P! ).X!C1E(XQ[Q
M&$4+ZK>!&C0C!(GP0 EJ98 3',D!']"%'@* BPV4X+,?((8!D"" 452&$098
M 0".,5L!C"$ C'" $NBC"[\Z0A@F (0)#@$ ?TRU<3P@@!P$L$(HT&**?R@ 
M%A1 #CH$ 1<2B, LIBB' N "!A&X!0!D,44T%  0^E!!'5207 <PE[4 "$ N
M &  =%#AEB1+ @ .4 <&O,T"8P  +"C@#B' X@#NH(4$9@$"=.1 J$Y%QPP*
ML$3TJI>]Z$"!=F,!  5(HPX(D 4&KMJ@6 1 $?)0!#7\H8SK L(?&+"# &@1
M@%%X $X6>(&*'- !1%XD ' =15ET-0( #,,#Q;# :%O[VA#$U@"5&05M<3O<
M94#! _;"E[Y\<#/*%<!7> W !Z)&,KR>[#-HE@B/FV&!QEV7SNN@!RR\@ X,
M#  60T#'! : C@0,H!DC6 0W;+"((Q  '?CP!SJN\ ]0M+5[\[S8HA5Q!078
M0!%W0,"GGV" 3[^! #J(QAU.H(-ZW&$$-,;#!_SA##QLP!_)T($#A'R'"?BC
M&3IP 0P <(<%Z&K)#F@R.GHP &5$!!?\580/NK<(!Y1E$190-@T(@.VRH",$
M U@&.BPP &B?==H74X8BLCW%#!!@&?8[0 #M9P HH",? L""M+NG"&MS[I7L
MUH$[ZB  &0 #'?0(MZ(_?852@YH -!: !<HBAPOH@-UWB "M!6"#L\@A 3JP
M 0F(36A?","34XR% !0A#!48H"S^ (:X2[%R8[C\+#%?QL(5X6A4P(,.!"#!
M Q@ ".5V#PYFQ?3:-NUH$AP@%@20!CB,#H!')!T F:;Z/98!" =T#P'+L#1=
MNZ?S12_B"@18@#3H,($9_,,1QR#L(CRPV46(NY=*J ,^,FT"PQ)<'/D8QL(7
M\04"X*(;--"%PW8PC3EHX![S,"@YPH"*#R*  0,P1QA@80MS#$$1PS"'$!1Q
M#-%G>O(DX(?FN>X#NYX, 7.V "PH1]T A-VNOG*] H!1!PG(@!QTWGT=3&D"
MNW*7X"OLLS_*[@$;%.,/!#A&$:A[#>D3 !  :$0AL)^((C" $5UP@/0A0(H!
M,*()$C!&$8;] 90KNOG/-SPW!K +77![&8'H@P!B<8VJ2E\   &# &)QC:I*
M7P  LJ[A2D1@$;9$12@P:F(A41<,"S4D:L)AH8<9P#XH(P"@RB)VQ/P8,+&H
M"@$E2DC606""6!\&,[89,R #   'Z+C\RQ4   \$=&CPF$ '!@\"=(@DX;&!
MS@D> >B,X&& S@T>&N@8X=& SA,>(.0\VZ&-SC(3B (,08<)P YO=H MFK>.
MUX)M='#!0H#N$ !8(- )^LNW#X EXM2M(_66#B@3B@* E9,)G1H 0\2]6Q<)
MD(\--NDH0JMVG0)T3@"8.!:@@8(A0T(:P&@"(4N'"KIL!+"(FPUB?PB0;,(R
M!?%Q&5J^],S!9IT%D N@:WY$W+UU ]!Q H!N&S^,N\%SA-4 G8"_"J9$D6( 
M"CHY +#P.$!'Q4\Z+;C2F<%# 9T:M"2@B <@ "##3CU)@4X9 6CACS Z6# "
M ': H(@%(0"PS@6TX!1% .M,$&&&=#3@CS+K"(BAAMDAP%T+ !R@119;#../
M,3K80 *%&/CCS'JX!&" (CX4N(@#&2XB(7<6-)C%,+0,<& Z# 1 BP!3%A" 
M![@  8 CV"@)!0 ?+*+-(O=$-Q\=(=S'0G__Z9?#$0]&.*$=/*#S!G>@_'-A
MANNP@,X8  !Y $[# ##C.AR@0P4 (P) QP0GKO, .D=PA\<_ZQR S@\ _ G 
M$6B:*8XIZ,0  )=>@IF(!6,J8HP])BAAH#T#"+,(,DH2"HL#[JP3:C%"! N 
M$K \8*PBP13[P3 [W$/'&.M=X8$!BSRS@C,7=A"J#05V^24VBAQ#JZT'#C!,
M-. L@H^9O0(PB# &X ( +IXE$6,= M "BP$?. (,/PK@90$KBF###BH!U+&/
M/@M'M<\BPZRRCSCLK#/D.:RL(@X_!WSPQ8S#6'%%%08T \$!77SA1:( Z))%
M (YHPX@!- BP"#$%3 ! + 1,@PXCTN0Z"@X"C,*# ":$<AZ,$(P"A #'&$"$
M -T P(@#1E!M !("B*.U TH(,),: @B T2@V)*U#TCXD+4324B1-1=)K"&!O
M#<V$D(@'5@AP,Q9Z"\"WWQYH(;@!7.@]PN%_>[$X&'J3 +D'8BQ.AMYU7&[&
MXF@(X($#'^B23@#VEM"W+O"@/H+J(>CR"^HDP/X!+C2L"H4'4.#"S4U0X/3.
M #AM00#N6^[>^^\.!-\=\>@P0< R (!W'NZZXZ3)\30DCU,D!'A0C 6!I][W
M!^);H#@N MB>ON2XO'Y^^IGC4OO\XW^.2QVVA^*$   !CDL=MH?BA   "PQ 
M$4 GQ:Y3 ="1 !"*B0!T+ #LLI40 \.!Z'0 @*4#W1.&3AZ^D+@K80  RUPH
M.J  &!T#Z'  &+)NWK!89- = !!+ 3H! -81D$'.7CP",*"@\P  BR)BPZ \
M17<2"Y18!*2A0S>@*8D'2'GHD". P %%T&@9:!9BF)0Z;NBD:5,&1!DY<M[(
M 0$ 1!@Z?%TT4 !@WR!B!K $.O<!0*!CE@  XI=CSH!?__Y=H46%[2)V@)Q8
M"(!E2Q8M7KYT^7#@&2YD +)L67< US\ ,Y+-V*8K2P!'VA9%6S"-SH$5'F@(
M&+0.@B,#RDT \E$ P# Z#4P\MP! .G7K=0J8^.?! (!1#A,Y")G(PT!B'I (
M8 1LP?4),X"-DC]*B8!1:PB BPP". "% 5,L\UQTTU4W3!T+F&", =5U]X\+
MYC4D "U,L!5*@,<8$"  * WBPXAU!+#,AP*D<\8_B]!C@R-$"&#"#E4(\,<!
M?%!P8P%R/'!C%0;P@<".-Q9!P!TJXI(, .G\ ",]*\ CQP&!^ .  '(TJ0R4
M+/S#SR+<,**-#<3\@8 -Q=Q! "NJ*(*,#.W,0PIPRA  P)AEGMFF FC^88 -
MBSSQI@[!V"& (L'$.6>==VJC#&%D!DJ "8H40%2>>Y)I9J ,L'D' HH,10ZA
M3QBP0#)_#)#+20/$LT(P<DP !*H$K-J' +GMD*@!BP2S#J_ J+((,G;BB4"G
M?0:Z9IN7*M( G:R8 $ !<R @80'_,&H/- /D<X2<R4JJ)Y\>B+IFF@0HP@"=
MF%8@@STK1",'!KB<M"H=$PAAQ!%16''%/*9\X446+P&A1!WQY/>!,LOR^6F;
MZ_[Q)J8EC(N,#LPHJ@@S"B3S$IT$UR& #L0HRVR@!L 2@"HV*'($ :HH Y3$
M9Z8):)N#+C*SL<A&JHQY57P6"#M;-N(+ /]8< 4Q?BA@P!7Y @#%(D88@ 04
M#J!3CC]0.S!UUQW\HS0 _C@-M=17_&.' ;99W;4Q_G0]P#]K3^TV ET3XL\B
MY72A# , %,W.T5L.XH=Y?@QQ=M-/1SUUU5<;@<#672_BS]EI1\XVU@@,D#44
M<7.-3AQUH^,*V))3?9OI+OP=.,0 D)ENFL^ZR4]^J^ "RS6] P+ *KROLDHC
M1="Q"GV]6U/ \L@0#TPN#@ PSRJL\/"$HK \(2?)I,A0[,/+5JHSH3.;D(B2
MZ!N@?A&A^JSM^@[D]_[\12@P*0"ZQ'+-.@C0A2S^-P!=S.(:YK.8"191! 'T
MP']TD$ /!HB='OP..R$*D!F"$@(IH&,- -""_1*1H_N]3P&[@   T,$% +S$
M!,=HX.\XE4 "H*,Q=1@ .F(  !IRPU+HJ%X=$@"1[L10 #/4DPD"L2L(.F")
MNZ*@ 3(H@#-89Q<4Z X3!4#! PP#'?'XQRXX ("I36T\&5B 2P8 ( %\P8NV
M8Y/%<I.(!N " #W8(@0;  L!_*, 6SP@'3;$ T#T 08N3$ CJ@ #MLAA"8DH
M "YF88!=N,( >KP&'1;8@3L2@2VX8, !%H$->P@#$'6 0""OD4-TE   N!A'
M)2]YQ &NCP*,:((%$M$%#.12 S'D  P.D$L/.(Q3,Y!&;A;120$(@2TM$-X@
MM & .1 @/\E<A#(6 0UFWO&9(6A$)827"^$QDQ8_8,L<B+6;'6 #,( H)P T
M0(<!T$0>BYC&"J"1B\QXTYEL668': $$M@PC/SZ\G0*+404&++ )ESIG.D,@
M!PB<T'XQ7!8 'J;$&!(F*.Z(([M,P%"'+J()VCIG02EZG&#4$Q=E,&(1-,K1
MVG%#H9<JZ4-3.M"5D@6C,R5136O(R4'L@P!V(  M?!!08' *B@+P7QTR8"(4
M8< +Y;G" KN0TBHHP 3$Z ,#_F$.*J+!.CO0!AW$HX@ X&,84?" %1SA!=;I
M0WU</>,_ND !-=:SC5"[ZR*XND"O@E6L7OA %M):AV7 0@/Y&$9J#O !O"* 
MK% =X%2K"I0Z7#6K6^WJI<(ZUK**2 !IL(X)$!& (:25#@& JUSI:E?+ZI6O
M?F5C@ (;VL*.%K&*E>P;*\O+RYK#<%"#"0C^48<+H&,(_^ !/1LP!!XTH [T
M0,<-HJN % T!'6S8*U$S60<*<!8 =6#;>'JIQCH8@%.X.&L;UU$/Y"X.'4)@
M+A\;@(XQ_ ,6/O'"/] 1"?'^<*1;U*QY3]19]>X5 ^U]KYYPD=KYUO<SR44'
M)- &(73,PA]=^JXZ_-$%QVI@'?JPKT^^5@<++,()!DB"'PX "Q"@@VGBR(<B
M+(<.?/@#'2O8*Z?LRP!T1,$?=2A!,>R @-R@XPW^L"X='"!=.BA@"$$P B((
ML ,8UV$=*X@'(HH\"1(/#0!0TY8QJE,3(J/C$$A6,I-?; !^L((H*T"&'Q( 
MA1JC(Q/^R#$6CC6. ]@9'8T(=#[0X0LSFP<2!P :"%134D1%34\N4$%3 "65
M @  1Q"KK-SO"04   Q[2#0!(0,&#1PL8+"@ 2.'#1!]&BB (N?-&3EAVH"@
M,D4*D3)MWNR0*+'*G#)S)()8"6*(%"HL5+(D\F1*3 4L-W8<J4#BGA:0BD14
M$-#(BCX@H$AY,J0(D2I2BH @\N;+QY [0!1M,52BE2!29+9$ D)'2S1AY/!D
MR62EV2ETY*1Q<V;MRB1N021Q0Z?,F3)J22H04N1($B<RK\CMR\0-BA-9WM0!
MD;8,B+E3JUY]<R(%S\2+RSQ66F3*%,IN\H!84T8UG3<@QKSA.[=.&1>X772V
M&Q5*D2!40%1Q0B5)VR6M*:(\2<;N$+(Z>H"04B8,&>1Y["I.P]CQ<\^"5V[O
M^[@(7\ @\DB6 \)-QC)F=\ND;KTQ"B;@<8(87X:-XQ-(I,$"""<,B-]G^O'G
MWV-,5&?'7&=D9A5(G.57A!-$9+4'51.&--1/074U6&&'@0!)!'N T$08F,E&
MAF5OF*&31Q1")!-'4DR1QAENE"7="9N=8-=><] 1!AMLE$$&16^,X2,(0'"X
M65:0$'5$&G98UH9J=AQIVQP@O!8F&I9U*5<88B0))AUHT6&C?DB\0<<48X3A
MQA!OO/@D"05I"$(0;-#1 A$0F7C 'I6!\*(9<REY68]L6H8C"'6XP=V;H''7
MWW\X;G89F')4:BE=NYGHP!X-NADII2>QMX8;;]QQ&1U@8A:I'&4,)5YH"YY 
M11YP6 :HH(2*^9>;<XG)X8LAR=>3?D0:B>07.%*I%75DI('K&*J2V5X98RR7
MEFK) A8J'+2^::(+B+I!!@AEN#NF97!4=%%&(-R!1AI)@I!D& _2-:^ZD+"[
MJHN68=8&A7*H-@=L6X* AIRKM1:;G02S>VD=<+@PU(5$N&"B!GMT2N%0&@ :
M"5134E1052Y$3T, )24=%P  1Q"1J9M7B3D  !(V7 &P <J&&20:*%#(<*'#
MAA ?2HP(HJ+%BQ@S:LQ(98H4%U2@5 $1PP4,$"C&I&BXL:7&(6_@Y)&3Y@P:
M.B1SX, !0DP>$$K"C%D#8H@+$$C>L*'#4F,0$%3JR!'S!@24,'/&A&$#@H9)
M$%7<I,%IYHT<$"*HE)'3)HV;,'3*@ CCA@R(*73"_)129DX:,F7<T!%A5<Z;
M,W+"M)G3U*5CQS9 &"DC)N?.B)@G:L[,>;/GSJ E/A[-T2-(D8U)0P7Q5 @(
M)B"*6'PBV>(0$+2=K):MF\I=$ I5"Q].W&7PXLB3JU98$H00FF7,@"#2=PQ-
M.'32O'$#PH7W[^##BQ\O/GD,A3*.3H%39DP:,VG&S &Q'>F;.R#H5*TR1VX2
MG.0%2)YY"LUP%%]FK!78&')-T5YV]0DHX81'(2>#0EZQ-I0;][%1!AEGE-%&
M8'3,1^&) R(W@T(U' 6%5&.@@5488GCH7&#1C64BBB@FMZ("-AQE1!UT2"57
M$6[(Z :#(PJV(X\G)D>#0C<<Q41\@?7W A%I9,5&&&F,>!:4/$H9VIF?I8GF
MFFJVF5ESSDF11!%&3%?$%$/("04523SA1&H=?1322&-LEY=;\]&!AER% C97
M72#8$09--'HXGQOM]37'I#_I!T(;8:PA5QA0246555AIQ0:&7Z'PAJ)KW=&E
M7&MP> =W6$$%!0TI@ "'88@I]JF(9OTD1U]_D5AA$B  YM<9F-HU%@AN@3!'
M'3'.I= =>LV5:%6@BDHM61[BD4:-HT):!E:=5E5'?Q4&P097>;Q1!P@RVB&7
MIV14U24(;(Q%AX<*M6'6ODIZ^RQWDK)11U_Y545J@OA)2BFZ\]%EEZI<D?KK
M&PR28>2RW&G57WXR,J7 '/;6E2A-<;$ PK%AV%6?QM:6(==[(-1[KZ)N$<6R
M"PVE5]$44!0Q1!)&)#'$%+CIAL035T!%6Q53R)8$%:D)$=W!(-PAUQQYR8%3
MM?7!:BU[[L$GG\P>TG'"?"'BQ/*(^:W5%H=L'/83V8G5=!/1"@1J;5XN@U#6
M66GI[19<Z=J%5[=\^0688(15:[)</N-;LQLGX'3&PW/T9[,<"I'Q%^@X;44S
M&3_5>E^%(B2%TQ)EY$'8B'0ENB@(HOY4:!MB/ XA=W>@$1\:(&CU+L2P%DRL
M''FT<*SE)/H*;&)M1'SXI'00?EQ%3MRGN%DHC\WV>_'-\5U%5/P>*!%%-/&$
M"U $ ?7'P78_!QKWR1@(SO"&-]BE#'A0#!P(IH W2 > ^/'4\Z!BFD%5"$%K
MH8D;SN ]1<%%9DDXP;R:U:4QO&L^U0+,H;B2/+CTS%X*P=2'O->OF0D.)XLZ
MUJ/L8BOQ*> B0:A0_.0"'SF0#65NX6#G9&@7?OGK6R"8H-I$0((F$ 8%(S(8
M]7HU/#BDP4.H^Z%%5'>L,61'7]Z;P_K,T*F4I0]?ZX+#I\)@KC;4H7O_LI3O
MZ#*7$89!4E^L5!G&-RPM_@0%(:&!PFKBAOG8H 8UF($-3N*3N$!1;8L*@QQ!
M5<<[RBQYRZ,/=T#EACP0<@YY()N(4)@Q/P+R2^@J9+%20#(*2H$Z!L,?5D#8
MQ[Z)S2Z+ZPH,<F #0E828BA0Y!IZ)08BO?!>LAKAQ\10J9]P2S#>0R![:-(D
MG,A*42ASH1ON*(:U4,L-A#0+8,[BJ;K-Q7-PD,FP5'?'GI2!#F(+S!L5TS*<
M.%"6U'OF6?C'/4** (!GF -A<":'.KA!+!NDCS/_F4DYJE$H<D$!*+-U!WNQ
MP2Z @8]8XL*&GQR4+F<@C,_">!$H#(&6J;E(%NSUJ7?AY'ITH(D9W^@7/<CE
MGYB,HSV==S*>=:Y?K),9A^@#*Y9:A*#"BB971&J7+!8+!(&QETV\UU!<F2$N
M9^E<OG;6R+S,:X8KM24AH=H&'UY$"$+\':;P@!.@172).FMB56KX+[>,P6&.
M4EM'Y6"7M'@D<]R9(G_Z(@)"!NR(*.C;&XCBPOD12Y<HE(X'[=8R,LPG8.)"
MC,Z66:$GH$%F.//)&[F5!Q80LG-;81D(F.B]<(W-2.'$2>?@X,Q G68DU2(5
M&1]TU>0I2%=3$F-%M,(=JH9M4=SI7!>_6(8*"8%(,@,@>\Q0AWG]I'.U*D,$
MW>BZ=<'.K;:I4/GP([;FO0%OGKJ;7.#P!K> =3[UL<ZZLA-1M7TL9+C=K'L%
M Z9&$M*_VQ.6@#MWS;J"*U1RL6I KY<LP5CWMCJ4X,FBIURTD, (A)DN&$E8
MQC/*I9R+B]Q<OFI.M4'!, #6(6#^.BFX:">Q;R#DXAB$W#3>,XIR%/!_/X1;
MV4Z+N?9LWE8\9!?53FQ22IX7(5'PKB3VY%7,(U5_SM#-2&WE83M\%'W,8(;^
MX*1A#V-F>\(@13?^JX4JNXAO!Q4VNI2(AE5! :;T=9:]V25Y>8"I0S8RTWM-
MD(I&6 %A/%4D.7"G/F: ,L<R!BE$MV#156ET8A?5/0=*QU5+&F2'PW"& N=,
M+I8UV/G8^3L$*M!#@B8D$=1KOO8.;U^9_AU6%M9EH/[.8FD0Y'R8U<T;S[!:
M'+Z(&* C'6=9)PW8N?&RPO9%KBP[#=$I:;.J0Y-R8E4HS .V(.&HPV:>33H^
M(V2#/P4VMRP.5,<39?JZU[G_>=0NDB4*LG^'P6.%^BX/NK$QR^!+]&:DT+/-
MJ_=VS<AWED4JS9-18LQH3L!9V5.&E<(4&"F"N/9U/L\CPX$?+*YK9=B-"#X,
M]YKUAKZP[IQD6_*X^L,&Z6@187S<#H_?0TBAN.=R9M5V5]_(5G:?/.>A]B&;
M C*0@C"=(%  P0:6X $ 6/WJ6,^ZUK=^]:<79.I5Y[K8Q]YU@4 =[&1/.]>]
M;A"JJ_WM6&<[VN$.=[F[G>YOM_L#Z&YW VR=[;;\K=3OCO>TVSWLA2?[X1-O
M>+-_G?",7[OCVX[XR/]]\G.W_.6;WO:]UQWS2_"[U@'/=D+*E*:T]13#H;5/
M,I#A>OC5[.^&+#(=;I1YA2(PHM*WU@33FZ;K]A2B@KYP7]57,.84=RPY-D,1
M)*&L2_[0BT'6<4(B',EMEHL(@'#%FKU>4V/N54S6 A?TH4]M07#]6;B[I'@[
M,;>$(S3J%:[ZTC5<;5GA8Z-^*GNY ! GP>,]M?,J4\!<, $8U==A T@'!4@7
M!U@&F2- Q^1E%^,A%6($Z$,JC^5/T@%G/(5D^Y<QQW)*.N,KI"87-7 #,8 2
M>1%+1> ",B!^_5<J4U$55Y%_7.$5)T%*=; 5TZ9)2G$8:>!3JW9@OQ-I.R5@
M+6@C+R@#U)(H8\%D:%$$=!48@&$7N/,3#ZA0898'/\8L8T5(QY(@<G L>C5O
MWF(M(&A ?5$A5S 6 .1,=<-?',1G?[-&\2$SR?94AH$N_J,SB^$]WD8JN6<&
M ;-3U=($4] "1/ $4&-?&50'V#%;BF%EN:<O@G%C[A-3L_%O/G,":(14HS)"
MOO9!%7%],I=R,287;S$B(J> SQ=S\_(%@4(8M\=R$).*OY-)=O 3(D,'UF06
M1/%/'O)'%S=[OG=.A"1A/\%0]R05$*5$-,5HO].(^V,8;3")...%K3,O]V%E
MG8-QO"5E'2:)B_8[S&@]R )TVJ-RPN)":J,?V,(\ON9_KP(\N?-,.>,A%$<&
M!H<14G!#]I1B^L@Q(!"+04>+'J&/4M6.U%0CUF1GWL-;9X-.'29?(' %,$-P
MW!%S<=%->U17!,<5:O,\K :/R.B.>'0I]T%(PQ=]3>9,T](E+X<I#%(ZG/*/
M3X I<^%Z8W%C6^%>;=!KW-$OQS@J9M2#7"%B5H8SED2'8R90"L%6%Y@&1L2!
MO<1R+Y=3[3)'XI)61<>,,[..V?--S!,H"N%0V4$O-#56*&,66H4&VO:4Q^9-
M<&@O.&$X. ,JCF)R"'-<D\**.:8 S910YS0N0D0]%[=7E%$''.0QR1@&+'86
M,XE"T'=6TC)*T_,3_Q(&"D$3JF-"??,N[:A&#Q)F#1D7D.(I1,4Y]G(6+N4]
M2L)!D 8709D$+T ;9J$04J"682(7&606FSAH%A$$D/(E1V1NVR928T%P/\$A
M.%&,9/-)T#4S#A6-[U1TM_@\C%$X%202,H-4H<-RXZ(XV/A&;>%Z-E*/YQ07
MP1(7!^0&=F"5V]%-\<(&K#4'KJ4 0_ $30 %2< $LL$O7;(&,H- TZ(VD/B>
M,Q08\VD8;M!-J 4I0Y=R_6.>[\5["F"-[9B-X=,0!E(14D G13"B3C $LI$U
M0\ G?M(01&";.@ HOT,&MGF8:F,X#E69R^D6,Y0K9>&-=S ',4J<\),'[&%Z
M%A$H&P<M5&"D<J$#=Y%32;0%-- %.Y :5A $4H"DMK2DW)$14*JDC-2D[+$#
M%K$'(<5F2^%E#B,7)V X)] '7&H[#>@&#V@14"H$>1 79MH2:!H=:GIF7R87
M,0 #BH0"\D('+6 $,9 "<MIA%H&0,'FG4 H%QP=6?8H1>[!4:=I==/"HA#1$
M; IF_Y1Q7AJ!,!=TQZ:9AI2&I"(""P,71D(8]2@]AJ2.V(--5%D15U"=D*F2
MSQ5*W&E+J;ID*%0B!&<&,C,6"M$?DQ(C\R&6P:0V:,9_7<I(RR(=TT)5QZJ'
M*7FA"%HB"A$FKAAL)&5-=^E,Q3B?_?6M*U<M8HDSJJ-&7Y)*,I,6*3,W"E%>
M-<.9K%HL(4"KFS8V^A48_VBJ8^JDJ/HQ\WF%"P>DBD,DN-5%-E8\ 0.,U"(=
MS!(C*/67"N$A&P1._R2FT+(L9S,?RF,30M<>[]4D#KM@-#5!).L&9"H7B=%4
M"N%!W"$">*%!9T"E79" F<%V@)=YFI=UBW>THP=ZE:>T5I>T3EMVG&>T40NU
M40L 5ENUH"=Z2 MZ Q!WDP<"3DBU3INU9<NT5RNU9P=Y6CNU;'NV;MNT<+NV
M<JNT?;=Y:_NU:EL0(%!Z;4*T84NV=HNV:8NUA)NV9CNX<5NXAKNXA:MW?+>U
M>,NW<R82@U>W1YNXF7NX5ZNYFN>YE@>ZD0>YG^>V7 NVG->WDV=0=&J ;$@8
M]M9=&V,HID:M@QJ5^+>&CL*>_X>/>4 X&'@6&M@E6.F!N:M_;"B"8U."<'""
M()""*X@"2W@D,"B#;Q05-:@0-Z@J7?$5/.B#%<$L0-@W9S"$1'1^1R@4=85R
MX]:$3Y@?4?@A"B$"5*B:#IN%19&\"P4IW'B0GH-&8YA!,T2-(I*&^5<RR>N&
MZ:HR<VAE=K@V[<$^8^"M\]6''O*'JR2(HS)@AA@?%0D"BLB(CMB>D8@=,52)
M$76))**)/J0"+@P"3O $5% $8;J0_0(QT&DMDDA?9A-%?A%1',(600F,['$'
M&WD6P3,?*) &+E!=J-4">B S0= "6K"?3BE7Y&1.21QFL&*5UJ(\+&87?.87
MVZ&?4>0&>G28PU,\;Q%O9IFSOY.HOMLKN=*[27RPDHJ9TS<&A % '^4[HZ)^
MX,>>M(=;M\A@$JD?"E%.MS879I0&:(22%3S(,WA0]Q@\'7>*-(5D[B1@W@=[
MU*8H<*Q]W(<2GTS)XK=-Y7<6Z"L7Z?=Z$=M^TM80>TQDUS.DH?H[VZ%MA:Q#
MU5*Y(W'(;?E'2'F34/0OSG>9;*"04I" __&^(<6C=N&C2N%+0IH:M5Q[_J',
MS'RE1,H:\R%=?-0?9;"L=05A+&F"W'-/:^$^X6LW<?A12<9\TPS( (,5*N.1
M(I(]^Q9AIK9_N.NN4:4\V3*LOM40&<(:0[ $,7P% DH$1U _1> $'9$:4@ 7
M.11..WLL;H&)ZRL7QD5PNS./ <THAI(][&DX83$MW-*=S?1%_H0\PJB5)_83
M3E &7P04!U('Y>0&:]"4D,($="$7DU&&71)7)T8S:Z HAN&8]&B1$.0]!#07
M5.%,1OR3$07,2H8WQL4=S/(Z,(S37*$$.]W3/[U!<S,79A,?#+3" ]-\V'LJ
MVQN4.@BE31 J1^D<-0'";Z O FN"(2*V-W #)0T4=-&#U(,>-B S,: 3/-$E
MUV*ML7G7I:8'//J/XLL&LE5JTCQ -%.1SW(3&-H]1Y 8,M(]4+ N1K0=:0T^
M;,TH,(D6!YA$"G$$=9 L 8,I\Q%,E5-A.#%]_<.%_6P9A W<W",F::T$K_D6
M;.!#+5(1(B$%0X $^A,$0B"@SC'1=+(U4Y :&_=O(81'@I%K_Q),UQ)/9@&5
M;? 3D=86)<5+'26[LV4^H(5KOD(D"K$XX"1?=L5!MP@J/['"/(:1_]0Y]E45
M_5$75H8W&&DPF/*[J6$$5GE$_[1D,O/#/)9(.HS>9C,?_=&\-^N<0NE%L&0C
M.5HB\)TK@I2S)(=JWSD2?P0F)2X75[ U4U,%OA$N><TR,&+2CA+C@11+P60&
MQU)="M&KU.6_\2W/OQ(=+>9&]6:%PP(")! #+0(#)V%4-+5 ?*1A+BXHEEL&
MF+@M"\Q3K\EC^R<S_AM5U;:8.<._T_@[/"X':,Z&\C:OHD('<9'?&1@Q9A65
M)" #5WX2* !;.A1;5<%;="XC/\Q!:D,3-N%@[*8Z;&3F/:X0 .TI:95)'3Y@
MJDD',K/+/[% ZW(RY8M&#/Y>C&*&+%V=1X7@;Q "@@8%TKF\< YQZM3.$8/+
M'8:6'38&+U 503$417$42;$4A!0#A9H#,'P4=^T6A/0$Q](&,H/C(( #-#!)
MYY$F@)NZ@KNYCHNXG-NV=,NXHLMXYYYXZ5YX=[NT;JNW3QNV,W"YYC[N<_MX
MF/NY]JZXY?ZX^P[N_2[NICNY;0?OC0MUJLMY:-+M"/_M^A[NG?OO#Q_P$0_Q
MY([O]>ZVGI=WDNON"*_5#A^Z$B_R%G_OE)?Q%'_Q)^_O&A^Y ^_Q?.NW05(1
M1H#C53"BL>$$U'VB$DW1W?W-S_=&<W5F[7QCO,3E.'9.?U4'@:5K%CL670D8
M+^E':J4 14?D&6J6PVTX5)D:F2U;2.\]?@58&RPK=6$^I'2"9X'A(.T6_1*D
M:GU;V4(7XYJ-Z2V1((Z5!G-$7.][PTE(S-*0B)X?$,94&7TM9Q B9*.)J]:3
MJG,\F:6/;@DK;=4055(13. T$YTU6Y($>,($09 $35"B@/+B[UM.5C:O4FIN
M,Z1:O--(A?T_@<DM.I1[#((=<>5"-]R=,9SCZ\(=.DKD)<@R7T7[U?7.[ULH
M,@'I-S%#Q(]/@5DA"!>8O70? SR8$[2MZ"/\(*T\-F+H^Z*8$34M>(G4-#.9
MOE+K;VX7*Y4ZVV%C9=Q!NB;(I4/5?6WDWQP__U)T^V\8#3M#^N,@00VSA)<>
M140J0W:FM6 5/-#D2L<,01]A8H%@&S*PG\8>T[,RRBF'!8RV )^\!WR@ [IM
MM_6YO!<?N@N4473T!5XTA!;  EN@"WR!,# &RL 9* ,;0ERS0:DB*'6FL52^
M5(D9R@^) 3" "CDPC*2#$# +7P)2/!^PTL: $AL (4M"Z;B)*<@FJJ!$8'A\
M*^2-KI&W!4L>O\-X+"_EF3PMB.ZX8!E\>5WKW:$NA*=(R*"Z,X-OT L"/# H
M\,3@%UQY=9 .5KRU=;KV5L%;@S%O=?TMS(,0N)1J8!:Z@0C$!A" !2A"10@"
M&Z)#?(@0 9):PH^P",\!VT@'ZI 5KD.\T0C;SC:\%Q)G953#A5 N]<L*S1#\
MM84T@@Q@ 9>0YDDL'8(DE 23(!'S 2,D%XN !(3*7>LDW>,QA,**8#M  /X:
M#L/0/MR.W&'&IL .2V\S!"/$0F58I^[4:'B%TS I1!!W<3(,ATM(AGF,R>RQ
MQW *(Q4W\X;D<'Q<"0;12,K EB@A7^(WG86,L LK@K1;)U;F^;P;^/>E+,(T
M[#<+0BZ8PO%1I_*7LS"%L) @,A)9I4,&HG)!A\4A&<XLXA #6$ YA!\>P4O5
M+-)P$<%"?Y@/5^*(J(9A^&'R5S:B+F>!2Y082"80+0)); (FD<29$Y48<-#(
M1=AV"@$: &-O;G1A:6YS(%10-"!U;FET(&9O<B!44U)S(" @(" @(" @ " @
M(" @(" @(" @(" @(" @(" @(" @(" @("!02ZI5]#(                 
M                                                            
M                                                            
M                                                            
M                                                            
E                                                    
 
end