'===========================================================================
' Subject: Tips and Tricks in GWB             Date: 12-22-02 (  :  )       
'  Author: Tom McIntire                       Code: GWBASIC                
'  Origin: whizware@bellsouth.net           Packet: GWBASIC.ABC
'===========================================================================
'>>> Page 1 of TRICKS.ZIP begins here. TYPE:BINAA TLEN:33758
'-------------------------------------------------------------
'                  INSTRUCTIONS FOR DECODING
'If there are multiple parts to this file, merge them into one
'file using  COPY PART1.EXT+PART2.EXT FILENAME.EXT  Remove all
'message header and footer information (everything outside the
'">>> Page x of..." lines),  load the result into your version
'of Basic (QBASIC, QuickBASIC, etc.) then RUN it. The original
'file will be decoded into the current directory on your disk.
'-------------------------------------------------------------
DEFINT A-Z:DIM SHARED K,S,B&:V1 'Created by PostIt! 7.4
SUB V1:OPEN "O",1,"TRICKS.ZIP",4^6:?STRING$(50,177);
U"%up()%9%'%d-%=,RaR9[,1/oRI%%6Y%%%/%%%%yw%nhpx%SgfxVs*tBuS?0xov$
U"LxM0VC=MSP%)r&-=ks1?;5u[=Y/M=vB6O-AU*FQ2Eao_swqtJGRNR0)*J\8L+fX
U"^tqkQ#g6Ft4a3Gr'QWYN_]D*K\[KloWrQtoODqn<cAE_sdu#Ip2l6>T8Aw=l<R5
U"7S34jU5,wM<jYRI/8H10.Ht+oeqzWFQX[R%q(lc\fYm*r;E6=XElh,(mB.uOwOY
U"u6d(e8<o$0BR&?eLPIf%\(Y.X(Mbc#Tz+nYHM+#mP.nemf:Y],fYXNYB*Vp_Cu_
U"Za%p0^'4+4ut9?:h\E.#Z$'GoZ;G-zf6D+v,wV\,rnI4dg,6lD8x;q<3VIrp-X4
U"<f$6L8UNXpev>RKY+J/&\=kNkrON&2DU#SfV[7Ou/t4Ua9y(1M/:-<%eJ,zfMQh
U"UwU>0)5e;-0%Xr1G#pxQhf9_+1$Im]$^k$eM3aZRC(Bb:E#61[wU3WO,YBWs1u8
U"RcE7WfKLOi<%%/7hD<=9$Zcre0d:Ri%JrjD.mO&Ij7K.ZF'99k0/XFf-SztX6?D
U"N\7oZ0PZ%x=Jr=[oR_KwwGS8)J]&f;9-;2*6z,3O2zRbZ[)?E)Z;wCxQB)'chpy
U"ov]wK+qfe:#)uT94mxTo+gIeQU;0SD^;>;ZVU<:6[%LUq?o$#rm]piRTcVSqj_Q
U"<Yupx]f67X>=Hf*d=4>q+^YLYd7gtISwsca*W\Hl#M$R,d1\PC3Sp(NIKls&#vC
U"t]wmYa3AtK?wy$(ph_?s=fWlLn]+vOTx[tFD-(.;dqfqndXE6nkVv^O753?YBF-
U"DRAv%>*;6AI+=*5Msy#juC&8L[LSw:t[Y'sK-T=tq6<qWH.1;OMb[If)<svN'>l
U"3PAdx(VB:)y#'347tzpY.h97qQwAt=O,$4RL9X?uMID/onRq(Swo,72I\.o%X67
U"7&eSbIDR1Q:jMd4]?&#Y.Tg-j4r(0Y$hjO]DoF2rY]c\UT%%=T%S2ZeL0rdA*N#
U"f:0c>ROR/o*m_^\.\sjSN3Y/;XQ&jP=jF?[jHecUt*4*S187'oT5Z[qh,+=Fh;#
U"duwk*+AC9*OxaMNeq(pI9x.-Dv9)2#u]:xi(Xx,04i*/90GNfL%DZ(.sc<2:5FM
U"f]TA;r/8s;?3nEeD;LdieBH'Hx2k7x%-)q6q.y3k;SbECfYkw'grdI^-1t84b#P
U"t)%dNAs3iC#da8(l_xCPjEI;W)iXi?iT,u<m0G1lwGu5>W8fVZKLANl0z[S>x?.
U"]gCCOpF4(NE<9cR:s3<s>1qx>e$M[W^[-csZjZa<SM]s7i0->RPE2IOpAR&O+c>
U"n7sdN)b53o8BMqq(SUftd5d&4*el$f7pL9=%BUZJFfjXA5a,,Q)iORc'8[wK1#Q
U"qAe#\Ws*i6NdHa7+%FYu9]J9_30HOfK'2MXC)b,ii$a6_\hb(m*7'%(h(KeND_,
U";2C24=(LFrl$2uh2%>Ku:2n7YQ'8;Lyc$]gGd6:p3[zXX]NbVsdc=&2E&[]&_KO
U"Nsjt;a,Z6gj#BIo(V$)+g]%uUQHO[Ns[Xe\T7?i<dn\;5_BuS>>f0^V5TK*h_J2
U",y?xmI3JQH(qfI#->1Dx:wCnA5)PojlLqK9._\&1DIS4HkU0zK\rPsY&lT(uNk3
U"=C0fxO8*IW]Gt^KG84'UDp5O4-*3YmM/V?Qgq.%B9=Kx;?^N$OJ5j*YmA+%pQ.N
U"16vOM6(v_&=/c3>ZHVL'A)R9)uM_jL(C-jSVa07gFxM)1w<5?i)W/B5A,r93ZHv
U"x76lGKFrJWc[J]w-517uz7Fl;k57\y1C<GUV%:w*c5<Cv723][rPPA$nUn_jVVt
U"6H<^'fHHnIF1TP41-vrQAVvWx/DDih.2DGX-B1nZ0pR*spOMmu.)futS1Nbz\QA
U"Y$9B4J+DNhY4]t\4C%S65L]3q7n+i1NfSK[4nrpd;_ecxh5fdR%yQr[(ib2#Zv+
U"BUJ7WKiQ/[_Y(W]fxs('OiUliw$FQY_m#H4xTA+s'k6lL5Q<Ib6EQZUKxpFzeA$
U">#$_&\CVI-078I'Uc17'gy*.GFlEPRmMiomHf;l)(dHV*CQ)^4tskpqCX;5O5VA
U"cUM-l>ArivjVNV'q+d(0883c>UHBR3Ij[*lCdUF1,#<Ki&h]VXYK>UP''9e^B[K
U"mvk.U6q5[KmiC;0Q]H1RCsFn$j5>9v,oc?aU)>LQo6^Y03x_r'.2iF3&k:[qY$%
U"m=d:3Dj8Uj1L.nh4Y,t<KpOc4bZt9\>(wYBqJiv\^Xb$/bR3kBo?c-Pbz,+uX>P
U"R1WnH.OqmLsC&?mmh4_7U7%2Q,#u*;$f4QSM.^V?Q2,'ZiIRO+5ZNoU;(o(B+ve
U"YFr5SBUEDZu^l;XR#3+uJPvjW3d%?#m#do$9m8q=^;6Ffn0d9JIh'=sDr5V)Mhb
U";Bmf(86GaJ?o>Kev/X?n:tvblUtdJn*naMu+NPy(mBPlo0%yuMZOOk[TDsSA0)S
U"]UaTg-/iN$$Ws)]?Z]uZt/tmol)6KP^Qr9h^;x*1'fSbTc$S<<9,r3c_)<KaDoW
U"RR]?m7<a&;8W.E.Ss9N#&*4w;Y=]=Z1*yc[14VhoN\SYXeJccrlw]\W/P8w?0Q+
U"F2=&)VX7O.mZgyQh^Fufe8p6N:5<gs_#PK#K]LWnbjch<z99-MWaoNP;Qe#4h0W
U"--J3]GPr_eeqEfH,d]p/0&etfj[8:]XziFbp-v%RBcd(MaSj%(A$4R>EHZ;N>G4
U";?Lm-ujShi>SyUGp27]l)tbKo&Ku*b*7m$,ANRhk?;W>p9lXG_VVSZiPT[:R(:N
U"Upq30Y%.HdBR1HgSO%V$btFX=UA(F+$<YU',L='d=;<%hEt]0tF2pH<Nz*aP#7E
U"U57Z;Mb;#N)beX*)q%A+/c5*#Zrs*y+[Z[q^wkuWm]bEfceb>Un2B#aBHCT[?lu
U"[s*4%n.UC\K,43UNCHr+\5p>f7=V4C'v$2;I^+iC=Tjkb%Br1Lfpa&%6m.'B98O
U"c(6BPo9/Njy*AuXa.ZQYJP)o(33:fYY;T?i/(N>VRTNEbX[s/ASH3VGN6YO;uRp
U"DM0$ACdOYDvnD>IMM\&Tb>xl61c1VbBB-)re-_9VoMjdJJRKW4]1tZToCloyYAA
U"*d>:mQX+'6+KD5Dm2G1#S6d^Dh',VK3cA^F47t't)&73UNk)uLbY<L2[V+V8Z>t
U"[*9i$mOo;#t?<-V:;&BU=4/]VL.lTP5U[CtQ,f.oujFYg1\*KXor\<w$_M8X-YD
U"\9ebu2D/>e[Vo$#,8+Vd#(807Kn,[\nlTIWrhU;+QQ\kW]p&O](U$j5CKHBJ+I]
U"12vWOIrUcEp;J>k?,mC3hmn0Qk[wK1zj>D<Oz$q0PG,O^[06YDd[k<#^RA/luiO
U"[AA+U$7F7[%qF?#-5vR.F1xV<_XFaCIUV:)J-qPz&X3bY\TBcmI=M]f.*R=K)R7
U"-ee66*8'PM<h594c,j%(4jq4_wbb0qZgq1$2uJaVK+o6Z_6yAUAK\GX%9*T:+EK
U"q5Jt?=w3::Ooj+Y[#*NJkS/je-8Q#b)b6?\XE)eUS7=MS/x_B%\UQ;RR]24g3f?
U"k\*e\e>CPb6=)T[Jv%5q8SFSP#URrzT8-Dvf4'S+DLrQiEAShWEU#$mk#%i?3ZU
U"ym\ptpBY374:9MfPUX;JoB+\8_V2Y'_>L\>PN2w7>,QI%-O2bcPiy0EgQNWPw-]
U"*3UxbU9qsYE3VT3Ok,Id2%9Pt[g$xPg2ARQkdfusbT8MAd\.FxG[IrX&0,E8nSJ
U"')iA8o]xpTcVi.0Wdl5OwI75CgQ.IKimu&*QT6;cPUq>d>-?NANq?_8>:k(tI'0
U"/d3ih-?-&>JF-%abJw0c&[xaCP'#^zm^0xWuFOT/CaFp6ft%eac-HDq4hMbL3$C
U"scfiTUn<?_74[T+y&#arV$%HD3v8=-\5VT#[s8CwWc.[j87bh;9.p1Z<5J>s/g9
U"pYEn;Hg;aXbEtZqX1Zwo6A_MDnoCg57cr0K_L96sRfW8>gMd2$rKgHOLqKAh#.v
U"_IQZK*p2Ns7#XCD)n']()<)?pQLQ>&KlH;YRXD0iH$.TR6t/ZlUH9$c(A'B8i/C
U"qGUZ=U;eBr/0fI4&dTF0<a0Y0Ds]5THzRq[s7C?;$N+OcptT+R.OEQ37'<80BpZ
U"#dRs^9QcH[(P+k6+5^B;g^Ao3L$'_,I*b+(T*3'U\r5;eB)AY<E6aS+Es'TjIR[
U"_Oc(^4Mpk\K+B%P4'>7X&\/jLc=+8e07*p:_kcw.Xr8G\rv?dMdRqrLbDlXibK)
U"2)ZI(W;3ZQFmGdm3x'T5,x25t[-D?Go1MJg$.=M+'TI7R4;am_jUY:o#.WTGyvy
U"J#LRFNYzLaFSw'?c^4vD42i*NL:T9IHjQ/.O;X4qt0O.sKnyo3?<jrOW?G-g^*E
U"?r&ORmRJA9B#CA3L9RWBjn-*O;atY5d-06]wd2BTg[+YMcCVMw73YOD3F(iX;(A
U"Zps_ko)0W[3Y98iVzl-:S7=2NER:<;pE+36iJth&_&f2KtaShvQBTCtggh_NtwI
U"Wh_\Y3[-_l]'r[$)D.SQ8SZ^EU\5#2N:$G&t1:,e=5F'V&3m5yko(WUaJtS)SIs
U"v.'p;*mP,BBWnV&C&CbI=%jG9=vcRL44[9LSP+KlcP9q?N%5x85G*+Mh8RKVrK.
U"[?C,,JBLzp%=_,E+=a1bq\MT4G,Dp+Lu4u8ZFKWw)8ZHC;H'0lgT]_dBHA7Q2k'
U"^3,)QFYnjaA_H-pOrIK?B.V7U\i<(tVRl=qp(W$O<7H=jO-\PAU]035ME.NN+m#
U",cE3ULrDO89K&_F.3%3LN#qK%eHAZkhp39_mK=1P4i.D=[bKpAFuxhLi<T=rXQ+
U"1Z/Y^PA<]Vx-Ys6pML?Oi7.NEw;sqp>XI<_T5c\7RV%kE,cn?#2PaT)=p1:U_u<
U"#)Zu<1M_[qY^aM*1Mk/[KN1DW^kCHWrpRs'dcgtCbco9F_)V0WR]dDOEQQ-'&^y
U"<.+iM3FOM^w3IzL:/a2)l9aTlymvcOE/Qu>^+z?Vf6<I^>pl5GM4aAK0f_VZ_XV
U"pE2pCg#YFlFhl:UzFH>yE<v%fAZtI#r_uTGF;<*]?P[^P[GU[O-5hE\86d_y\uE
U">?;Q\X%^D5g^*%Rm'l>nHCmMGa.t'I*5[WdA]Wz>#O,JC'oWn0A9_(Mh*KYpcQi
U"^cD58j?_h%)0_^/mWnZ'GWaGdmSF95Wv3eHF8\:Uu3L_lC=>LopSps%-B1J_3GX
U"Q-PS295eF7_<kU'02OULj9ln%^36^^IwMPM88oGkJ?0ZF^>_)GlT[xMqshPaf-6
U"xP)N/cba%u5QitWg*GXQ0nI_C1.Tnzm$w/BKJepZ]qN0Qx7RT_?PAjoK+laNap(
U"DO&;5nou2PspKA4__'3vMu(TQm,tj2HAV0ekbu#<c*,?q%9S:rM^$&mLuPG.pQq
U"3_3wBQ2aH_Wh_YdM?Bz0-l7,#ZaZ1$Q:*A9=O[\OtG%emq.'km/.58p9ZNqx+NO
U"QvVhj9.6)IIfMKpk,AX2)%j'r:4YmZ^(#j4*aW'*8u$D^fx$dUFx<YNq-M.;_TM
U"UI7w:DUs,RfiWuui-5C<^n)Nqkd#VI[ZHVW1EYH6^br3&MMmbkVN%)fSL/FFHOc
U"TVz<6;e,M;4+_*H6QcY8\c)Vxd.dfFU>d4M#%T>aMjFTPEPT*vt<p^LRVFp'>./
U"_xa#'h?O#,\\ZmE][Q\a(0&Hh_MYNETk4sv<Gk=[[[]gL#pDti(?>^$UptOi=Rq
U"bz8UQb,\j:>mXg9NcEv?kZ2_ipTTr:bdGGQ?'v+UMFl&S1^AsY]E2>BF9dOMD:8
U"GCS^)'vO<$YRQAVZ'78HOI06a1bO:*m(ATrCzAm]&]lpK'nP]=yf3>yF_b%68*f
U"3\+0$YOduu#K,TNNeI*lGKHN/gpz/Ip\^^QTK^T\640&.<qUlaa<gcok'H)G]5o
U"6iJzC('p10^\]g.BHDfc6kkg#?KbC6k&uBX3j^\<GI>R2^FXWCAH?TG6$-[(G;G
U"*>>V>BG7R>T^[/%s1Q(j1QG1V^09G=ISfBVSufSDaxZ_DfFwj0utGn[;6lr+kZB
U"E-De08sZbZCVeQ6:6ln5J6f8>rhYq6gq7n_9l_60#:dI0i=E*Y1nzWrGuU)m50j
U"9o%^'WYDnvb$nkKVco^;ENOy0->G&VSGOP(cnahpu2YYa-[5[c'iSDkwWs3p381
U"3Y*Kmz,EHT,:gwn)^F*k__[]W7lSV^BPWOh&MU0tp^JbSIfhEJpS'wQm[^Io6,p
U"eLlV,GW4Y/Ajx'ZC>A8GGh%ch0$t09)DH[T__8_4/J#YZOtD?JsaPtPu]3jDZit
U"jD1M2.Z5Ut0&(#]esff>%x;uLUX4l<f?5+j)s[u%:koeiQYRXGWB<GCDY]]6Zjp
U"e6Qbo-ng#Zb%<<;1-a88IHg(MTSqhahv4D8Bo8+vbhf(k?M=L_*_&0Nd<Yp+a*=
U"nhB3dA\lXXK5SlqhMuvfwpRdyggSux7Trm[/6oLh=-^a:sVoiMar$bF/:UH9cum
U"l$fH]-.*Mh1E#.iT%)Vc%CSWI(SzwLZUTKM<ipbFn)?\XhApTdR_yDqK2sZhfjz
U"YPmUR8fHpg$kbN+6:(ZWfPyuwBWI#jmhJoU29$:]6_0qsqdu:k<LQ<RoAi][xY;
U"$,woYBAdDuA'x\t=FMKwb/R7vQe(1Doh(R^AW:AcCUHnNX73*d-4l?0LtdCSJDN
U"#RtBT%](Mu>,6L_XQR-jPh55*LUEbzj4*c_Z)GW=_FnuVLPxFLK)KIFKpgs&_Z3
U"y^lhj(c,OGGs]0-&:&vz)f6vD37NUCNV$n>9<;bh5ic&vW>_0etd/Ypej<5-H[N
U")wJYYF1T04NsvcXx8mQDzV't-^HxA*&?$_9WJH$GgYXTpg\o*dIcf^^sIOmfD9.
U"=Q&6$nYnW5xZ6d5:/ft(1u6B6s7$mf=W:%/O6sq0/.>D\Pf8Zw(iRJbLf_m4GD8
U"F7Our4LB_G?h(/bhE,*UZLBGe5lZ(8<?dVQq?%Qh&]YLL-rF$.3>hc/)UW?OW6D
U"U2MM)+?m4KGG)^xcj-_N.>p4803^*v*XA<Rs[ZJc3=-D[&3$Ou3B8CFZ5uSi;t6
U"$_1+J'b^I.VZYs(w\jSEQ%*A4^p$7Sv+a/0Ig,s[kf/k<zKV#(0jU/J%?,L'IAR
U"kIb4FbGJ(oDOnqMBWq]D-\:AM$9k_ehoka2QYk:VwOx.t6PONr?$&X<H)$42kv-
U"b&(0.IlLNfc:SQA-FFT-PA4.LE-O5Mm%3IEV['aF8uwM0d3K,t;<AbQku-o'ToW
U"z.hq<IFLhAKHRn:7utP83aj5Z_mLf(Q:e)Qv+aH'-C&<$s:.L_J40_2HEWmNG]u
U"*ND*Q>P_(Sue[_cEH**+oMTfvkK*GW--1O;.IH>BtqVSDi(.x-GP'#?&Ko&cFrU
U".&uPLNmAYO,gU5Q%?\Qic3dV((ZUiTA>Fv2Go75Jk#FCC[&Kk]W0jyGYs?I;E)K
U"J_QHXZNs2SZ9a[;17f8/lg,k]/6-02V?p*:PAtv^O>UuKipN+u2nmn]o%JdiL7s
U"8L(]G8KSGyjK/9dygvMhQ7MR:fTx2_^4q=*selaQwoMNq(V6QxIa-wHQ:wyNc':
U"qJZfK?clM+.RAhLOb8T1+>U(ZwkSt5.79-xvDCXjTFj1x]qdBhbZ>RB-Rr[em'/
U"%+;CN#(0LL8'<#uLXV43%8D%F;J0OaE[j=m5u6.WB9hJ0SmlrUS4M/,=+*^WHM,
U")68%[Zq0BKko]CaSxekT=w5mTI?OfhLFlUf,oB#9qr,%#C,8kJ./^JX9p$LzdT9
U"^>KuBSGi(sEsrWJyh?la?:q>ad)]XF0w&HJBg7ha<UtYp4PM7B]w,b'+d?BfXIY
U"350tkv)Ws6Ui2]4V>:mT]Ay5uZhn4)>-m(%v.AwSWPxGk(C('DsXpuAN92Spw)1
U"R)bCj/YVhi;tQ'HRHO,l/KI?,gA*P$KmaI-VLoVGXHtm'bIcpXedM\5c4oV/&[#
U"i%YS-L#Rrw2(b.)XnWODbgwc6,(u)Y:8+h4aV:5DAi(./of6<.MN_bNY_ALmNxD
U"^,]/Jt>0r+mwPFA$0d1n_b,9'^%;GT#w2yB/nC_c*1rM2Ih(6&YUid,Y=#D=^c_
U"ImidY581s9k3-#1d>mL*%u9w54b8QW+2[W[i0]=/<cTtZT%26IMeK89.ArrGhes
U"#6&5Cv<ksM20i#wx5)l;2X&6uPC/_luZ;w<Nbup:+c1Gp(8k%PC=pvXlLz5xLE,
U"7d-]Xay9C/.v$Pl-#7FoQ/gci;PN^[b#'_tYMZopnli#-dd13;xb'lr21*nk&7X
U"s/_0kPC00YUeHRI?:L1aa9-Rj52,rQ46Mt#>yM0?ovlH\B9x8D;&*(e$bm%,.[c
U"mO##DLF84n'4W\bLZKgu*zn#hp3is$,4--iSQEXEp)G0$M5lQ1xiBO2gp.0MDWN
U"g5g],?1xNAiOA21%CqCT4m6_^Ou>iA0L5q=JMX\qQ)'H9<?cX33vNg3jcY/d=VB
U"e+7pPIGFEMn\'GnqCdm;NE;zytGD_y-CvIT13PvNoB/h^f4P+hO'n<w$,V?ai>C
U"x#s<As/7Odw6hpa-(_ulmdk_8df:BZ4\NT^4k)J.9B;tK;\^WFk+5#L90xTcDAz
U"?h#rRde4t?kDt<WA$#h9C8su#MyXr$'kiGBep4Kt[8ydr<ln+PHuewFa;(Mj\'y
U"m=e2?Wui3V=jKZi8GYLchhT)O;R$5VJOcT(pr'V$wXiXrv$sxNHl,OSHYGwP;\C
U"kHkLma4.[_J=9ckZ4jTM*H#L.EYU?.EoBl[IINs:,D/(J:aoDKxq%ING,XgOV85
U"a#[21*[bOWPEL%&oFKSk#QYabn/ptycOkoGT4g;H>DSX8JcMeI*1&s-lm7zrx(,
U"la,Lk5,QH-nl3Dy:LdTD&4[_*u=.]C?uk-,'%Z-+,>Ya4Yg9G%[[\V[fg0qvj1K
U"RrO$=A\0H+=/siVrCIni_H09Z15z=/-vAkVMck77lt7_[*sHmjE7Uszf<oz<-6%
U"zE:\S$SC.lNo<sk6Bpl)3F$6GUr)k7k._KQIRE:0AhggBR6K-um)ZYc,E//ZB.]
U"iT;fn#sq]111$nh]eF0i'gsJsX3)F%fsY>/yf8ZV-6x8XCNtpu8#-*H/XW'#9cJ
U">n9gGde=%5u1'tG%AkIKcH;bt<#=P278$q&FDqQ^d1FAHe^$v?<OH'CQ3Z0]I^G
U"-iGP?-Dp;<19f3PE)]/.wCVtVsXd4iS*30J5-sdH09IP.$ztL+^\d#UaFj_47h%
U"gNdP)g4^',$>'k,.M7Z&oFQuj?e#)L[4G<j-E[%jN>/#AP]D:>E7gr&GaE<f0h(
U"l2fI/m$(UgoFbl.vt4+Y]aVB(jT]ZSP[Y%i>J,uIAfCl-_7U^7Qehjs.U%R<w4A
U";UNvKJ5l'o&pvv((DfHc,C-V>2,bXFS3gGcb#U9]HU#M$c_l(f3Cf0kc/K6i5lx
U"=c]TN]s%k5D$xWv8U)l)F9KdhCupGW7idmmm$X-ApgsU0)&rl31PuV%./)V:oq[
U"FV\sfxf4]pzq;)W($JP[Q1sMSPEV-+VOKq0s%F7.H*=8kUu6(&bU]J:<S$2)[QU
U"Bu6&b7U/OK:7X%Wolpm:fKY^,1a$9LUd],[fZ8mYT%8?*PFRYBbCIp]<&R(&VEa
U"_H/QtGgcY2*H[7?t?Y3,k:kO6dSD%UtG4gYT*BH*R9,mI]-]ebp6]:-0G\qqC#2
U"v#%3M5_?67U^eKd+aP-q#e_^D/U>B^+bl%4)HA.8MS.a1$gZagNfX9S,0qtCcES
U"*SiCka2$+UXM5>o=/jaqyM%JoTpnc=kGNs,-Vc54#tyujkiIoR5d8\XvhAg5E*O
U"na*u$DYk4Nq4CD+-,>5&:3?=C5hUbHGX9NcJFwK'9MOV.IcfP+Wo\3pV6y5'mwt
U"kr[]H-?m7),=OpND]Sdm'w-aOo=.>2(H4;z4R.C^A7^H^1yaFslJP&Dd$N*G;Rb
U"g<oaz8mNt6cP$1E%^jQSo$13m=vD$1+$,Ls5a4dH5XgR269h2my^aoZ6OeV^UQD
U"2HoKDJ7I<k4O9D^Xs2pY,tZMhITcR/k^d3pqxSHAuyRtG?:ehK4ZQ:3-ZoFt*P,
U"v><w49'(N0Z\FR\s<Usl/-ippmojP9j=wgG]d'Gsm%6HO'T*6k27Gd+ITNS<^/?
U"QDc='Jep^NF#x1Ws1xb4lH'TTu+G27c>?D36Ef2ie[GUc#4c%CI7:4vv6bo]h\d
U"TC.9v03T\k#JIb81JA:ed)EeHSti)j>eC8$P#QR]4$6nL,I$edSmcClN)_*0XFp
U";+h=UhU.2tA$TU)-hnOkBGG:6CE^7mzoh)8DQOvrGsTi%XsiG%E?ZrR]V3?#Bh=
U"[77xMPz[ybHeiinEv4srV9wtAA*[eNSd17C%5#'Qwg=NO[TNMR3?LV)Vv$^rH>L
U"TAj>r_,J%106>f+OPMlzjC,3$&OH1)9o4%(W<?i<q;C+FZ7mf]r9nQ).VP3&J1C
U"Bwe99WuPhv1-#Gl\WaOceDJl#kNsgLs/teS(a6;'d<4:v$cXRn29[jHcqJ7]cCi
U"AB<>1N7QrRDoi-lYhWL=1(5qUkLa,=Zb'P,l18f;Gc>zAt%g?3X8.nXdJn<b[3e
U"l;2aczFRy2:,pxadE]g9%i]l*1p^uy:M8N%r[Cb)aBrY/<;83Y?n[Xf-R.4I\CE
U"h2FiPJk.fRJM&%%T)1l8A6T:>SSnPI6r^mRS#\h$KDOUQkH)=UnDCZHULBdAe4?
U"i6Y/]$V+V_x'ozCD5EU_,Px;zXiLC#,WKO1i6VY/0<_CQW[ZLU;nIyL#qJRn.c-
U".Kg)u^ePqy7OP%C\ru1m9nKURWLH:OqCA*;L#c-;b\.D$xehGkEvU\&TtHsJ(+1
U"PL6KaUGJpK_NCsrD]#o^a%hlBq+.XVdbaCHG0dDl'd$[,53[HG%Ac3?MpcJ#&DG
U"_3)2EhY??W&23/E2Yu?atY?ggY&Gk,;]kPjaK*)'S<$tF\,JTO\jn6I+%Slwj=?
U"^p<scA[u>'&6C1cZ9J8U,/&MI^/jlG7Lr?$0+RANag6yc)#CZtE[Mf^6aKC'plv
U"<EGnAesI3\#SU&tYF*nhqr_'KOe6:=]6P*4/5HX8k^>rDvLQr=1%02[^#-2Av0X
U"%pTpUm'*bX_.)GV#VO?HOQik$C_,-^+(u9qpm,OljK\uwY6R029x_afQ2:ARE-/
U"p0^t9>=3=a=>5#5'VuAd/gTetN82JA3*XV=_)]PlYRr$cX=Zl$,sUfK*]nu6=:%
U"n>4q*vc]JjVt+HI$M^LHIWh:ce.%hY6jBkt-hA+\EhE=c$p_MP#tGKj'&+yrGtq
U"yc'UWdU[hqLiLuIw0>G1Kcr=qlV&w[SBV2<k1^yL&<]I]vm+e_Mh][:^y'm.2my
U"fr)4$2uh2s3b)W&'9^/jZMf--GEeP_i)*q/t4e;<8oaVDh_Zws/Z#IoxV'6bfoG
U"0/B/0/?Ji*nx*-bD*;hmPNUdAyr)o?k5S[f#,9%*C.GiJ%qHuN&gDE?T1?eLw8(
U")k1eE<KGkS67[*0M'C^hON^t[)3g/GkDTf*#(/.KGS8>7DCG[]#$lvBHPGb:gCh
U"TBW%c2rNnxnOJuGAAAYFV[-_UyRJB.0f)y^HE(]$]I#KnrSDKicb%y3>6,JwC->
U"G(ZI.TB,57sicBD,5GyJ4Z7_Ci3Z6EIRWhKVQm7#ln+JYgD<Gku%1C;kd<o_B%:
U"TXX3Qk6i5YA38rj%n5C2B3>X^nF4o?6YV1bEKmeO(lMVtN7%h;#CAy#A&VK(ao3
U"2Dq+ZOaaH+K[*dx[Ea-uL8R1GY1aP:l7f.k)N%rv13j>TmRD(t?D<FUgu947g/.
U"/:cwo8/Ble<kv'2&UrwiWn6g8W#UF^O:(J6&=&pt#:v.I,A-SG#ExR7,:AX*8(^
U")68x[)t2gMAo-AcES=G7/dTm:Vy#-ojc>Nh'MeOzKX]'EAjeYe&)Nad,p1k\(W9
U"obt'=-*0BMAftB5fDEO;gX0B%w<XR<0Q'F,y0h&<T^S3Sn:?sH;uZkbx0h:B+<]
U"iA-J9vDY4b]l//ohT^rQQH/\r'SL[l50sW>WNjYO('=o4NnwusPbjrRNp9waEqa
U"ZT3Ok9KPs%wvR.AdO8>Jcl+kT2WvEl(Z8g2A^HQp1<wIiJ\OJ_w.9hoM6:Agofx
U"Q:EQ2JO_VE<Hggse[K,=HmWYt./Dkm?V*0naDWvfd'lJ=Ls]_ApyUK#;T;Z)BjR
U"%qQ+ciaK3K$($\'$H^s7[cI;R/LjvZA\Vu;#9-N\Z#iH],$giVVph]'kT>$-nm-
U"oMmM7[,o^>iRW.7CJ3tcn;G>qKi1,uRVVVolXE0'?]&mD.<U/=#hWG6Z(lW,X([
U"y:$CusKOT4aLBZS;/e_$goW/v\$gGYgkMrCjY8qb,tNM4uWiB869lNAw>U[_j4?
U"N=UA.w,3YlC?9[y[sIu'C/hfeM7o,T'?uJsZz=i&WARcnK'Kb.nr?Q?Cqu3(8:j
U"KcTJt:h6N<9D*11p[Zck-1s.TBn8W#U9(-uiJSR0u$Vl:So$r?n#7/M.^q$hsj/
U"7A>00XBeDdLslMhLa>JI^Ga#6M5d]C^8S+1X\USNgHrII:,e&;+*HOE]*5Pj.Qt
U"Ko[;.X&_ZnUlH]TIepb[n^%$))>qmCA7R5c&N1+cm\ZFstM68?&m[o+5QP+ls[b
U"0%th*6RIU$ZR[kFh,JQz.(Bmx?4;cOt.<twQj85lxl/;v)GDSgc5I:d62M?cy\Q
U"01wEY8V&TJypz2j*K])n%u85\C:u4LlJ^sT2P^t4l%SkGs,WK&JEy]*j2oQBuY_
END SUB
SUB V2
U"JR4&^+pu1S>eXan)Xnj[^M4qJ1-Urt9.*I:.Y-VlSt#Ak7bf9'Dc0r'F5D4#5_A
U"N8tLkAOWAb;O;l*_RK4jIkXCm\DjpK'vD$cK1B\tm<hoP162P%Wa.sZ/MWmJ'/U
U"j7sUtpsj=o/xkkF^G3KBH[ULtTBlQ^0>Q6A<\0<RUOksT_9BxE);7f^'*=)Yc>k
U"Nfsl<VYY/+vN<OY+2dj<\<sl1EC*ooi$5C>9e&)G'Xo9s]kaVUx7)Tj)AQOX:/l
U"6n2D;4YVe[m_d6k+tgG%7;^hz_dc=\kYLIQvEofRK1o2=qH[Bf0o0K_NYw7+H/M
U"Dcir?B%3Sx*UJ+U''*y^]T;a,cYB[Y]2*t0[&TQ1EO[M_c>\m\\#P/XOI^HbVZq
U"QQ[<0v<SZG+m0#/XP^+ggIQ3s5b9V2Goo[G*N7/X,+_1z:/nS;bD/Ss+K[o.LT8
U"u0DGDQN<Z1-dcy4us[JT[;onLgW)&Q>l>t\_GG#6mPG+1zxhvaPq28*uE$jK)Q-
U">QQ;B'SNj=-\6.6>'dQFyimV-7%ss6=892G(_fP4ba:;GK()x$M]enwn'>(l8G3
U"<>/_mFlg[3(Kp+Ud^*D_H2s0DKOO)-:TZk_[toMC1x/WJ:f#L(xaEO)>HG/;x2;
U"16:H_-7<'UKb;368(2R><P303)urUsQBQ.IR&_k$9o'I1Kk2c^l,_=Ft0FEEtZh
U"RjtQ61ieUa#mgbj%a+'l#?4ZUu0ZEh7A\c(WrZ7tiOA%U[J5v[8^g/8TF4Gd+A[
U"fV9liR\cTdd1VVf*9$8KWSv^jw+=xfI/MqQnP.*ZchBj)bb[Ulu[L'<hM[0]_A]
U"7&.Cbo+FXew\Aq%T?GFP#]q#i5sfoOhS_iCfLm[y(P#LFjNtthU6U?0$[)QP>3J
U"Xa0C4U_4:(.d)Vj9ZT*3Y5MgmOOYI)]XHrRy*qZC7WSbMN/l<n_sn;:?SSg3\(p
U"i<ObRe7)*vK:s?w\<BwiJ2.#8<p_=YJp/&CMUJHDdLn[/qc*B;IP7<8[^bAs+H)
U":^?C')%:R)Dgl0EgXUY2/<Wj..lgk4Y8%Jk#gGKq(Lr(^0-ZsW\Z3gH.W6gBASr
U"^j^n7G=5.^+z\IsbF(cH4N#oBsLC-9$IRCo(J:dMg5ajJ&xSYkWmTcC.lHb]ZLw
U"8V[mLet9W-au4dh..knhj+GFRptN?(d)(n8=XP&n9>q[[jM)x[/[8+M<)B/WaU,
U"cZx%H8*z+B-;CNeWj>&pNoj?8WI^&$V*\qwKn#NCPK'4NA'h>%HC\>P&1WOu.\?
U"QmD^4</cAy1[0DMGulyNr,pBL-6MYNgd%jElme9XeKEFO8OGw$O[Q.p3KErYFBv
U"CD]vSJ60g:-2Cgv%keoYlC19)p[SHrC1dVV\%PwZ>ANLbm(6_mx\T,xGmiASHdm
U"$v87cS8>WE9-5wn#P1+%X0O_Eh<=NqB/<qJj-wMlaD5o6_B%#tUt.#C[>fm6610
U"]RT\EPRl%pTumo%$=s^9nZ,ss:k^?I,riq+w/iZ]=7Vl.Qk__Y/]^/o)4vhH$*N
U"G(<=4:Jlr9R\<l[^$>+#-#:WI]C$g;cD\Q)PoHiY.>w<Ji#[R[/E'S5-0(5Xu(S
U"Glghh8^sVpc)Shn6&CSvdKnh<mcZd+&MDo^HWG\ZIO<uD0SKE3N2L)_nxk]U\1E
U"97^>%Tu4kr*i?p8,Yh9AH2QBZ/1Ph,-$D^1l)Lks#i^=mNt2^o7/^7tkh:d+mr;
U"5rUxpgW/w7P%AaC.Yj<:Oa-n5cKayp1+xfpONxvqF*xv94j(h4T^w;hdGcTQcoe
U"S>y.+?g\ZVtHrNHT8px=\%Y'=#)y1z<70k:9:S<\<Y7DeYF:5KU:TxI[T,t2q&<
U"v+0MuYKU0o#W.^hThEe3$1c%%0FQBZKDI5vV0UHbpc\mtT8%,$IuuBq99*R65PZ
U"SwLY%fm8*J=tMJtQ%L^<7jdjb*mrPsh;q.7VPM;vb.5BvqSqXx'vdup%()9%%'%
U"-%'3.bRO%go)'7z%%(%]&%%/%%%%ywnh#pxS3V>2e*$F>HD>#$?sfY,'GlP,P]J
U"_YsThf+a4sXLlBSv6;t&UGNSLJ_K-Hf<pO[6^7b1\k$^u]cBIIFl.B]pF^]d?Ef
U"]bgQ-Y*UkdFc2$59:f]Wy5Dp_XN]_qcIp'S'M<BIykMV,Npz,NViuf.wug8wNuX
U"wZ8*^%clW2>]MlvjbUS>JcM4(wMC+dusS'ptuaPR8.NHuq6zTw6wM^+NDxlxlN_
U"llhNvu,UtUsLXE^l7nJxH)IQKGo_<N5hDLLtFr<DsDwcVu(W^OgcnKlbJ2dsZG,
U"U.?Quh<jdF<vtKuqT14M^dtNCwHadDRCc]pr^ev.S<J64f<LMNQKWHen6X,2UN+
U"frDUrVRXEZ^we*i5M*rR\E,>BxfSFX4_kbsdG^wK]#OHT9R_JL,k=f0k^c3lupn
U"Is<dt2ZUX:BX*c8jjFFGU6x5nRlfNM?2C#(^mmd(CjX_*>jh23Z3&ez]5zHnC53
U"pJz7t4bbt=hL=GGS>AtXX(kadn8\?>\rNNAt^-?ihxaqFJvlV6z\'Zf$x]rH-Np
U"CnGj5LH^+TT7DW];R:[k<JK[zd-^EcfFsnMHCf/Kufn4]b<r0u5Iuur2yJlU?iO
U"2,HZIH$SFbjQn(i?:E9nhTj#U$RfV2r8Yk3:/s)-(oZs9c^.&Kgt4S68i/qvG#\
U"_p49$A3CFBYP>IT7\lU6I?ci6Z=RK.K\2DrA.fffvc85pdF3fP5$c_pTL+h$CaG
U"fMb6n1<r,kGZkUb/r=gX5]h$J[64L:4;_>#X0a)#nCYjg6N+_3hIHfhTd9r+XBX
U"6o$I]9c8pMvf5nDeCA44xux<p]]T$#P$6UHk%_8Tl>EHbcEJ,n8&r%Z$LI*hV&#
U"ubM4jM+_/XII_hX)yyA:IoelIRDeAwoFDF6P/9cV4Hh$,g+zXG,8CK=OVc-A$Q(
U"m3p5jG>L[i.,$rOY7j3?&\SP#Eeam,5w9VEq[dehCFEYA0v[XVI]#8hOPR.15/N
U"10CuL5ax=eR=ITIUQl2.e>2Q(+a=f&qLUNi_ff78&k[Qf^Na:=U*U>dX?H7]8>w
U"Z6K;A$<]A-4*pbw3X/^go(4CyZI^KcOAHZ3Uc]&xfI5<umkJfP&R'Lq_arlgJo1
U"w*E(+g,4afagw33$O]/=cu<)UOU7:56#3TB,ZC4wQt8Ge>6oe[6IFl0$<$.6Hp7
U"/fKe%&A^+*M,kFlk-(HOsFWPgT]+U-p;rEt2^t/)^SvtkF8pP^F-(K4)8_/,jn2
U"R]f%d?3i69j]>6ZnZkgv($<n(637;+GQ(#R/1:?2%Z^S6Xc/Qv.UL[iD/#*,4kE
U",wi3\A8k\]R]1IP6FR#R9+R'Ye9+1+Qi2%7:V*V#DB0Q?9pe3[vcB*L)_:>7ks3
U"sl.hCJggcG2HE[yT#AzNbPb4v;%sF)zJ^^J>>zfo3/</Ntl28.\6UKuKV5i?5$S
U"?AV?q)wRd;>7L_j],]\R$B4Af#Kl#FU1U#V-(gQaYa:T#IxU+03+VEB_AJnRV%Q
U"C*+N]_l)83Jg*6Y(^;?Ni15vSGLx%zQiccJWnDOUnBvVE]'/,'.o#)c>zn,>PTR
U"xASYv-SMkjT$7*L%fFzmr?f%p(%=y\%u,5,cEI'6Owma%BYBXM(\0Tce.fGiBTF
U"$'0ESL#te;]Z1g<^#>+3w\l<LFT9utUFA0bFT7V$/7K\0_3:G+oOIJVbB4m7YV\
U"Ysc\'6O%Oeh=,l%+-lE4,q.$SAl<x0+g:W+7<5R0HI\?4PjNUO*pqQNG.sBes[i
U"I4vU(Nd1[o6+wsBrC4tZ+_'5uk_BfDI%huelG*YB:,b-uF-w8f>q:#6\()UKgi:
U"4?p:h0Agu8NE%9nGF4svBoCGc(ES?<nf*a^-$6q=5b43Q:&5[kV.d<z#PW?.)^/
U"*=)I_tY)0P]U=/al+:HFc3DoxRMdxXTApqb#>E\z>8Gn6(^^$?FMl'o9FUKP-8A
U"Un:wZlllB'jS0r'qRrier1<BW*]/;#N(rf<q3?7'JE^'(6B]<$;$rViEQa2F'))
U"w5(qd<;[NeR#7?w:=y4N?gQ=;.NY?jtSu0#utB#?Y?CWP\3QzvgL/VvBeV\RM4[
U"khJf=>PYaJl-\S'1A-sl0gF.[qd#^<eNE-,gV]PQ/'XRv6.yPwSgZWbuaooBb+d
U"7hifssF%em[#iQ1CJA,UR56RaB]W)/.w+_F-j1+p'_UK\YBaL#fnb]kkl\k+*I5
U",E,TH4QSbc7YsNnBMf430&g4?C&o24X+UESM\2d4UfS?S].DO4f7KUv/hbOa\XU
U"'S%c4lZKoukN0(ZHX+O.fv(z^;aS?;rzdmAQ26%4e,_17cd*)OIHF>LG+yzNhJZ
U"0C20G/(Y9nw,(/QPs0?[w++D)q)97JW%?rKvFy>5cSNbHO7WJWHjQPo=0Q5yWeh
U"yq%E2;O+WE'+Kl=l(m,$I9%-*^&kT^*an&.4bQH+Ii'8;w*dd&X=[*?YD3pLbBV
U"UBs03(WHbA?77DoA=q61)g9;k*EWE'#T0h3;Zuo5B?I15.HuiUB*QQR\:0p9ZsY
U"s26Mjyb23#igg^um:62JGqGZ(B'4KRmWRdQZoORgo&3)EhE>eiB;?pBW5rkt\,Y
U"E4STU^N^Vc)-+Pc^$Jk$uZT7sMj8\t&##^[QQzm7krf$2Dy>B%%$3FNp<TrPO--
U"$HOm:ypLM]h>u(+eeDcR*/+,,*XeINU'+ejmP/j_OY\s5#iO#1Xd3U/UP4jf4W^
U"e)A$D)gmEG9r'(1I3)sMFwtdZU]n9fbU?YL=Gw%QvELW)5tMDT_0jG<$S-kyetp
U"*nG+T/:[=T*^2MY0egX]:[$ZN3GoPnA2qX>&A(qrejYR:19yD.R5Iq1gmsMO\T\
U"Wbqn$/LEB.9oESc-ON:ykNKTaMm'8MZ0SToFEq-%Xm3k]LydP9:e>JfAN7y_Gj(
U"DgQ.MGil-]801.jkpH7A%%U(nQceZl_g2ohE4(RIG1h5g-2P.Rn?+i.N2(h)8c:
U"r;Jh$7p]a)X2Iu;EF9XKj3<t73NfT;32BR;Q#K#ja4C6(R(PAwe)Dj*b7JwF,m*
U"$WS]\$uBh\%(ZJA:nUQF[2cPi$JGAguG<YjqZ</q/gwok+B>Cg4welAqYM'B]Gf
U"^]R&ESRF)s8S2fY\oB+W^3>p*9m>8(u)99$ROeYp^-YF*XVB\FO6]Qa>rPPxI1I
U"v;Ab_'=WI%L=)Kxy?DErM&<SE4Qjh.gY/]Rp7T*+$ET,scV<NK,e0s2v(N6:%iP
U"E,k>5cTTT7:E+)QJJaw3FXY0.GOpwOvNDjt$*BKKYjjzu7[Q[gR7[CjqTC>OPeM
U"c=ELFC4'uY<:A00w8]'_j&L?sm[Cr&KK*'yo'f*]L(5KWCT[A'foS-8g[S%Acin
U"s9=J08sW*YrVy4FrL<+dt]*Jofhx&(je(-.;r,ayK$bAOIOD+#mefa4h?Ff/hii
U"-9]R12s-cpI<J0+QI*q+Oe_E$6,hP>,BfYv2xwiJ86$:.:U<Yidgs%0SpNA'VF0
U"G3X*>6BF_#UOiQcb]IeehQXzM9=Sv_+yM<#By\myJ5>3rv'[vY&?m+NE3J6Pp2E
U"%\eNqyhZC09y9nj\?:D[r9\)nokOX?Q*HPrBTC;ZxR;rEfPPd1-FH?5neiG4b[7
U"o]Ow85knm4nK-$6m*<Fx3A-prLKGRK'teM-e0Nv*]]w_oDAH2kttpPh6Dzm(9o,
U"uc$8lWGiEF+1fMJAlHKklmnuB35tPwT:r<Odnvp,BX#>2Wj:sKTI_Ew4]jMTbLE
U"ha[J5f9lb<p<M1-qcR''O_]GnGg(mR8$0W/&68[%B?.Q)ie=haKSurB,B<^)#wP
U"9e55$OuSI3sV+Gq(BsJE>WakWKbinlBmfZ_Ie7J+1wn]EMZ&o_u>d_s('(22V2%
U"2c22*_BDaMUc\<LFgp5Dg29ns[rWN]%a0DUx'$/R^X-<rKTANbUU&Hb*1o6AOj<
U"_2aqN;W*U*'H6Sl;ivQ_FdU<A[3?+eP3&s(Cu>X:x0B-1.uj.1Q2e%jG[QKR4Y\
U"gGcF;kY4=;m-4;jsS^FKI#wCx1>jQUfhyc-L^&V;=lHbu7rAFq1M4&c[5#Rt6+8
U"LKT;)Tdg/se<g5k7_oA0+=]L/'Rw;gZ/a3_[RZ;+AtVF*Q3msRG;RWaag(cKB#e
U"+dTI/$-%0Sp0[+-(AJ;Ylrs,)%&n=+0(>SuDWa<8GBX0jPT*qpw64G?7/K\W']C
U"7]%:4p5enP%:;YoDs:U\Xp;7J:w+ZYqU<B$uvA\:PardC5wG(dt:w;L7yDPq1Wf
U"s;&(,D/Geq2a$XSP40)kNqg+jY&z&4YaRfk*(30Pm+AlJG0aAw'<F/'iU]DD=GA
U"VYg)v5m_kJDdMRgJ.YP\-a)8wI%:Ir=[RIPi5][CHQqIC$B[T$FS%mUl[(Y'[,v
U"pMYm-047YgPFN+Uf[9D,E[er5n:sJ/hjQq(MhQ132gQ1SRr&_J7GnB[:*4*WpOg
U"-=VuOrW/wzgmV(IjSejGYA1^m70OGfGadmj9kpM29%^I01D.q)uUTDi+[APJB8h
U"2/x=Ck2udSsV9[UlBQ9(1gcQA[fzf*?Ong'C=UVF5(1u:^[iDN5^rwQO3i'LUW9
U"]Th+_0FZ?$S)o%ro'g:-raKp.S?g+[XpW#8/[.z1VC%%^tIx#)z#<m6Y_EP1#=D
U"?1dDLHl/(UgGy'fa79BjZMT[IcTUsE3n9g_'=)bv)ExEZjhYeubA)'sH+0?]?S%
U"?vio(;-K9vt]?edoCmFE=Y&>[h+OmU?EYj9<p3=8WiOG)d57>qi5W=VTd)tmnQN
U"Ab.h1X+?mN>;_yapfrZAS[dQlW9'4r\nTLplx\odrI(L*y<'g-8+butxMhL:rgP
U"D7%2Ya)<d%Tj\DVvJVIGcg28Fjp8>)Wvk%P-F.\tvJ%93G/0o7%DY#<kY[L9\FC
U"'9Ua\.4/1T+.3.Fu-;Z5]jwTC&.*l#X=,>6;?_N7ybYnZ6[0%W>]v^5N0u+Gy;k
U"+A(b:>_Pa?HU5g*N<=Lo:=&Pi:d5pQd/^Mal1g]dnUP\(gv?K\94uL9D1b;b??+
U"I)WkScJ%1^1]/\&W*k=UY^h[XqH(U8jCG>51-wcq^#50GP_H>bUKPIk-ZF%$g-I
U"3TGru.%+Pe>U2wa'j5'c*<GxhgoUx>a,hp01_>c+N:hL\Rj>[MR+r%1c;[MV$/W
U"t7=gA%Y4^gi]A;7[YT5aG-E2bPn1,LN0fuuQQQ]1i)GbJ?_Z?#<6Ha.i7dA<:m;
U"Wexx*S7)YnG&>;0-?A^f(s90tuUUSR:(NX6C=CnlLc;heNY85HO5J4v['d/r0Gs
U":*AnIM>WNcc$xJ#OFC^?>z-.PLE(DSC/,]9NYn2=KF%88NaAj]-TUXQ*VP-4;5%
U"R$A9XZ#x;BbvwBg3M^r6.u##%6?kzbbT^o4KUKta'mM4lFJrVUdhJ4>9<jl.SFa
U"I/29(:(=VFSl2rgDzY</g6)ym^omEpEb=GH/P$9%ip*;^tM_59un5I<q;7$ACw9
U"2bCWT,rP8Dxc/Qo9+#:ZE4ouXIHh]l9;%_9#2eAM8^YK%0T9&Z<6%g6p3IthdJ(
U"8X\hNJ*qA4yt+9Qe#&u61TU8vmG7p)71>\Sy(/m>]q4y5Em$l3CM5oB7%fO0'C.
U"v(^bl6qrK&DYx(>_<^E2t0AM(pTghKMB,CI&\at6.q[oCDX=K%?24\>NQa\%ox%
U"LJr[RX0('OhiHE5tN5fsXV^#-13mW]9]'w\eT:RBIDuA%f((\.1grj0O?5U[WPQ
U"BP?GOL(kT]DL4K3)yC&mBjNf?ThP1?W<dEa,'%zT3Y-:cA(,$+IwK])$)_QUp]H
U"t]e);_b5G8R2bj7:;Gb9CWCrL<pxq^SUMd1n6Uh*e_(:Fm-*XM95_7bKuOBnzK?
U"QCj(l/;,IMZ;9YRIgYb-(hph=lhsP&\1IgL6*qR((B</yp9;zqwA0X(QY9:JEHc
U"eS,'EER=pQ80d'Q9xvh?dKG,hUxG$m;_$%1]j_[eLLa?MQ(LBb9cd1UZ,5%w?HK
U"7-Z'j2_7mw7Sle-Nl.Jc,4*#T/PxiogMiKT5a84PHtk67jx4gY>3[\oMO;e)5S]
U"jq8rRI2BXlD1Ul[]]K4D-^s,=tJ6Unr/Od,YfA=,':r/HgQUR/\vuDeM288D./o
U">;tW(_9GMU$h9ZWc*gxRxzWAH+Qr<]JwZ.j]m;o?L-=%.To,=BY*#/#\Zedn=DY
U">^v&IABo*D/-Hg'#gMu6\)c*Cl96Q$TNer=pXu]n,t%X>s-gJj&s#Lq9;D8DZ_J
U"y?4A:zZ&?-C(ACaoz$qD>Oc20u%ZpNpN<Atw4<BMOd-PreG<B\T&wUkFP9Hsiq7
U"mZV9F>)N-,N-Igxmzq1,i-Ig&KMhj84z\:agptFqmF(NKeJCKE;_YGFew_Ec6eP
U"az(12(4>qeZC<NtE%Nx\\w]=Bs:<6mi,/3+Uy87z\LU;;\zfg35E6jFoHegyn)+
U"(PDyu4$vg<lK.u4MDd\1[NUlQ_w1/8?zQ==UKqaAaBtkpy9o2r\k_Xp9jBA6c>/
U"YE^PV4[.[-7/Em4ScrlSwr=CxN3w6+&$u(ATAM+Ao:g-P$u(^F;>6uo'qzQ0sA=
U"b=Hb.#b9[yg%+o42Hlk4r47SE-d%Rn*uUkB:i?9_1O(_$#QS3-E:XOAE+.N-YHH
U"q5z3CS*rPio57q]j*X(&l8afGTWNbMU>*-P%\#96?\)1jnC0N:SF3ddGS]zbh,8
U"w*Nny-/l&*/Q3'NxyBQr(pj\+^hNmdm?gp/Hl3\M]h:2:>T]ih[)\oN$L_dskR0
U"+?JY/leRxTY\.VE\:Am4y/Oi<G[wVstgRtQti\5M,sqg]m'j($AugsRc:7]iH8w
U"BeRrEO60rFgfMY&?Z=4s2\>?kE&8fC43O3)PAh24cUcG]Es9sW;$P*#Vo9:0cc>
U"wZ>5s.9p,/BWajMj7rXeR.r.]BuQX,>e5>491Zpgc;Dm\%k_et'Sj9:D^,_NcBu
U"><x&8Urnj<79fsU1T%9.*M(TFbfh*PK,6Gn4D+=f_Gic<Lp=+quB,R)Dv1oIG0#
U"Ke,&Dg%I1(,GHkrm1W?&5wK)nq1,M3[n<q-3/S>VL>hPr;$I8LwTDf5V(3>]'01
U"T$mWrs%s.$;-PbgoYd9a6HkoM1.QkjnNC<l-wj,2609#ans<qUdw-*8T2ok+HFp
U")',,+7&;mUKj^+Dnmz^QRK)p;]slgqpZPVl_CkeDKEB=UAKpaII,Is^_JORDK=7
U"0tKkkGLu;_jqFstcrKR9Fj3XH']0s]Ih,Vsrc%LI:?e(Q*6HO5fioLz))bH%5K(
U"n4r+cki)CbbiY-+TsZZD):a'ab.3K4(mGL7fte3_)X;QrcGCiWl%[],PIKf3^<6
U"z+9T1re=/O&%TEL&*(&GAu95iWYVo<3kQ/QE532$WwA$:B7\6#qH]kxqSl;$OcI
U"),v722RvWe(z,A#xzv_'c*GtD:tkT>bTQ%O(YIP8#Uek3xMmdNVqbXer&WM(EF4
U"E)4-+Arejq$RSE9(KPaGbu;MI77()DM/lKo2'0xu;alQg$G/1pg(%g^?n_nPY>3
U"3&NYb]O5/*pWqK&5nOee%WWLe-q0p+)=']J133TtqwndnV4_fi\k;.8ldxR#:/v
U"rB=XK2uXWM]=ME2_-W&.s-*LeD>Jyf-F<r7^HvI?2tdpa3E*+sf%UT*RqQ^Wf.I
U"H*sOCIqO/At:Vxd(rU;o:K6J3YgB*xKZ%[y6SsgGBID9?WwV%&6A<::^30),KL+
U"[Qi%(K:n'*4vMx*,E#lVR7Q\j8lVJSN.ALisPNjU6uXjgThLAoeTEwF(-hj]Cuv
U"]ADO#fE-0RJF2Trb[*#T)_(GC-GOb]1)J1ohOq2Qg;M&C:3Mc1HD,]p(:PyJm+&
U"62c'a:_#bv5gD4#&lrZ_UY7_XOq;lfNCbl,OjF#roGv=-XC/P57_\q'i4[]DY+q
U"+s%:dc-rK_]%))b.JV_hSxz]oX)=PaCH.k]fV:*3r:D+RP=O;b-VeX;l2B']T3Q
U"\y54YKFFr*i0mR\S#V)<7^iJM#t;gh&okjR=IBQ/],T8ZlsaQs<oD54t5'1LXi*
U"lJW\SJWHa7:*gaQ$D8ab>1#llsVg4rVg(Uk\rYV2'htS(V*hI.SL'uFQ%FaCY(x
U"$gTa;bSCj+;U(m9F_1RH&Am4)i=:dre3Mf=.4OVIZ7D--dp1#I)p=%&14v>Y#Xz
U"%1$dB9*-W[UWYj8%1>m2<&150BY85;:Y#3O(#hb>>./\p:L5JPF[PXFA9GBF*01
U"-:5U0amNnJZLpj[/qJ3ug%?-BG97[q?cdFreZo#_iXmu,Ta>DMq>6J^XMFKUjmd
U"\5+&QN\^\E=?iW?-M4y9#pmRL&VZ3)teUnQWRK*&=lj6K0GI163UF13(YGXncnA
U"eB;Dt#Qtj]f(qO&jE'rV_Pj^8(L$%su*.iU>ukiXe\VS*CY%:0OJwd]*zKa[(DQ
U"oE8D$J7Y3)C3Ya6qY_>kYAJSi)2DZp0Lam\N4q\ENQIcC'LEtp2P%nap\^>(e\F
U"t4JmsymOV]5l7^WNKPu-AQ+&yBqHd6>HI<'F[M'?oIGi?w\eh>fJMnE>Ig$4%\w
U"j2/0_Lb=x*9P6%PVKPtrM6zf1]Q8LhHWp,6B$DSUhfrzHux5wk)Vd5H)JC0YklA
U"feU'>g:WPfFGgM0DVk6S;nS'[l0fP25MYU$Qlst?efM)km>$)V>&(FUv9+)SwH%
U"t;45'>]*/ALZ)T31-Bz>XYbwVMo)9&TH%F&zU'V:&,5f/H>O.Eu_*ms-9[D:sZ#
U"#4QUF1nP[PA8k1*HR3w1Jd2iPfuC^;+i\$OoU:ughaj8axh?ECN,JPD14lPNA2m
U"+K3WHSKe['G%/<&fe,udQlD[Ap&LTGwtVgqXE8(:<bc8N*eaQ9gD0L.$hJutU^O
U"TI3kDb2;)/O)R*j\,*H;gM&(jtgEhgiiq[jt^rle..EH^7yXc+E.b^K(DwUdl_,
U"*mQmGnnrgnZ1HoijJhAhO7Pp(dZDyK?0VL6uZ?rlTT68=>4QWgUpp/e-Lc5n;=a
U"[eyZMdoZ^mH5_1>o_L3k]L&$,\S(Pm=l6Dq2'jWX-DPx%M>I\+u49W%5K\97ts0
U"zC]=58\:G,^Y/JY<lumLwou-SeY2uoKk?s:,rLS*:SH2D[h'x:EA]i=X4fRoZN&
U"LNmdrCuDj?\d?#ImXKY=>H/Gn$jiJemK3SSjX=T8b6OLq#t5>Rv%)9C0IYYIsHC
U"EoC$LUi7^o&(._Rm\qIMW+E)H+yC:0)/vX)6Ev70E9wHQ6Jwk'SsocX)SEhR5PI
U"9Y1)q32XHgjHcc3y5^=jO33EqNdn^DicFDe[*FhGYO'_3_RN.levD2p6'0%F7/a
U"'h,Jt-B.m.iuSy\:._4Z6rt])/Dbnrhv,R0D7qw2=SoMHPdT[#7_miR=+jC)pRQ
U".9q7(]AWMjVhQ<JIo[(esFy<eCJ</l?2XpPc8,STB'[k,]uZ]:)FM#RA'25g_L&
U"z\AXiZ+&EV7JCW713H.w\,uSFor;gG.yjt/is$]q3eKEFuq$6-ccNuD&$+iUIg^
U"2Uo-DFZ*Y0PYa-B*xe-ht:N2d(JBTJ<$XS=\)hKB4kldyg8&lhq]h(FHmdvu+D;
U"_l\VI(/jFB%VEuYUhYW^,dqX+?QaYV\>\Qd;>]OWvn-LP#sjdX?sB.QEh]LTI^A
U"8[I,XTk3jTGID9%Rcw1Hg#\N\F/6J+YoAOhoO&&7#[VF;^hwLIKDOt89Ls*F:>6
U"1&Xo__7fdS$$9rvJ%#3rS.xFRq,BBM&iI9UK<_6gYA^$MU#Uf9Ns;bx\fxkgId%
U"__&qldE4hn]#63+9y_au]CmjRMI#G^IFir)-r5e=$,$'-bGz&B0m&qyiJ_5?[Ov
U"CNtR[HT7Z<e$sv7Ge/4n%&PZ\gmCiv*vszxinQy0f8(/ul$qEoU$/2c?icqWCA.
U"vy/m&w8sGK=NXI>N-5N2lq'N7SWu#;7\g*'Vj?<M'_,ob/8,h'6.3A.+=S1C\y4
U"bZ805Wnp]&1.A[+=TWpL;,=8Q*-*7eVy9(54?9SB;Nvk7+'VG1<3%n4FwySid8V
U".SEAZX+86f']X9ZLDgzNLJ7t5T4SX_9QYtN+R0M<o2.'ZSq<sHwC>iPEs_0,GuL
U"pT#I'o&\O/apR%g6e05w5a$_7E9e?&/2e^,ND.uooj$U55CRZ[4dahz?QYQ#f7I
U":,aTL9[&?oVNQ]8?*p&D>>Qc?9$%o<GubAJ(hJ=_flJFRk4.tg'?[)M3$0b9(';
U"m/Zl6_ejjBD^(9y_prB=dg8v1oL9HP]geLSSDR#W%795e2rg<bc:7=(1EGvh%ZF
U")9)C>RVdktHWGFux8^Q_=LzI;hd8b't82h)K0(Eg)mQt#,Qggau2OYj%q.H-,8V
U"k1x)-6QU#0[=wE3C$xLppaU?\]8yY/NbwR7&9RXEm1DE2+nUjsmqnHom$v0_^?X
U"_H4['r6rkGt.n:-vmq1t#NHJiQ])L35MkcH9)XtTlef]m3Fpo9U3t=^f;S+%VD2
U"RDnpr/'Ad&TGcoOk.w]_=>uu,)CSd4JwXVuI0Ye709$svc90be%9dA>OXegIJJf
U"sa%O%lPLElKjr<&hAg5K^vN5ki->-sMAq1pbd3*7W(ucZ^ErSt$GuSvi\-og33h
U"s^W>Eiy-21x2uDY(Y4Da[6\ctX[Pa^3fWMJ4>z-hh2<oi,E^gO5d(B[BUXdF^Q2
U";r7:-r#q4<-;MQvEM4$1Wj'rqN'Fw,lDL-%uqXbp4do&Qin$ZS]a<]Qd83JB4Jj
U"oI%$17<PQx96JQrHTnXn8.Z;mIQ_]K:ZBaG%?mq$esYgU:>m;.o9\aW?>KS4>,1
END SUB
SUB V3
U"+-j>u<T,s'+r;U9r&khqs(aR$UV,bCO;-H%59l;l$-D'VVz?ZQZZ\V1?wI4UiSx
U"y]Og:2)^NyGDmn8fh;tX4mu%8<.DXB'yMduL>s[<pxP1B]c/SsP;Ge1'+p]^f&d
U"^+*I+Fe)ZFR>>\rAiQ/F'FWt?^x\Bh5Ls#)<Vi>:i?sG$'y8iTE^YZ[(Dv+d9VC
U"IbjRDwYK03d;p-dRYO$]U:SbDkhLi6tWK7l6\JogDR_.?1lFw]Dt2?^eJ?BKX-B
U"+7r$l-\*^V5yi:U-aYm_0r#Nm0=oOx$wZ5^A4=0ty0oo8L]65LO9X(K?+_0l-7o
U"E>>,>B\C-k:5>YvC%RW$.I*d\f6C'c7e$2OW>gik$K8$sCwHk',PS'l+//#Z,L4
U"RWO1Elx%r+/<R3TA'63+.d%w,YQ8>iIFmZ>89:FulonpP34fb;%5K]&szX^r_FR
U"yDtL&M\VJ3)F2]0VN12_NWZ8XiV1FMCKM?fQ#k5%$]b_jcr?QI$_Zr.R$;e\/[G
U"m;tl+;+E5$]feDn5)J.kI2ScD]CGsCPR8'/I4+&e6U.P,]:iSEH.mgw3%,6.f*+
U"]k)'g6YFLyVRW2So(,AfK<t1n.042[Bd/2dPdM%4xF=,M;LE*JA<(349v/Pjh4?
U">uY0-kD=dC'i8cf57^pj(kR611?T>6'c)qI;Pni.^g:4&hAquC\75)n5mj?IN2V
U"5XL%PJi_Y1IvCqelqWIvZo+XME+&+:H^+8%a7Gd)')(MOc,l4E^],RC/'UFCaDu
U"7+[^;y<P&8]5YQ#9K$L%_pygLjc-;N>(atrifw:dujzLRaZZ;#54Iy*480^pspT
U"=ZfkJBeCc^'2mrNsqrzhJ'BhY?u#4h4%1)^(LuJmm\h8hg][TblhZQr*3rM>e7\
U"hgD3\_351;#Li1v'nvn7=jT6L0OkKPNq\]T*R=h+C(1Wp\coXM\1pgMrGL-d<:p
U"Je=tt-t)VqHvkWh4q%mQ(%\z1/su$sAOUQ?/RCQ]uqrQEs_?NMp&0J:qw'$j)MK
U"X*QC)oEEW,SIBfS<t<[qjB]9*V,F?TE9OgTEqM.vNQDY[:_OOmy''Rmw.Z:h$wA
U"Vd%g.Qy6F(V\%9/Y9B.(Ur%cP5i$4ZU?ZU==2b3=&HffLul,gI;z*FG*[5^0J='
U"_DE5W\-)T,?aH*M#16^]G%kh_DTW5,gUI0J<dRcoLS,FF5FN<_:b6)8iA+L;&k?
U"E>l';m4Kk\7i<t=hlAS=9-5o#t9r:X/v>Hiw9gnN'Ux41eN#-JW&QjO',a5B(jn
U"OvS(T;>/Dy;W$.'la'7,9-8G,Mr.jVo&JNW-o1)y2A=yYKAy,Ic86o>77Cp\8X\
U"F$]rK6VN)\Bb+:_j\c;V9eu.bFfUH%PeUxjS5eJ%)&0(xp06$)kUNH#8fNV[O*p
U"3?58-&;6K=DG$jsN3QbN)J'sYT#6RTWFut;N1CA]HI%+)d&$ymx_9U%Jz%5ELS_
U"77[4pjuWS?SMty<1NLS)g86W7\bf*Pm0RE1:/G#Bwp<ZrhBhf^ADwsZxgUNJb]t
U",yaWFPny;(m>zF3Va0jy1zZrt9_4&2=O,#gpB/)y-[G\i8Q)O\JlBJX74STBz8a
U":sHq+XNISPANh[o&ash&bCc%jR_Jq)f3:G/W8YfhK;H2t8c=]DSD1;<ep+;Wo'N
U"t?DTBN.iV?w^,D_['>G1P2o,*9SL[BuhN[PXrh$51voV21*rEVUB5'ENVm2Dgmp
U"<XahFSqVMd'Q,?ok6d-]^WN1;Ni:xjeAbK-q\\cT^gK>R2j7seUG&J9?T/uDqix
U"1KX%?]P-oZB)JCO%oEOwxMO<r5(1yPC)XgX+'<2x#%SPlVh?#gTG?RR-^<o;K==
U"Et)lYmlF-$,\d\=LX3'My.w%e;IvW3,sL9(#,YO[r+S2UM7eDt'(Q;IJiGM=Db4
U"sww#u20U-e+JE*6:$SSrbHQDcMZGNI8aA=es*mkI<2Lb]ZgQikALmpGd.0)Zj3b
U"CIFpH,?q](W1<=-eX2PlsC.=^2\ME/aM.(%BUpnm5[#jJoY+*GU0?]O)Bf+%/A(
U"z:3aXIN;iaH,rG7f$ck0jf[qGVd%ol3;=AP.oy>JA].qC3U<cslLRuTrtQW:W.?
U"[F1TrZhxp:_Sc;xILDe:&Q]i.;n%72bd?>0#DKqX/ik&3/8ZGfG$V8;W0'b;Fpn
U"Ej>71EYQdcUU41URI*?M-C0dP]p=%0OPTP>bwE9DQux;TB\C-U*n1Fh1]^?T#TM
U"[mM#8bpa[%EF-[r[yZkm<f0w(6:Sp+37GeN_,0.5^M#XEr5qdY7^7R&^\csc^9B
U"APj#3ZJLlId53D1$-Y<mfP(>g^\uItK(UodVA5mKtxYc/)X&,i*YIwPa\3Mgj$W
U"LbHvQa\pW]pbNCSlens>q(;\DA2rX'GL$#Cz7$]\\uFgRyZ]W5A]mU/U0'IgCjV
U"Vrvs.fe6R)tS]I;:;Y*O-9sB)M\Njvg->_TEgwH_0%g/4=[59U%'kjFpHk-7/.f
U"R<2+o/ochPy$lMYKAb4Ufi&T<o]q+kKa?s\Ofebh/4)HM\9sZf=1ylABsIARWMz
U"$UQs%UE8&s;R>R;#%vJ02#:%j\s,$FB:CC0D*E=Okwd]AGACBpunpEB'0jX&RY_
U"^YoUSOS?Tp3Wb*)7/4m?hnrcS+sI+Bh;<L?I8=t81sny?o]?($#LW92?l#eLPOT
U"34_Y5w'J%CQ8T\JQrpbhIxISZnrZfGU2hx,yJ0x'?X/#71Z=(Ce=:4#0]UOLJX[
U"HV+LxSKRLvW1pq%L:W(x;gRlwP'g'2m<sD4%XvkNiVh5Bi),/k1<l2eZot%YLO/
U"tz_SVzA'J**1%)0NCGrkQnfgj$Uv4Zs41Et.#SUvXR:tGJ)8)51*06L4(wD=gY3
U"P0hvHIJ\qn/5H=iP^EA=T]P2$<^zni+rnB2dr<)83cl<_IrPU=i68zL&y)[2nID
U"RL'DbCJ\CLFnS^]5yI-uvb<aag1.WHhiAV%>WN^mBuLB(j&5vmmN>2.gCYP&P*P
U"53=hn%&>?qm]o*)Ium?#tZY?,SBF%jhP.Tl^,FQ4]Ku[1oDS8_p\\7_JicEKIVW
U"m%tAx,h*77m_ggi,]D;Yg?F[D*6(EeHDJ58t,JtQz)MCB$'3B?B6^3oDY\_3B7)
U"tAA3IhHRlESfb6b%9-1]w4,?&G]?(6bz2/Pw>fH]#,Uk;.mGNAv7Z+,YA]mca15
U"o1aqklb<v,4th]T)I&Dd4DpK2s&2-w&d[Yt29F'z9t+9_WLZNg/-7PhcLdr)bt9
U"MPhuI,lp?)P6\CuT52N6hXE)oJ.M2D8-UJEJ*XedRKI+aTM&UWzg\*h;/^+IJ-I
U"m;[bN1NAM>?WhD/[cM]bYTko/13];2Zs\4&]4S3UcLsC6UtGAI'<sDm+suZuikk
U"D5V,F<2&nJFT)F,'Xh_cJ4>.GbH2>oA',AE;Sg#4t91'obX?rWRH<4^qFX8bjB-
U"DKwdDdL#kh^DhB9OGuC2\cUo7b[Y2s8i5hLUmnB5((egQc?^W>\HxT5-(CjCHmj
U"WOaa3-sn&dZ>fLEd3(_?sFWXHLopJV3WNmrmroKvH<fBM#]D<g5h>cZ;grbb9E.
U"/Y#ARTubX$dZs1nAUaG$ZAalL#;8\cWalFj6mP0wbmhGC$q(a^p/'n$3c9.c3uA
U"he9h(9#=L2/qWjkGv5?Aq9csRv+x5G%5e2O9G/O9%a0;Vl12fsBjLpm[Q&rd4;g
U"OO=xZxX.9PZ-qf=0j6F7J+=X.:FL=GJspLvXCp.Fyp:*;]d*xz-Ja2'Si2=6?$4
U"rz/#MQ9,LJitT#S;l[o,9wKLd5be%Q48Md'iB:h7vHUdrZxlB^*vT'hCHZm%SF.
U"knN/>>E,s)$XA-i*_1vDO81Eo;tpeV=I5+</Y;EzEj%V8nAeCXAOulsW57WAXo;
U"uhdhx;r&f\Oe'In2gKcVwU4=:'B_'%_F1Q+)0269Zbr-?IR=KICfflro.&R[;3p
U"JUM8VY%dy]lM1St9&PlGmG<HITtKoQ(-yT98i$iNFyj2/Jn75TRKXW?'EGbWXW'
U"=V<B7IP<,_:1]qWrC_?q$-DPU*(:_YYqdY5[b49_H,:\*TY.67$gLP:'*rQPnV\
U"+-ru(qDPK4V5bo[pZS?qu5*(m;R<o]n39X*2Bu9)ydOEC8UbCd^g=ZV<PwN_X,U
U"p_8Y>7j^K2CME>ereCpu9YGUpAOMPWHnE&O\y+U]m1%Kd,)\;UP.NixkYE(+0'Z
U"8&AxeJvW5X.>GIG<9(wyf(X%Zd&ViX>dk5x2hjs923Ks,]n\_5o=[?p5*I+FbLg
U"5J_MLw1.:#Nnzjc?oo>u7>'MCwqfdXSO/eA%:jyqcq*-VWt&fn&jvf=vwX$lpEA
U"(HiKdhordHENlKmjDbh$Blhvllp$6gU[JykSHkDsLlX9/LpcFdG9q-wJbF?PDOC
U"og/:,Uqz'HK4#0]OVd+h<[?Ym124#q'(m_p#?^a*;Dlke+EBg0S&x.Tni<.+b*<
U"S&lRCPP_E1BlhlLP.Led^#&bh*=7_KfZ>=Y;<K]'b>SD>b2mHcpu5Jx6[&KC;2B
U"l0grvQqjM4/[?s#6kfv.KEVw(WD:TU>4^WNF-Tr&5$q.<dga9L4,u7w75*M/Bqr
U"?w\3R_R^h%/aPt=K*61(eE<LOuGa&C3b21SeEl,XMF4/iro)7EsZLgMn=xK^o?[
U",3q:6V=R(u9O(,S'YM[0+YX9+=4R^].3?=UE4x.;y.t>9>'N0MiH-%65iT;g:en
U"Vv+-DN=I$pXiNV:xxG]DjF%UDs%JCr4HU-DpZ=3m>;UtgXRq+tW^]r9Io2mJ-wC
U"ZQT0alk-i9qQ<huBsQ\VR\+dB)iA<Bk92A8+-^c]<vw6.rm75k=.$llrMf$%:>R
U"n<Y,L5bus_kvfmdS#lD(MCm.Y?Y[Up2g=qbJX1<2cb;WevmgVu2<b\:[$Nc*]e1
U"\lt=&<cpVNSCeqkIumJ_C4_DdS<ts9#2lZ>.bAy8[x+fJWfL(c-FX(1L7-]s]:m
U";aergTq+'D#MAl^7-n[^ob)$tD9re?5cnU]T3^_nAgQnGE7#kN-F[8FNQS50W5+
U"*;T#ytHY7[BiCS0^O,Jlx8(\uxw]WVq^,t;]o/_xic7-/P3X\isn*k(ui7GAhx[
U"HnsIPNC1T6(xjrd;Oj72,)HwxS>d&k)T51VPih:<:/Ho<A8\T*9-JrlpXzbkB[q
U"1^0/3Lpgu)V7f>Uvwp%a#OQ_Iove8Bps$d'b/3.TUaMxDSU))*lBrVEPWk>TkAR
U"hZPhtZj,6cf(S),9L-2u0Re+F_M\gpOSf^_63ria\P)LTBIc<W-q];ZJSRc:HTd
U"P',Nd$)g600c)E;fY.F_dU6uLI)\uXq[Y:OSr(]7TrKtG)+eDfjXof,mlSc>)QG
U"Th\huMQ3[hLoTu0R78Qfv4d4>%v&ehXH)_HZaS'FV'\E(9mOdr\7rn4YA+iu0ex
U"8UP4tM[0peg>cr:ivK<4<i9Ow_OxlPS;:LYqT(T,6k,]F4i,t'3mBg<ELI1&hw8
U"tqMf8^[NJCCQ88umo8Z[&HoFLcJDO[krW83]Dj+V'Aj5Y>3=1H\+(jAq9uA%s4&
U"-IKK0spXZjr0N/M]W9i%S*mHGI\24tGmA^=B[WAjAx)X1FunI(qVcX2c&E)0Q3_
U"?**pq,(L7(?3qSO?*E*OagYjrV)Q;'?P1r>wpNoZOkRcQNVgh\lJL)dl(-i-+[b
U"z)N.(;[kjp11SgYX9M]KLK+1nVEv-f4a7#]>\rUc=?vI/#,V=Vt)b4rM[t.8Z2[
U"%vXc?=Z<Li-FqQvaxsS\E\q;ekLM[s&w*cz9MqtEm//$<$r?cwH:<zWch)#8][9
U"s\OAGroAj5CwJ[OwYg?wXGiaQG5\\)1<t?%?#iQPlQbT6m<#(aiXIagGp+I5v;2
U"$7UCiaX-aMZMgTiR'TNfq=:)1;6#3_F?<p'i%4vFV(5d7u<n5JPk7[U&W>7qWJ[
U"s66EJq1Syb1MDA+l#AwL8Qc]*Di+(l%7xLslVp+g2GB8Cj_*WagRSBU,3MA%Sh<
U"Hu'e+f&wK;j*=9'PxGH-^fe$+:e-DvHNSu^8rMg'NX?4ou,u:D2*p3OVQWi7z45
U"=G^odjP0v+QV7UVX$j:5TUfVK:g[;3Z1^$LmV'XY7;?8IW=3u<N4hkT/kP'DLST
U"7A<oYxsJ3FsOU5>ZBE]q#^09mK.&&4F?n/Y/[j3;(a20'Vp8wovCAQBM'V'Wo'2
U"Tj7w1iWh]2\OqgOq90caS?W\(H+gue#Fa)(#To-fj/e[LayG$-Pi>SDoEnAFB7f
U"$Cw;,KVQ*1RMytT7JY6g\gj'^Xfj\+Dd-6[/hg[tqm7,Y[[RiNu&l(4FkA$1lon
U"xkW:=[>igqa#V;Urq>Kb]X.G350p1/yq?k9;.O2RMG,gH$S*m=Ld#7;A;t1][CA
U">bn_SCaxXT[v)JY8dt&tfn5Ro$aOSaXOdR7-E#'Qf=7sA-s08Ln?78Yd1W36<ER
U"+MPVkwWcTPX(YZd[q+_BuL?#NBF2DausB7zLjHNB_DQ+cIu_i8dB>zF#6H3ktHu
U"-^73BkR\<g^(&orOdP2P9D\,Z.rXiuhN$LORv$76%%FJBRs#o.H_pXN3rV;N8Xg
U"R&FV<0o)u/d9fm#V=A#(]XJTt<>GIG09:8>u'uJZ4IYf&CUhF5Y'WWdq]:,m>=W
U"%=lpW>e;OnuQ.;$P,W,nUlv&AnV9.lNcS5o_huf-g:-mf1SDfu8^B^*cF9BlA)w
U"<TJmpcSq9Jqd&_Pke<D^uvr-^Ym3k.?gSk)ZpesNjTp;soxKoCu>G'QOVsNt'Gt
U"fWM5/u[Tx<Q^F(q6VS#iOZ0UM\W*iU4O-AswDFBI6lTI2V47bo;aW5VrGgDZ4vE
U"SSD#15V?9jdDI$1+>cjO^qqq$%^2J:.lJ*abIxOKLV'O2T'S9pQdnp7PA?6OA>#
U"^W$fxFs;K/#?o3kj(4<^v/&SwPSv;MeqRC^6=*-^Sg*mkxl(53FQxCIn>_frSpa
U"(O;^MQ7iUOs/BCH-f*B-hlC5afN]D51;5S2CWb_H0bKoiboZdlAcrK[W+'W7+A\
U"<5?py'lmZY%ehYgpIiBu7W9LV7(XjSu_C5,.8L?7-8Y1W83cke&4yfzBMerhSv_
U"Y\];TKxKHTy\q^n'5r&W/UCk&c.D'*CysP4dCnZb,Dcx.a,?DxC_44;jmi9/h,k
U"&\*eo9se:V-hD>npEDaAPgMY81jMAoX9VI7BbI#VL3gn;T^)/bzj>O9AcZ1G=[;
U"=RH0p4).0e0[iF?&fJk]$(L1.wo)9D*Ug]l^]Y7S\=dA=ZF^wTRUe4e^D/S<JYM
U"fxS&f[C(,D^,Jc-^^3JAJ,H2B#<^D)&c,1q*]TZo]onr4g.vQTdJ$K,PE[iw.xp
U"Rk>pMAG,H$,S*=LHd<O;Z#0QPcVQHd<B41u(lAF\uk;61h)NQj1W)q:iSql%;&r
U"iC*_2&;V2X%>DJ?/vS#+$#+fOht[yjZqT:D.3Nv;Z'l=ZD5kX036fv%j):>*)2Z
U"XAsKa&po5Ygu8u5[/L[NMd^erOetdECFp8lDLD^uk3k?taR^xrAaR^hN4l,J?DQ
U"Ele[t/Nfyw^L+7WuMWc<M1Uu1?_u2[_<A+)+H4*,Joj(oDaAj#+/?DNPbn>7^UO
U"x_]%%Yl0Cip:)NDkaO83q>YQE;;h,:/HB$#?A8<[cEf%jvBZ%u8&UHAU9ZfJ=R*
U"qg'cru^xEkiSG[LqdZdCkzD8DVDD^Rt4.^WH3k2>q<H+pPblN8V>:w&iOJaE3Nn
U"1<Q7<=K)^Lmp$.8<G6#xvDVF;SNhFn;SkN7N3,^K,B#UB$puM:CMcD7m=;C;9VE
U"]tcJIE/RoNMF6&oe=vx<lW^3]UjVkn)*-:qCsZX4uk0>D9.]I\21c#,4Ue;)y&E
U"LS2&O17<s['XS<#fQhng^4r1SQ(yymd5TwG#*h/AcIf?=o&IJc#1R$SrNQXC3BY
U"49y.qDPSDgT9;N9Hcx1gnW_27YfV=&4i\NC%t>IfIU111u2cLw_]q?NaHU:3B)9
U"bjj(wk\KMmo2-kDuRvxo;Yn,Nm_kt0M&*AUT;V[n;bH&NM)rRn.X9]7MNL+5TZ%
U"UzHlv?DTj/?/.?;/>b%\AC0P5q#)50Nc$>=A#mry&B\'72J=;VI,ax)*x;RAwg%
U"YhP19>ou1$p)gMK<Es/4bGqu,<c:?IH/>21>MQp^%D2(\063Zd[Co+LfW7[B9l]
U"Oaqq)k.c=YzrQWlA+gnEF^_07O.E(fvCW'-.]qF+\]*6>1bT+F%:X1j;D5/$M+h
U"wuF;[W>/aA?.UhPF'GZoxoY-2,N_Xkt0&itBU;jV[>(G+a1TY2=x(*sts=DRd]V
U",Vi2<eqXajOZ'oS,$h6=8O4)/_J#BNTc-JzA]X9]=7x$B]PIq9[/Ag763-L1dh7
U"eY&Jaemabk*3/1)%G[(JGqDMX=[K=?kP)*LcD3j']B*1]o2(=>E;5xQU(;GWc2?
U"bTI6#bU,.fZY=YC&Y\1,MMlIP-<CK/P1+fZw?m:\Wex=e1;E[.4y;GRiH5\I:]O
U"2^]\QqL[4L_GWFmV)*s5+0Mj21W<qAk=BxRPk5GuaX=fX--f#>/W#WxZrG4b1VQ
U"qFGLC>/'(X6MAFJwtY[v7w)s,PZNYkho7D]GI17Qc;f*uT7Rk7\W>=/%:<C]YQc
U"AZGl/4E_1Pc7<41>YuJQ1(I/:j[YJ])H(-t)GpC_&21;E4:T#B7CRBld-lJ=n2>
U"OZXl1-1V[ZWgJ[^'Wdr]Q4kwUi7:1Ljcjc=vqU&N9r+2(fRc-=iE3;K;jj_wQx%
U"PQ(+\1^c<4J]<Pmi=[i1Se/*NK$z,uGoxo>Y,,Nm_kt0M&jBUT;V[>?(u$1qT2=
U"xc8njZia]TQ8QqUj8?1fAH<*?6QZN-W+u=H>*T?/j%_-v(ALU?b[_]hZOMjN$4V
U"WQpjMX$*.)+/9H/ZCK%$.v8OfaT3hK[b1tru8,L5<$[7yA<zsye;p=1m#a-e9J9
U"6fCFpGC#y;u:hie[KiBmf#Gs[p)=;0C$L8IJ2a5/=CKi#6kn/>KJCr$>[Rq3>6Z
U"Ox(->Yj%a7V;^#?5'E6SMRdK=Vb)gZYaOiAz;7Xq>gEeNZ6W#NoY,b,N_Xkt0&h
U"j#U;=V[xG$k&;ueJXM==Ge?f2sr/D1cz^X^9]7x2v\&7&eFBS2LTG>FBI,Zf**6
U"YES^_PL&gSdC]W#G=%0P=D>qDuS1HGrD7NFin0]O[%ao25\qZKYFPUf/gQnX2EQ
U"Yd#g#P#]7O1:+qkRpdUgC>/H%<^G^3st;8/Q<6c17F=7pU[R-%9.9FD=W0:]%\I
U"Zk8BG+.vV4$4?2^?W[45(k00S;o?55%RU-hB)AL#7DZW;mG+L)U6fZf.Ei;guGo
U"xo>Y&,Nm_kt0J&$BUT;V[><(k$1;T2=d64w6:js<J):5lI8bb):PD_F-<+#vU(G
U"Jj5D8U/J-b#q%XK['+V%.v4hIU>:V7^hZMQjHxGn.ijZKmXgOCT#1vOvY.[+PI4
U"8M$YL?%BFi)5-#AA9;ZUk&diF_\2)c=t#15<_A1=O][YC9)<s5+a1=oe0?zctC7
U"qHaq$QFq%8:l.TJ*(1=[oY3Lo\5LV$WH#7*:#-BJ00?4%'2>[pH3jVg^vGYOk\S
U"GW;-;<=NY$bm78h<[:UC>n,\dtJ>?Rd9Brv3Tzl]ahZ=jDN-^zK])-ZSEm=)bk9
U"BM&gMi#j1#KeGja1TYr=xn-=gta(imngKMk>[mh//Zo?I^;AAgi27E7)=L,$XK(
U"xGCTN\.'XdH]XucBmPa8TNq1^,#:wCxT=O(4#&J5ujL',B*4d#F8juI06Y7G[#k
U"k^lP>].JI/6AEG84G6+Q7&V\V8+#*<<1v9e5BFV9zn#1',KrSZIiaTHQSQ(1^*S
U"B=p&23[Fs('h+%3-k\P[;A;o;JqEJt4mju,v86Q[b;Yt]JwfQN/kpq?[qT+PH^h
U"9Z=j\fp^R*L1J$XOolS7DU%=T[2]40*pS-e;:[><r1W+lMT7Op_'Sh1hYjw6,Oh
U".=h\^$/'9>/lGX8b1>n'=DKw0T7J^IKXYRA,WAM)h$bQ<Mi]75jJO/<$QaYu3(o
U">g-9;7;;V*].Gi=][)1#lu]T$Pp#sn/Oo9)4x5z#u,.'qPrAx4&loV(k1XsKZ?y
U"t]+sm?n]ynsJ7T/OEoQDuNj.*J?><R9pBrv$OmT?=Qox2wG-AhX/Nn>vbMvt.PL
U"On\Yw)7y\jTOGLsDzSlCdTlZj8fl^0CzNYh#8J;bbi7%'-yv,W[%cl9tM-&%E5J
U"'k5mm-;T5'S3?1_%)&:F:'TsM\W-y:E0T/9>z/M,I::w)gj;tC:-]mV>:cc?=$G
U"-HiD]hxl0pF;92Ft[GVG_zkz6VnlD2k6u8,pRutTtTrHBwgj4w%M>w8kCpB]5j-
U"BkxTjAgM$G<m)\3r-6dJ.)HoDYQ9oa5iM)So/Ir?9q2aR0Qe4mWkiHQ,9q-pc(E
U"DgaZJr\3.Tl^Qx7K,b9].-\W*;9kSHgjMM0h('Zej[a0QcJl[Uo&ZCOmZUD9aHq
U"$v/$%X.hI'0If)[0TRDD'::I4(ZHg>gVS==o'+0JfH=hgVH_50dY(Hl)+XeJ>';
U"uDcC<oOz=DoOz=DS)d[4]V=vC3h(/CHoHGGQ')FPc>51El<w(=6Dw()gZW6BO=n
U"AS4Lc42$;uXZ_,/6hQ?'q-I[0Cr?9<9a'EX4R[Z,9jOS)oFm/7lKsw#5-KMV43[
U"a0QZ<Vbjx+J60Qr]lc#f6y_13+7m*+;lW>c\W:cH1Kj^:'2l7TlS)_eF/aibAIJ
U"Z\4TKZ<^O-CaPiQ)VSfSgQm'DdHm+2aHm+2aCyR8mm*;l'd+nIRoOt/MusR\%n]
U"CqPDXKY\i3$.'\,gYuUdjvKIkW^v+9NHT_zw3xn6d2-q/C#U4XhD:S\=w(-l<]8
U"onkGP*I+mR)P+H:oK)u's,lMX[jYDP?':6<6;NH)57c?D_LuW.p8scY94;7/Jx1
U"F+;uKt6fT3Cv&D^Y6p1uB<IDFn>^U+_Kh7)]40PEc_aJp2ng9&._XP3EnqoAqeT
U"gpY)/F:IB3wt7N?uHBIiRT2o-Lfi;Cv&DM+\\egQICKqg&lWOZ:#t,tXc3dY>Bl
U"FtdPC0nBL:x&3u3O':9U:[q,X9.qwXood_dhHVl\(lr4[u8<cwcL#NrXu8L<XY9
U"ZhDoi$tru6fug2=MNTl8<dXZ\BhAu]p2js$6q64su=<bM8,8r\Ppril-.WlhBJw
U"bGX4huvYnxf5+kP5Pk)eD]>NqIx&uP2(yg6*Z%y2J9%=X8+I]EC6NneNLXD2.Fm
U"Pj+%:v(6YU)'MeQ4/a^1.UL'%O*(&qhr9Y[)?:E9mr7n8wcLNNr[o8x:h>y_p:K
U"k$ZGTX_h,?\nDAf$WG#,4]GF<hCV((TSlK7aW&)k:9:Y[]].G%fk3)_fRo)F=U-
U"E;P&9F9iJa(,t8%92Rho?n;%49PbY2?(/K.+E]oAOC6/C'4*OQ<<:JY=<aY$?a)
U"'%N9Y;I)$oQHYFMqAC>V+n+J.(4/F/1:;X*T:M/?1K)jQMVv09%?Znw%L:GA).;
U"=*t9T<:VYteo#CpA+u)u8P#9_0i5GA95'w*TuPqQ<vqWbR4i:G#u/w/+b10aa0W
U"'hC'NlqE7o5KLBcR80Y;?T914u57A+8%'2Mh<;QZ:UIu.5O_d/#Q(&m,dj,hRHL
U"fFcf'WE&K2QA?HBQ%[Rtv:dYb<i$Y7l>F,5R9?uR1?:,8/8Q4h]P^9+^$e\69^o
U"1RQ%n/+LQ43eQdQ'aMlb:%mUByMP>Rl&/4]&9w)7%)P=iJ//a'(_EOl9c4Y8i7N
U"]8%Bs37oF?U'ir9F:D9Y%qBiirmB(,0U;[q)P9(;?d]I%sO.DP=bWC+RF/('w*0
U"0:(/T8G.u/\K&-n'HeU1n['nYj3'b9^C?55^.M2wg1Kwdf')r:a])=UI3[OL<Yf
U"Yh$Ir<K77)9a9)/%*ptOP9ld6CvuS,kUi_-z+bNxcw7[\8(,dc'P:W).'.gRZfD
U"r9ave<<m057TTl4oGC.kzWG-L2f_9'sK1Woj[<JmS6<V8GACI78\1IP[Z?>B4R<
U"MHS)vuNf?Qy>$X/p?-FM.Dz.FrDZ(K=A?.>mUYswiY+S7*>'nwq:S<#rc(ZU2(i
U"[SVnrp;YS1o0W^VDGcQ0Bt<#>bw<8AVBi(185xB<RKfGs:J95GKg?RtV2g][;X?
U"(R51LJ5qRgjVO#\lV[UU#s?p2WK'_C?pL]7X[3=[CS<b^lOcoJLJ1CXL#+Q<W?)
U"4SA\SVRjpAG0P_j=pC1FXt=f1FaBNS6rXpUa1U/VDrZ^Q1/F^o:';]4xKB4;<.h
U"0VC=muO.6VZW(w%hgTxf0AzAFR#G>cD*+TeAQ$/.APgRf#'2DZ*wPA=QH.A_z6R
U"#r[%D*6oMAQd2Z(Xc1q//l=A-X58+rf]j:WO'R&Z\/1^%yDiKJ*bK>WQfSuZ(J3
U"+.EnW_Vk?itmwsiDjTb308[ND;ZQV9YSA[Q)YRWRWqYY5)%ki[e2bPlBflakj17
U"IgR8c4U/]g^OdR#.OZbT(B1IhRpP%9=nD*S-E]PFc7E^%odMD*=7D]PaO7G?kKM
U"#/1A:nq-/W3V5eJfBP1Ug^_$eA+Jf.h)R/6jdKE5qlfov2f*%*5V$j4stegoLDo
U"*9?MeM-X(YW:37h.EWJ41jYo5ySzk=q7;RB77>K'RFKXf-bqk,[o'0(x:HME7Q>
U"1gDbG>4Wa9q]noQ#A))x*B>3VaUFV[qs8oe8$Bf3Jbm/\.;C1[PJ3qXs8i)+Aj8
U"^uO.qmKj/\_$y;<HDVUZ<k40#c=m:z,X+W=&Koj^SfG^FJ;P]]PK77g>SpI&nXS
END SUB
SUB V4
U"TJOaI7NI7G^>Lj>e&Yr(PSqY6,G?up_WX1H(=9.V\8MhSAf3V8WMJVm:/W(uSU5
U"<aZooufEB&qKK>WsLK1J-X#1N6$UWcEw(8kT2XWWtS5naqa2qx/?9Q1g*pDOgr7
U"iX9q0i-G97A,6$[5r%0VRF9TLBXuOc&Y-a9X.p'<pPpeHHGit<Y=iKH)35\R)#9
U"V,/i^i+NiOMWaYi35+jBU8u#Jh(W==P^E)N\&RaS],-?&4?A1X)s>$\jB66Wm9p
U"xI1f'$fa+si&=<KZa[/?5K3,At5:nMjLn_KqttY971O$ab0Zo0dJ8%:GS<+8f=e
U"OYrnWAE2Iigbg7UAtiJf7HR(Ef3YO$:-9W2.FQpg07JNwMw[7M%Ta=J6Sb/raq,
U"G'VhiIc[KZX'KK9N,jXc9FMX0iq(6i:jMiu$if$k8WsQOi0L4h-r+ZToYZ4(L;L
U">rHCqk5bn_i>sM&SpZ4Cz7[&\9[sJmYrNUIXrBC;U5oQe\ztbUa.L'hvhhK;['%
U"^WJornIJ?:h3_UjYhZ%7su(K]Vhux.&F^/kBh3l5KWfiGFn9GXOk[Twr]\KrHpR
U"iRXWJC8.6l?Eb5J$b^B;AbLQ<l49Jy[.uJ<$y(gbSp?g*XoWC)dKwIW:w(1^mby
U"c<I).2s-9SC6H'oDYCCO#_7y$)oY)z_sM%c[mul3#-eJ8;Om#I&wJfRn85YrCfw
U"K,1+om)EnsF/aM1wF.a79)1g\Oa[)uhM/^M2%#Ola:d-zr(kQ(xr.sGw?+fF-O+
U"k<&y2[o-)NNq1h-x7+e/d-9j.uJQ?d6yW?C'w5\#,uFiC%og9r7_$YrC3W)0;VF
U"]Fz_4v?DuUq8hh5fl_c5DhKlB'q=]ENrFbr3q)h(t>UERRS_^4cEEhReGH4+hCd
U"*GBeFp4gt=2EXTVQlFCP33>>tEZZWB+T9th#\rH5n%9[kuVsg;OYJ%B%Ok/F&w=
U"&<%uV03#;+0p%w?TV0/P-&Yc%0.H%\&wBb%hEOV9bRY6i(UG1a+/70C=,49s9i)
U"qCKQ(ERPv9bO;.EjY8G+u%.a,m*%d'd)dd+J:j0YHi^7G6ua)e(t?:DYz'i/]Eh
U"B\V9afi_H^DR\:a#YRi^X?=5uFbf\,^*Fs<Y1*$ZL>g;+&#e4o*$,='ga+sAOcM
U"'a8:BY4-aVg.[:;(-hkAAO/UC?[d]/G+jZP(>j9He7C/[M')6A,)fquSj'(PgpM
U"k,9,bY9=;ZQsUKq(Wr-9'',[f,9Uld:EiA:U9T7]*o&.D/B691#5S^*J11%0A(h
U"OvA&RXhYHo5RQmp7e4*b0x*iv-Yx(*\MB/tmLMePDrod[AQc*T\K4/rS+9iX=MY
U"\uc1vMQ=h=oYMOr1FV]ZfhpKE$0M1JuZHVr(GUy;G=YPfGIB*br1hJ5Yf8x5Tx4
U"J/vik;H7*mbL>oS+H/vUn;H)'*bd;NTB';:t.*br$XfRXS/$8T*bpXcfRN/<$5*
U"bW0ZfX5ZfHqb;H[*pbj>oo%:T,:z;HVf*bB>$oC9TfLr;HaW*b,H>o9Z]f^N/9$
U"0*bsB>oE=6TLMi/6OQJms1JS=9TBUg;HJq1JC>$oC8T8b5TX:v;HNf*bL=coE:T
U"0Lp;tPB,.(ScWM1^0/.?&p+Qv/:p9vYvN9]8[i6b1BD?*Hc$6wJ.p?4+_utwu8?
U"YC4uMcN]AZ4pu&k.%#l^czc0Hl7pX%4q+0],te*s/dg[+j5M:J>S,>8dTu#C.us
U"^2d78iSQQB$Wi<U&qOOWa]#H4NGby$mzy.jA>Lu_3(c8RTdH>N^Z'Pi\%+d=G[D
U"FCX*R5&P71yqpFGD6nl01JL)at8%;n1eZOhuhk]M8c^HZC&[i=pAcATa<*2F+1\
U"fQB<Or1CRfSE&Y8nw>e:4\trp)/vjUk;S)mSBT,=[Kg_$9A]O9mCseys1t];*(+
U"sp,GwJGa>NEwBU0Dzwlz;t#tDuqdh')fXZ\<p_x48<>CS.iXz&a_:06byN'(W29
U"j'1FAK/-m6=rT'g.o/zC\63OK-=o/9sMO-XI$n&:YduncxldI1B:O[43^/EA.[c
U"lS#x=>P2EtM5o:0Hs,dr8/pV=BakfKHC2,3[Yqe6UPZWq;cowZdK_NstSv8qfEx
U"$uKoh[?Lfxp5K3\Duib79;'ng0]i?Qgs4EjbFc:GnBg<QbaU2w_Q_<Ina3p\2Z3
U"fH<*p/E97MAMu.xz.bN8?=y67)7oG(j:TnDznl&9??0bfO[GN(,''XzQI'5.4?C
U"X*sRd=2]sn^dsQ.Mo?+DuB;?S9s?;bY)uYIXdb,[FtNTw&y#_LBNmZhB]]bQ/0w
U"AAr$#.NinxUMZU?;Yjyvk;H=I%d2#NPcN/UCeB7(:,r2IW5V&LcF2Hnb\i[F]=%
U"FlOuCcBJinbzVe8$b+lcoACRLHJ3^$e$b+=loACTx4vNc7[ds?oJfhot;U,=:vx
U"PRsb>BM(%z:EU&Tc9w$pxhHmXt3eZ31PO$PGU1_$JhG=^$DDGS>Q4mvHqmUtohJ
U"snE]lSaXrpam&U4_7FpXtpreHA0bQuSje;%pHr$nydE3<XKS,awW4YEjrnd0_w)
U"jm;;dcU(e#9xQ?7T39aw*nblRVz<%zsF4\GQ#2I+VS^:A_HaaH:yXdX2EibCC8h
U"ZpY3M%:1Lf[w<',ePPr#e[RDxSam7aTAE,V\z2d7rM%eHNk0>9uF3qn-^R\iU1i
U"qt&T4Iiz-h&a9NIh6K\MOk-VT3g>aZhD4NI3pY%sG6ru[#_bk\_H^UlXjovlbE\
U"2ie>YADnCFn5?A&up,DwAtT56^,hvrk=clrhs<kow5;o&/>l_l,sS]fFQ]e>QVS
U"NMTGKI6MhtkNWt=rLTWmDsFOz$F+]ALAjUTfmNiDTKUh$N4In/c8ZOgWM*,RGdR
U"PNATK'=Fdn3].BFUDEAfYYwgFdFDAa]Xinx8LS](Y]m(sMKDMpuVkj-*k&3D>KW
U"dgacg-8L'NBsVE=(KNE$M4?1C$D31_^_EK>79[acd^OgWMT,^GdBcxVS]ph]qTZ
U"r0DT65vAIk,wCqk^0*wimjk-ZwduJr=T5vKSNlMF_u,,NAvvn1c>FFqn-x^PylF
U"+oA$d8VXax*,+A,A$r&NHnNt4^=t8Prc$X^cQ5JTKsG&w.HMrS&?kGsxYfxT,]A
U"lBbU\(KNSl0rWkrudC6l(#F^DAax=)B8KF<kfVfwsc$Q8NTKOEFM9<rjTRYNsvh
U"X_xmHSh0rSXhxCt<w*[gOcgWNtT=8W;TKE62N*Nw4S]r3lrBA'JBFn=;NDvz]dg
U"c6?wJsXNPTKIWvrDNT.0rC?vLk\*1_4]f]PtuWH70KT1zvr-Dhy<]k.lqu^Kw%A
U"?FDFGcXW$(TBFD:rbpnO_3$F$O._vQ?4_^j]K>+H]X=&fk&VwcckXShTKIti*bm
U"2ADFDA]-Do^irZ+Bu#G)XW<+BVEH7d,B^oc?bUvt3A_tTN5)x1S]](3vSz9r?H4
U"^tN/FhfD,lw&<$k#luIPiMW40rghEW=d.]_gc6Wxsn>S_0rWsHves]t7<koZYvJ
U"i$Z+AYVKSNs_vs2S_t(NtDrfTP=r/zis&Vxm:<kbNo.fnn-S]Lcf8sxRCS]2,8f
U"lB\M\<kY<N8,k+AvT/NBMls<kZ-oj<vunHS]LfdDLG&#FDqZd8$scB.lWV=Nw<=
U"DRv?Pvp:[m70FtFZ'::8N[tZiCtt^bKP#hrN?7h;<e-Kklh%\nL?&XH(?R5T$$O
U"Go(kdpr%#(9cr'ZWZ,JsLY:Ul#i7B\pk9%qmlp'#hrGMpS[_Z\IcUuRbGDWF2lq
U"UR^#b##s4\EJZR[nHiZ#ohdn-_hNoQKpYmb#pDoa&hN&GekGRCG6&&RlZC,d2%C
U"+FZb#U$4-T*p9aFdH\J]\Ma/=8JZ7T#HoaE6w%[sQ*t^3VsZp;IaTr54TCk'Y^9
U"jmq\f>hox/(B<x<wvL3-?mOwD?ZZNKRI8tVfdqIb^,iht9aD]IS8W8E_qmi\5xo
U"vB5'>#xWzT-9$RhqJsC\+:g&X_dszj8rLG3$8^1N(*LrFux3q3M%p)WOl^Q6Z'w
U"bcfpf/(\KC*itCow),p;m]Hf_iEGRJ97hed\_15_G?#l$nu6VWiNNK&&b<,QM8+
U"Ac'f.MJ2\)eb0i^\n5ec_tca#LVqjQKnp>*RT=f%XmU),K7-jdP4s<lM'^<6;t\
U"#wRD.eS?L/;y8VBRb57.ietjmT0hKp'OE*?\0tw+bX<rr6lJ.otN4URu$OoxpDx
U"7D4CbV4<2nLnrd=d3kjT>&6O&^o.zT(uc,)v.j.#dkCZ+wT_hN4.$VVKa<8bHQu
U"G'(q8*dw4%up&'%;09%%'%-%,=,aRi9[1/%oR%%)6Y%%%/%%%%%%%%%&%E%)OP%
U"%%%%yw%nhpx%Sgfx%up&'%;09%%'%-%'3.bRO%go)'7z%%(%]&%%/%%%%%%%%%&
U"%E%2OPAR%%%yw%nhpxLS3>2%up*+%%%%%%'%'%&?%%%)'R%%%%%
END SUB
V2
V3
V4
CLOSE:IF S=76AND B&=33758THEN?" :) Ok!"ELSE?" :( Bad!
SUB U(A$):FOR A=1TO LEN(A$):C=ASC(MID$(A$,A))-37:IF C<0THEN C=91+C*32
IF K<4THEN K=C+243ELSE?#1,CHR$(C+(K MOD 3)*86);:K=K\3:B&=B&+1
S=(S+C)AND 255:NEXT:LOCATE,1:?STRING$(B&*50\33758,219);:END SUB
'>>> Page 1 of TRICKS.ZIP ends here. Last page. TCHK:76
