'===========================================================================
' Subject: PERFECTEDIT 2.0                    Date: 06-11-00 (09:45)       
'  Author: Donovan Smith                      Code: QB, PDS                
'  Origin: donovansmith@uswest.net          Packet: TEXT.ABC
'===========================================================================
' PerfectEdit v2.0
' Full Version w/EXE available at http://dss.50megs.com/perfecte.htm
DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2
SUB V1:OPEN "O",1,"PE2.ZIP",4^6:Z&=30017:?STRING$(50,177);
U"%up()%9%'%%-%monKM:c8uz;Dm%%4'%%%1%%%%uj%wkji%nySg7fxfb;:BTkkaX
U",^9xUDz;%3m-[&wT?/AoeMej:(KAayCd*Vz'.1u1hG/GE7pNx9zA3XFzSMN1BNZ
U"_3$P)H/+EaJRngEEAGA7CbLbabv=mFYOTr\392LAE]sXi8,NwG;v]moVL\dDjcy
U"^,:=$]s]QkdBn_^XYvjt/poI0\om+S:Z8wFGCs5nK8l)0)37]aMOGlGceM-aa):
U"ADT0A5IIIv]mv<BG)m7H'\)6Liz]4F0#]+CV(=^M)q<7MFbraiKM22lbGibN5c8
U"OG(r8Ac)8A]2=q?(hA[C4kLHi%'=>p'_\vm%+-+$Gk[1I8K+]Y++1f_M]v.b(-5
U"2h35^a^9uK7=>Q<TIA#'Uy:fYLsRma<=:Zgdbeh)xeE2<l,e1=ajScg7X;6OG2%
U"e))d&[L8W5WA1C/\;breO%<BWplwj)Zzc^O_x$K>NMfCklpNu4?Su\aVMkhIH+8
U"K1$j[&.UEd)cLmC_m3%W/Q4#>ol#JzG;(vxH%Ees$lvlE([lsT33]W+CkDtl\5z
U",rSZ25c-t-mSTGSmGk7y)v0eW$qD#(91r[Y=t_FAbD0af$U.Inm=Q]p6QeRU?8V
U"/X*3-S+x79d%Hg=3L:YG$-dYuDi[l3g?vj]%hW+[Ln2a*FtaR&MCbCuc<fr+8Be
U"s6BILGf_b/-diQ*/x:kr7n>->l9,*7bGPsgJmc0^ZchJS+n\]=gHenB.52LJ#3M
U"+Ff%5:]wlkIv=$Zunl64Lf2Eq+jm';-$rU/XLbfb_En.Vu&Fa]jY2\50'1YSmi9
U"l58'1ajB>Rqn]yhxo-ngYc8mSnHOaDn<v8%Nn,s(GG^tBgE[G_*PsI#\Uyv:<i-
U"5O6)\u0d.\=e[E&t2:k8V)cf^oPVS6\J3P5&g[Vv$.1:;+TPAU0080*'x]cFNq[
U"^ESZB5dHPNt<^0lBd:M]1b/B'<$_c)n)4)D6mO;W;k/.^[w1#un5A_JnsZ\bs].
U"PEpHw1tV1bUNY0&7X#d]_uOf3gZf7U*eMn/#ar/O8HoSlV$HHsd-]/n\3ZgXH/7
U"#6uArvOeWX^h0.Z045;)?fT$c/-$*tc63EGfn_er7e+L<,rPb#pxp(J*T:n&n5i
U"34MLHp2I>O[pLWa54X>E>9Ckf*_W&lnG;'2oQMULpZv5PNj3mnJ=)=piRT#Kl*Z
U"OC;.z3V\Xf[e(:yXt<\Hi,F'3A7t;:j[9?OmgSN1b/m4;FGaPDK$=J990I3b3y<
U"*Y=+#%fDFPdaID]WgmOTAYIrYOPApWTpmxQnO^\NOA&?=Z0:ulDrI;O<WApiPPh
U"4Rc1?-#d.[3fpaF4J+w&g5Q1+YKIna..Cfc7R_h:V[p.WK46;SJL#4q,b8FyK9B
U"/e[#XW<iuI1+<P6ucSVnR+GW5bj;5d,n'3pQ(D;'rKv56?LXsPb%_Ai^Flocp]7
U"YBp.#BZ$r,;c4IbPI^J7GgAln%.fftgrs>S$Oq94jR(O']q^If.P9^9i,]Ln9M=
U"RyyMOG>nunSGOg'?\._Wa>Kee3Z8N:a7F$4/D737Oxj..Tuz5ffB*IG?$l'lpYt
U">J]Hop$gvR$>8:o]Ipw&Hs]dWB0xH*%)/54Squ<:j.^J)=.-XIJdxO^F+l%cfZZ
U"gRe/LUMEWKd]acIGah(PUZhQ)PJfVUiH-:CIU?(dm+\zOpF&4h9Y6NBx9hz+lps
U"$v,oWBExV;Mt>m771[IRj0<f&rEN+JW36pMIZXbCf\S.VZk0NiabPe_?Af7GNL^
U":5blZcb8L.Caou)ICVONI/IVo8m%KMZPqL4z%Y.LXh.>HOp^>l^ur,0BAu8MRMk
U",++UcN?Ir/3*;_VPk>-%[Jupu['')s;Bo%k;jh(p$yVtqaqe#gUSM+WDkN>1E[&
U"tvqt)<K6)3oA9l>F5R%+=L3w_^43kPil6Ajk)20J4yakceN[W'f#xwgN68nl>$C
U"iha-)Mhr\F3#Qe5>_CAD&ymE/uT^3Vjt(dNk:9>FL<p#sk0X/Vm6-flO;+FTY>q
U"XH<0DlbZ)B.n%C[(;WT'1Ev9TkO=&+MEY\2KvKetjPI2#^(aOD]J-Q[uKa4m]cc
U"08#5q,Mohkybw$%XZrTnYNSA&:$S\d-c-cb&Ks]m/aZnK=O9o7RNEo6.oJ#A9:Y
U"#4WFY0=R'N[>0J<GMh?nE8wtB2S%YR3T6E4J8M>J7uRR?wo1*,7wgA?;(yTqU&Y
U"e#%Q%]^]&:FOf5sh1ov%>[u31DMj]jC(dOCHTX+2sEN3;uWd;AtoUuu(>/8u&-;
U"s9aY*-qnb0?9^&Am$ZuTo^k:%/6IX,VMmaoB4KaCK($Q1vqC2z$8hna-t(Z2eQ5
U"glIMMx%zfufo0NQ858IAJZuw-).?ZHk[JxeB6ssFKKZ0,D)6+J.U8inxbuU&0F]
U"Wf]P+=[2yCp6-a-;e8WZO]s+9ctF-HS3#LQ/Rv?9I[8O=)$7mT$EY0KO[5j37T7
U"%<Y_<(o?o\\V.89B$i?8v^r6\1%1-BlIM]8v-ces)chdpu\V7guf7(u\B.)yHu-
U"-c-)yhBnD$G*Xo<$h^sfH6#vJKpNxl,PSN)QN%fOiS(1ZJK$WqpS\^Pu3r1.\=M
U"0ml1.=q3^s7S%r/Y^egQa^o;1J^C=[q#r1vuS--AYj:2w>giNo_URGr=d/y<r:%
U"\:%loIhEtD6)w<b40GMm;wH]Duu#A&EQ4*q9]^R#v^zCpN+I_Q7KR9F:7)1C'7,
U"Be*a/G)eyR(3IJ'?N%#JP+6Qs-(zz)g>R/$h$o\;Lk(rJCekI&iF3#fab[jE-L#
U"tZ3;9Eo?[_.yPHK;:7]2pDtM4-x5PU8;Dk7LHM\VcY^6,2[?_fw[1rCYe(HF0>A
U"74hs\eq4e]4VDK77&90m,5o_UajTBVGz%\gsf;kkQ9j>./aRV?NcLNC^N+NZ%xF
U"G;\pfb7f9g6bM/4.B\se,7I)d_9a?/zm[BI$KBVpRqlSC3qqr_Y>]cm4PeST4mq
U"q%oIjFpwek?psV,98\kgXuXt5=&w:9/=%bkC.Y]JOx*'&]%1fdEnV;:ehCU?(<k
U"7(oh:<r'6Qt4Iw_8AzsR2qd5jI(c\'.i0QC,uZ8:>t(O>7g;Ei(0$EBD:8tA&TX
U"OdiOC$rSMAWDbNOV9pgjn6wXEgQ[U82G;d3zscLuxa%PBFc2o$h2Za/S/.o$^?b
U"QmaCfqOou)ig$k*N#tkpMq&p'P$[E>C.Dd+NFYERJ5f(FYRGn*P%'N0$k>NLU_H
U"oT?NIJ^X[0WTo;F#*^DVTfsKM\18;P0Z9D2/JPhix'.rV<f'U,h1Pe:vyPp;DWU
U"$21UWpJ0>&$FX8(8FOc?C-Hs3\=?TF[+lw4^<Shh3N,O__7jFIC/xeM8UQ$irf\
U"EgP(L]\1A:\JW34'mxRNg0[2+kkbLJI%O,1#uqXiJ]=y<J)*96ZsiuS\,7cbVdr
U"B5[hvozF=-MepO#pfj8X4-,Cjwv$(iI:1lXF6:[UWZY'wDs/[.7^rQB'IU;TsHT
U"2p\LYr*3j??U'Ju0qj1NFd'$sF?FS3k;w]NAKQUJsAU(u$+>U#ZkT]dOsd)\VAu
U"]RO<s%(8iBC<ctLTVOx'W1D_Uw_DS=NaVfJgdV-U6eq+1#jJT_$AI0f4^#'Xf*P
U"A\WRUB[]o-RHmo9aI<wfC3%mK\=.&DE9PvC:0A:pQtI/;ed4D.n>liebM\Al0JL
U"Z-b=l_C%E-S'e5p_uN1$^](2wN9v6#8%9S(AuT;.p+B<dil]A(On%DXDE)E]M7[
U"F)WE/En&aY%NkbYScIlqqN'VLmW?)Gc/M5bOu$(wu<ceusG1Us)G'kD%sGdH#Kh
U"uwjq]Zb%#V;7,(iud3uETKR5SY=w=YipG$E3\Skj>r-iIWmd'HOd[P(hPDqHN2Z
U"#7_TbcrRRL6p=tsMT_i9;#Iv7m4g$2tPD_[K-pcsOaq4Z=Om3xjKC&C8F_zyYYM
U"c/[A_z1U8+16xp'\n]g4-Cl+;Rxb5:T-cv0WK/6,$ESf2c>>bOw2KBt([=,%G(t
U"?X.D\%\f-+#S^Cw=?Yx4.U:FEVPUEWxq(Q=b+/0/NXS'mH:E-v(^J;>ZM;>>*)1
U"eD9Fz7y3JHfCHgnSH7h#(_2:67WW^)\ZOPKnGB=lE2Hug5Y:0,6Ns?$A'7pO$\&
U"TKcDTanjm$51b90*&BaTjyC-IsLC--9=$]Y=wh.A+;s5tT_3CJR\&-ymO5Q*NZp
U"lj[y0Qp'QP=1qp.8ls;hU]Y9R/oQ.Yo/oT2+fuh-AppY%s,=duRDb-^UW*QskUE
U"d/^2jh&nd&ekT/baZ2NJ6D=Qimjk:8P4%zWDPE8/^4#7UGsr)q-j%Ym:&mGtH(X
U"&M5[rOPF2\1VkpY_HE^09q]<9#&as+3UZ3gtR_G+]&YE0KO5?5Zr-Nam;#;tM5c
U":Us:n3LfgJAO+DQBqjM\42AQ5c_X\5>LT]KS_fqO892p&#(G):g.&(]2V2jXLp^
U"7/%_h-ii0$Ut*m$4?B;+L27AEGHJOk/Okp8,?k]L09TE'BC4qfERyPilE>5lT>z
U"X0:\j/Hl_%wmYQp^u)2-y<J9-Uy*LSP79J;tl<,jE/tVb,uH<Hlh=ix#Q\og(aO
U"6o^dr_\Hs-],cN]PLt%U]SK7d;O\o$\ck\%xN2JLbT6&RNY2SZl5AL$I3e(M*F/
U"EQOm4Tm/m\e5x]wn1*a4J#u3c?lqHIkDPIWrt/dLbRqhh4DIB.5[<ixVd$B+f&#
U"<o1M/zJw=hvC*W4-&qN4[:=$a7J'Zb*P,6mBc^Z+^f&;/S?lF<O$TZ;sm#6;3(Q
U"9%j?Z4\pNq[G-/eI;cbx(d['[YCD-]DiPefRlb6Oqv6aX4)LFY.ZHma+Q_MhHF]
U"4NVy'3)_phbB7M/Kja'44,<p8R7NA..<Z67c_HWva\5=BFC6-w?X7+H^[,G#_yi
U"%2S\//7.8O9wR/FslPuCU;U[fAQmH'#(u%T^8O;QYXO2XSjC6KBr[RatuMHm]pl
U"d:P-eU*h3=%dgBO^%-ddl?$R3oH?K0-$W>nA[2$FF?#S_j.T<(\$e3Z:JTs?zF8
U"rrK[#:WcrW>lEq(JOUMmUTBjav<_;7+Vuk6U^(](L6bFq$va;MDjc(o3_k7,Ht_
U"+7g#*luwUrq7=rUsXg$FPKIVOi?N\;e_m[Ws-gB>2CZ-z&J8r/(j3h2'J5nm><%
U"'oA<JbP)a&,X:QH&QMPbyy?TV'WqXl?KpNzo=sxdEXfwx#7(Oj8jdD]:DpSB1*l
U"6W<pu'W/&thCMO2DJ:*:ZL*pG_l&Z;Ea=n\z'0K6d<Q%;p/6P%lx=9+OArU4Lj?
U"-#+%b7Fu&(iI%^iUW>C)(#Xj;_G5^uD\zSa#_k6h>^JnJL1M88QM0mk+)qLnM;q
U"CjS.L6'BBMmFBE9[>ogvQD\+^?EET\+L_A1d05UvQ_WGQUQX7uWId7#avDXTTZv
U"jQe&68tCbM-5C5fs)-]-Mgj%sGu^#aAf&I=Fbvi?E.o2udFHN(e?/,647I7CETi
U"[0+.DxeN*cX:3NLoyH<P8;I>U4Qa2vn8A[_ukCKE^IN2_O*XK]+oW<fgo?<;)ia
U"*=0,jb(CVDr%ZC0_TA&5IDT4V^ZE,si)m/GE]&04F##t4#TW?KT$?R5G:*$bIdB
U"25?/<\LZ$kaC;=l4aY3*n$5?Jn))Ns1Cl>c,)4=rVI\ee11e/Ug3wBbMppv?DQd
U"An/'VI._^237#?hIv>3[$)?',ugu(kRna/K,M+.W22q>vf9-LxvS04J[GGa9#8R
U"+:t(r%o,-o^ro/]R4U))5LIo1Vk&rk=ym]G19#rrb$Pt,P;M,_($(l)^Nv=%aw_
U"ujG*>>bP<aKi?p]mXGJS.v-U4a_G=(zz#7/kWpr9D=B:^&Rh(256#WR[]YOj%vG
U"SaSF6tl1aeAVcXE[orWUWhx&*RLWq^h,7*a13nCMeqyX(zy+[[XxvPb,uUO7R/p
U"[)(ilwn<mVTNIB9iYVUO$Pgv9bJ:O)7:*/D;1tH<^>L:<<rNY'ib%+V_%c%ae*I
U",lN0)bL$#faGrN>CW>Fy9A_rlYJWO<f89D<7)w,oE1M;-5d+*/ml6&LB)pqpX$o
U"KBRL4L(E&uh;E=HJVQYBfEkz)*=dhZh8taF&:MS$;ze4-(YvdO5->0N3k##;\W1
U"lUPw6i$=%%94>*ml[&MD&'eoZ_;;Z(7b8moACbIt5c'kbUEcVaV:+Ge[9o29kVe
U"7qGOh^E2-jSef#sC&Q(n';+&#RHRhI*bIJh<ZNq5,/;Y17s3m=hOlbo,pQoYm)_
U"K'sHL-f_XZ:B2Hb5S]YYnbsYm\L04qKh&I1-_g<ND[M9bKA:cqq279,ufS8&'N)
U"v<8EloMV6\D3UKJO=x/g1OQ][bL1B:^eK8gJtXq-6eHqrQ^\YK?^MC.fXVR9IIk
U"fUS/DR4GoU1?K04EViRA1/RkDN6<>Ru]FLZ^lKFGRmeBOgq2QhqAphf:.uer+\a
U"2q6JNKD)<bso,.x(rAp]nh;.39kHPjS\5umtaIUHCk,bad<)2?FnI:nRBsGaJOT
U"/pBKRAt$Zm./0d7]3B%%1a9_%L<bI*m71sO?7'Vc7SkCdWi<7Wvj'0)r32z7nTL
U"88Fe/wWHb8-SvwQ^E6;LT5nm\nN]yvWTbni0..7CM[9i[3%#s;YfOC/Gn?([ooN
U"3uDZ:ZtS_=0\ZAq,8cj*cK\\S7#9,]L^q*nE;qS$paAdF02fPVYMj^%kacC'?=0
U"P&]-\F=%$=;O<&g>?0wg/vaG%YOLCicZEe?f6hh:VoE:BYt-3;8FtTLtlwoB9>V
U"Tl-[vo[<)h3QtrXh]9$lV=3rKiY)UU?vBcntE>%;eNqZp>U?DH$,=DvuEHlAj7V
U"P9Aq$>;VG5:>e$E,yLeH.A7YC$lKTM4tbC6aoaqRLkUX(1dq)c3txQ1h#L)GPqY
U"=M\bKH_)$ZEeBV:iqJ3XNPGop[f3?FSeLiz,nT_prZ,K<jnA\Xg*WNq3p2%[G)o
U"OXX3#*6a(>_;tjgm9P*qjRu$g1(i^44#w[7[fli3I71mn[2q7z(^)>M5JS)_B\$
U"X[unf4C7955\Q.oXdx%34T##%i4gPBB7'U#sQ::fk8YMw$nfxgQV07^).N^&i<D
U"g?]Bb;umxbjqo2G:eid/MO]HvO[_HfthCK%oy0BtSuu-AX.%f3/,rrVrTDkz]Xc
U"&(-_(LAAqkVJSH:kOjC[\#$Ds-YwCJBIcz]qA>D.a9gVLxhGk_P:Q2TO$>:NFy,
U"ZcMM,rtfGBxp[N49lea/ABjGnqA8oS0c,0mZRl*,:;O(Zx?7OORFm+b'W-pl:&l
U"(k4Ljg$]>$3&75/?)<chdg5+zsB9r'5J$BX/=.-X2Pe%&]:F<ThfaXt.#L*[TWp
U"e+^/Z:wD#0S7cB:,1Q$G3ocFi6q[,0q/AAPpSG/PmSuImoV/t?4B\_C5o_QS/UH
U"-C]+T#mLj$531SzJ.5mY7Yf$+ga=mDmS$_)=$?weN:$C*UqBDfCXQZAPp'9a10#
U"U1^UBZ]v?uE3+K+z*aylOg_e-Tk)#Q]H4-cB)?3[?];OkHr5N28J\J-_6v[>>dt
U":M%3z^;Qy]b]#/>eN\-O05'+SD>:So:lC*LBc5&Pm;O<jvfIz4Y'7GF?KoABc+Q
U"[Rh0i:sa?rK?wPq&&&p?f.nPc/J4q\LRQ9,\F-C+YTFDX2Z-eG)#%,:bItG#dAP
U")Yj#I$+BzqmMG6=ip&4s550-eVhL#Rn7N)+3eAha_AC6wi8_B2b=qx6dKz?jP_X
U"B15>R45aBpjOHRTBPY[uf]f/k]dDCt<54phDcOE0TM(u)qi,RoT0q8UZ#uuf>%s
U"bFq)8,Nago\W^TIUBb4=x+:S1*m,zVa>P3^.USClW;1WpL4hXI1[H=Q08d\h;ov
U"8K<XwdSFQ7SD)C^C_hZngmm2D3<YJ<1Zclpe]'_JDVh_4(,-=92HZA#vFoMaoZK
U"VDx7E30QS&A>\$AKz:r'Fgqtv3>fQW^TC]krFbdRJnDm*N8V$ccAenM]/W0=#yZ
U"1gBYNG4Xy9RJ$'/XJC2LRNV7S[MT:$:pXm,kYn1Jb--\lZ3lpqd#dUs1P+o'lV1
U"SMiZS34CNJ0vtM=)d+Rx/l<noU7#xmtdcon]S/4cd'M7U7oX>Wii_QL4\Mt?HD,
U",6qStY7Uw<+aH]NA:d*NZ'a^SGi>llNK&s.GBx_j:>j=p<92^4wDy?,evUL/nxf
U":H\Y5r2+54H=%]SWsI*U(/'g._Lr#4AUGcNmt7KoWOofu2TwNt>0&$nw%j_JfJ-
U"/gFOb.fW?'dj/CT-OC6DJ8bLlgDTa7S$66n%EJlA&6Qu%Db,C\iGJ6--JAeeL?m
U"k;w0;$=t$%S_jizK'esM4Sec.FFr%&jcL9qZRexpgduAMbGG?X7z(<Y<p,<]J9a
U"6\;nz*8LX_VJ2.X22U?owQ#BNma:,)%+Z_l=I2MTOCOMa<LZ6&SC<H;TuAf.0ic
U"2$AtGgdtrHVxy[1%_k\U^_$1,.B(.Di;KVBWeh>_oo\Anp\II7#mm+,Hm+KAI(L
U"Ip(<Fk6a*47W(yL]laMtF:3Brjf(UFqWE=)SZs:f%i'L%'X4Hd<o)z1kj3/7\-b
U"dI6^.Di+?\CIe^IFkD76VH\E0Abc^?L/58T27/A*G8y<Aw;smA.Mj15O.<#1fg5
U":K</S9;pP^'T$5pP^63/diF3Zgc6s+r<=e1)/zfOCS0#wK58]sani=m2YF=[<%'
U"bU9E2teZU>9Yk4M<p?(3$]+<>G'i.uA'-3TyKLuh&?F>vVaG.^7YQ-D;q\1Mt_>
U";F(_6f[XS^'8Rf'bmT71UQ;p^R4npZW-Jm7%79EdY/Od9?/vF#ZIrvbcRBrXYVo
U"+KJkM7/h8)r%.b2V0^[.k7b6-oIQ=R)sK5651v<iiDQWcvd$$jl0,NgP-YNrhk%
U"'xqeub1B_g_zOEqh)Vbx]([BCg#_4>Gw]^9FjfNCikC?3TvD?s_E)qR\k,&11VO
U"Dh$6PP4)kE5O(t2bf;YIJbi?)(19q;o,DkNBRQRb5;.8Y1w=12H]-]K_2EH#TUk
U"Oh>\]5kio(\+C^\o64I>T6T-KkTazh\B'VK&;?mOaDknv8%ibFm,-).e)3i0^?Z
U"V+uv38Ub3H],:(0'[:]SiZm57rl,K.[88Ma?-,f-%A0vidZ)X5%d4+d2HP5bYtP
U"8T9t(B\rAeXNs/fIlBxs_*bOd<AqqOx7v(T2V>ML.9Ii9=oI#Zq9sx%%%fQCP6b
U"64lEo&s1QA(c6V#QSK)Nugt<mxIECFEV&.5'^7(Xi>;2nXVT<joBuj]r;1lqUp.
U"uY\(NR1%e>%CLj2?3ikJD-iS-(;tk3DtU0tJU#tUJYwRr*MGEoA\aoe1FjCm1$w
U"N:>?b8PH'm(vt&$#vQG>He28J\y7jS;JRgxNwB#BJ=AcKvoR._]k5i4gX.3V0(Z
U"M]u7$iw?sZ1l)?m]X+G9Pe&9oKJ;3D[OqH'o,)p\P^IV#3jvE3_OC;.);Q[ezyS
U"bjntcmcS(&;t.W5SplJbN?R>J.5xi*E?\Td/7J\,6kcKq%^7gf&i'\24Voj^(e2
U";&/fM2Et4%RfLuIibZ>/^MdLa4F(DdAqEbAS]]Kpy4TlX9Y_XFD(ydzZE*Y9$i1
U"kU0FiggxE+:xA)x>[/07QSWa7$\:o%h72?%LB<[iUbidGThV58T[9&u,Xhg^oVb
U"udnQwjb?AZ(iF3Xs]AD6Lxev^xmB[I&\]BSm+VCE[5,1ic=7t'EB:6s%fj_7tR<
U"$A-bt-a-idak)5i6vbO;6s61W_8ms:y9%i5t?aq52ZK1gdu;<Aa3D,s,m?UWL0K
U"+1.buBhbv+g[Lgr[rM\'$tlboJL4k.^7eSKYOhB1eb1[PQbO%2tkJ*o$ex;G\ob
U"]NZ2H^Q\e^w[/Z>QUij30hvOa?nF;.38tDMoFt/^#fB%,aBC=QC1OE<[2CI?pRv
U":V1uLuYwuR36)?'R*(./2?fn6mp_.+&BgrK6-nNG4<h7[tvHgCq6F^,c4knVa:*
U".RrX42[o801qf8Ot5EMc8Kl-4ST'pCXBQJnQeFR3qF0qzwX0\NvLKWo,CV22rjO
U">k=VDWm]S:NWa.*u]t?r+Ge9:]=,aa^Gb^B.cg-ukJ*^sn6w)P'iWqQZRCCk>Ay
U"n*jc9tC&d(N_0tMBGSuQjs5pI+)jUaqGR$9q4,9IGovSIf-[&]&r_v*?^I3;f4q
U"0'8LF1M[;bG1%BtO:x^QHk=ihR#ClglR0QVgE023I?q&BQ?lhSI%SXX?+(M]L#g
U"Pv<Xa)KAK^fRg6,kFm,T8C[:B8xDe;RR1-^1Lb?/dQ1c8YVxg/X4V<N^kMiNA9%
U"H0)^K.9Jr$<qAjizO$=Qv,O;NJ^knty/R7YmB:2LWU;6dY7H^&74;Q%=;],z6TB
U"vBFe>**x*%up()%9%'%.-%#pJKM,=,m?A5%%%4K%%%1%%%%uj%wkji%nySiRth&
U")<RaTk3+L6)<xp?TB/GMy:<:%Jn=q)4oRW#6prb+%E2BDY1e$S#C0\'ikq8MGBB
U"QQ;dnXI1*kRn5uACn]oBiX2PA^q9d?Ldr3n3KYmcWxjWXdndT2S[3Yd1q\g^LMk
U"ucrBJQJJ??V-;p4c+Wy_kVl6_uqndP<kR2Muk[J__5mJN&5]=3$gIl7up'uW2jF
U"D7=$w?H-s8hHu6qFKPHl1bGG,RZDD8XR;^zK^$\Zz.N,tJ:0oj<G7ax3]0jzhQ-
U"dC>A>5lqjgvi[O]fz7'<OHeoLx<kx2+hHxu%]D4Yjp_l3D,8x_B&TL.IW&nW]Ah
U"[u>Z5[[\S[DUEXH+gw^HI*<+;5h<zsA]X?,f5#CrPOb7jbE_cEA_3Yw>$u/Pch.
U"i1D^Lnfbf6n<NRbawiI<_22Gb]GMgx;0Od+W0a[Snx,VCuo=(zvH:YQTFVuR[$T
U"]p0X2*r7cq-ghL\MZ^>#bJ.Ni2zJCO=QB/Nta;91?K_NCg[w[dubvrH2G7A[*4i
U"Rc0;;B^b*Uq$MBBHJS>K_=PA8gll88iUtj4pptF0lbWQg2r\9sju:,>(Ik3i6eg
U"Ojs7c.xH;3ep1?Mj\LCU-F]a.lM7rqS;sh&PyV[XRk.'GZT$^o7ZBC']jZW]4Wf
U"w=y>$FJ%&,k1l5eli\$Hr]SQA5Q^E,9IHiF-sx=bb6JAk:l7[lP182]sM]^^n^D
U"nCvt3Etr)SUR[1[N_1buV[s8rsC)NsX9\b(6/s'Df^VodZ;j&?5:yVpAb-%0)4k
U"p#*'NPtEz<_,=0hu?[CEHgZ0.JgZkGFE.OUqRQrdLJ,w+A%(KI9Nz]],TwNuB=n
U"3&9TWSu3I=biL#u6=1X9D\.BtNh]u<#c)$uY3StyjeF5*zaj_(8Dm_/2u4ykj;U
U"tupfWLZRQ2An+^PjEn+-21b4YOlZ12KMJBrK>31kgVFXr(5$Lp#3b[B0*th6&=7
U"O8bJWxG43TwV:f>2guI3YM#ZsTe:G*?ZvT]UiZOQ[.I[:LDOs7QQ(iH^U=5-(Rb
U"y%%pncmU;Xo;\,a&[r^6fTa&_<wU]k&<uC=8M)?jEcpLw&4$\8VCY2<V4DZUKEh
U"-</?3R[z.Lcl[j%r0IWRPOhGhHu2fUK<j2wos'>mEtGx4o[j,'.:_+%CJ'5QCR-
U"NEqH)Q1QN?K,bhZe.CN8y-FL286dcK4&rf/u-L8d]tLIHtX5&eoIYaarsCWCt4e
U"-CnuPA??4s3wTl+Lq$j]*%5/NA2>;Y;0=1(Ce:^/C%=dQ81ljHLjNPLtoi?&=cI
U"^sQk_nTD<(.<ZudI7O0s.]f:*C2*'p%/]JOGDb:OeGn[7#^N$,72Qf'];lm#T&^
U"ytN9d2l1lro/u1;/rE2Qy=QiG+-rp%crp4:jpOC/L1oJe^&\np7]G6G'JOgNOo1
U"=vo7%9AGhH'BvV7XbsN$4<=PwO.CnaiiBF-/kQPeWi>_ZuBNNer_lO[<rQ^->z7
U"qt\[M?d*t/Ygc8wXR*o?GOkAmT5V:Ixk-VBt&3+VR=)-WOieccb_^?</-&O%gG4
U"J9PiJohRuK8Q(G3TS0mVAW.uqbxfNilC$F)3O0\Fe.,6?GXu0m<kuxtVRF>*fV^
U"?Y>p^.O]]IAABF\+?UD&mp1K258nsjzlUpMw?XvoYiXp$t7yVu-R2G-vL$9QLRe
U"XbhS]n?E^&bOU/>ehO\A6v7OnZjqDA*955pO8x]Q]VQ=a]>s-u7i?7i'[#;-$L3
U"JC?:=%C[<DgFXB^LT^/XI1Hm,*JdC\5p&I2dyz;Z-LU*eRB3;r0SbAY9.q3UQ:)
U"%oY:qO0rH;:5LKcZ?C-BmsA'3=8Rq\YHeo7Jo[y#b%=por61Zt7I;F\dJruxECk
U"LSuAFh^OyX'hjPf6nAKKCGy(4=:ur.w[VOMwj4)E4R($AR$bb4R-8L1v,e5;rhW
U"=9-PC,_EvG-(4SDOP$XUv$M4Hrl5.4N0iCk-tukiMKIBiM&_CzZ(o#T.DqxGTSr
U"]T4sKAYF]t^ToKa>/zt;;K^8UAT4tZ1Mh,L^WyTUougQhZqKmbA1MqVQfX++(cn
U"isq+TFar8H,cNvMZ;c,vDURq)Z,)k-Z[tH^Jothkhzdr<PT$'U^>(LHgh%F4Mv>
U"ZIf6.gSAfRkNu0&LmU^JVFniD\7a*<&gt0S&c;+AXaeO7o+A7ttxL+CSkU8NTmI
U"y7yAJ+sg3-<:IYm9'.I-494>%)q,JPpuXNN?5QQ]]VjW$ve;>nR499gqM2wZpkq
U"N^S$)x^,v:EG_]vtBR5p$Z:erlhC#Zg4#S>UJ=]oD.b%<4i\br/\5G#+l^kgwM/
U"[;gD6ixV8RB'.Yk.':[+Dmi*neq<K#<l';j:ubNseCLM%C,PGm<s$,-3R.ouFxm
END SUB
SUB V2
U"_;gD<h[xHE/mL^\M6JP#iGU1.LWG6uh/TgAb/<mAX=D&hUQ?\2JQuXog;t(Ns/K
U"2((^#evUyta\C8/fJ=#E+U>CB$l2LfVx-d5owH2T\r/&KO:A_qvpEA,,N-5Ik^9
U"qkiMG&?^=s/6F'bu'ZbU3A%#C7K85=oOBf>u<hg<+(2P#uB,GBv$2X+U/bU:B<I
U"gTu0jt2z9/pii0:H(mn=38Gzo/NHt/$^)XAO$H;fjO^#*oriuWuXrHUeaq'M-1.
U"D'#>.J/Jii9<$>/?/N<+v>j;f,EKt&0hE6Rf>xH:C^'JLdFslA5LM%n(%/Y)EHP
U"<Y6of2Yg(pCOQ6E;<e>L#npidfSpJ0A,Ag/e3[8gL,KrJgJh,,6&/sepZ&_MZVC
U"u9[-fFvKEx:p#$_WzLd57#W]h=<Ml3FoEu?&QOv-,A2rs0T0i?QqQ++c,>[&ml#
U"Khmoq'6E^]7Vo).2v';G3+iM3w-Jp+_6H$5xo*_p2vnQpf?'-?FEs,^Tz<h#]/v
U"hJgRos7_>+FC&DKH>Ilu>-\=3l^OE^4tiGt24th9lU-L/QCPw<p\nom3;W0m-M>
U"V),ftfNd3pnn0.Cc4<c7,=QWX><V:0cW-8=NZcGY]rw8a<pw(+rKFl:0BhZIW^'
U"?31P2.6'C#:<^F:38E0B?.3buBSAg;Gt4[g%'IH&F&BoS=X,5pmFtEa&?V)(HB-
U":tG1:1Ys9Ip+5RAd0[)&$APF;TCI8%Hrc_/s)QiGore[M7]l*h<j[_O&J#v2>+h
U"jw:/B=9ulgGI7HLuss6=mg8ig.CQ2;i,H;tB,1veU&UpFtK%?7t-CD0+0)<7*NO
U"/o^G^cTfCn3f+bk*Y1W:2<iRMH3d[\\82[/^j91dIM>p%2MBhc-'0/ItfEl$M9?
U"(5J+sTr)#G(4l5[15zH(DK[>^xq/7(K8Bn_8f1e;^QXK/'k<B2C7K[']Cg2<SZ-
U"e&7#DbLNA:%RwHsgKMl_)wKtBNbD38F_E*eWIb>#bjvr-APP8<Y)V2LuT1%MO96
U"yr4,EzH#J&,RaV3p+(Kk&hfAfrS:[TVvcWOg1Xu+'v4wfdJC,F8QJTrB5\>Z&\=
U"M?_C_7fR2.Qm7KQ%&z=Er/A9%*Rc'KHl0M#;*n)cRMnt9#xW8[E=bp:n5&TjkGA
U"jFFHE;XgQNuSQA\c<t^)Jtv;v5+5mKl-ZI6al=op+dl)Ckj99zL6uuD[cviJZpG
U"hbUq4+pxk5%feS6uUv*A8\w7\x9nMrh$i(%,J*t&t>IWCtSVkFF_sUI&4B/IA$u
U"Wlg1lA[#1oe_UzpJxCiMA.-,gF'Ntcu-^;Q&yW6+:%*nmAz.I'3oLi/.2H:JI+]
U"zZTvnYsS1>NLeQC\7:t:3IuMYdBn6.Xie95q&ooos)7r-RN-,C):J*uc_2lKm&^
U",a3J4fq.8o07\mhiBg7,(*pJN6J?64Fhh*C\]QPq+7=G8#5ozr6)Jc5\V=6K3SM
U"sN:pd9XsbY9YfFU_=bBq]$j/?KVC(CD*Ny;<KU0OH#Up?pmf'x4Q76niTB>XWkK
U"\yc6YU?/hQj88r.IU35Co/C3M,*>Xk*Hx5O*^[.nn6'20mh7r0V7S%d8eJ,m=ls
U"*jOe)19G[(RVXqE2g7.;<^uTk*wr+vXc\guqL#?k??2A.5&BU8'Jee8lkq_)DQ<
U"VV#*.iNND2u1-(%<3[<THQ&U_gBVM4VuIT0E+=_i&ppj+HFe(vu53j+F79f4<f,
U"vt]9\$1p3CXGPxWPv)r1eV4?FQJAJ95A3.PE/^jG=\ETHOGNP][Fy'o]aQ+*XmF
U"5%ZAYkE+;0,?qD+oR[Yv&dBg_;dgV#f.IA%aKv*udo>qqRBc)5]d>ZVm90hFg_w
U"dU_[Cc7_Qi4A=0vN/QYII/=Y(erT/w+rqjp-3tBR[hD7?g&HDRTt(n9X7[S/:%I
U",*gIr\yb3-h-%I,VEqO[bU<Sgq4dwLHqay6N6b&N7Zde>X]ru[,v#-v));4x6gE
U"t.H','C#OCB%>447O7Vl\#_b_>wQ<XmD[LnKxQn#r.>7xvi0,83\:J8NZs$0kY>
U"(K;X^<[^e[,,%9X..G4HZW#9rR-=:pT#cjibxqsOqci3k&Xe-dTZ4bU9rw1K>//
U"OZ5GbnlSj.7fhaKH^.H\SosZ)6(RsSqNBie+YtOT'#kR^3Pt-myFjaW:4Gn?5)-
U"?RV:Ux<WN'cD5Tee^;LWnlj]40+lD'W]aset&7acimdN(;6h[ebusb#uWelYQ/-
U"#n/].uUWUwF_2VBliknFluoAj_0AdvI?sF72L_G=fMo)UQGq.Jrbs4P*U+EE2s<
U"oVuA*\Pr(N[Nn;DqdeFmXm]4+8??_3rFN:keZN0F%yX-0=D^)vG,bk5$tsaacpt
U"g[^>LHnu%P.J$MV5f:wbe%\<T:DAH3O+Zu=?EgJe#emgBh+3.g9R(rYETg?mPcx
U"V-_.*7.*z4t-XC,WaZA8C[Y89KIJX4&&+e3,pFTJjj0gyZ[JW1#.&_.<71*XA#G
U"Hkk3q&+s^F:<gKLj8FJr+P3dT/G=6.iW_5,PRA7*?h,_80fj,Tq8]oIusJi^.pu
U"\spVHQY#e%;N:;1F,E=e[+?S&(Y9<AT)Pf%Qwk3zqm8cYOz,PRb-FZoVrm4iq,p
U"Mp]qN^e:e/\Q,w%d1ARz;v^>C$8?486g=_DhIQgfjI\,\<r4F=YFu;j30=1<:d>
U"b&X]73%sGr)HFMo5W^7,c8pL^5>&Y%hXv3*Xp%Eot<A\RD*vWuBlP=)BaLv8*?(
U"TnnrlguRtjDtrE&6E55;-[TT>300T;r-k?47Dis18noHvl3xvNt[_2#_,fDxoGC
U"\'JeWwsIXHp7CPNqBiARLdZTh\v$L9YeNR=EpHgeXF^_rZ(0'v\up%()9%%'%-%
U"F88\nGZ,TS&W8%%%wA%%%,%%%(h&iS#htrL.]0CylN.6gh>=5k&R1&L8h5=iKby
U"ys#kV&qCq>i#CARsgh1a1db.:Z2L\'.g=qWnnKgA1dr$:Z.fDtpni,Ge/80^Jg2
U"U[5inZ7Mk\#buI'^BSo#/J8buBU0H$6h)KE'FLBl$eBoiW6nvsdRuwCgt]^ug2_
U"94a5_gu1eta;h2T4I$\Bn:_d+f>v+i#Mv);H,6blsGk9lIrn]m2R\s&,)-H(PC2
U"V4Sdxldu;^k6;-mjN^6GDvkPc+^l;j^2tW\tftJl_q)3&LWwp-_QZ(/-jTI:pRf
U"rx$rqq;LFR*Y4WQaEJO<pQaktpu0FR^2%a'-JBK0%cfDx-C7'V5aGfd5D3^as8d
U"2.Zj95eG^8CLT_5wIo%O/id>S^gq:?ng,?2do;nN6,^B?O>en^duNxD%Lu,P$eo
U"l$NplI;6Crk76snOx(wX%7tlocAD;4&'^/-;t2/HrM(e$6M(roP8A>gyX-E*9fP
U"V=KM46=cL,W[Gu,_ln_r0W3lBLewQY'%$UtNfd*D6*f[W+0),OcD6cZOSL%=lav
U"G%WR*EZ[qqYFhpdBe&dD'v2_#/vj;=#(8*?4v+;UJEFj0<L_q_RZ4n3=hJij0K5
U"<_Sa-aTLjT.24'[*)$,Q$q2^GV89F0'*ADPW,AZ4579y#;1ZOoN6Tiz36*x\Z;H
U"WG=tVT9[_UTWq*UWsc.LaSA8boR13YD)ZHVq[YK?$^e]]LJCFvt<&t(&aF9nF.Z
U"0)Dv,M<)'A35BBQsu9[teXZuBctvoLOup5'uzxA-avzVYnW?w_tEg3+iPJoDBu)
U"].gGf?0)EX&Eek)FQMBqw''\#i'kwyw+S*v03KY?>#O>aTm*kRM-YK^y%w:X>9\
U"[?c?UGC>ClJscL(hN7oP/ij0:xXrr0cc3;.L#;C%E)&i,h+mS.Z1-.kJIc=O*#I
U"G\Azc:.ge?hP.n'7T;ljjotXU9GF*q]'j#f,M.6*feVg64Z^p=fiu,]-NX;*H;f
U"19]0laEV%nsg+C9H.^4Tu;6<:Zft79<a)AJS7_ZW/=t+n)N;v%_,L7m+SM?qtHq
U"9.t)<=y&mqJSeGSQ?-n?;Of0&/dCnm[a9+>7*#KR:87b^5^b5l[*8Pn8zQ<'JqB
U"CE:[$pUU\_QTH9fwF:ewb45lP#eqI:$Coy58Ex,:j;_/^o_N2gA=EM$eGJr7<=K
U"YJmQ]v9ZOCIT[.auW8qFO770?guJD:&gTcTqOVXE&S^A^06:3]/<u-[tQ-2AO%C
U"aCVE*nL9&j?ZJ.w/-Dd(<10MpCF\=L2LSXAU99V1>-1OR-F(:jPuo-xRIace4=+
U"S8C:8b^1fo&E?,mKM#aOo+0$lwsdP0^WS:1<)Q:D^fM%ogL.)L-hq0$bU).V7A+
U"xkwCP=_c4$1h&*R:PW6YWWHhjsFOtWi/x=RF(7kNox=,fju/^Uw1N\uln/-rWeJ
U"T+]nN#tw(D<$Q1#l&Wn2H>RqDqifuH[%#QM:[vvirHw<hXGU\w/YDqlzJ8kMVI,
U"Az.6v^GetJ#-xE9SYM=u2Zmq/4ImDa*oR%h+qydi&iZ4Ic0B^4P.AGsF4AX8B'j
U"/W;A9f[]3*69(-$4CA1984V]5G?Evn,j[w=#6=]dL>mkiiEggJ#b^cbW1*YLZch
U"e(gL<5]D47H^Td^S)F,j)9i.=zc>Fp\FBuCex)Iy3fk[uO%bCQ-+=pD2(\n-T,g
U"neji&O<[CTK/jXKsp5W;,isNRY6JM<nCSuIM.Q*<^_FG#:gMSmE/Tm\<0)gmWdX
U"rCXyJ2piQZ_SI#uP7R^LEufYg5(ayp[)a;1ch/YX551QlV46(0'hY_%uR>7^HeM
U"mHTIQgIUUdr:5p^3,mG4w1UddFlnPIr[V.Uu:]$_uSZRT(;md#,S6EpC0Lu=Oc\
U"A+EeEmJ/7*5*qZtFR.*9R)SAb^)F^KE7UmnXjm6wgU/g;k'Y$oXF:oz*tBEp73q
U"_slU?0_U;TjR0*e1;.*'bKr$/g0h*+A&l7jIE]MN17N#uJ;LT<#D;(\5Fc3;p0N
U"1;qdcu]nY+>8=H,y^eJiB-cuRH'-68$i)N,cF0LJXL*[cm$&>hWoZN;25sp(een
U"BBr<#,,EBke[v^fjt.Sf?&aY<5*d_Y,F'<<<:PlAq$oK-&pJeeus;P=uKraB-%Q
U"Ux;2>We9>CQ,,Lr9OXBGN&lklF3.51]s5%,PoMM2Y%xX^v1hBP*c1X*Gj[88E/O
U"&eqFXE&lmmLkuGCmwk?Brh*UGE.-Z#Qu9wHGg8[Q)jh'[]]>N.>dKWq9w4;12l7
U"F'$/3(Nf3bk;.5<i\FfpapSR/&M'D':f\%=p4grbuqmv8uau]v3OM3W?bh%<'NO
U"CT';^OKzopA:3%%b-Gb=0tMhu\_*a23t=C+O':tf*d;Bu+0cRdA3x$GtU7'*%0e
U"qiAtd/p7LUAq/k&]\a9;^1pK9ZPQ)IxScu]31Nkb9%sgfr1vO0yAUuqe7]A+fh]
U"aA^I5tD?tl3WJn5][h>$5mnQKhD5N_c_?5G+cy;LHb8UUhTh'ZpISB:b&bB=AXW
U"Sry>ya3r?ufc,2)]:jJ2#E\%x6Z5=y)/roOCkQE*SYpeI-T[)lYdeDbIhAaYF#N
U"\A.F&?I1XRNVs-sE#%ebAu453E3]aQ7B0eaiQSextbE_p5)(CMWEsF/b6*8C2U%
U"M?O*W#[,POeMUK#E/rwS[caDRg7vF6+7lZPQ6xnkhEMk6K$,ID8PO8?QC;bWhIr
U"H8ftv2LI=rg'eA[R'vNFIL#FmXmEu)90PRpu=Pjdhm-wiY/x9CfIu46ii2$;vR#
U"wBa/N[f$D.PK8/kA&=U&9AS?SV3\D\jlCe0I1fO7?9<m7X9]d.60%SZ63nt=LjX
U"'U,$lW<wv)4W;r23?XMi'QOg+D)[GJu%NEU-9K2Q2f7D+*Z_Ao=Hb>Qd8aYtuf*
U"/C.+W0U%fxq/eP.tnd',)A'18?2sH,fiU\%bs%hNY$s9O(w&7]%j<,-OB*f)pXa
U"EmVa1w[.4+,g%9K4Sl8CV9NCkaqbGiLWybk>.=x3;h<d5HKM[84VuAWFLZcpffh
U"RI4nTl]t5:-ZNu.doT)LLF.A&E$aPQjf/+ns\uCUZSm?e6F3E0ata9qM\6vx5c$
U"+(lf/?:rs6+/N=ImkbBDH'6>qLH6ieJ$B/2Ng1pKB,6Z&BD2l'sJcnP2qXTMSXj
U"(mabC];5/+<PUva<Z/qcGRtZ]oYva[M%Ieke(Bqpd[Gt38zYky)sCPCWK5YPfM6
U"7Ui$r](C7+<;B'yDDU?l3(W.rA24m0tGq;A4AN6I=]d-kzYf^fr):dt*cYD,7<h
U"qg-g,>]EVDc(FdNB2&;A'BCrVQz)_tZ6roKv#6S:f)JcN9-,n(_i_GRDjV<'#t:
U"a0$cc_Wx+cKAfh]d5rvleLUScC5pTJa;DcwU$f\UXc0.WE&\?r.cEdLHTgg(***
U"/XX>.'J'hUGj=16:8Q*5z36_6UUZhF(K4uOsM_E%8^r^BQ=+Tfg?YN$n&oFt*nb
U"^NbEFBNL?v$F?x>(F1CuE;/WLWwF&e=B)ZiOc:-u/v[z#Z)A\hDXC%)5BhFD*cx
U"$US>gJs)HPq/B0K9b>AF'<6xFM5DnR>Zuq]D:*KH'4l:k)QCG(nq7wTHqD3l<oI
U"eeC$-E*EJ3i03YnZI>92;9/-AX0%\]-U4d/G)9s(684+75HGLo0bnaDGA$9pyRI
U"8BG[sl(v>W6.DsEFB\/eIasnNajuACtXOYNwWwj*<osZQ(-%lhyR3A<1h(T]kWC
U"pWRqS\cce#-KFd+PcALYy?4g/4_a:U3CLpMUu#iLO4P3T,OlChxfTXiLq>8lLn6
U"lI9X:XxC(=INJfy?BdBSO0oAxtLIRQJEvxLL1aw,U-Qd^1hfJ^6T7mJDoALkdC\
U"6AinazIFlku'5PqQ77nqjz4_TUZku:QY_sV<>qIDvU4#Va3)<UVqs238TAcG<(Y
U"$S*1LU8gFZD]V]A'dr)GaM)8J95'lc8A&+%3w:pR#-HtX3WK1F+hrfe33N3#NC>
U"OV_\mNswqm$UUGsB-_RPBVD&7=3OP.G;A^t;:Sn;>+D5sHes.\9eCv[eE4qJ-ZV
U">O6*56gd2'D6(uPvm<i3JS5eLkR[]0f)*(e5V>S'gXEihL'09w])K<GtBua.:vK
U"EYP$<LV#5<JT]2Qt0#0c(s,pK1Z)8#BS.0.U(9NM$>Jsj>535<47;W36p=0ML1e
U"lZc7=,j/$U+4W#MK)(9HvPkd#50cJB<a]:x0nM&=nlDKm3^\r2H+:\2J3,aZ\Uk
U"s-FBEi3]CT:RK,Tw0S=?rwE.q\P.k?V%o/,(6ZJ>39Y0V/]X<cJwX2SQ+N%)2%;
U"=[Oas.ZG-#M[3bQZ1,D>\Vl+(Vo#>b)dG16WFrWpO6OpFXZBNse<h.,:dM[+/,j
U"SI5k^w3ihBK?iul:HbDMZUaB%[-.]QI1<t)m[.EZsxV.2/b4<clW1ZmKp6oGKhJ
U"cX]ZT8j[q;'w^nB##5SojSx'NSpSxwgNq%q)u<e=?.9%^Z*&7-)P7<WSTuAy'jQ
U"%hUqFa<FUL4osK2^IIUAd'f=$ACLNNvZ6,9BPkob4w_C\kvnxaK(E_5sM2f+h&D
U"#g+.n2I*N#<6kLYzMi7T*:tV$fV_a-]XvWgr3PF03h>frWxO(P.7+P1Pl_N1l10
U"Zhm<O>\%ZY7Zd?PZK&d%t-jc&;,P1-sX\OfL:0qYH_/'XQsfZ:].0-gr^CSM80Q
U"/aTQs+)0AJR-=pDbd?.Kw-Zn-gICi%E,,,&8h%V5BEmG_QW:KXxc):b-\BV=r*F
U",'T]n%05y.E3fh\_FE\8$6y&kr>K1IJR?-R_[g8^X6i*8q%Gl?38W)=7h5Q9]MY
U",t4leVgjXMrbQCiazaJD/ph/W%u9$G;*6[Z3wWEdPlZ,AwB<a]CS,%vh?VvW?j^
U"lqQRJ9.ZsYqAv26ZmI.QsCBw7(GaANMPa?0s.$2)v&pXjerD0KV+;w)\36FrSJG
U"miL+\TFz'cgZ7&_7]#Uq:s*S7d+?.V2LRfI6X?tHPqG&3XJFDz[OU.&ZqK<2AHM
U"3J:0^sDvPI><j0Wd4*9uPLL<8RZqZpJCl3RWszY6s]_-v,u3Tw%o/7%Jbn,R_Kz
U"_=ny2)5lu]>ssh.q67ZT^oTZvNG)..)h/6o9+5ph5?k,:_9C1[A.?.VcGq[Krcn
U"#%,AaYWXTeIyVL:O'OC6's^9LwmnK6^AtDUc1lLZFe4Nc?Ya^O_gDB[^-qhDT%1
U"l5Lv*eircSNMS,GcfA[E7d<ZSo,7w6LwL/lS_m32ZJX'knR8uF'i0&Jb9(dM9Yr
U"ZdCMfxl9p?+T?)l:HC5S$gz>U?_)t6-VQZD%Z3=rGR(ZE'disxoZ3-kiq9gD<?#
U"N45r'v/<[9%z*0fP,UlWgB&Owp+'F8P09F-fAo6>Ez;qxO/;)tG>b&um9c+3u<F
U":'0ozMZ7X*'%]j4aNpuqX)gY9psWrCCwn0>J/9XP[pka:$r+->Y#.H4#D;0#p$v
U"U<dNr[KB:N#gT1w_BdNR[Kl;>\\PGATta&g[:icY[78Sl&Y5#ltPJ,mkZ=&Rw>t
U"kY\>EO%L=3Z9]nX<Mt$.[t\E'&yRj3S;wK4jI^4WiZ(>gry^aT3:#(MU7S+pvKc
U"qXdO%x2OAeh8)GnQ1ezLzYn&kx,.;5?O-JP^1M?M*=933s6*C#+Q#\:yD1#8<0H
U"))Vsck+PGtMxfaG'+=L*%Kmf7C6aX61YQe5e>k^%R,[cqEOXJlcDe'7+3^l0Ei?
U"FH1RR;B0NTCL(w-Mp1zd\hZu.epHW\kM2n(4>U?B#CI+eI/9z=Gt\EUs(=ICBi=
U"bqRYvgR105R:oGNfMcFCQu.&cpS6GYrER6MN?OaajoWwXPRHo'+N]:*PiOf2nd:
U"t5]vN7dMZ7lZh,8B\)e>qjcK;?DnsaB#Z4^tL%3STzceBjZrosh6+:jZ^OMe(#i
U"o]UJ*hq,.7UofS83tKrs#eNCKanP,>k\:<T7tuu_no:lP'Wt(rY5D[r0k$$p/MV
U"ME.rrL:Yis/mfquJP&m4c/oZJk#R]dD-'kL%+5=TqQh6dOY4i&.fpptjudM6V:V
U"idaX^M\mTFH&70<#5vjzH:]xiSK5Cp>u)q7MS;c4(7m(U#jrF+j*iA12<4n#a%7
U">gZLR$e=7kOLuZNLY:,v:tUqR4ui:*v:K(sRrZLYpuf:lu:KcYG3O?Ef-4/Hh+\
U".Z27,pMwsN:VHXSInxN#Dy,.2c6a:<WD44XR5[YIP1wWeq=e\GHWVZjRKZRF>MJ
U"cIQ$l&JPcnQ[<aj3.sv;&S43F6c7rOKTJzdsIlD,OP_<0#<EA9h7F,F]tAQe\Dg
U"I/5X<ii2&D9ts9^r&;'S///qGj<:p^5SlCB]>_9aLPL5;tNu%p()9%%'%-=%v7\
U"&n6hf-kN9%%%IC%%%/%%%%ljy%inwS#htr\.]2G9QN.F6_56[4NrR;Q5u\='gIY
U"z:ka3e_8V-rKAq[So%#wE92.d1*Ee5Kxr(0,b;%bRpr))TCh::tQmDN(>^?m#vd
U"/p%,do0aajh9&Y7HM,10NYcILIjlFQgE=_u-XtWmIX2$lWlFHZ2$$5ctZW2pEZg
U"2'\mVSer5EUhUEkSQVB>65n[4ld,Tfv)k&/qn>z0l^]UtmP9fX$KX4<'k%s4,%Y
U"?]7#=$N6?0l6K-mwuUA9.3\$D]E8<vcdGu'7PJJpFyhC$WMhj%*OLeF0,6lMZjt
U"XOlw6eD:nr8=1;'a72EE7GNtEuC&q%,d<xOgB.6;b6ax+f\lo?:sMPxZ5d=]=mH
U"62plYP8hN01#FE7U(mCNT:b5J,DGk6&vud6=^7bbamMp+OH4^4jTcxT&=XDE]d8
U"FuR3ml;&2l0jitc4icBdP\gCQsRRcX478v8_lRrXBAM$)NigS4]?:*kRiM99d8C
U"hp-.c2%dIulqYJ,Jd#zKug5ASJJllY4]#KUPH0qUr^(j&Q<CVF_Ei<%i0rUz(R7
U"%&K1=d;d?5\M#\.'sGFM)MH*4/84J2lgPNZ527YUZ0\#F0hX(1rb?fw5n'7]HS(
U"mpYJsN^\u%2B7r.f8D[+Sywjp)'St^7][))inBi'Q/Ad9fdNvs;ExO%AN3iJk9W
U"sIk$[7(O(6#._9:<.%U2[M'I5a49Zp:p_M>hqc05Lua7hvg\0?#j>GIHu><0[Kh
U"%:t;c8\bVc;paCWO[Y*&;]<&EmPVR(W0+4Yzom;Kqz/#<J5ESs1q\25a,*=rjSp
U"lnm+>DB9gmWc8Y.p(7'EUmFx[/.ka;#U:^aQO<cQhGcqdtK=4*Q;>(CH3PsNT%J
U"LTZa>g(Z/jxb0>C*viKE>I)$e0'8plv>sUw1X>Cu-h\]^6:&b>;D(_ZQz5K9y:0
U"kcl%)N#?du1nc)]+K)976R*M8\a=eHGW*W>Ck0r:iKXQNalrGB%A[FZd4$]kI(h
U"'/H]GWvo?C^DdH+2Uc;QkTlE:s6RRHEQpLeQMLAKI/jMO(YoIY(+cVS-e4-'9Z*
U"17dNbBg_CG:RlHA*iwXA-zx\a+4+Y8FuL;GZRGtnMbQ?aGJ6%OiT;-\t&ZSdGUJ
U"h8'R>e3U8qj8Ha(V6I?o[M*weHO&EtP<02.94g*);[c1gvE.[;;]DiG*/zK5O$h
U"?C^hA%2%%[8FA5*XCr*'<yWaPFmv1;$=+:Xwx+GqT;Oda0a%61X;k;Z:&w+&Z$2
U";(?&jQ'.yFYy^1e)th?a/]>&q/5?[*V^pS0+3Uy648,P#nqI'\AMO<x'xvCnq8?
U"xvNWUg_4iaoBRB]Gz0,&^kkq>z%'P?ZFs>eH>T*,9-O<)_kfoPp;1ReAr.LRN<A
U"n;g+3a'tt'+AYF3A;9v)/qzWgDs7N:7gQE/4BsWI%\OICNs7vA>2Vp/2gtp]E/y
U"3MsHdq'AycQ\LFUZSa=+S&2J.RJZf/&mEXnK%MUFoP;#Jw(kD)K4COV&gZ6&.Ar
U")j;9\]o/^/Wq#]4ZM?a3k#,?ZUDpA?8(9BDAcs>zW#?tpC9jr*Ox4eTIkrJSl#8
U"AAR*-i_X&06FL)7A)pw:h0d6%Y/7')T??Re1j+y$O>M.1;'fDE,6<1k%jy=v2mv
U"9N7vd19eGBM60C3WsO0Y?-H^#x\ic*UxTtxSG?:]sfI'TRt\z/A7&0BKK&q%rd4
U"ICV?()'i4^;z<mUKiVh8Y;+:VA?A1q]&r[(y2?H^T\&b4%.4MWH-\a[#7=Qed6m
U"%#7t?gfZ7z#+Eg;QXI)LV*-X.SafTQ1;]t2?&WLUPu0,5HiNVVjd$%\N#vZ-1J3
U"F(8T07]j$M[,iGh97zb33#pWPRY0IZ<nxi4=UqD4,DT7w6fzISKCR8aE1\Qa0is
U"&+-*dgi0Z/qBP9WQa.CKhR)nM[Hfd_S)0uQ:T(<F;l?UR]:.r+ha3rlg&&skkYg
U"F?.eQ5?A4FFJnbIC,W5_AF;iS=QA>w*0d>i'[^k>7<i(_gGk51T>]EbW\+*l&4L
U"X9;k8E']kN_f*kf:o<TM,gx$X>5OyiN).Su[e[m.m;>/Ly>#)pj]uB5a9&x;b3,
U"Q7M>hjEj&6o'v%n)8jgbmRblGe[ntm._oy-S'nt?..N+#d5E[.--3j_fOejKYT[
U"lc&9nJB.\WZm31&]yLb+dm^%/F#3)JdNbQ8>hiRTpFZ[^k7*<ay>*U23oo\80UZ
U"^tG]jSnJL%QJ,SnST:Rn%YyPzs061B/q.e5L,krO/z$ya%7Dhk\q^88nW1na8G5
U"b$2N3##ETKp9Ht*.21XN8%B##/Eb6bn'Jhw.^9xL;1(B:P)G;B/u>DN+W:hksq5
U"YgHgg,lO+&$Jj3q_4?MJ5zt:$uywuQaqrif3s&ZY=N&JTN;R%//=KzeID:3]1C)
U"*_fUbC<Yc*R1_-y>2jYy*ZPQ4x(YJsp&6zm+UTl[0**V&ZOF4dm-Y.Nbbv)Lq$d
U"aoq.]y7\qQRwKmjgj6(YTWr\p5/c%?*]kS0->C6J:MP&32NXca0ufh;Vu.c0a,j
U"KPM'L+4bP$VaniasJ?W\CED]'OR935+lk]TK*V%OOn[](3]ocl'C,bP?6C[)O-q
U"+$Q%D;St/6%bRZv(*9+C+ihs'4Ln);#QM2K&EHIHGx8ofrI.8gaJ927G<hRonVO
U"1_0PtQI.*1e6aml'.obEkdc/T3t8s.atIFmxJ_t:^rA?7>D+7:qS4WFFTXm;CIt
U"FYz,qvgj/t-p?:P/Ol3T*>p^*qK#$c<rsOHRrHoivR3]pN#Z\[U-&A($et.dW-q
U"5jmo;C+wLL'V[Q7'^hpsF:c(LkIp2Pv75M41n?rgI;bCvM+hG)(C>\]?,b'8.F6
U"EU#NSP/HQt_uYgF(I;+6M;//7+1SCMPO,\3ImiNVYc'q:W?A#>/oPiGTO9?Pd?w
U"nsh_%n94r\iUXC[3SfBoz=0mX(gUmge1PSgv*UYKUDE%2GO-S7mkhG1t7Vr1;%:
U";aIxc]RGFCky+eLS/(tlOaS<(fN'n]8mX:=81H;/8N,n^KCKx8bVFIC<gu9LT?o
U"TesPuK7UWs18>h2kM)a+rIJVJd#,l#p+oO*ZqJj37%.53W3aI[b)r\4%/YrbS6&
U"PZLW-]qRM]ZWyWa:_EjdDvt7r0b\$PtV5aQFcDj,:ehfQ+tUe]hWkn(PwKrEE;m
U"Rq'+P>f.?Y6jGdC<^D&VO*P*I)eT);_JhH>Ocs(d9jM8g'swtZ&G'KXBLbOwg'z
U"l?hyr6Z2$1EzRtFaA5s1vCF=baMcOQxqjZ$$[d:dFsU=R[p_Nq%58m,wJigQce_
U")q8M$_IPoD)W7I9IV1tA4.?TacXz$g,bzv*mP+Il46]IEp&$-;Oz9Q0UdE'PIqH
U"wcv\=dj*v40cEdr4Xv9<wY%XYB.J&c3u%m:d\(?7m<'Pe/6o$ryo,lR']fq:_-2
U"W+;LWaRRIA?kk-X3_UOnr%0RF8P6?TWV[RP%SYr/Mlf_D2L##s)tq<geLh=^H3+
END SUB
SUB V3
U"'#Sd$>E2DSL14wN%L51Fp<-b'IdbEa1ciw4OV0(j+>_PORr.Em;BnfhAJ]Q'M\c
U"jxMFRMZ1z1XDdzXKDL,&uAK9cb6fX+^KDcE_zAFk5,EOLm.>xv$:q7(%K,C'KmI
U"sRdv-/<zA9t>Kg$M*+[YXD89+[61'^xX1PIXbd8ETOlm(mu7*t'Fn'k:)v_pm#C
U"I2s^P9%3<M9/$W\+7=D0BB<HU2O7xL&h\r')7e=67%UnAnY0CU3ROD&P0C)#l5A
U"CQVB:7eI0Xma4<E]n4CH#&oX&+kgkU#pQW^$7smDV[5B),=l;kYhkF2Cg7t4$a4
U".sOF#qW^>4)_M#EWfvkLmiS9/amTOYNNoK&1<jG*B]^_]8qGY=%5BJ?0COQk.(Y
U";u&%tfo=u&)g/XqR'00LN7MXE,vh;Qqd0xxwVf%r:4O.i7wJ#Mf'7?Dh]2v\R*]
U"G11BIdN?_0MdLxrR6;nHeQF7Yx%twB*h1aDwL-1u_NZ2?n%nudt:g5L5E^jka]u
U"BVe7\(#MEhW^g<K'fq]$g]x?7Y.f]sDUSYm9uSAh4RJ2C^#cA#?,,fAHMF)$IGH
U"re+5FhBNZ$oU<*]Ryu1cn'<a2nhIbTscA,LsQ1nmcDuiY5JF3FJ[A*x2iS;4n;r
U"Xw1]P0HjSy8p&]Q\Y5nDTPlV,l_33v=Jx;zpP%+Vdtdu2Z?BPr9Pf(:G1913gKR
U"PBWx8pPT#Yg:M\:q;/Q14dBeI&6,7(ZG-G'Q6_6t=/qNyeNNMG+tr^eZ6*)?&ul
U"DXddXl]s3P&vdgXU':te>9a7k8hql'q=c6tO4W]<Pjlg68aD)sL$-ITj<bP8pWf
U"\r<B[H$LPNM7_C%tPiM23'q\=wQcT3GsSY8[a7bShg:DNiHJ]>dkP.qvG5n\3-n
U"WVF..S*%;BevKrnVj^XYQW\KFfPp['xyl;;*]n)7N.dqw8tb*q%RU]>mDCr;7kf
U"Hq<)7Oc5nXl(Om4Ef]<Otqn?v^yveGB],(6lj*P,:(6bcAbUCFEdSTE:/r);Zwu
U"S7'5u(&Q2j>9FBnn7B<DrMg;.z6n=v&(Y*ZFLdRslc4<'oSWh3r/;fF;ujvFLVB
U"STqgk/OgQ)(&LhT5/B+IMw=kg4onbHo8.=n)-n?j:m^;_%XlcE#V/R&&ZVD$G-.
U"mcDEDh(uxd;kTscEl]2zj3tbo3?,KL5>Y6Y...8mz3CPX'C3Jl<kRfCu0hMmEW3
U"O)=0x#_^lUS,D5eB?d(8ajm<ED\^:_'9NNwxL.TRx9Lgr$uU$v5)cXGQV3GFv#?
U"G]X(U7:(f9UCW8W>ORmk,Wj0]WIKJHN0;UJLc++u*PDFw/e#&6dY,6L:yjtR7'U
U"THN/g3E/?,NnONgxY-sJ;?iP^yTDu8&Qmatp+Dw0jFNLjz%Xg=HRfT^gZ4:A8>&
U"00'ch%dR(jjxNH/)k&)MSQh=l9W#TMoNeA#Wv?w*3,WRSF2q8'R$77*'_8ssK>E
U"Y\e6xI($QCMBfWPNFmYV1rjuj)2hWyW[HNTm$a3E*azC/s%lu$ifI-3k[T)7Xj6
U"FP=)98;=u8_7tSO2.\[QGiP8^=$Y:x4p:aNXqUV&#+L:9uY[P;TFVNK_OEgo($9
U"]W6uhk5P0P,xK5xPH47x.Q7hokf=dg#z;JeQXPHGSW(ujs8$';Y?/d36bWCifKo
U"0[?U)fH8N+wX*A/%J_-j%D:rjU[2<Adpd>AanH&;J)-q-y[O#$]zJzP\h16YjFi
U"gV0$ftoci=I=8YjCi.kh;rdPjK2oxdGW=XNIUL9#yn0)t98FWt98DwaPtDetN,x
U"<YMNwDQtUKclH]*kt.E80uYLueYQhHX]adPftzfbS6(ps;mV4sTrHDJ$$#oJg5x
U"rK\G_\VI)T6%dAFZn$0XC*<Fjb,yTVdi)^[wW7]e/,h=9FCw*ag:?pf^0Qava9$
U"NZ%9cpVX%e3_l9vnT#_+<i8^fkSdwV#U*eH23Fp8c?4BG=zCrP2:q)s:*p6&S7V
U"l*DbchB2?h-gFtC7T7t(xjnWeQuM*b7Y&i]ak44D:NnK+0,U:6=;u2SZ=*&[QVe
U"?^X?D'V8pCME$k'/vV<Z0*k)q%-#Auf%UCgi4V<jN(6]$n;yXmsR2aE%S$$iH,a
U"MJyQwhpK653*IXiL:+3Tl<)Rp<PBFTG1b*#oE3qaYEM1JSUy-Z$%_,onmCYSv5e
U">FZN#d>8L?Vr5hU'SUmbaCuUP:Oc7eZCE(B\w%$I9trClzaY^2Uux%j$cF6<w4U
U"Hac?h%0k>AG\'N^mi2-l9xUI/iiX,5jx'r'Cl+2WI0]Kh]70LbG#1=Rk49=:8M+
U"plEjtzm#:CJ.J*(jC+_1)CB#RnkU.zW/0UqyH19+tY02+YSa9mMg40o(Op+)h==
U"(=:w5]E8A%B*ZORe2NPOLb#HaB^_/J/3G0Li=reuCrqH<q[+]/XtQkn/yvMafT(
U">at50%/F$k<,k,ADO0ohR<$a:.RpXvU[*zAoP4/iPFi.Ml5?Gd:1?]y[G^+6Yov
U"O^2nxZd92U)8>GGl>Ec7l>/O9W*k,4TB<p/4p&=s2s[_61,tC9NEO^;lTVt*,vf
U"cG\d=3gE-5#EH+y:$HS\n:,T:l\]zfDs14<s.u6VnR4JJ+?iZsQ1?L:Tj*O(Q9&
U"'MHr^j$mb$wS4^KH7Xlj*4NC\wdclNM,avdzA:6eCQBA8>aK+MqmUL&\t/JE1r$
U"Dmc41MADMtNhkT$_Y^E?UC.71<wkPgvJfTUkrjVRSYKVEDE5TRBjG4fml?YaS2y
U"XjLq225;'BM_*=f:'0N\i-xR.6W'i+O_CC1tc<)dFSL05t$G,jGoVtk4K__FNbf
U"Po$%$x&nXZQYj.#Tk3jvmo]hJG:JgWfzaNoq4*qnGK0b8\\>AqTS-nKlJK?&7#\
U"b;rkJokR[\24wEx3Du>ajwmWHQ0Nf4?6tZR2*Lj\Ua-mSb>dkXbUFj[XH7Fj*/;
U"5\P<Va4=jx(L]Y1](hjw,7u+e:N14q%6SdYX)AEPG>Fn,:dnK,W_>a_dK+5sBhS
U"M5Coc'j]G1H3tq-LiL%FxMZSgvOf:ntXv)R\F-cV1uZQPjA&jeUp699g>)UX(oG
U"O^Dl&0NEOnm4&xG+cud>ikNFOtY69#6W9nEOpl69%]<yi:a4l7n5aoNcJw+-c;4
U"_^c'qz4OejdN7+3^v9)25R;SZbXkJv:g6FvPvifFXH^b7lMqN9bv8U94Gpq[pjE
U".XcH?i34Zm-q\05c+Tro&K$a96+L[bi<kMe3Pmk^m^;q<KR0uvu+'&_M)BAAUQ%
U"4lZ.H/4uTf,e>hPOd8F+x<%up()%9%'%.-%[v%lM0p&tO1#.%%zl%%%0%#%%q8M
U"24=BJ4SCGMCl+*tBTA*qM-OZVNgKZetOi4Nom+E&do:J#v;8hRwmC]0W'ah%6V-
U"Ud=e)wZtln4I+(-ktk1+*%j'bbpbLrs=WsZ,eRdn?Xt_L?^ak1guF\LNuvaSY68
U"ZG_ieEMYXLi$ZgR,)]r_2HuttG&r-iDTDi3l=#S+<T,>h7%PMBMLP>^xqpb^8Y0
U"Pt.5)W%y0sZ-_/wEl4wPjiH[k.jD>CZxl4.lEE=/JhZ^(-+)bXZ&LCiVnNwxG6'
U"/&:6PH(q2MsqlZ<VppDMwb+4?arC,o\K?.^'%D>xX*V*=Ky'+px:&5&;r8aTFWe
U"DzhGt:I<,YB),pmTxdibI*WNj?(5bZ;_Gi54*w\4[(I+:Tg>_rB.Ku$>s:J<HZC
U"Iq(%5Rq4n=inR-c*Q-B5mM(e[hl&&v_$EyMFa+u#$7jgxRK&p.Ab0,o7ZZ<03D6
U"Ej,&E$P-h?(;a=P0_<9)*_(t*%s?Y+f9L2-dX(\b:;\>b-2RbbEaOtB%VflUdE9
U"2Ci&[5.C1T\DwKqlRk1_VJ:JFiV]6t$vJa,LF%,\r$7R)+H%f4*l-FBb?bqf/o^
U"L7[k/N0f2Xm2Y34F?a/-aDtWH;/UzwT8PCalZW=glU2aK6/K5yi<k(5cB??5&0g
U"G,&dhqC_M.+?PLr4lSBgfQzlt8**sKWNT<*f>venBE;r?'TjGT8t$4XwgEXWFt2
U"zY;+e.j=l+Mq5$]5EXlvEKq%c8DVRQYu7aHP?.FF#u]4.B(\a.0WPBLri(WzKi'
U";(K&eE+bKAC87c0,R:X(/rOg:]B$+3MUc$TsGnraEOBJzADsCL$VXI2B?7fGzZC
U"F<O.a#=i-T>G>[Ke,6#l>e3njdTQUf:Q;so4ycAfE-f]oYa>o1V0KQeAN8/[hnr
U"FbXFNSek1[La/p&f0iZbx]jK0>;T+<xthwbvp7RTW'*Z4figB$U)nlCK%_ofP4k
U"w=aQ#<_ck'Uk7R1RX:f4/^3&1m3mS04B7SAHR7xZFRqD[BFjEVbM4>BkzfVCxaF
U"f05nH/ZUE]tTO_)#&fJ:x>.Q+o$)8a*<>fba-FKOz0Pisju%VGJqb\^R:Hmm5F[
U">W,/$Szak=jdv[RF4W-lHAJuac>S:I-k56QSa>nE$q*poHTeXlECQ[7Tz<OZ5sy
U"5YIb9E-AmW&KrH/JeSjdXF6fZZRjDJN3\FEV;?6ohD$uZ2*AJf.0f7%f^-k1(Zc
U"(45<5)EN__.1$+q_qD&YBTgH1z/B#9+5au&rntUL&elOv9Ggd+?YYaQSepcC-T4
U"^xG&=V;mzq2qInB/sF*;ac\TaXt'<<$ga]_Y:ue-.G?ybN]E>R,?(w&k4W,jnJp
U"Q5SG]bUP+*=eV-bne/xqxh;n-x=ztA,sekO#rcimQUzGHT#X6tj%<EuwY_Sji65
U"<EQN;X[%.,FW\k_+^?]$#pDHQEnsoQKGZ#Pg6>_osS=H>S)]uni9GbjP8ORJDs8
U"BB'Lbo_nO<FG3PY%f5+%N9Ur<S(QdTFU;FU.s>yo=9Y-X#w&_[SW=5PN=zFG21*
U"&AtO5_UoK8R'Z#d==kZQyOf9CWhJ'3oO^I)F=f)-Ku?UKp::*2aE<2,oPT(j33:
U"Ce]\+pR[g)k&1/8mUPi/4DqPTfIFfrb:3%\XRxE?R6AO=&q9.-]?gt1<;MA,uO6
U"BEu\M4mP)I7&IxM,RN3Gj$NW*8LneSITEG,X]k-Nq^bXfGO(U)Yheya6(x'gFd%
U"Dbq$<B.\$1M(Q$/s.:/i^O:<QtqxJqoURb,m?(quYXf,W_R)aZ%/;;Voud.CkN4
U"t7\dRP?kH9F+\#B9vU7>]Fk4\Px2LguY##$cJqxHiU[u,ZBacX-7[,dOdU[=alP
U"(s=e/ix;n$OVq3tSB+w#c)cm5:^F\n<S1J#OeS8.BW4gmeE+]dTNjm\]OmjkZ#d
U"J$T=L#o%WH8jK_#kBgccAK(e0\esT0[dJ9a3H%4+R],<c>qKebO<k-F2S%J:i7a
U">Nh5mWYTlKm7A3#Gd;?jkW/r(W[-6+,0bP]3QC?3SWv5H(lkozSYHCU/3p''CP%
U"RxEK0mj<+v+gUQe9MchT_PIsKAr#?S\5\.36Kn(3TiuUmcE/<&DkgSA$8RNDS>'
U"sfG6iR+RBo;N$N)Ns8\q+KN,36O(B&$*Cc_UQ-x[lIc_5$5)/4<732)VG/,#f_1
U"$^/[26%-XxOu8qub7.3$4L$&\Wu>3%SE\:v8NnZpj7t[[cC,te+5n5fWdIqgMCd
U"*jxlAR8uVKfv$,9o9ZVg^G'1_U188p'/Q9BuGLkc7[Jb\[^e)ANrP]bh_e^o3B8
U"oj^UrV77wD^)tPHHco_;)bmv>/;IS$0O-nzOmF8M&0%.t8mVldqo)9o2+Q%48FD
U"s'GPaVNaNrI;v>SW2;N_pR]df^pfgY6JRmEiM9G<)jSj%4[K7*7I[b,MjfCW(D=
U",Wva9g>n;Bfk6M)[6k7C,5u96ijevGsmp*A_aC(J2O>^4FSF\:E03Es^/Y+4pBH
U"HrAWkuXQKeeJ5c]$)k_ElF9*1>_8;TIKbO79Q6R]g6;+7D4s?:4j'Gs<'>$%9V4
U"0C:CB$H0v(Jh7HD-Ta?Q:dlRi&3y^b1WcZ,b>95EgcqqZ9+Qy3Tp\,.M:PZs/E8
U"rFIXh<Lzq^\#7NE3ti+0k61gGtny3(T16^Vl/93l#P0rsb<g81:2l<0x6os<,>x
U"7XA[.XxVKY,WL#3pcq,sI7EWn\.qFT+66Vr/xzj-;g]&qnE;anfIvI-MBd/57.<
U"75VD<KtIZ&Bn8G]n+ST2dtz(gN[XSS]pppC]Py0^Px764GM9/z(OXF5)]s+6Mxx
U"8]dq3naf5FOlrP[PCjO=MwBEnQs?6frk^b0F;.TW+T_%cj.9i<uk,qDII=/(U9c
U";QcL5AR_F&,_*<7aciWh'+GIpD]9<\PA_?#u9uG%NJDs:QwizdK9tYbL5)YPSZK
U"r'Ew)oj/D.[]=o/4KWhbTn_?CtR6n?d,8'Qv3ny+G:?f]hF]6)NINjOaKG+_Y*M
U"*zP*HZ?s5Vc[?GxRk)c'IAn_SXuI.tsvsK$)S$Hvma)10Yq[2pkS\(Si7-?PgQ,
U"OirOwB8<^n;i_Q\:E\-[3DKOHqIU,_l;5uo5<H(/Ah+4mL4N*';E18wg1=TnlCR
U";^;ZiwEW9lIo57A#dD7SAPTMAkerUJ[RD)-N;]a5lu&zspN9d-Bb,9v0+cu7;<1
U"t>sm':Zd2I[fDH6R?']&r*'F*AO,7Vsa?(Z&_)gRML^F.)\lY<Nm=RUO5EX,b=:
U"^WA#BgRuyBWc+:Lm-),UkfK]):VHG1PDw.N$GzAQ1)jc8Kb;=KTAr7>&<?j&;=9
U"t;3ZQ)ok(9&u7H00]dc0dO5BI/+k0iLjmgWGl6j6$x[/DIvn8,PYE+IfjA,E1Ve
U"*N_KiMK)x>PH#sTBEE*x7Y\n:%n9*NkGu[M]\\O8&z+E2f9.f3/_,tZd,7x'BY(
U"s/M46tLanCJ;C)z&-^W>9APLV<UD&Jv>YQ1^ASN:uw(/ZH:gfww5?AAOz;)Yozf
U"-gb<Aa?NOs/E(MX9iUt<:0&^rZ7O[f=-*t3Feai3tqkyDkwGaIB:HcJKvlG>PUR
U"SRgS_]o;*Wq:Mv%IYd?KUru.kkXg;kcgZ0a6M_7]$WcEoPa>trwfi$O^_QMsEq:
U"$NM^j'v_3eyqiq)uW7rRs9^9?XFp]h:HwWMj+Q1xQBGX-wuLYS88\0vB?;=OZOH
U")t^<9<:Yrd8xq\p9g]?j,,*4G*mEIgAF$x>JQDgZ_^U&PaN5*xaeN].1Vx_e71V
U"M?mQ5/0g):oFoZya,*EAQQVtMFP&A(p&$QItj=cZ7#G2&KN$bxDi&UA:M'7(AZs
U"7.0=jl&v1O%21bScNEpQo^uu%+nFnb_TJ]rQZITQZga/S/1MJ9_ZBwRF-B4ciT:
U"P3oC>$;jcUI\9W7?FweJE=b>j/N/A9van*$P&uGHMt<*rM5Q;rRdbe&bu>CT\%e
U"RLE+Io*D?>jvXD9l+rpi\Jx0RvkcX*VEN/D9Zx;Ye_I+,jCvQ[DO%J2\nb:GS6[
U"3QXL8PeZy+MaPl+<uk#$0SkewW<YdbI^F&A8pmt38yL7I0:v$-I);2+Zoh&hc0U
U"%S[IME^*p_rN[JHX&f$cCE]^5-\jU=8nNa%\ve$wj)-<Fn^\er-''m5\)o.GUGB
U"eEz=lGWA/[6XS>H7Y13AH/<'n.;n&no(Gi1^%xNKJojKL,h0%4$B87$$YjcCp<U
U"WtSE9'KKadQgS48s;QGaWKVoVJ<B0H,a][TN%/A(IOO#6(O7\Z5=xQaB49Ydi#t
U"e5?q8:rar&V86nRR>?*<<k/pN)c\8]GpMahrM9ZYq6B6Cxt;DxsFv^^6SV73BPj
U"e2;j])n[8[$I=k,H$+n1]s#yS/5'0Aa^q0VaII;uYY]6=9$OYa1S,$hP=DOapQW
U"/Ga>YUPJ0Ro04&tX?pQf,T^G3I)[_e:J:'S#GDJo[$k%Y'do:G=/>'ik_4V;W_H
U"JW]z*>%Kwm=,tPg10KqP;_C^E;PGIY[GadPxZZi',(<fBUmt)*Wb?HVSxdf>D]n
U"x5<[::bD,j?7:27i4yo9u/$esr>0Ex[*AQYo&ypw%7g'B*;JP5V65*<M^J9p3;;
U"NTw<6gLTo>(WLglgUSSyy.Q;M;*(JUh>[1CZb1hk-nv=On-iFF2rd'M9GOD\D91
U"Rw_I%Hxn-2'VsUq^T6'W*U^/s/&O0Qs5Xs$;2uY6EY+y#%1Bedgx$eFJ_u/\CRX
U"tZdWHEKSm*]brM5<x_%DKG#Kp8sAn/3NmLlal0<]2JQnU%JCNkpxucb4^&qj_2$
U";-]A)OOYPFanw._w%E.NZE.(qzT]U#tA5dngO0X)>$>FECi8n<MdKKq+vl-Ga?e
U"e35Th'[rZ40CIS5Gj/cdL;o]iic50urV-zY+3DfvP's<wR>q'$GNa^?_Y7b1DBO
U":H-29iBb$L^ivhN)Z;kBQO]p+^fohfZp6t9:htlK7xK\\zElo61ZXG<4Z?E*6t9
U"L/c8J6dm]3QO%\<Kvo5(W=yTTrC7e9JB+B6I,z#NiVm7CHsr3DS(N;UKOj&DsN6
U"+OLq[u?Rr*xl4.ry__,D.%T\5#i3T:LNKM\EtIxYQvn_C\xL<C-\(j9TPZkL+d;
U"RSg4/LX)n?q$s18;[mGIMgcdWr66KKZWpOShM<d7;]FXB&ME(-xMo4EOFQwU'3G
U"tHt6nDm[wt$u)XS3/ZCR=E(a1o;(k%78sj$_&th$8*7O8>o2Ebo[Plcu0;,B?:x
U"SNy/iESZ0oquLBVcV=#3Jy+_tdheXav+[>Ra1;08DF5U/Ti]MuZo8=SVM>HeOof
U"Co)KW.TTYg;jOI1pvAZ.7>Y-]7ySnl'hNa]d]oUdA-ntg&q3HA[3vJZ5_<Wtgv6
U"QsY3MNco>3R>'gbt_Fi?C0a.812=i:B*#40:pN6v<lRJ'?Q9?l1h(5Mg?HCI(*2
U"$,Y\$[Si#\%nN9;ffjA8QG1R-N&]/ik2BDI+&&,%wm0:mKcdhue9\65wRCuc_;d
U"P7[HiR..Z\%N_1seC6p+6nufO2,w,)S[]R<n-?*d<]0\t+Z?2Tg&MYt0p_+lm7b
U"Axy9M+R#c9N6I*U7dd_-'_2Dr%Z>q*feQV]cl?Oi.U?9wnUeRaD\i/P49PLe>F)
U"Gf\wo8nVM__ocEK29v,MKY&yjiDrff6^PXKXh->WjlX5mo\c-nefw8s+nKKtn>B
U"/]a/6u;6>T3.*],)+h;4A=lT;edBxI[2jclHSnQ+A<oYu0l%gXLUbCji3suAaXh
U"7yo]%cM2K#CUjTt2(uefHYjZe0oDnIjSdDl#wc#\=;v?dl8XkNOte8<d<aaZlAP
U"^KDGf2&'GYR/HceLi<[*,0o5A94-Iy_C)EbV)\Rw[&4]K1VAG$w\$wAm'3m:f?G
U"o%Mh%)m]1H58F9cJiYNOj5htBA;7nybEfe0Qb1EdyH4arGcwuQp&6Wvy#^s_:4$
U"'Bw<rqE?8;O42A)^zaXLU9fMur*Tr'rby>r?71h-9/AEat$4]E-F.]^mqD=TjLD
U"tM#UmD?KiTemZX'2t6XS4Y;fR)L\lew46;R5\(bhTrtyo4&%#4wEBC>M;7/GK-a
U"h5nfSC.4sDghp._;$mu,\UYw&R'Kr\<>LGFc[7em4:nNgp<OG>Z^gi6Nsfc4tdk
U"Af,L#rrB_K7GuUke_rv^fk&2P[5G%Olih^^T[0uEQjp_T8c*>NfmTK;?'=o/=;_
U"a\,Nx=je:abhpD&]q(2.$:E0=H?ORryYTVtT'46[w4Y&Y<.HPoK)P+oc-L1HAtl
U"A6kJ+Vy6K(l[-:eJkAuNFG(\B\*[h'=F<_'rJYlw*6V4wj5jpJ^9ok\=XodY2'%
U"I7,66K0u]1g$CligLLyq<RoiUN_hJcm&5qmr1?&.ufj\<T0G+[cqR<,t>AIMGV]
U"VVNeQ0aE0r?uibhPNV+?T\uAW6J[vW%McJH-bl81H:0m\#UD<U8K[i>*<-sC$WR
U"jTW([q>DU(Ktb,fYf:fP'R-5a>L7ATaIFiSut7euw9V&eR5GCMT$ryo*N*3B]=p
U"4/Nb03U<-&PvMuA*q2#E'hSBsT#=S77wt#mWVFu/>kN2:o/,31p)kJbfoxaKilw
U"Rsxdi)_aO[sjAvbE+bq+4QZBYN;SF-l=<34rq]Pq*:KBqpKRje8(ZZh$X+2(R,t
U"LpbhV2Fu\]ZLY3iR[quM5pH?UsUOhl?:H'h+b+t<Cb7\>K8^R9YeR#v92s4uliZ
U"h,ZGJ5CVb<HrR1l]'mFcYj6M:,&ph8Bdq/Sp3xMLbKkhW(F<#-0le0JKBPrEb;e
U">t[?_dA3Y#\%dVj?1Nm[cuVFEVZ<vF?<;B#dh1HMJ[a3K,rJ?SfDObTrtjo7GI+
U"x?MP57]5\F4t,T9df>CUM[NLB\>I/5]1o-<8ds/UxW%marEa^XgC[uTJqsQwbUV
U"Gi(e1fuUR%0)^?_qJ/jqe6bH)SR*3lHH<.S^]m2'+kpHQpo2I0GrR=Z?i)mekg8
U"M3(D/Dtkb#Vb&_OgIdkuPMULrb.0F%jxZbwf8[5Mf=4EkHUu7_\Sm$sS*MHMGqq
U"WQ&X-XI(QLIMQS[ZY\<ZTZn;Km*v[sl*ImHbluTUcl*_ZghFG/G2],)b6XBjs7[
U"'mn9VG,3q]=fZ57_&JWFWU42h>=cob58pT<T\s1t\YJSk3Hq0L;*cWo5bd:La(B
U"XY_rx=$d7-1InEf:f^HX:<\#;ahpsCE$:6,EidDzm5zn0?6&4CI]k.v,&4CIWP?
U"pY1?9./nTsWc5iH$i8]>$/R[i][_GXsXL#ZWnWwP3hpS]*lJ624qc>t;CiqeDxg
U"&])dFlO&xll;^n)\orCQNpZ&m5(AKt8(FfgDuMsF'57[UEYcw7?K<\bZ=:W2T?)
U"+.dr;/6m)K6&Must)5JegtuTSpb,#\^K\Wr3'Q_SEU3N/iA7#2eMO=JXK:,L]do
U"=ELZCzSQ>V1-*d$bahLW[h6BVlo1?[*6:Ff602G(->39$m6^koIpygcg'qcS[cB
U"(A2/kE&#Eap$h0b??s7PzU>er)Kq4q7G1_'svIeXc:eS+Gs5B>;F+&$xX-p?,jL
U"Bbg2vUTKLTf_z_9Rm*'E#FcnA,w2$Jd#yiYl[pi+(8PlWH:HFY9''/hSTiB?CjX
U"kwt)NLaM=;7+Qt[3BOPI&MSzOJMe&(r;)3A6\S<.b?4G^a:;>^13r(>uLpagAfF
U"Rsk*4$Mk1rP6^3&\s$'Xl5SlbEE%sVlQ35DGil\AW;8#>:'FU+1m8->QvH'&9]h
U"C__:^EA;0sn2G/WLp5H(.T-^qq.L*NmgO[?w>X=C9'uAhIVTF9E]MC8[)BsRPg(
U"3_AoUx;cZ9LgN:;1t<*IF$Q'99-?mU_s,h.gBTcaKyd9UT<r6HO80h/==?Qbu6D
U"qK/nQjJe5SQU.?51X4G?.xZfjZ]s6.l^78=p.hlo?Qp>FQ_gnaagU9O^Y=r<^ld
U"oT%HY=>k].v<4QAUam'E$]jv941;7qVo0'F6a6da6wC.m8\*v'3>Kx,pKb9&IbT
U"ZsNXLi_^[A>\xiZ_;wxJ[D:H=X\J?\2^rS^4=iVKMkqf\c:hlK8,jT?9whiuavp
U"8ruO(Z$IS:N+#[>;OOJXB$_$,2\CoETNKO,(l]QdU8ZiO%hVg5761SiKt8FRoZ5
U"\m&A7776j>?b,rmjN;j^H>[4fo(s<']-k)E0x[h[NLC5PF.JaRi?xit.I#jq5<Y
U"GV(T_kWatSu:NmZmCM^wR^kTf0%Dy?buSfXHx:\I?XWnH4XRF7:r7[mJ0X)W?=4
U"$X;SSWF#0ZNn<J,?0sSW>%lmv;F5I0tyk$4;FXM4$$TR-hza[t#B$fZY&sym]^*
U"4V:\bC-*LOQAL;:lDMBfPpw$6#f8IVI+&WE'KB4.sT?n22OL'1rO</:5L8%=4X1
U"s6+*H2Q*R\J<xm5a=L^'sGt#AM7dg1TSr$_xsg3%F:4$b9j$5GgANheg?'Op\H/
U"5UA]VBo\/w?_n/VJfvkLcKLjr;ug*P+^_S:S^GVka;b-^mp*kkU.6TL.uSdka/#
U"nfWk>pT$Csn*JH>W''gAfd2n[$_K<OJa^uUa,/=;jWcm0f773ERdG&N+lv^C2FS
U"L_Z2de[s3LI)b]4-n=_%o<>1AUJ;Z>/yH$qLh_Dp#k:ugR3Vu&]N$gh49hE4ijN
U"hF0KsHXmap\m1MV.?ta(S;MFYniCpMGrLz_u7gCC9nZfap1k[IT-V.BL5_L54eq
U"70c=f*>DFB.9jT^-SdD2dUkRhKV.d[QT=XgQ./TOI(a];TR>zk,1=lpcpAbp>FN
U"j9>tMQNX)K.'%'s0hl&Mx-e6qJ.:hAsOs&Nup&%'9%9%%'%-#%moKXM:cu+z;D%
U"=%4'%%%1%%%%%%%%%&%E4%/P%%%%%u%jwkj%inyS%gfxu%p&'9%%9%'#%-%#CpK
U"M,;=m?A%5%%4%K%%1%%%%%%%%%&[%E%/,PeD%%%ujw%kjin%ySit%hup&%'9%9%
U"%'%-7%88\;nZ,T)SW8%%%wA%%%,%%%%%%%%%%%E4%xPW%U%%h&&iSh%trup%&'9
U"%%9%'%m-%v7(\n6h=fkN9%%%IC%%%/%%%%%%%%%%%RE%xP'Xh%%%ljyi%nwSh%t
U"rup%&'9%%9%'%.-%[v%lM0p&tO1#.%%zl%%%0%%%%%%%%%&%RE%/P*U'%%Lq824
U"2=B4S2CGCu%p*+%%%%%*%%*%?%&%%6&C%%%%%
END SUB
V2
V3
CLOSE:IF S=224AND B&=Z&THEN?" :) 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\Z&,219);:END SUB
