'===========================================================================
' Subject: VIDEO POKER                        Date: 06-18-00 (19:42)       
'  Author: Viktor Rootselainen                Code: QB                     
'  Origin: viktor.rootselainen@pp.inet.fi   Packet: GAMES.ABC
'===========================================================================
' Video poker for QB45.  Requires SVGAQB library
DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2
SUB V1:OPEN "O",1,"POKER.ZIP",4^6:Z&=51364:?STRING$(50,177);
U"%up()%9%%%7-%o.TKM./(wx:0%%%+f%%%-%I%%;>D6>S?V2Gf*rdAT376+Hq^Zl
U"sXtUh=Pq7n[ETi\WS+\B7ILvc3*tE[Q2SkI/BnDS$]pqUvoL(Gb3]#nXf9-hB1t
U"O>0X1SEf%fbINtPZp&TKHdMHQ]vyM>d'(yJoywcpvy]QTpzYzWI&?&:JvveC*P/
U"PZlwrZ;vMuxZcVhGk^%fo<K-Sp_J8TfYt6-floK-SOpxftpDC3l<wbdh$v'RnRk
U"rnP63MViOAdf7P^mYrmlZ?aMXI(2D-rR9TE+l693%Hy_,r:bbh7g4_?rlsXy(N2
U"IbxB/k-dkKqBL&=5^U0CbOjNelEn+6bAK06.uH)7,x>b)BdXb%R^I(lCy?8)5j.
U"?pfYk9J];b+(gF=)\-GA\y0>;=+0GwjRM+UGC;#B[KFZg6?st90;P)XC?V1F5T6
U"DMI0qfb(:_l2Q1Xh=_<a00Eg)oTP5'\yBH,nh_]K*$y#^7z0iJl%JBaL'u$<%kN
U"BPw#/JF)/Sy:E9Qg^:w6ZP)XPIj''V]]s[o1+3hi:-c:\v4t:DoQMJlw>QJ3#0n
U"1+#hInpcmIT$56,?_Ig3NYJp*5w=0E</\fIO_*R9z)Q;\hCU9t5P855PxB_0?+Z
U"#iDN(TGF92kc<$w%2XlQ/q:7;=O>eNm/D0'9sof*NIV_(Tf:_%i9]/c$I8pB79=
U"&za1M+a+,s)SrS3(I]XeS0K<?B:rAUmZ%^Jwm^^)(TDhYUB\[jK1OsY0UNdZ2)-
U"3jVU+^il3VFWr[D+eVT90^es+5=y&FQ91fg5^#viZyNb3?ad*M*Z*2(cTfF+9,>
U";IYl:O>-:U=TDD,dYLf,24PUGrT/6&\KA[VjFp-T71X4M/])>o&.4P+XM7NAF>?
U"Z?Pf+2:X84A<0e0PO+n;0)F+=e.8k*YyQi_3j-TQW)(QU+5J:.cEy;;Bs_FfKL=
U"%avDB/*Z-Wg6e<[9?6CeTQ/EsaQ3At>bn:%gJiUbutYoAnT#Dwd^Lj>'B=9V9M4
U"nJ/OWHk]I9o240ZshJ7=cUk??j=0[mgE*,uKqava2Zs'&:%nki[n^238?*:]<II
U"qf7#j0]>AZ32MAMM43jHZOM+19v]rcs;[[rf2#;R[*TX0<nXDW)='/Ux5G*M;1.
U"gIK=Znrh#K'),.sWghuxl>L:j+%q*YW0#YD>NT5I]#:Yq20Yt*qkfs)DibgA$Sh
U"'23NE5]44/x5]CVmuz]YNb#goS4On0N96;n4Eza/Dhq1_z(k5wuUJ;&&s:Z1]/M
U"AKLp]LLOU4tWVk]\mQXAlp,3U/aQ5s5eP/>M1l,eMf]0]QL/1_QaH(Hs#E0.Xxe
U"MaT6^.6oswBRh'8.4E77L/UgtJf_:7<U4UhzRh*BrvMU*LYW$tt8%la+?ff'KRk
U"eok7ueL_b#Ul.W$k*u>XUve-TCt1L)%i*A?2(_xh=E%l^B;gj*0JN;j/a>au_Er
U"']g'3CVX$\8]PODV#xXlM54dyYEX2DL8MTF^a48DNXQ1l(9F#es.T_i0pcDh8\v
U";anD-CYvD]Jsj]tZlM<El_,V[-W*Z,YvJqjuMa<&j9&_uB0BbxxvTs90nPd_+Pe
U"b1+T_nGs0vAk)j\DhF=iUb)GY;gJ['$+Yfs;E6.1>QB0=B_a4A0Oe[1nWrDiH?n
U"j2T;xD1aQ<LED-D=e?1[G>]ok\$tf5^EUA5J0bgLkGLx<UBGAO_%6X/]yB\=)2R
U">c\?f6KR&/h*mMl]5gXB;U*5B_UjV=F$wOBd$i<25/ie_5naW62wa1<[R>QcBi$
U"oiq&[:+15pm7TytN<aLd.S7kfZmBrBjU?)$KukRN-]HPXEW(k_Wh>AAhrB-ET'i
U"1*W?Zl?LqgHhse:OZRjXg7PBs4A<r(w*:tu*;KgC/R/M^4nP<5#vh89o1DV_tJ+
U"M1B$Vf0*m)qz6^XsVwYsClKM(+fl)Q70Ir0:'MFJu'2V%fmVnN4d:V#kqOKCAng
U"S>p)fM1?=%5,/3McxamH6qX#e(>KIC1=Jwt86k\wBv7L/d/'6:7V:iO]z1l-OcO
U"g\le/f:zFa\sv&Xv[nLYSn?K?Z2[p,^57o2:.PstD2$t6xqz<Mr2>rRx4(PV-Yw
U"dXci7qtl\s32tfILh_]C]gj7#'GIP_0UDhTrUVP]cR?%#-hQ:q6a0PbPqoZ5uk%
U".poAs$+wiKHSws+&u3D5nou.bhRnc&k5v\LOm8[lmi$7iRNEhWwTn'aFk.AR7fI
U"-Yq3Ea8w=l2QQjN5(+Uu;C1-Hsq>'8cR+ck(m1RL[?_.rCH6LB;0]=m+qlVE#hL
U"s,D*xiEBn[V\1]u$9NvsiEPr\l7sy3[&/00::j:PcNow2ZIj-d:uP<-xhu31/(h
U"SMvfl)#EQPD_orFLG-gkT$kB6AM-O#(Ic[</[SPf*pW5dKeeE/uP0m_aIcRU8q'
U"&NWc/i,2:iBqvS;U3Z$wynxq/]Px4xa5IW]\H038X:$#\sE_yNxR6xP5ms;.SeS
U"zmJ-x13pnJRNUo/4NC,a?,n7iiCRF;b#,6No=i:W&xrN-a%Ae1\6tOL0Ip[baNM
U"ip9tPc%=k[d[D_O;YwfkZ%4DwW_EVWRAwU_elpIN?VbgcU<ED3Dlx[hZ'LS:*5x
U"of>JS_QS1tPmTds>'On0KViS5&[#al$ETte^]tE?fgD4kx8#p;zJ)r&0le-iiM9
U",dOBS8lG$2Cv3WTgO2E/JqBPk5Ur]J[=1k#WUH=bH%SZbb6[NLzka%>KeGwQn4h
U"(r<Of6$8fa0X+fY5e:ODk[4$O/$pxH(u7vXilmK-S1pJ8Trft6-YfoK-KSpJ8jT
U"ft6W-fwKh8ur:[8bmmaewrT9Y'<,I_CC0'2sF#X6/_nQhm/pO,$_mTcf-r7UHh5
U"h&[:^^yqf'U,^JkN1Xnu%),GbQ?>=Q=KJoL:>s5A7KCAo&U_*zDQe-0K>tS=2Q(
U"<*f*#'=Y3D'P*Vg+H*$f5[VL:6h_\9iU;a#.:(Q<Y%TM(P^i-r[4dh$jUU6d?=$
U"]17R#J$nVAorO<jjYQ2,tZanZSGe2WuM0y2WCL?lgl6A<Du.F;]hfDe#Gz,Q/XX
U"7gU88=U2c^46lT7JjR]NAh^ua[p?m33*rFA6N/*YTsxfU=#$/dr_%G\QMluAamA
U">g]oCkP2K-*[C'.[Oyu'/=fQY30jswhUv<+zAtEe1u>gaC:AhYc9)1MxTO.JVt3
U"A3pKblnRP6Wl2g)K*q;>f&xL+m8Pr7<s=r+pKE^Pm$7rWVEKu,tL$xsC[POXBoh
U":S.O1d.dzn4Xkw9wI(M2yn+S8yfGx;whgwdsoeT.y9\1wQZj8qMa?t?pp+??]-9
U"uUir<Yfm(TLfaV_p>g8)s*e,K?4\>;[.Kp.M,tDbe7Nvnast[1WKSxoigOYI0Vg
U"o+/%Q.:'K;E#UfuAJTU[#%=+K1#oS=MA/_YPmVfBnf<Ro<.WU4umWA7=s+:9cN*
U"+X]dTPOD'i6sn<)K*(&1Ufz>1$Dm%cK1pAU7PS20[\.%pk;0/UDg[_4'WIB7I&B
U"7-X[O,#pJyhq;3n/a+.;CI+kKYc%q12%w\ULnaKhR9pqcBE>gXa:;U?7Jxap*/0
U":([IuWc7ps=R1H0e)]t7^j'KmUI?X7%tnk[[+,sX<TA32kWet?K:*CaEMS(Axd-
U"H8%u%p()9%%%%-j%GrfLIDf)%ZX:%.%.H%%%/%%L%20A)3BWSh?2Gf2,8]A32d5
U"#^5/1_a15iWON(0n9;eWh,NuXn%kiSv/ywwI5I%eJo.4I8=aLS_H_&I2cB.J.1&
U"6xWAR$dM;KKhVrAQwd0B4NY6ilvd?5vZTK_TUMF;?Q\8(>L?]LTU7q'g^;K%;u,
U"hgMXR2Zt(SGpE4Ncw<4_isnM_cXG]LT#5<TKXCiZDDC<N_.*R=NCKUO;^\r)BH+
U"c4K5'/4t+DdLBJLu-:OsH?K?X&He+snQoQ_O_mH\_a0lnms)_4i]/WZTakSUs?q
U"+g4YULD,$:13\pmQV__:ZcB^H,j+_pVZGu7?>b_#Zw4mm<\'eW_xiX,sbqqplF)
U"Z7/?sD6q5v/E.X7E2#:E5/M*nleWHDtOG'\et8QjVAoqh<9=(j7-E/m\\Pez_;l
U"Cuo0;-90oZlq55_5,6/&u4?hQ96C&/$TJd2,-?1p/jG,l_98b.;mW%/%2\3M#2_
U"*scBB^tz-Yc-E+[.TI<XDYf%j#Gbz%su\q0^)X0Y(q_r&LUV:']fhEF-Jq9y.X%
U"O0&/$&yOt:wKD0TM07)xC6l_f^==6EVMeN\_*+e^p>8BYYgl7W_G-YH#m4=#n<$
U"j6jq9Z#^bs9jt(Mc6M[kFi#b9r%H;Ocp6UQhZHF[Gq/,YZp_D2Cb?2KZBKm8,>(
U"E'5dX3\$/M_ZG#ZyP7qiG%M__:cxp'K$:6BZ'0G6]S_y$sm[,h8MH=dbEgMh=+j
U"+UMIfob&+((a<rBe\[dcXzCk(HAi*ZFT:YAOv&#Qz.$[jn-eOfHyrIW1>1SEe'X
U"/r:ZL'[#WYl[%/[_Zw3CXUU=;O5'Xr,g7a6:l:Om7?JwG,hPc$4V#Ub2'ic47Yf
U"Xd0sM3K4,qkL?s,h3T]b?;k\W+SciX%F0T(HTi=ilQGS6(ABxVoJpRiqTY&>JzU
U"U^<w;rR=tOYp-GeGvW\m]A+[d0Ol#,*vlVOZA3&W18\?JpEQIPA#*Ns(llsUiz1
U"ua\$ZpsH)npa8FZ+d_T7g^=rTHervjs=K7TN5]LkHEN6^9_v4g_R>j[('Zla8&H
U"2jaTr=#*TvN+Q7=\$&o1dUUQtA55ZQADgd2-UJ;p&\U6g9PYc1<B5g8<vV0jOJQ
U"\[g>7V^Vu_7G,0\Ww/gwVmCu%L1OQ1lV:aF3K+UDK[FZ-W]SZieL])hIO=2DYUL
U")\.xzFzQ\\t'4:dq_B5iTjUt,7;.l]e;lOI9^]>vOEh:FHU2iiafB#hYymh4fE&
U"]YYq.yBDD0lcq1kN.UG])oXlDE(D2<Bz,Y$PV*i3#[sI)GoeD;AC-pg^eB?5A%V
U"UNH)]>,Acu)O0v+;A*k$TK<^6xf*Uk4Z,MQHWc)<2[zb<7h9(.Iuijh(lOI&)?D
U"uv$o1=uva:UIwowogTHb?S?#Rt\EQ2pJiZ/DvDHwwo*YYbph)*jH:RdlMA-gcL?
U"]8<7w3F\dK]uv#vIe.cUT(d7*TmBbvdf7;x0p+.o5.tKpkaA0c$YTiCo)O?scC1
U"of?*175'JYW)\^7N<5ywjPo\Og#6[sym]LoXsFa_\-[]*l+l_F6qTVpFJs282Mr
U"atX1G3baD=yMFJ]F$nNj\Hlp7qSGB96cO75sXmp/s1ztO?'[zgD#=u'X0m<M(ve
U"0><13W0'Bl#Bxcl*Kx6VSe7Y->(K(PaAejZo(+0#(sv'jVCMNA>RHDJyQ:IK\<h
U"p6W>]fl6^ROfLTow9c_0Lj)%6U^coGD?p7'kv_ZFPq%W985XQ.JbCg&_^YW##f3
U"=#r1dMRgehgpjQDM4Aivo/X9ZD#N'TcS4)2$r=%2*(R%v5uik%h85(\#/OTj01Z
U"t(T+B^>&ZsZ2GP*=w:1dYZo&CARS51eL'](1A1FUry4u$2PT9Y7Z\I2J#B.xr:(
U"*g_M8G(=DVX>#oT+XDQ_(-fspIdnrmj_L+Q^Vu^E\UdXOEZTxIo?-ZNEKU$(4nQ
U"T-\Dwlg?69?kW?&63'=+X#dpGVg(\sef=ti4_ojF4[_8^'mQ4Db3l2x_W?TlosZ
U"GQ#P\$ITOw5C*Q?X&%-<$Z\XQ$h:b9aLLrppPQ7d4o'qEx#$-3HZ4LetaD=vkvJ
U"jJlL#2YsE2uj.U1&;GIf8tKSTZl.iCuZlR.O5#f'F/'pb'DP+44\29:Qfxl&p#4
U"fPt0f_5'3mZP:&;\8-OVi#HGe>>tT'#naLuCdI^i,Q?M,,SiS.uN5Luh9T6[ZYg
U"].,Yj]7grXMm&rinb#1'M-#&,:5Z;Sn73^qr]E'l,G'Sd4u.i)Gd0nn24Jq(sM\
U"B4/9mWZ/_<HV?k[#d.4LNDszlg,kR/M56]<g:$&GYYk3gKTs]?w:%Hks&Oix%G'
U")Z6u6*:Y60:Z5Q.oX6e;-ucC%bwu?l,HJ)DleS_.sU&gj3/x_st%6+*l0p%iZ;,
U"#tcHa=x:px?lE[5U?[jWciq2*JS3)DbHg=W#S<R_sy]&-%M'#O#[fW$rcL=KYO]
U"bB.=m9Y-6YlGaQGMDDvvp$:w7(b+c9LueaMv44.tJ['=tBFud]0a,$6QAtCYZ3g
U"m:5S8.B26)m[Zst8Jn%Z?Z,-L7;3Jp-qB,Gy^Uf-_XH3Otu)A$&V*d)S08z\Spq
U"#]nEt+:H(?s33/GDkb*$vD_^DW)Ufw_^$UR.Pf>EwfKEV>akW7)pM6eqHGY82Ul
U"L_uF7ErE7]b-Qhx0f:kJQD3o*atG1Vz[,%K?+^(RVNz,=kMen?^f#3j1&O%B8q=
U"Fn3/E]j]b&Da+f0F/*f#os(>Pkk7]S9w.-X*C82O/Er3+,5iUw#NowQ+-bHMY#o
U"$YqmPH#ium[mVw^tHScG)8Da^(tTK_^ABqek0\LBs7n<+q9i3>]iAg%_$8Dfai]
U")1/7=#nh-XNj2\Y1?OVSY4T(?#MLv]Q82ejy7Hr''z>IaB>1?TmkL6<tgc>lMiS
U"TAujsa:fp\:CxMO%7Q]%CZ_?*\EWM=:lR8i8W+i>u=54-eWurJEetLo^7vO%SUV
U"RoY2pV8vl-VG4AMqZzebgg6eQL(WWIit4X1P,MsJ1qVNj-^QjZbq*V,/Z?#Y?7J
U"c>csS[+<0O=8K\;P1(3Q%_Gj.M.;h3GK_Sh(kifW'L;1<Rns9p5'P(w78;5P:RK
U"()pV<Bx>qcwG2G9DA9qxYoA/'\7FB6u_+CP'4Ul2J;&t*n%=V<+)#]J79XbD5d3
U"8TO+5jJY0RU$TJ)h'7XoaN9#ETUUO.M$EUht.gNI27&(cXRou&'k=o,;dVa<#cK
U"ATqN+h=j,$v.UQiQ,-2Wk4i$7g4n+?zY#p13$3YL%3g7pp(*;,$=K2m.<gmue(N
U"5*_G:4^wgXm1FDTWam.t+XP#bGxwF/6'CN[rZ%:NUNVgow(RGQH2GQ'5Lp#3Opa
U"(cQ*870#'.,T3(vO32&mC2q5+Er=%^^B:KQ&WRL?VOtGZLRdCxCfvoe9M)t^XEY
U"]g8FfbD_2LB0jtW[JYyCBA8was^(G$Jto7Fn)rgY2_0f5H\K5;D?DoN58.jJ9GP
U"nPkjZ<2,^W*IkERsWlij6Zc>Oru$7f36+c?QA]NAz30'=LBe^h#Xs7M7ZbM^Z*+
U"bDGFz(blOVL*Y%bkZx]VCQN4a;BbAFaoh$;We/F/F#+636Y(T[)&B.Q[$+d[)h'
U"\^9cmspI'b-.D^rar?]2ci)89s\.mA%om,pvO7#qGTZt,cI=5du);*0]+&:9x;/
U"F8qRO.]m<e2yQyA2r56sRBIQ:&E-\IAlqUaL#U?FncfLgNKVs']D3uwmYp(h+[%
U"4i#T[,cU&pSokPcESa>bk<HlZk+KSFhXDJkYa=(KDx.fbSWpRY9FfQI&=%IF>uj
U".oY58N[ko.5sS($8G-/Q+]t/Djmcc>5=*b#0D$5mqJ=/S(YBMp1h=.VQYX%.a/)
U"fda*'D3QP7_G)bI$Zq0-+fUyl3:V==IReYh];1,,.73[)Gn9m%d^&RGuokOB'Rj
U"xkWj_%+'ZpI*^T#k?44LEymH'N_1b\p6(Nnlg=]rJoh*AZwx>kB-'CwHiw(Fboe
U"[M6KVj9?m#CL-:222)L7iH\/^cdDLap9\=;hxAS%M0f7,gW3-HIZX>;Ek%$yJX;
U"XSi96E0C.uH*)$e_0Mx&*Ms;SE%oCOJ;&]#r:&dMMKOl.1(i*UD23kYj5NJ<X'd
U"71k'.kKUiV,+gw5N%J.H*e(C%kye:GHYHk+Y>c_Z*'.'VF+Sk:#sa3[EaI*PCEz
U"oCd&Wl>9Fe<r**dMWt?^9+/S8pSvLS'g'7D*>sD[t#qkG$([Iu*([+oFug5)=<i
U"as6?M.qKr%u>ZY?5p8.o780#GHuS0-KGv,VmW?)vSPz88hUVUmA<<CxYJ.\=dbP
U"H]hK,Kh$0=OaRP60TVl_0LQ_c*+]tY;Ih[Z9d4t%G,eMVCTn0yr#7plT9APb%b-
U"S;n)[',bH^<sjBlh(--=.I04hd:,,'H..oC*0XT3%$djy$;:=ov6QI;om$5kleU
U"nb#$7G7^YtpKa/:=ffyOD&Hz4t3DIbh5;&gp-zqh*qz/d,f&qC$6gHmn'm4*''m
U"HSMb4y[n_v.#IxJjD^;7Ke)tU&Fcr%-d2ilY9Ks(x\8rT'n-Xoic=>L(\1X45'/
U"R8:G30W5i1qCP(JNI=P%oT\/D.v6t*bQT%rCCnSQ8s8)Np_e*_Ry%;ONk\j_Tj>
U"6Cwp]QFavG\L(gM=3]Q<^/pHf:HGjzAi6T5<Vd9ng?kW,#jTjXC39oCGwBth1bB
U"0<Yg6])Mub<.ESr1&3VUTG#-oLaDOkZ1.V0k:O0(6E_H$]m7BMF1+q:lc*(k(nT
U"h<Q*skPR+M.YK=&Uy_;V2:Q:T_S0S/>Hr#W,w;)LXV+6B1jvwi[kMIYb62hClwq
U"vk=V'e]B2Id9gWWe4gDzCb,82fmUr*)C+;+DEGaO/RJgS38FVEItmnIU8IH7+Ph
U":po-'>]PXx5$r01TO4^e2BD#0va0D#ElJYfDI&RiV0bT/QsQXQl_7eNJqC%TUe*
U"^,WZ/GSBkjiWoC+:5wnRE8UQ_;LS'4(/xw?m_ZZ5ejK4C&,1]J_Ddt%ZAkj;Zq]
U"Y_0Gh:Xp5,#g;(fWnZ%4U-OKOxRkJqLS(e9b\WY3dajM>]MFS*Dp<#<KX1nHIN;
U"S>(5J.&h*/#Q0ZP0'3/n0)j)*AY7u8VFh+GTXY+h1fuGEk*YHbD^z&7>6is=Z5;
U"IgvqLm4sP(9>z[n-7]0b&(Pj.z+cVuoavVo(IfB<zV:moiJsYHSe;uUlO4e(8a2
U"Xz/8I.Z)#YLlJdvJd],+spifkvZm*$H\JL5<m=26:MtnSpEs17nG>)-SLx3d8*W
U"siC$3Ox2+F8CAh>J5hM^0iL:NM#Q2q0&VE-.0A.o$,Lmt+6>jx\*C\at7atRa%T
U"L9W.h7>H;l)(3W],OOWNe.gj6Z=)f<-R-,$+,a3dsQ;#(BM-G;FDf;q/#jm$d^b
U"lMmW72DX5(o&_G6&[cBDfgTu8:bUOtZ?-%BXWmn1_bZdbKN4YTvPg6Z9N-z&$r_
U"D;IX0>=n0i65eLqs1)$o*C>aH71ceTj0VM#a<,KuJ3#0)]4&u._$?lg]/bcvsS3
U"_J2btE1[Csh$=_w(jBB7Cnj)tC^c^Qsv:Hb[ea&RCsoE4RdKp_s;,SJOo^<>;<i
U"6c:vwK;O5'n>R16Koi>ih;/_\JYQs(qbA_U=Ng1WHx*:X?%0Fypfd#RI_10-*e6
U"LS<-me4b:J]i&F#j]*]4pvHU+M[Vhv34*xxs'rv$ORk['Yp.>CXLebS7r79FnT&
U"&1A#M&eh7hZ2l<Imh-56p^w7f;hixm5gKoIh[twf'PqJ:V\VNmK4Ztd5z*)-o6=
U"LTVud'WjZ15u-3GQeAV)O;?b[LI64:K8Y:2_(,6CTL.tx52FPf57hklELT>s?au
U"%cFT3M\+A=1w*9&1Xn^o485crNyWB-/*x&k;y^aE(jhG4&_yM,*69'lOa1o2Wcu
U"=<&r><]Bsq[SXK5VCllx*ZDdW=0)GR).(H[Q^VYhdV.DKk&#\:W8q6nFe[$N\2m
U"ct_#'%xNeou81jiQAt'i.;2[q1-8'YVOI9$Ms?d$_NEByBEhwN*AdXxXI?,N;\D
U".KTA6SH=kYercvaXHQ+2,$U/2C/n_KU6B9].y?;M'Oh2g4MxmPlhVqZ'[4oRsk5
U"l'L(W^1]rPT^-_v=p\&.'S4Q,^*[p0CPixy2hc\eUpkanOTcbDZ9jY+=:i:D<l+
U"'N6&r,XwK1z8B^';P'?6H^[M$lJ>lObrpP[DqwCbzMiil&gdXN7t7=kp(>9T=SP
U"hTc5I-g3VS*aMhTZ&qp0cQC,INbV+$Jn2.l&#9C[6t,YOT>d?UYCK-dcuPS2eED
U"RM>a6b*^Z(\ihnx/hWl9$'r(fPu0.=8wpQ6NMZTv#:TcD3K7;>xyHAl<if9Hd7.
U"IBKkIJq?bHhXyaqW\$v&do6?*utpD5vxEXY80M*TcRneSIp6tKWw>xl0M*cORne
U"Ijp6tWgw>x0<M*cR3neIp<6tWw;>xXPZn8bN>26YdMM,iEG8s:eY-%EA_4%PLT'
U"qX1K^j:eW&(.u8<rXhV*5Jjh4>%6>8j5)2j-/p7u:CSqI[ZH5A*'Rj;f1JOT*2W
U"gTfZN,AJS<0v/#eWoA.'T&;f9-J0-0moTT>qy,-fnq,IIk%8'oSZz87tJeOY#-%
U"W/I)u_Rh2'/<BI7y,3ogXbl:H92V;fDMJTHS]4F7)RZTN+>5#9O(r+&f+_<fbII
U"&MpAr8+nD?/#j>\s/P(,?m%&<R(Y-I%W/S8QmO'NtPUpJtz^4/#m_%jdf9NB0mJ
U"[I5_UG6T'IEa??4)VoC89nJIKY8kE%:0K12j'W<m:A%+cImAS+,B=6%3qwV,+W9
U"=*8Y74#yHAV72?qL<9F',U/99&Rb0F=Yhdt8]RBAPs)OtLQtG#mm<Ot]04$=W)m
U".Yi;0/*ggbO&:uJRafdx8EtrMsQ8HH'x(up%()9%%%%-%6/*(Bk$S$T%Z*%%%'5
U"%%%,%%%%qhiS#kts</&p:ARl5gL7U?:k'S=8_He+TC&Xth;]?'26]4K+fiJV+>.
U"M(rA>U.9,d>Q5%^pMeA#jdEfKu,P/=T2^OfQ)KC)-AU=0]AQLZNhce<8Ln\1z,,
U"z<V,V#GEB(cP&8-,NV+.dkiPj3h->:FCn+&'adMaeIXq8a5;0*os8<D3.SRfOIy
U"Z:]9f?ep$i6nwNe(m'urss_r_I&^Kt$.KYl]2%CEqr0j%>6L\(9j$HhXN-J4ze4
U"Y6T8>LJvCbh;b\JVnv$f6N^H_t&5JSU>%<le%h#i/nw)?_^v'iqrG.R>;Wm%ba+
U"Qc$#(;p)R[60gmh>(E=k?N=I*\6KK.yoVR;JwGY%9_2u84>s^Aduu9K)X>6%+/U
U"UH%>-$DlM.%das1%]KWSxK[ruMRjjt#544uD->LqnNrj2z>edsNC_l(^jT;RO#V
U"=U\DeD*3r6>,\3_g*S=[n?,R/6CSnaMc+-B9$4ZUm*uV,6SqZj0d_Yiff)$i8TN
U"'/'sQA;q7lymk&nZ?2m6(_ukrqQpX*'PZfIjA:)$LVC-O$Wtb]t0H5#1qBVUIdY
U"n7kV)\<Zoj,%YG6l+[/8+VYN\lu>Z6'2\c4aoj8>at-A[%FMDLgON'g9]pj^$[J
U"MWJT\mnDN$O&b.%L&Xdpu06D^aQrrf[CW8T#l5G*NgHwu^:$0$Anup$Pl>FZR<C
U"AEq.5#g)-IDIn_bX.TkkPfJddT>XvsWKnhW&guuA-sI8YR\i$?kijia#oFo4m0Z
U"P5Z??a%C4z#AU?2OE\9[Sq6)G$5VD6mRc=H[+aQ2,.]dqd]a4?\g&>:te2HDlD8
U"G=msPvB:3ZPxoWwIZW6JuBUT#cp>[Q,lkO&HzQ6mH;v'IlgSmD2iw;3Ku%lB#mv
U"$*fdgV-[^^U_^)N2+NWof91E%NG>V&6I'l\Fdw-iA<y3^b%=hA.4MBCL1uv8&I_
U"B)IR^+mK<#?s]]u$iJKg6a=)ECfODlWEjAW^t]'cd*9Lab)tX*#+.OZvJlQ<kTl
U"l^VuSSydn[KStZb7=aD531(K^MF,l(3\mZ_\'Y.X,]cwY&WvHbpQUGTl/k#:Kxm
U"<,ov&h/gpNRZ$wZKPA2b.ZaHN61Rh_Q?\gj0nSH/ot7276;,jtsFdw[II2<m&u3
U"[(Z7[y<puBxDlTDDkfbHwfkT6C8,Ti)VXHf=8ON$VBk4dG#ank$w<<s)BPV$1Rz
U"=\NDX2d.a9.*hv6.^QYh)A8^)s)hA_2brQ#L2qs9N.)yhZ7DkQgkzDI(>)cb3t2
U"wy,S6IfNpv-+0=b32h'+wotfX2(NhNB.;N,1TrsHudOV<2X5Jnz\fvLVtlspPJK
U"pFJJZktYb&]rbVG+th+H1wwyYZ.3L=wxwyZts3p3^MNtcTaPx8m_wd>\iZ&f^SA
U"^XD6t+drcIv5\7a#tLNXaFphaHXAto\cxsnel;qz\,Bs4Dr]6_n4\osd?MH(dk.
U"?-fdfP7w?W<7,r8n9JeyM%/sc,%E'+Wrl/QftqU*[5a3':efCnR2[WwPEY5QhA2
U"/-A'9#>(lz13V1J=zxY9k&N(P+d:X==sP\&s1#Ixgd=1,0*:u:F%vuuQ03Nc2uf
U"8?V8J+i,43cf+%sRf-^cZpC)U0G-JLHeF$^j+Ql6-^jc=l%l';mQ=CMOH;w$ouj
U"c=hKXeCcPk8fZU'vxIOJm$m:b,F%$nFvs434Kg%9rQw,%up()%9%%%#-%erffI6
U"mO/wj%I%%I7%&%.%I%%202A3BSh?2Gf66DAAC^eEYaC,U4U[E&AXx.>Utn98ABU
U"x#9WD4_-;)+*[9K<->:do16tfU=K1&F^<).Ao.&4OxwP5HCDfpq&WV:FLttKi[5
U"AO(4^G/iF46HQdG.=3F]6u5#3nO(x(;rNqdXqupNivfFx<i^_D=2wT[55Hg(e2s
U"[2rSUko?/RT[X,T_3rT+f:c^fb,o0<dur<bxks4_oxZ'EEKVM4YNn_(qxt&l22L
U"/Dwfow[j(#D]tN_L;W-u:Vqh2<>Z%WR.[PR48tBEul)&)cju<_4xT8jSOF*C3+p
U"dH]02M6i_MbWrT?ycIS4MYg,itF/i9QmQh]epzwiAT#H0C-#IVbqQ)<#FqrgsYU
U"v.O%V\Tl&h]#[1cX_6U:lv\+F&wHk<jJ\W?T3h#:c68nh8DQW&;1XC2LBxXA>MM
END SUB
SUB V2
U"nV\.o8tO4Uf,2fHHrpGm7,w/(6$^0hoP%)b0Ybb:e<2nP7m1:;J$%s),c(\1*et
U"O(.wZftlrpkd7Z($*Mxp:OlM]Upl9,VGk:=UYLhhQZ),sq:c8XWIT3a:VpwH:8e
U"6/os,UP?i<i5pq;&kP-WsPdx0JSkH+WvWF/FC>_oh&*wmAF*773M)Stf9_l^Mf>
U"9SK1+)I'W(*e-+y5R3/%$::b27X=1ZAm*Uv?-s^cUZDndw\[JU'9p1lBgd+MH?M
U">t_4[XVx<M1rbk^8vjhJM^#bn_FMOjq7?L<7;&5dT'ck^XZXEjk&5>&jtWX?HhR
U"M*(=20r*Mdov^H6PO$:7*b.j2nH#UK7V=.pNMm^&<o;6bGn#0.jlNI#>dmjY+C8
U"g:iwG4*r3mH\eT5HvnmPb\&(a3M8^D(1Wor_B>7E7.roVYsDVZ%t5&p,'X0PIhg
U"JFFVc(1mX-(13;a>E+sP&Y[<QktaTc^4:P:TtJ[hoVHFfHp5nhjpZ(eq2Q$\+8X
U"5TZlcBuXVwO$hrVrrwE07Y\kkE*l*T+lu;D$P9eJd=42wV:gRl&:T<V^M_\)lHX
U"iV6P0R&)bF'k>pwMNsf#-*O,D82N9D+&.nv[cE9P\nSZ;xgM)iIDNQxwMi'sFw<
U"HeKkLQusuMs1o#tV8Xw-ewCJND#1x]ukaEpNCw<y+dM0x>>4c](ZnHU4_llW2Gj
U"9w;vIRz<#xrA4:Jh\KCI=y1xfy<K6ivg<)>M^E2mCKS-amk#D]Q<7Tz(-'#7>[i
U"ck+8KN(-t,-hzmhp0bG6i.*Zk,OqK&L\ISB1YPe)F'rcdjh>R1df5<o%W<sV%_8
U"\-&0Pm0xS_L%R4FXK3ozeQ>_ClcA54]lrCrAZ)'Koh4p.%+8qD'>H*kM=W.vku]
U"1xI+KEuQV&wj^APawH79>Xc<sAULG&<4'V0cwX/+qH7P)\Q0PKM6=K<i(0t+Pxf
U"qZ+<er4dBhO\Oa_WVy&JTaAx&h;7BXXkSswog=vvcA'JvlvA=kckX2V?q^8#SU3
U"DN=x1k#pMU4rR4YiYX3F(wtxgO8iIl+k-*r*^<_=v02\DK1AUQ)W*dlcIs(/1hU
U"7VFAR+rmzEA(<+J#QUH9o6DWnOE$):XIB*eLQ,IfmHeniiYk#6'pa0rs's3]BlQ
U"d#&M^^A]k<7]Q1smcDKt/-8<^bVSv(p-LN*?eg)pdDft<=fx8ktiX7[s8b1bh0\
U"<;qHYq**CZxibs42Um?'pDY=r-s_gr]cfU$ic(I+k]&#&xT,OTDL/usPt9b$C;9
U"*I3z+1MfBH1ULrDi++6a0UW?hQprq<3Hb1/4m+I<GG;Xo-rUYQ]tl>Y$kK.9-_P
U"WG1\:>-B/J)4WaQsjUacjQX#at4pZ*Sw$r5jvmk&R8:+W.\*5vf=>UYcF(KRe9F
U"e_fpn]#at\Q2HOFdXW1ah$*A-w.NHW/KH3l)wylIrDx.kQ#U,08i1.:<N_k6]p&
U"+sgcw%X%wI>Nq6%SWX'OM$:ZIhr8S/p=pk&#35u#GA0DG+q]Q0])r*ZS(<N.W8v
U"2#mH8[FM,x2#aVus'?gGfTCn4brvp5)F?E+Ak)fC)J83jKnW0c\\?HahR>MR.O/
U"ZN3)IW>D]Sh88#R,H5A48iy3W+8w(d^xBZiYNGH-?nExYt:JkCo'+$0Q9FR>%9T
U"X.r+MBiBsKhvIv+[Z54q\r3Y>9PY-9XP$/s2rk\G)J&eaPR)m1*vZdWaKb-_kX>
U"nrPV/?'chdyB-nY?-38=5qXy0Lx=;WasboMjSr9_DrZ'V$:1#;qR#kOf=GD2ixQ
U"5B-Zis&EB6ar([LF#/BX[Cc$g7.PY.0;zCLDTi&WKC#1EXUPtE:L_C056_:K8$E
U"ze;_?ao;A\j_RX4lZv\GOdI/xW/u\B>a++4q04'o+k)JP0P^ZZJ,Gj1^fu$iTOD
U"Z\$c+\a?D[E6U_YjOYBjR,p*VfgfW>FO9,WD8jSE)Gx3\4=hy_Z\^LE:6+%(=vL
U"X(o*<qiYD]DJ0?k]L^-88B0M=)?XEI$BGQJql#x%5r8:gD:,7Z4oEDe4*<Ifm6\
U"kL)jg8#[1K13&lH%3L.JR,&lfw_o>Xqi#m_h8eXn&vwWC2cLW9XI[[LVlqR7cLp
U"q9N^I<R%6)S#lH>KGWK)NX&0?=1z0z6M=Q,A#E*ZysAi?O46^MbW**AIbDf)Ash
U"i.KaG2cxR6m6-dk&LT($]Vs(i#+f3.pDW)bWkSgh,LVHIqCpGTeU6nW2r=Sd510
U"2X]gHAomD/pF?*%K%5a5\O3EL3m[5=>lD)UH5+Gq4h#OsL#^2w2<7\wX8JB4Aw$
U"v4B)*>dI<6OBC&zj.C5D's&vkmHF9O&+bxSGY7rSErf<RH<nqn6QGFZYMEl>1kd
U"r1kFWri\G2JRShm/8RaoL)vm7..w9QcQ'yTFOi1&l^6DgMH&iaebeklibwJ>e=5
U",f&hyn(%iEn2<\922.sxGYL(nB[fvcmRMLKd_#H8G9F#n#k2JGn<Uk&^+S^4UaF
U"DzYLvT;=]0s&1A4eL?4pM#k8z&,,qFys>PraK2ra:QEQ2'%7]B?$c1jrg8>-^Zi
U">0,7=VjlR04WCv2)r7f<qE:RUH-A\6,PBZ#54LzaaH4)$L=pYL^-\GKF\RbIYOm
U"bfq['x1LzG+&A5eiT&IMs)T;7ceBqlg[ZqNj6LREx5<w_?K<U5eWFY*x7/xoZMo
U"&]N]LxZKGkE#zj2/:QU=P4&ndW*_$WIH'reWhYa59U99SQ^b9SnGInrmWZ*,V%n
U"),9-^PmsZrM\8ca89\z<bBf/wGCi;i-+wVhY1xS,#F5+_&3]u:APqgbRY37/LqQ
U"O\q$.AGn$*EM(RPp0zV+]KUPP06/DOsNoA<-NVEw$hSdw:=+6:ah5Kkb$nT;4Nd
U"_sl>3GRh,]_vTp237;7kFY[(o&2Qw=VywA\2<J?W8NaXh%;3uo=z2N;[,%%o^^h
U"gqdiDTwF$'OXRYXl0MR.RBu=jwq%MtSLJLE5gi[gXqd+1TIbmYiLR&GQq*^nuzV
U"9C;rdI-v#F#^8H]<:b#o*sIrEr]jRI3wR/d.[]B#d0]95Qgn'79v+wF4E+I^i/,
U"e%Y^&x*a6#7$A[.-]PI*ZhTw/V>NVY\3:)D?J+(S=6:cJP\_S=EV'uio#kMPqBv
U"GzQG'F_b(q*'9b<5lJe[B1o(e=1P_EUiNXM:AL*ep76%5yEJRa];'RL,:rm^K0M
U"OPh91B%t7<Im4k0$VDQS:#\8Q2'e:'D?56+3]9,e)W/eJd0)lBqP6t$4_gU8.gC
U">,SF?:FEELhqgBTy6(Vc8)(S)Y%Af9rRBa>2G.sIpL9WtBo_IzMA3wnt(\3d62^
U"7>'(J)9jj.f.C'a<Lq3I;e/&4-a$J;bQPq^uS$c2)K)h0Vn602AaZ*#DPoSqM7#
U"+KJV#p?X[l\R(#?MIQYD]:r)HI]Zt'<.qfK&t3drZ6R+QdhTMM7R*iXeAo#[Ug=
U"Bpr(ew#]/FHo6K?=3Oix;5M1F'?)>iuu+%Z/-pD)T]08sCJ5R'Kmqkc)/M0:Vkv
U"\:$lv#1niBXxK[CL0Q86#-Q%8t(CkL&6MN)6)=r-jK*qL*k2#'Ab-?J7B=t6O=:
U"/F'wKu[:*_ch;oIkZ-bZZOOj>;=)TbQ'uG/U>_47H)p)xF.RA%e'sQY:g\UG0U#
U"pelJD'2.2^Xt\L)]tWIJ$hI$r?oA2gQy7Gd)y^n.?g\9$'u]ogK/q.&F1Nj7xM1
U"Y^*6y%B755HRaP)5K2q-sA/l5aFznoE'BNGGbJ31i%LP<zc9Wu>/yShUL+gmlBD
U"G,)2\u1'6=)AY&7>mP</%<D5xLP2O-%FP*m]-tt$/6G+gumHu=(ka^TXPQ(Ee4l
U"]'Dhh*B>H5SK7^]q[<$=0HSwT5eQ8fbZI#-KXS+o77YPnKC4P1qOfS8P.)RW3)p
U"\l/_6/0g9p6PMtKR$,D]h4cK2)N\B<&Z0]Gy3V$%m>I^BOxpoTpe3b.9TJMfk3J
U"t+grGs<5;Be):P(B*3+=0RKI_W:f9rp/&R68/v+Xy/:]+,'TL#7-rxEm],Gd$b7
U"4#ms-G[V%Pw&hJ[LBSs7ofi*(gS9'N%blQWk^fyJ[N;6Up%E]wiG1HkH#^Dfw:o
U"t0aGAtg^lC;\]86r),s2MtJegy^A2]+,aF+GkW)O5I<tH5?,Vr'IH(7wD:D1'9H
U"qERC.0ug.ObLH(-X<^Y:]K;[16:*#JgRvP*Fcb#q4Gn6i>;mX#K7PEFF[Zpiu09
U"?icc=5&9f%EgA*O2\nWGE.L%TRD0:JiN#<lxl<%[A)8#%F:&9V)MWBY-XucYbHK
U"I]bt4hby$4T*8.62IFRN]DQODO6(k#_)YvP,'p7#3xm1%V_&DSgt6YLLr'b0F<z
U",nT+Q^Tb[5XH3nN8'DWG'1_dU+MA>TW%XG7mAN[Lm=I7lagX0l1UP]VOuMxMU;#
U"$BlB2(^<B3+4xWntU$9dvRy8iUKs$-DE[[g(to'R0/S>0F/XEV3fw[5>1-(6T>/
U"9NWm'Qh_['Gp834p[$+.Qe7OD*h'Z%V?;<b\&G7]^vNL=Le7<P]+L[7=q*bhS+1
U"'m]&CAFCq'Wm#eqPl(Di8Pcuj1/:H:[5+(3mQ__jEOm)&,q7yAH<-4UJ>4P,Ios
U"q7D\;fsMP%l[ZhPIVfA]tNy,&Ha($DoY*r_B[-d9:i1ff5%JTJ/U<4/M4\N'\vK
U"5rnG)O'.fCq&ICgp\?LX]BQ,e*RhkNp50HIP8-ig%L?J8;NVvGhk\MrjD)Fk7X1
U"s<-erHGBOT,]rW9Tq%Z[ISYU,^&/fZm.\W.8O<_etMp&ggyw8GNJnorYs(A_y'[
U"?;2&nO?+%uS?8FqaRtPk*;'dPK/T(gaG3v/Pl6o-[/nqo6)AjOEVgCwdqGIWEcO
U"'VR78ImHB3i))EB'\CuTq,#xJFe15z03,WF'<pw^b&TxpMbD'3M_7h_4C*MUHV:
U"j8J^cgE]KEdcYR/?xknqm4LjWaz=tiAmj?>#ejS,TDuw6H?m4%R__(huWidUwU:
U"[^UoQwX2W\Rn$5m_'\u:3nZh47.\5$%gsIVv2]Pp.0[Ob\GMSI5LY%$d%3b7GS3
U"eDbM=4o#5w[55E,1JoD#WLPDzk7e&JISa&fkyN[7(oH9+>?%iI1Vb[&utU1EpA]
U")+BhMO#]o&ph4=50YZS)+5;lxge3;d^YGSM*#$8&k_nZB'BplAFnw28$B;i)*YO
U"lHS*e7o5sotqIwMVE(.UT$PE_a%BZ=yVk7N1Xhk#h%0MsA*#[,?6G9ADT/>0,A/
U"W%bgVh.eQA#o-\n7J\7[11_S$^79:RqECGsPr\'a)U0+tj;fQsdiMD3.7IL.U:_
U"eWo;698g%e5g'E&*5nFR\IZpRwUg6=5PbB3*JUg#BgM:AVRAc7p<qrg/4mbp3SX
U"p,W4mNhAZYf.O$TQn^L&HvsLlw9$\r\K_OI)Rm3#](I#qxud7m(\'OcRxiC$Q%_
U"p[9mUBKALaLs18SEQRBn9U1G/*t$.lCD?;8Uh_;.F2a'\W*$jB#Wz-=F+I]k./e
U"NN:^jb=$464,T(>A.R(rx+<p:QERFpe[a<X9i29/vU%x^f?B2s)U.A&RXGe1ikb
U"'NI^\pt#IGusYH0B.n\[&:ZBT#+Yc(%X6#iC8MwO)$W4P_UBv(0[Kmk8Og3;PXF
U"eO[;L)'0[n][noNE*^%GNAFP'k^UHcZo^5b\Rj-&Q>b$R#3;S:I^\t&;=Y1[/^m
U"jKX(j[f_#Oe#6Ehtz(-4xF+N(=R..%(%U*-s>z%NP9>H)>8'0)cRbgHFu[E>F8k
U"Bnk&kA53Ecr%\?L.'/8sSA4W2[AfUbD2XTup#eZZQ-=SV0coSm\GA>N7)R&w&8)
U"u7[Qe/$NX8LZoae&_kn)M;:0&3mezDQ]<HIlZ3<u^JN;j<'IKzpt4iLd]j:91n)
U"iQ\+^x0Z,(.vnkCl2IzMmArQ)cY-$K-BRvqURj_aC'7QZ5u%>*WQnHAu/lwe+xG
U"3\e;qFD9WEd7awg5hIw'7I02E2L(vUVh(iJ1SivmLr<2A/RM+pW4gJ'g-LZ%,%w
U"j;\%KlFuA_N2#REK_D\X[^n4=?;SZR_d2.>V:\LQb4P$>ps:BIh<C/mgnc:386N
U"Z>1>'d:SKEgP%b4%Q3ad1teso+hc&d;Vk714m7szbpcuI)h;wIj%G8bDo2[9/ll
U"3>TJ&I#c>)xLI;Z\,OrmiS4Fro*t^$DFJa#AzGD=>f\5.4OBO)9%E<Hl'9cxj'O
U"qC+*')9gHeB*7oVa=2q8k.og+#LciaW4oZqvr#LH;,*HNHC62H$p.f#I)ia\)2C
U"f4G[CJd67)\<]S>X0fngk;i73>NnQk?;oTrdAGW8wF2lLfq;HZqCJ*BhW(q=Qq+
U"mm'%pWfs9Bepy#7c]1(s=kPLW+s?'M]<,_c^t<i.gxpMU6b<B;i4LKPOc/FWdJr
U"hs^4[b?;M^MAHLys1(G%u:QTo*,H5hEHu.D%neTW8EA,S%NGebsLZprICA(e:&_
U"uR:7UmR&N4sw;l#[vqvJnD+WZ$0bcVH^Kbelx<c[H(XRHJgGJ;AT9(es'XiH_4;
U"GqO?WB89Dj^kXKq#-/ltFmjAb&u_I*9VS(c=[#G[>#NH[9[h$[G%dZT<m.N9c&p
U"8K)C$RKk,CUlB2RM%\^31T=O#=cW4cPa%]9_HuYPe0V4K3jCm29e6[CqF_3)?he
U"e#EErPy)li\Ab)iVzfHk6.&XoPoUq9aqdPS>n(gA3peW.GaU52X8]aTUYUb?>Av
U"_TU[L[(+#v^r#I$Rq8Cc2Dips%TOmrR4[rzSa[Vs%t\$v3bG+HZU2bKn3IFs.<[
U"(dUPrm:;_[e'RlF-cE(g;x$&.xqQ-MeobhTGbWH4/,hj[LaW8Q]\q>s8Arr?l5c
U"cZQfixtB0LJp&a2MDQW0=^?r3ko0JI]m?TT:pFX$FwN+m)d.PNxDG.e:cwoLIxG
U"o%bnwmsG'>6eNq<LNhV_b-&,o-jc''Vrf(>iLfa$M*PVeBK6AMI'84%VNB8]sLu
U"cGet=A2oC\<AaiTb*B/6JbBA>^z(9S8aAR,ps04^DJB%c?ym5^qe[5>=JsZ;s];
U"TA?I4NvClF?L[6N88ATv=n]etHx=Ba87*9gejyq:m^.dlqyv6+:+5S$.te?XrY>
U"[ai4trq8jx>>Y%G/eJ#\'oq]2[aA$mz=LZmHhaWBJj(j-^'=#N8<Jc;0L/YY[YH
U"d+k89K$H4)vP4i<C(nL)MuF(5diA]'wMS=cY^I:>12k9*#(KOPA<^b3-#w/SG6;
U"sQZiyOVFQi+=RBdLpsRga$=9g/Y\YbBLYu]$m'th:D;ArB*B_fIApR47=^GC1[q
U"]i*Ef?UP_:Y2%;?CRuKkRN;TsdHd4F&SW9\L1PEW*f>0/K$?K3>l77radL52L3r
U"jg(U]J#1tA.;<B>15wGi$?_Y3:3HRS/pj6>p4Z+5^;fr;:wL5MG07U_5:;bA&<m
U"ccd34b'XhRksCxbP2V/Y,7.5cR.lB*BSc2k;I)$%Yp#(4E*+a(Z.FS<n%)g1opc
U"dlw>(*]9Hnkx5HYcLm8brEr?FimVP]$(45[6]/Q.KoXL#==8U^:qS[f.pQY3sdL
U"ajv$gKju3GT5V7Pr:ThI\<Ckg:3:ny:3ZbPN4uk$j;]o]#IYs8'lJl1C5'0.DuG
U"A1%npv23VV'kbY/LDsT&\DfSeWKaFs*O99:Dnk/,:IyET0IZ9A>H(EC]q=*89DX
U")63%tLn+Ev>iQ,U&=DTpN3Fd'XuMA%Dfu6fYU^Hp>E/HS.vo7wj04fcZ?K2wUMM
U"K_N51EE/qL$GlUnK5sybWNL?ryq.k:<j1j9,T+rSMA&xC/-NUlxPjFqAF2\w$hJ
U"OncLKoa=i7ZR^N\)a_#7U]o[,s0CzQPY6wa'*#geq:G07kU$<jte:j1;>ik:R4a
U"2J)c&O$D,VYN1[0aixDWGVW^dyAv0?6;nIH&nsfd>M,.fGZVjKFE[$n]&_gr#LS
U")>hkSQ4X=SVEe;Qt>>n,PQ&K6p.&>eFI=I.<IGT731I(8[\=_#cZ7Ujq1\eYB^1
U"iP0;?%bD0vh?QMV2p(lm:\RnvRTPg8[B/GGp(O]/Xp.J^A3,rLZ5B:]FwJ)2g9/
U"+xj>t/Ufbq<Y^ZcJvCWpyET.a-n*RXbo6Td5v3'wbJ4?Y?W%GyTz>>J':SanwRq
U"b(MMCBL8zT_z<K;YeY3#FF#g&o0nhmwr)C[(LaGH=pw[CEW^h\aOGqAxSAdIA5G
U"&H9w_)H15[J8?bg#[2TX(^[rMKbeZVebPnf'&\ICm#:?KmTYM'OeK77>qQ_SnW9
U"FEvs)p4QQi1%xXR65q5kFve5vY2o1pHw(9gYZm1a/(zSCj3x5p^euHR3y89Gg\j
U":UkUMH;]7cA>&oOHl41v0]74-WnQp&+f4?2Uz'iBZ9i5Ub\d75V3QqhX5YJ;8WX
U"=<Zo+)*i^J7X#OU&\9I^D\%R#KorTS>p)OT,Y*W3YI]*m((ZP<<HB^GY+)T2KV.
U"7TtY0Pm$i.6Ndg=x#bjR,A,uR/sgTBR]nSJUAM$[J^:ki;4',CV=%x2k2cK%MZG
U"_R45GRRtU\:I0ft5?k&u)6kcvJ)ic7epNRWMk%Z]QMxh'iPGFs0b%J,l_x(8R\$
U"IQX^%e893kj4QCZ5_:H)<FY4+#)_OK'ii]4ql1HG':c<IsK7eYoO^8-:1+RwkDS
U"b(]_.m58qQ%-7+Wn08';a_6h:W0sv*lqpD?LqC,2hr61nTr*o42%gFF_iSpIOfI
U"I'-.-']DO=^1tm$N.S'lbs:pO\:,>dSFVVwMh+hXUO/[q'k.kHo(_KLCY#yQo8O
U"4sze:*)HpLr,XtW]kqSIN+9wUo,S9;0PUJeUJ8]n[dC39EaD/$pi6nt[bPD_g=[
U"%TZikXM#kr6INzxq:iFK[e+h+[F-qEK2xWqn<*f029rM;qnZpc.LGZKE[s_c=-,
U"B12D[vX2r#w7K/w;ht%?XbMoK#AB(e7+(WOm*E5Y47;iLqJ[DTrYB0:=++2^K<Y
U"W7]3T+I30f_hg^>2I.6)CXYTRmWTBceN<e#PLM'Q$7sXbC(80Xi&pn=QOQfCb4k
U"b:Hf2GpLl(Sob7&k))qTQmUpn&x)6nk.P=CMK>dJn>lXD[hp4Pu5:cq]i130ijI
U"oq4j;3%tcOCR'DCkB7?'\igpSI<%GCDc<^UR5\Y.$OE>32],e/v$)h,9D^yUTb'
U"]Bjh]F4>$&&L\KlbJNw1mC)kkCMYPaaC3X11Fn+1fSn;L=#/gEpmALqR_YkAAJ2
U":*5CMt$:5A:Fw-]%Wb&)]7P,IYJxJr&P>&g=TWaV-0-^_ly&<cSj.VnZ$:ohp[[
U"0=^bc+z4CMUPuE#=q;eR%jk3(dDp=)b63t-BkPnp3'ZR*[I<1-Fwe0Fl97K\C;x
U"78'K'rS7Wr-,'._V:.M,bFp8uWc\i6cc\cQHrkaUu7/D<Cbg*HgnOiPWx5SOOZG
U"w>?/#0I<l^<AY/25src%qvVuUTui&Pp&,y*761(WR\k]Q^SQmB=BoSJr0hf(nQ8
U"Xi\696G/e$CRpiCzGseZr=X\XYFSwG_I\DhUc8Afm-gHXCoSvK%1AA_N9jz3h5S
U"cT:Wg7ibW3L#xV.)kkJ_dh4cUS-3#Mu:QPk9um+zxj1=9qSZ+oL8O4-<;^PQ1Xa
U"Mc;_#4h]M(_h3oIoAxFoIym;+]gd7*1bj[RWmKiws4&geND?*oLJRmh&yC(dcm>
U".CVIhYM?f0OnfMkQP[okE)22dsq6ki9y=o1$GtoU1&Vi$<m^'Y6:*,jE-(rR6t*
U"4v)Cm#xQC8m%;-LsN)XKT)>dB3]-fJi7k;-;M.na^KlU#aUPN\K4TVtj&9DG5R'
U"jW>Ah;EWG*AuxW)p9_9A?Kx)pW[?#KAInSo\A[]Z*$nIu.ukouJ=w(bFCM(Tct*
U"XJY)=0lHk5XhUS2P;J'E(igEEI?]_.*EY]>AF2NPqp<t7H$e)h&vB2o2fW+^D--
U"=R(h=0m=x4E,sZt\8rr<S^:0Zj:<bDLe=R.LwZ\K_T-dQgDP'Pe2_5W^pPvQSu^
U"$hsS=XM_.qtR*BUc*dh#j3<>yaR<*<S4R-/ad^J9QQhdsR;X]%;/1ZL-W:*5Z_i
U"(Zw9QEpCtX[SRe7r^=8^5P%l]JUv9Y.;iic#L_WdtKb>g#iW_sc4C'/btcG':v7
U"Wa\\>w[R-w3Ab_K+Lrwm&g2*9..oBJDN=g<a77+Ut*>?%4bM-ix3].B3\Og_4'B
U"g3w6%[(q&\Q;nLl9?tIeCuo^QY'S4/&WRMI;-qge2C_AYxA>F.EEi/_^]6+LJz=
U"gt=sIp%T>oe<'#0#t&B/XJoDEa\Y;1S78U'Y3*_AoZ=IH(KZMe(%js?'<V6:1$*
U"bkYJ>9XDH>NxX4pAyJ?CP=.fx>p,E\Kfb(i&0d9]6<S=/VNU&]hgq[Y\\%J1\#(
U"*8uzEDP3K&+?)nC.qIGbwN/P^+JGH9<D=MIA9pm4eIkK.AvC<OKd?2ea'F1ms&_
U"ICsD%?L8S7?%OLN2p44jIIW?w[d0q%BAo:1.2P8h59hYD52Zucr=>5[5X]jEY;5
U"-[G:?WV<O_Etn'FkHBRp&fS]ED;CA1qWB0E#z)%8MbJ2?0X\aN%l./5(d6f%0p=
U"mf&HM^p=k<mf+Uj(/&Teme[J\4]mrH1D\.^8Cq/Fn\nJa:VAC;aWP?SIw3<QSov
U"\G]v7?-ir'a4O+U*:l+i$bH%AbLt.GRJ)^]cZ^de,m2#\fGnMCLp+oGMQf<0;^C
U"A\#U7aTL1Pp[J5:':/KhZl;+],?<Vj,mrJ9W9EY3REr)kIbbs$vSC+<<uRj?%<a
U"r+uMmhYQ;EsSmDj7axts?In*,kigUjW=jANa=Jvas07d7UCa<[641lk>e#k;,'E
U"xWGPmFYiOdLr;))J/sQZT/st+DeGBTMn9g3bMkg1u5OSy>Eb?iSiWO'nKh;oC1$
U"C-A),DweIu\q>sFVO;ESg$dCjBi*IX78aPk0);OT',er7;Rloqo*=OQ4NtNG7ZW
U"f-U8Ajqmlj&Rh:%O3pi&RK4Pi.>29m.(cYYAo/(U8M5b&U0LH1q&Ps>h:b+M#S)
U"KVFX#g8LlFxYKy4;W*5*vvJA/-Kn0Vg&f?5p,l.rkyDk/WASp?5r9gk$X5tjG:e
U":CFuJw0LQK:tY\mZiRLPbL?_0g$a4+2+2-KVfd5KkV1b9R*uxWS&hnCGKGJHS/+
U"[vpTNpaJS>V[t7Mwt\c+P1tHH;9)=j,7-U-D^xR*RM8:gYN%1<HNl3+H8.]Ig;o
U"L-9cX:#9F71zjsWt_uD7X?r\4T^u3ta,k:fju+APg3'HI6jjQ%e#'^L'kjIymM:
U"D+]s\$mkS&pFgX9yXsSX\1_4$^J75Nd+&J\0+o8*S(=IRFr=\q11>H2WYVbo0Y#
U"sv%.P'\I3/_ZfpYF[KYa>;q44eoyP9MN^Yr\,'i_b*)ZUDRvekboaR<VCl4aMD?
U"EYh?rKg%(p-F<vQ?1bv:^4HrIa%bTkr_7m4Zfph3aP:G?+p6vX#TODc9t>B&MR=
U"KEc;e^q:<]wkG^xV#5TIqD\AxFneKhHzRXu\\<rup'oDe3p\h09obk0j_^'Qjr9
U"(5ql7F4e=tHg.9$hya=s2]f4X[jMEU,C\4Ze8SvI_AlKQ;[g4vtp$+qqm:<<SH7
U"IG8\D)$*PDiHM#edH?\>swszsE0V0Ur,n-H0Jm[D6[CU%>SAps<=5oge^Jf,I3M
U":T9x9TjO&GQF7AB6S<?:01&\:>Wb2giHkl=PiZc=&4Le&[rzfXGBTp>hO3i.Hz%
U"'MgeV&M++w53B2O9kq9lcOR+W9*e?/Ao-,-A?.Y:YH'W+)4aBO(*Gb1^%AsV-+t
U"bj)\8oG31*gcfJDvED_ZKR&+4/iL3i2i1Do66Sds+.R;xa2W%>Vfm1g:'od.<%f
U"BvV2DUv=J-jLXr>\WAWV2IM&RP)D8<dQ7HhgR^6.qQ2SdqkboqE/k.V$tN=HJ^,
U"hMKB$^trII?1Y+0bVqc*-/[.<oR\s&DEUo3<hIrvzzZ/1<TB&/4XA?w;H%Cqsij
U"9RrmlIBUaCn7b6umOhb1f(_w/mUI/FrCJD]6Ix.pX\$392cc^WB,+3Xr;NtR$;e
U"H5D>6G:Nx3O#IS[+;Um^:$$kG?'[WS=u\dov3IJTq8fV7eDCZi0ZDfm$:*b#x;:
U"%e60.Z.gqDYB;E$4#NO4m-RrpgO^V?+,?[>&LY?CI/F9rAf(>aVAc=s16.,:ttb
U"N9?JbFyphcm'Mx9=nRQ0duyM;5oAeGAsRhteH4O5dHlMiF:DS6a5\hJ)6ur?BL[
U";HhJZ[qqV\S(,Qeyg(Z8t3-SQ(tWCJ\tERjdq_-I%em/[2(j,uu'B$Rgk_TE0;c
U"V^F+8,exF,-Mpikq88BC,444i(_.Q>cv%QZN(mi>2RrVN.fFd763P/U59h&a[p(
U"flBGf>Z9E_ND>H#Asbux4ni]E.'=bVE'&j7VcZ0..dJ&rdE+<nMnRMQ2a?(nVgy
U"(E;>_?]KZ2WxTr?1u<B(qs\*J%c?.?M.*pWLWkJM=86naz#MXa.?*5IY:j*LPko
U"2iVroX6_?\slB08CVszq,=DTYG<fTF\8aheg8$SSAh0JEm#[US3Pcs-6(ll,Ktr
U"O]%?fbnCJ8P-AN8Q>m?'P2R)UE&Ycm,6->v-&&;(8]#\9egn0G1#7o%=gAd*1wT
U"lru-&Ah0zCCy('Hc++8ES:pERgf93^d_.[0Wi)Y8x&X$dL4m[K)g20a],fYhAHw
U"Gr-&O9prI$bW2_(YGB<:&WF.d3%I^bp6/qgE[vK6Opn9Hp-GBb8bCPKoF*\U&*^
U"p_8KefB(u\IoGRX3l/,UYl97KfWB>;mG<dVUX$56*t>K0[XciD4wTu?\DqW6/A6
END SUB
SUB V3
U">yU83AiWv4B*pr#0'*7<5PW_w.H'eUB_nL;-$N/=IF0GulCv6oP0e.^Rb*[w\0)
U"h%*jOB8hHkPoUH$0.Dv'UUJE[UE_'*D<]h0QXNuGP-aQeK+uN976Bmi.\P2M:2l
U"MDF^6\,?7hnK9Hqe]Zs$s23Dn0o.cKIvz#rT2HHk%42=Z<2;BB2]xg?U*Q-M'mr
U"pt4Amg(;?aTUI12+so=VDN.Owq?/9l,%55SIt#Ma6=Os+$XyO+Hcpk;gq^X)O[a
U"#EZ&C?U('ItR4Si=6b.)Af;,=2aRu%JfCElO+$:sPi$F'R,v\0[a_Iz7'>?oY)V
U"HV&QfA6j<?-4kAjLQn2GSzib4__LF8&I(,]<OlkuhH-C/90PH>]ipj_bU$Z(qR&
U"f6g%VvCk$bf-p8B<Khk3PGG_a?K2doUuEoW%'3.pcbU8=lz.r.x[$'OmH*=Lqak
U"QR3TX-wlyPnhW'K>6.I'F4hp1l:<UbwK-[%EoJ8N-x2+p:Uu9SqI8C/%_za_=+q
U";r$VORUb'nSlp%0kLp6tBP)IQFlWEqC&Rf]lhq-k1B_.Uqonsv'$;P+ND9Kf#qR
U"mTsbEXW2Q^p4a$3f&&*h[o.hVx(]O*(9NM]\n?Dxc4]]:It2<EGYUc-#F:#.LbV
U"mY48o\0g5rifcHccIwtI-tfWo&a-*HI,W:Q4N4sl*P/LabeX<CYO8YVar2qQjri
U"8q7S'b6(PcbsH616M^<yd4\/gs2Fqqvisf*eRNLy=Kl-CYXVgRvV]Gmwk%?ln+$
U"+v+X#tG0q;8#K2:JA.h^m2bu,wm_9#>>4Whq6\4q$A&o#-vKQ)?_CPRpxLVWrhO
U"hh,R?XMG+V?Hji'2V634mn:vgT'=ctT%8hjfik2LjUu>qDi/RWw=mo6MOiDAY2n
U"f0nkOC6P6+gm<'_<=HsR[PlIGbKE]jaf'LU9KsHFI0CJ+aI>Yq1(aQKkR?Z+>&/
U"OaP0G7WNCS7l]U\qPAU0S%XwE36:;KSHB%,1K]_kDAW6eE+B7(Bhdx]#Z2ShF[,
U"&g#>;<3%W/-wBC.fRT_kbNiRbX/6pfvAG:2MJ,uEw[*ahQ[o(\EMJ0s#6T(q5O7
U"u'-oOVm#HB$Ej)%)Rn29(Ham-7f5%8zq5AG:LED(*OCBg]kp][,Gi<4))i'\4X^
U"/FC/l/.>T1qqLuc'JqeZkFtH,OSiI;[kMRU9f+_QHW#zJ>oifrRm),B<so=(d>H
U"mjE'dPfALC6,Iac(Ab[Mzq\;MN+l.c2*r.y__]3gH*o0?#oerR[a_7K%5QRG8&\
U"#q09T83F&GMX_2W1GtH5?T.CaQm&d]0_o:j;I7K/h>UWKg6idmLN\vgonz?,bN%
U"H[S4hW3V)s2LH#i9s/#hl/ipGzsDcMdvdk8IV#AOrfo3VcJ]Ll%+NR?/li^-fw=
U"3n2psBx)#IfSs.2qXu/j#HIRr\'fdQ%j#w70t'q)I/70ea.[&p\G[n*'kp7ImS*
U"Mesvs'rQlTYn$#q'&7>-fuPnrTf$Wxgk5a-h\y$i>SF7g'pXSh?EA=9XLm^zr(4
U"[m]4hu)D5hw=;P92ssN]Kz<\v1Q7ASP5Y\,80I6XFQn/2Ntm8G.[)IFJ#>nAxuO
U"YVCUpL$bFBI]j=(CvZ2#*T;=%;H&luF45+gb.GKDo$[;e]sV2=hyd0WGG?s8(q2
U"Hy;%\>=)Zb+Y1-RRy'VkHJ<mFN==7/e$Lb?sUJb[VI'NM=qYRNU(HLi<DPRMJf3
U"i*)k?2s$l+ARxLnO<(L2Z*0/cX,4GIh78LM:MII*N:o2Z1b(-5w3O*,^)C<Z2&p
U"-J=^/e9jr6Ufx:]W/m3em0's=x_1^nG[QgC'*&7mol(p<)k6+9?hq'*xjWI?q/1
U"j(yh<MV+.]yA3n3v?9RPqRx(0O2KUtvbYY1nt4eo^VrPY+'qoRBC[G#F[Q_f</#
U".gW6v7Quh'ZFeE%5c>%tfhu5XmqsZQZD;30JWBXW&m9O;tlL-R#1,5U6CKnr3hx
U"[((Jv9tNC1Bv%&;OP=NOsNQiF&cW^H,JpO:cC-+w1SB8wThO).)+Y5-$ROjjJ5A
U"FTKhR*-=/AH&r;6\#l'ohhIAr\Z1ro\qq,prS^dk__j[Fy):)7gK1eLFfvK\,]c
U"btd$-+>1^nNLT?_A4p(v8MlS-S)%w(iMDoF=R;P%&mf[Zdu2^+UkV%N6C488)b(
U"qGV4O%Jih7:+qM1XV<L[7I,JC[1cR:P^xJyHU9gW?=:6i'zXh0osU*kqA*3pS-x
U">6NdVol<X/l\ruMGf9o7V-sFL^,0E^_(PJnO4LPBpL[:3I_xMe8cLD=Sk6qL*Q#
U"#o<LJXJloVPTbc7?UpwvClnSDn>%?D^,o)\PMnhjOPJya,Q=b8P7WumP+/nal^.
U"hjtjSQ>5hE2I?lg^4G]0si,P+p,C9]8/)+51pfeX0VZqf%/eXWXQ5IYaccd0AD%
U"Z_k>G7JGa=Z;.x%#3Uw#^L5W?<OLWa^>=VqTmf;*ZMi6Ey'l()<t9CV_m6gRu%s
U"pN0F\]Zd%JLcMKlHoxqjl5A3+O,?*D\0#E,dr\K&44%Zv6^<6itJQuUwTqMsj\2
U"J8y^9CX^6$kVVJ9)GOdZo*HYXKBMmVeF0g8S\s;;^IFDfSgdvp?qx^<l>xVPq+F
U"<d-;x[cnZu>K&wB^X:hwY0a(Rzm^Hkf95+umHt7YgvI9fj^)sXH<$oJ4h=dsJZ?
U"PVJER$*1F8rnuk'#&f(,YFEQN?gA18j-LjpI(%iQ0J(sI>]n&t/h[0st0[:iP+E
U"ZP7xprnTd)%l1[F'QK;7+[]H57dB>GxPCu\,to).>bp'RLNS$L\bSt_w_l^1v%t
U"Hl)DBCv0jtb$ja\v>\&_r*yoUTjbY0le7q6NvnUl]O4$vAR3[Y'*q2%pRv*>hQ=
U"[VZmEH0joVIm_GP7s$;19n68UGwuQgm%3J*^qV#x%w8$e;WlvgB]/Y2;Tr<Lp4m
U"%(3)ZcEo,Ods0Z0Q%sTFu.[Il1T7lKjDhV(vO>;jI[dmecH_'gXs8hW*/7nh6I:
U"=cU_4:jWtHio+NRnOohmE/V(Ucfx$TbzQHLwTm7C916:0ela1R5)3TEX%5sS(G#
U"%6>(H&,A5GhD6u/.L6]5c+/$HL&&LnoFe]HM4\t#i/_HokW=w9&NL2V:IaO97JI
U"e\r>v9SCpf9D(nZj;u.w73g*]'I8d0$m:JepeT)39tHc?,6gV*$^3IkGpXmVfdd
U"8/-KHnM#w.AqE$DIiGjYdg?]YK3(*#^r\Jm]6rT-7r)qN3oIBYuZ1#R34qb&kHa
U"/\/rRY.%e<e]\qh#J\,5J7g#$YY8n^pa[3xX#=+^uk[dIftJ7RFo'$nmWAYc%NZ
U"*;GrBN:C1\T:G9f7=iG$xJah(;$'d7i/uu.-e2>D#iGiOk&g?4D4W:SNA*XVg\_
U"G.'qOJ<<NLDH]tc1+(u$7TB;'Q_P?uZcaRH%ii7o;iGrV'RU(cTl7A?n^g.iv]x
U">t42bWI=36],D8i'UchC:0_iJtWV*=GW_X+&w0,Seb>(rr,isQ+U0QVcfik?toD
U"Bt$CT*O3j+4JoGRTw^UL6uEx?BB5e\2VNP?O*GoP<,]e.AhKY9.Thq*KNZvPcpN
U"bNoh+/)G#C><t\tF1ugG?Y^<g=dG)l/l4Ad#j.(idxe_/>#$ikVa68rNl8D]4,&
U"F&Q%d]]/b$AFI;2o#Sduwab\t'\rZFXah[7-h(k[n><ksSHS%9<A9G+R)z\:qQ>
U"JZ2WIAdqXd>BFSzT8;;ET4$o5Vs[#iX_jNF+UzPBE6J.ort*iSO8hB:K67\$D<P
U"rjYP-vE3Zwfw+F1)As=mtQ^^GDm%je#o,QUXHK3mcya8&z7'9k^+UdluTv:RqV9
U"?b_J5?[u>aqsDH[&\zY%fMgN:CYr<[i[[Q*\xWIise/um1]i+Kqj#*i9PC^sF$Q
U"3n*]\cXA7$wlK>Si^lJQ^?RR6k1X)w>z-TtIMdeZE;]BZf8<d7XDlf)O^id^FLi
U"nlKv/WBBtHtIIxPB5IbW$NK18Dj8+?HGY2mdaFb/34RcKraa>baB<x+IsfJMWI*
U"qhr,C17NdI7OI*pHh)Yl#%vAHufij)ONjU>1)^?;h\j*7-T7,$uX/e5oh0R?Y(-
U"c$+I_4hiNt'T:+Bg7(;EtOcoNgR'6;LY'K,;V7,OERsB(xD^4P4Yaf&YeT8S8Qj
U"E=fytMg=;5E#uFQ/Qwpm6w,_930vT,P'sIs(Ea\k%sBSO(P4:dmXhtS9;]U=I.'
U".$V(q,#EqhlQ0t$GtRmC)kL$dw#feQ2r%U?wGBg3v.rPIE.puC2OOcUASJQq2\#
U"eUTQ5[(hKYF2J8UM9)mRKu<cZ>0[lLTGg2q+j_QTMibEF1+03<7sv7#f4m1MWQ+
U"OHRe33O>/zFe*neJ<)%V*NNF/(=lFQJCvm.H6:QQk$6d8wsC5.Qapf5V5E=>$\I
U"%YX;L?-#K>=\?u(KG'pyY[v#]/XWF_Q4_b-G$j<M,B38TZ&<IVjiliM3a<3VmJZ
U"\IhV'&OI?gML]crYS0J-O5nv2QH-fL&&P[vAAL:98+ILF(.<hP:m<_vQsIM%iOT
U"m)E#^f5\O:>2i=[N2H4l=PC$QM?$#b42Y:7sra4HDis>2u1W1K1j7SdnE9$YJk2
U"Up?8S7OJ$65t_WHTq+gQ;\cod935XL'(q'4EJ79[uu&[Uf3>CCQ+efF2RE]F;8l
U"k'?Uu(;165*'_aN%mIHBp_:r9YDGCaQ5W&X)qng8WGnx/cMSM?n?ULaiYKnr6,$
U"'tCdAbHiluR.]]sS>loQvKnT#v[F/^3$8GVMvAIK>FdL;WS;HYp>SPcugy];^lh
U"X\hLj&L2O7Mj7JOoQvOJeklIPsKww4kar0Du']6;e0XGfr>a5##t5f6.N\23nbZ
U"JFJla1^A=*_>-*$a'q1Nn#-Hw%;N=TVV:tm^/&VtV_'O:CDTfCfb&:1SBOrOb4_
U"%as;RT#)6(^&\QBATCoZ3+j8'D2E]TI#U256wVG^]GLuB+$AX#Ig(hmf'9-u4&;
U"1_R+$W<M$MF^oNYmavAv?;bkL9=ZKvJf3S6p$$)xXC.E?g.%9]7$vvm\PLa.^jC
U"=gu0RF&]=aSN:&_$$vckJ&KVMDF=p0K5_pe$YB6nbkP$ptrpD9Vkg45fY,qxFYS
U"iuj1:cUK53;e#uI]kT03U*>?=->A4Y(WA[o+$vD>%>?w1r1[XLuT4[R=,X:sWM/
U"iZ_0?1v&mBFR.Dcv3KnVgi7,mkM?pj80So-]]]D%FD8#j[/A-)^[,k+_q,G7nmO
U"D>=d%'18DV7NUOpO7kHIE]g6fs,-v?C[(1X$DxeW<,1)O9x$Za'hva.p(NN?'Fb
U"bGGeqLQo1FWi1.M?o]*+wO*ANw-dImIHiaXeeJ?a=jVd38-RmummY0-:#]wcJre
U"x+quf5nhtOYdiswEv1)T=:Acq\>w3u:AUP6J$k9,XR<Hu&fxZ0-Oc70+4-45w27
U"\LE?jd%r]DXkxORkoan4mHKs$S.EJP8s3Em5cn-*:7I+Zj$YGgD_pn-M\69*XHr
U"Dl1-KlH+v'3vLM=T&&=KQ)u#t&kG65ioLe#>w)jTDE)KNYiA3B<J#40$LjfS8<.
U"xMJX(c]Ig.x4pO9L#wPtQXHAA:KPZd$5e#Iz3FZ(/nx*iIWL#igLA[0dERK^9#+
U"/#_A_td&9yVQKcWPF3/:Ao,,HMK^)P2?rhCVPcSmiV%77pYg<#j_K+L*e6Cg\Nu
U"4h>[Y(+60m2Mu*i49]4xpzdG5scGukYBSI/$^FaDLMi\QbmcI;VBj:;xlIRt?hr
U"9.d1DGsh#fLiDW)$6_=X*0hmsaiPY$d3uNS^:QdYZ]A0$/.xm<7ciPL/9'7(%P'
U"jxnh6p[6]hrlu2<GGb&2(?uxJRx;BEwn>,7qwk.XNCPLhQ;4c'p\(C-^'QU9+[H
U",=-H*2FB+T%s:[/w&kl1<<)a&3kMc^YE&,A)]7g4iX.TltqI;&qqYlocKJ(r;oe
U"XQB>v8H(HXpP('Pan$WBfkfxNA)SU6CO?h-_%$gs[PMb,[.aEU$SDU.TQ+-(CAT
U"$,&Zaj%u/J22[3qeg=(i\Bv_LkqG]dJ^(,X[iwVg#Wq(29$h7+bsVBjM.#7x-ib
U"c1eU'T[o3LWwvHaZBqET-eDT0I]uEf=+;J<As-Ax:?9g,f2,DalIMY3=SLIx=>]
U"/LEQbwycT*6t76B#MfTi2ik3wy_Gycgk&f+B<W6AXI=Y_1TW?6BKcX;vp3Yk:/_
U"5j1xtLkVrfx<NIUIUD;IFQb<#o>VPj+9HJ%[L>.)TLflg<?:''3tsoDzO-wl?Z+
U"mc:HlxVQ0ZO)kYX'3<6gbNYewf08-<yt-)<iPU1QaVFC60NVaqhNDMUCDE^pa(<
U"1pf.Nvd8TbIRCq='dJlX?L:)RIj9^wb\qtQp+Z[+\9UIq940]q/JMc\qRAX8qP6
U"sHlPa3^l5>4*Cm>FD+DP2n='WR2-n#cH6]4JbX,9u8tCn>sl,d.cMSX*o0mf?/6
U"gtqNGqu.>waX7,#<[/O3bT.rI4<?()*Y+D*e+E],^3NIso9Ds62p81hK/dYbTg<
U"e.&^fZ6amKr_)^?N;R8RwIbaY_WF,++KW2Fjeo$<uYPVIv*wwoOW:x#,lIs)-KJ
U"/-kC47=AXrig'i.rJ[=SULB9>7;BM'i+H+BxiVd3'LfE:h&J%Wt%kCq?taS#\#;
U"bOniBLx5Z[noDgna0m>4mcc4a]7<4CAa4DuJn#VDlxfp9FZBL6F6aK;AKuAJpiz
U"BR)]$4tmvB,JHaUd0$^L=$H3gbYJji-#MVC'L)Ju'1*9Q#1sE$.B:jmJcq46FLS
U"3&UBXqahJ+M*tnHMoG$S0bRx8vL-3=cakN5ERH_l,:dTdJ=q=)#]ns3(;Zg?)rC
U"nRwGFkr8\.r<$05?x(\7PnXAk2Qra?WI]J85=RDA#?2]J?wF-3mKz)MK\sr3aw'
U"-+NH1&ChFDmsV=MHLCdZWQ.IRFYkP<p]RSjWcJi87LHm7VtqH<B7Y+GO$9R#K#D
U"[yn2qEnbQ9[RKbjoZ9%BtGnM/Pl1F'X32ZXhj#9r1kh7_lwY8(>SZR?U]sF5r86
U"[mLQCtknpbb1<aGElVJJs/_eIq;N*3*0/4y-Yajqa1-B&X57cpi\8o?i]fe*>%9
U"1Ff6Q\p%#^4yFEI/]gidw3dVrJG'#JxQul=5,KE9zDDS%sc=_KVeUriEV2M.?05
U"F4YV(.wif/Ar?AjR(3n$CY?Im+l_U;J)-_BV9Nm06kms3L,PhQ+PUJ(5MhsTN.f
U"z=cfVVtmlJxNqM[2tE\J>#E(_ZM:.egCuGcqg=]e+hob-c(ei5JPQJ#\5rjq4uL
U"JPpi\y&1iYEvY>VIs0r.7ps>46B<[GZ*kat2<D;u.o*iMI/rQV.Ge)+m^<:A>#h
U"<4)uxQ9EJ3+.kP_pev\Am2\79qHRjB5wX4y9)k5ZPf=dq*l?UJW30X0[FUbO$x0
U"69uUehEfh_)w2o%zgAV;).W0sq7Fdri1/M%1Y'dCnmR3B8p=xLW>8)6bq,))j$#
U"C7P+6#mv=-d#m$3Q)pC8ps9aTR]x^Fc?=6jYv7EO0g8-uR]x);5TRh9'96L?GKi
U"gblNl'C3xt3J6CLs6Vna013nXM]5$CPtTGEEn]Xt,Kt?=N>M-l%2VCT^fIJKnK^
U"<9pDB>JCDAswTGV[uHNJc/X#D2t?I8(,f]?5-06eSEa)iR[26pEww(Mf]m-UwFY
U"Q-pA3&bM6SS?>:qg0h$D6xTG2_eI[AcV\:U8R.V<C(K$\AA(O5EL95GmHYodjza
U"xK]EiNWGhVlgMpf2ZM-46YDf2pT$#zOu[J2m+ED9^S4GnW)/<_%Y<aEkG[Wl/\/
U"bwH=Ig<lyh\G*hT<)0&+&SxDg(;#+rg45:DNfz>nOVW[P]/s.BIHZRT3zq;<.l#
U"$Rs-Oph't\%8Zo^j2nq:YO\xKNs6CwJ2nr1bPG+M4urL#4n?QJC/A*A35)[*wjN
U"[*KjZcgk;'kLFg0TWumkto1aj(?S7#.deNvF0UYHu26&Y&1U<jvj/??Im?kk>$K
U"0&:E4D%66;$v0v*_Yh\nXO6SPjscnhLFcP4m]U0tZ$$vdodUL;FPP40GAp59^aH
U"U5?/VfPKNWxn6hbeLc(Q6Z_BV*h:tFu?>AgiKVtI&/g39Y:VMZN5=uF)0eRzgbh
U"'.':gskDWDOlU%+U,5Uh>ljw*)O\<0[zkIkd;'^\=Vsm*f3vb4Qip)^c5/&tAQH
U"d9gD?O:4m]O>9Vvc7$?-(JBwy7#Ue9(HN3A2N_P(jehK-C.YNbXH-0I\6I7\G44
U"T#ee6Xu/R_84u5Zj7&\;]>HD]$.D3BQbF1P&6#/6eb[5?oI+#t247r0>$MuupT#
U"ae%0)W3ePXhR:\JjK%YQ9PPnD_Ph$;ekoy)O4Bw+*ZwyI&f>(laXd$Z&WjZoI65
U"A3MPsTya0Z5OfqckS^\wU)^oSYDe4j'P=Zn'J_d8:(oWJw-E;lx*.sNfF/$/Vou
U"OMJUgR/PWZa=en5hxE49j5&EMN-T6)^WX4e$^n$=:u>_uxv#Hn_b4AtpHtdcu*;
U"k>7?%Fj;r=?OKD%ppyi]NP(W2^&U9MgG<=v;hSV;\:i:SVb:E)n%L?],4O\^ldC
U";mqH\jV3XjN9[[+5tsEl\6*??P9z^dr&/o./LP;huP.7>yPxi,B=w0b3P7tEsHk
U"-3xl=+9*C59*BoT#tDdD<1Ksfu][\$X4s.AR3&#zDt^l,2V^=5#P3V7N;Kh_A\x
U"qha=jL9f[V*U,AHXG6894ZC64N,Eg0*Bf%mbEQ,qw>H9N9<,qe00[0H#J_tDHHM
U")jisjp9yv$AzDh.FiY;2=VA\,7bv1JeMrR5eUp''fuJ=HHRJTPZPnc&dI*fl%V[
U"tF5ewia9ZW0cQJPNF.1K.em/R5:u=AP<Wd%hVTQg8_]k?0$#ZF4%\>wO*m.k#AK
U"78fOzH;uPI-Ws7vO$kUT[T^QvM^F14wqZqKMmet#]H7Y^?jP/3FoSJuQSliVkt)
U"QL8-v8DYSdkwKEO3[a&F]dBW&5,[/h,y0m\F^_Bk0h,%(rvfuXXIAS'QfG;rXKY
U"\vRk2TQMtfo)5vAapb??<EDaJ.fOm,mZ,B&w>(eLAPcGJxAbWSJlQq]Py$*NidZ
U"wQ.Z4cbc\HBE&=t%&;:aH7q,sg:XO3C?[p0D[XPXWmI]62BimNu1KIs18FjluWd
U"aX91;BVnBcf.oBH:s>+9]?j4?kd3NKmm1QOw#w3hCQT9hJn[asDH,<LVU4JP2ca
U"34rsM+S%(oYGHLde+6>fo4km:6VBBj6NY#Il5xk<F;ki1iPXSgH\H9=-NdkP\%=
U"4cpvM#2ke\#^2TOLFmD20m?VwlXX.Mr,RDpW)JRfA49^nU&']EDO6v>?wu]&*MO
U"v)Pgaf[;VLoM7oL4[W+T(t^.VoMCjI8h6Yph<dnfuE+=j=?gApTs+a1b_u'#u%_
U"Z0w8*3P(,4dq#vfwNxJGqZrL.d0i1=Bm?4jkXO>>iZg7r0miZ(iWL4])PT+#Aez
U"O*=^VHAe7FEAm=A[K\O_;;Tm;vkik06(%0lGGadksGn[EF0gzW:fuGc]s#ELu#t
U"0x?->SqIUWh5PV-2VNM,LRw/V+?KWa=;q'5xx_27Whp=okOi1*HJ4[V35kb_5PA
U",o$*iB19K9T#(k]eXDgXU>8HZq_sG'uMR#^<[H>EJi#i4AOU,6C87HIXP\T18vO
U"*z5U4BTK:r\8Xj'A<1cu'9O>X[zciPqce)+4c:fA\*/s]z',MGqT#lMldq*R3id
U"3+4W0UFOvAH64e0KCmD0gCx/E;bT#\C8QK76zQT0F6[sI[i<Ic^O)F_bgGdO7.,
U"q]o^Tn];'53%S-r6,Wm)zL%xEP>][,v]-l7,'I.,<TZ_u>,cu#bsuo\KMG'Ra^t
U".lw]L5ls9XKbi$uEXYsqe<XoUh5;6LGgERFXuNhctCZ'ZFlM)^Z1/MhfZ)2P$[?
U"?W]u8oO,g7:VIZ\e*^2>pgtj)lw#h-MER=8N%mne/WDFf)wHL)HYA)^\hrckY_H
U"FfG(ltL3GOrl&,l3JN^r(3Gv_]z7p,L'7]pvCtc^T4R,CAZMv^Z[JXd3Q^dH%t-
U"_mxOLyT,l=wZqj6pU.EK2fHu;KU41Z_#Ek8pCBE4YVSP/9gpTojdsvX+5IwpMr7
U"=G1H5(aw,;ZYNS)<V[NY3pB'TsZUrPaLX_r$8e6Yi5wi1P=lm&-SldWIC6h6r<9
U">gT6]QV*^(k8VA&'qj2GMg'>$:dtADtsc5>I=>b-;lIEl*6wHXYE_64>f7*htn'
U"Ed3+]Nqq(_gz88UChNb7*AcY-gX'7i+)mnV:8pF1ls04>+f6&f]RO8=&Or<v&fu
U"jG/u5ZiXjbE7Zr88B^aQncb4ge*s%taHTHFN=)Rk1L'du#^D;[G9/5=8z=Cn$\c
U",]j<o]IM?'*Xe>(Z7J99$9.lInv&D=+px*f[.RvQaX[&We\;E17<-?8f&%t>r<)
U"*c6J>odiTUQmNBE&$;hW%hXu=0Sn8k(l:RlvP6vk$bQ,$t)Va8GL&1I,('U+r*[
U"v]<,DOdH,Z8b:#%G=Y/8ql<mD3aY]*vOqQb7hf3)Q??H8,JDYtWgd.NB^?CzdA\
U"YbASlNDdYIYj)AVDl-3Sk1[6JdqcI1fkW'JHV#aM'fU2ghk6oj[aN?b>sqU8/1A
U"ti^q8W:av[9W]*s,<ihuRAi(xtfpQv/Y/nh*$kR:Im;9&0.5=v%82Lcb==lfh1p
U"?,JK4$>%_]n*AAQ^MeVuB0ukVZs6N*[k2mJ\Nr+O?#xR[XWsV,YD7ICmqjCl1HN
U"HkVmjnVXn_Z3(uPRDiJQl3#B\wW#xVQgJN*6N-jmI&=B(&%GpF1/gDNDZ6>PRNc
U"Hz?Hfa4T<wLrjoJd;xY-OQAP5GB5>sC(H_&a+Zn9V+Gf19x>Gvp7wE:4Jl6MbFb
U"R\yLHY:mtC>i9R6)sq1X2fCD'qNHN7I/Oe*M;?Z.u_gBjeFv88mBwP41jKk)omL
U"BkkX8.*Y)kxcRIIxJFqXb3dS\PXH$VEV_#TV$N&P^y25qI#6xic-FL)[9aok_V;
U",:jcW?fK/KI8PrpCn\(cfdV?b^D_%i;JsO.;Xiy]rry^pJ5t4C+bl_hD'wih6i$
U")SOQ&Ph55f%_U#T[*n(UalE^1)c^BL?CC/JfpnLb>p^M.#g#R6t7$_5]k)X+TE\
U"q;BM%P,rE=gaoom=7L3\>rSeN\sDfp7m'*TIcWrJV5O;iC7uPFQ)\AGq#w*KgJW
U"I?B+Ekn%)hU^oI7L.u8jDU4:u:7AW1O8g2KB*8'57[ULBEa'VIlCPKZO?0Ez^JB
U"b%T=5+fm1[#XIi2-1QjVR)tkBe^4w^+AGMXf>qvM&;_g:jebTfoQ4(Gz^5KYP)o
U"#ps][bwhca1bbi-?>[zouRQ7Cc&NTHrL^)deN3&2<?$N7,cL6fSMn-.=wR]m*g/
U"jqOT8D4/tImG0hVuiVp#PpBrsRMQzxQV1;:%&yEBV'55*^cd&i.<9(k;saRZm[7
U"XPPbf%ZC8:pT0TB28qWQcC+-JT=cVLfE;c?JnUlp2qPmDi?/$uJ'=FSn>H'8j#U
U"?s%Q88Co0MQYF=DdU$5xutZGq1;0>:RCH(q7742yYcUnO&:1NVUJWfuR6iS.TD8
U"8:_K(9+-RjejVM*WQ:joc+*1\v87I3lCG-r[H]8sns?5Ca8ck47t)<#U3-QfkL6
U"J\UT4P06C6HfZmej>]V+l0gy[^[687FOm7athJui&G0c.u_hIYZZ%JIvhxI8yFd
U"v'KpLBKB56%VS3/HeCg-[1M;EhKLNbOgmAjr:KHBw:n<Q;NIYKK#OKHZA:IL=c+
U"QxaEB/D\O_f0T1XJ4X5C3rc*4oq^B,D4ra1%wen**E1uOdaRMrDx;u4gar-,#O*
U"P,jl9Qe1r0$?J:w5)Ej*W[SmustZr+e9tR_bGrK'bam;$Xb^l8?QFl.,_-j?,,,
U"kt>Hr3MKm>]A-R^;U,-UwkAjcZer9K(cl4h0+O90jJne]GuOsb<VXlu_Z6Nr>$m
U"W^#(d7:5P_sEY4<<2Go9##5_u%[KQOOnuH^Bb$f8tzxD6dDRILkK>t?P,W=#=+B
U"mrt91,%AUnC2G2?xQIg'Lq9t\*fpCE=BvBg8AleL5&+ybJfIB0Sa-EV&Z%9\k?b
U"&092&PNjjOgJv60Q1Xp]&W;qZo)&grI>3od8oZR3\:8Y(64sKQUv30A:*?pAp(Z
U"]jcukkaLXRo(VFdo\jNt(t8w<-LkC2t3VJ%ugG<8[]zHn?s65aOhT]BfmjrS7zt
U"Zp(Tl-(:A,_$8m&0%W.M6vpsFimsBVu*X^HtqUP,hUWs=MGh&][+ja-w\apEtoU
U"CgheumugZO[8wUj[XueVNX+Hu6jZJuZL#HXB6fUG.uK)t-nlv<k%xviN<i[W#T?
U"s0p7=8<Sq$8T_XtL]bJ'dDq=pJpoMCw3UhfAV8.+=VJtS*>sW2_W'CQqK\c&^rR
U"2#Nnf$th0t/L4FVpvIJ\3g8uWY]D'[r$tkFo#juFJKDPGMjE[CCcP-U^F:Lpjn_
U"OWL*Ci9nlmis=i#\9:ttW<4M&((Fl[:NKvv.^.KYu>1Q^Z)7[wkgj*-8S-N[O/S
U"oick$2jkB$<RF8XG]jsrP5[w81gNKjM]5m2+H]80M8<d6puF,JaJafVJAOnD[r6
U"0SesDE2tAB-aae:R,%tuV%rablf5lmaXeMk=>o1<c72;qzmLuMAY#>NBwM.P9W,
U"QW\ypEIE<lv7l(h5L_s)NJHm[JYG1tGKF$SGW=:CckuZ^M_$Y8Ne'DI*r*2O9o'
U"#m[IKxt&7^^lDEuyKvHsIV$?1[^ApHg%qWQ,au'c=6CWJZC/YDU=[duFL#]erS+
END SUB
SUB V4
U"sw#p%2]>cW9WOo*PEm.,?mI1:](S_]+2GDB'fSJL_y&<j4En+=mP(LL6:Ifk*.K
U"lPGBY:xTuW,d%ar9KE&;c0SF^%t-9D<;NX>ikD/O8u[5lE<6V*&_Hc3D#<tXqdS
U"7J6*S'pbW1$s5ArY1G[6g\6tkyi6e1.^m;JdU6$%7#DC^bqzS')o0=/lKb;-:A+
U"SEu0:<;gnr*6]-/#g,tv;LukIqkl8DNl8l:uaI3B\%OkXWai_m#ZJhK,Rg,K&=w
U"SY7FW+E:AEPOwL(mY=Lk*D+>FxE_c2xwp2_FWzGzW0c&ew84gb-N=fPDsds4bs7
U"26<Kn'7r/_4Gx5a3qwH,d(svqQg97K4tJ<r:T5x$B7_hcjT6[P>APAfBBL=^k'&
U"PmnN6&b5tRylau6&?RAt4N]:S6RKlgFY0p5.'H6L0fmy;\go\HQ<9su'dASr8m(
U"c]bG6%#Pz)AVtC#ad_sE0dFntMcj\mLH(FPTkV7(\HVzrYd6\&kJrB0Ulub3b[S
U"/Gt'yPPd>]qm([[6o1Q?0Q)>hv/fwEvckw:1H*hf.gSauUjNWB-R:A6V#.7sYXA
U">VrOlHmb#h.Zmdd$IMtzj]HKtt#&m0=MtRjVZYEtk4KV]+E$17H4:md_nb<D02j
U"WZ>l0k&aP<$7bA2Fv<h#fIesoUMy#z3gNagIi[+35\1V%=2W;y6jti3)8l[iiPc
U"kqQqRrr=,4i';(wi-:k'D/:4/j\b]BQ*j'OA9?JH%:l-%jA=cOKd3wcbCLBB/=)
U"HY04/.1DJ0idaN$k8y#fG)9=H<AhtaAxsVbWRdHblAR;]%AbZ2*kExBkGS$c$]j
U"RhqT.mPcLU/;vskR#shop'rEBgEs:cIu=Mx';5TO09Hbs-JWZQHpLELSZJDg>X]
U"eeE>WqpWDzG9<[c,c+q;)ODEcSjHbdLhndOLGZWO]Mp*6CZ#eMxl<7TAcg[/z,'
U"p979qHLKDc?Z>aGQKn1t'qlP&\hh]ViDH^iGMlvZKKd\<0u$(JuQ2oul',I6>s=
U"u[FLAEHSwPiS0XDTZ;_Q;vq:^c8COvmw$'I&tlB>-75iq-8*XBTu_t/([$Di4Zt
U"<kjl1/4ND_XNK;SN4l;=_$i0Eptqn4kZF5S?]UW&ANN69,fUv8)Alp>ivEF-Z(&
U"lN^+AU9)8qb.MtQ4\jE$ubJJ0lordA6s:Z#9D_;54<MP,?$6>UxO+r/ElGgB;Rp
U"mut>rP=vP9ar,bG08gP[+cWqWika(F3Og+4iP49>1iEYjvXX-wmJSh/-*ueJvgv
U"QUvA_)Xqto[uL;5>YmXV<1:o3?o9p\R2j(CQC2T.8KNOKlwp0xcHio8WVd2V+4x
U"'&D.3(\t%c8\A^#K>ok*C8i9lJs<+neu;aL/$jQr(u4L*lj8CoR//0tK/=?Y<:r
U"GoMv0-duCfR8+:(VkZm;fng4^w^qo;v+/aWm\I[ZS791.mZqjK5He'S>?QvD'W+
U"rbSkJX/$c3bj)#r^90V^ZY;QV,_BL,XN?Sm.oe]mXiXh;q^#0>NFV?nSHlq&$>Z
U"XR-]/b\rpdHSlQgXbg:fvPFgg$%eMN:13=juLD$ERLvKDo$ruFUXRtLeFNuKxq-
U"[PXVxhvPNTH?e>BG/EncEB<M>V>j6<5B)<s?/FNC>+WWXVJJ_/WHkehez(w6;L/
U"o36E:P^.^U&LY?loX'R$V,sL_]=P+>6+bhfP,_F43''E.a9PiWUeu[&*gfo:cYu
U"XWoou:ooB?ooNCda]epco/4oo/to/B(3%]VGHh/ltY/tr]/tcj)9Y.9ps/4+s/t
U"sc/(GIl*&zfW6zfR5zfbP,G%&1aGA6?7-y5'^];h<i*tGdKW:+S4L>N,DJJLJDJ
U"&,O20K?QRDAelOAe,lF%;6]YGrY3lh]3h(OaHgp>>7S=$1S$92'u1/_/=c+%eH-
U"gel<9CEQA0J[:P'lTikQq?;bY+/c'oTjiuFMA??D1's[=o?,#k?BB:z:IC=dJQ:
U":.1Bk+&7F2i)'9_%Wgl+Pg]TeO1=^K\/oI*ce[&+6]JGD?4%#C0ru#/(Y;%oVC>
U"cYXzM30s;7i];6^T.F#ReA'_$Z?>a7/q4gf/e<9ICmJT3=Rj&7kE9:/q-<f7p%_
U":[''r#>NQQ:5%8Q8r_Fsp'x&up%()9%%%%-%;U\KMIPYFH',D%%)81%%%.%%%Lu
U">:4JAS10GB-$8tFSA+kn\Bu^D9=H#*KWR5'5_]KlUe2CK;<?k1XB89AE)+dFV)5
U"l5lMtj$(y30.G;LJ>SXpHNVz,M,,,*i0Y.Fu2Z9A&(>SAH;VXKpZ&7\Q;Q#KlH)
U"CL^[;%nummq)5%&%&7C1PX#B#$J&Uft,WtJ>NemhrK;St7[.%K.d60Zwv2L9ky;
U"n9FH:*=s8a*OsYU>oTBFQ2kt[wf]fP?&j%d0CGI_Yj=m08[j/QwsdT&XBDDgD*?
U"hWtjO>l8Fk.jvjlXt5'gVtJG;XcX<CLPJLR\KdQ,Lp2'MhS?M#MEM#Q7E\wK/tR
U"fq)/CqJ.T7(:5H't+gUc$K,H9,8O'2kA4O+qS]3_r/6D(/UtB)[cOM(kR4''1gf
U"daULq(u5/10:&SYG<1Y<uTmg:QKf4oRT6J,]Y0O5T9J)q:,Ugbm8CXNG<Hg915^
U">afryvRCpZ5ktd,L,122]XO)h0xixDV=uU23t$%ON_bOLSsb?(dI1ES_KE)C-v5
U"3ZN#Pjt6f>G#uf>]k;QL2n5Rcv^'fNh,7fcV:9S,VxgiR,<0RYE8Tpq1FIb2,.7
U"ROMKInnFO$VpGDhm*S22SK(,l8JF]O$JtdFCF<BRdu\_BnC^KK%#JPHg*G1^.3g
U"MPwPJ_rw*va&A0H?,#0BQLVnm4kYH*<&c]uLd0Nnx:>m'D*H[499lE#.9gI^;MN
U"OZ6m0;2p(dJT*>TDlutMi$-F*kC2Cfd^[kln>Sfptzl9p_$9MVYwQne37=9y2y4
U"6GDI1l9a246V^/CAD$>VprqZq\rE3nj?QZc^LT<3/geJCgOlu;g&SoiXtaW-LIX
U"CU_bn[bkP=m,$HYc2u4'3YRh\JWb[^Jd,1&o,>)0-u*0dR?KP<Ryf^KsanaEU(s
U"53'2(x52^pYcI/f?>T5U]YmBKR4A>elYBgX2kH2G;&eQDLHpGH\R0JsuqdF_?hE
U"v/*<)[VAStsL/>2b:[fvtrd)8miM^Uh=D<.0ty\C;0HGoKj+&HFPX4-$wLqn#O_
U"VIZI$J=fXs/5nahrklf*]JRT10\2UQ/2y[mnp;<HT'G*66M2P7&MjPB0,?:lTfC
U"j2.WBF,knlS^\zpPqRpQdu,>%4oA4*zw#Z8g]d833j\=N0Qso=hh(r>l?uIcehp
U"&KN&#%R2N;?'Mu3S6<q(Rb%ZUh=DdY2Fl*.cTm+<:I4j(#+%2R#48'(sn\+RxEF
U"oAS68VD.pf\=i_2cS*6O3Jro\29<XU,h2mT%(\BkI<n81Y=M5wNX?oELlWqWtZJ
U"mh0EU8ez(q23qTM)kb4Ga7,Ju2^ZX+C?t[K1HV-l74(#'a_1Q2s]<+a$%XB,SRL
U"Hb^Yy3rWp=cQamEDP[yiP2tJlEZ/W4Sv)GoFu&AxL*T%\hSezQ<JxE;fD'Dg'pv
U"WL/&Mw<WIN;,S^[-N2VzU'G7q/KCX<4deLU*Zat#Z_2u^T,T#i.lVTn2Bdz6]MJ
U"sX%aUWo964wW'<K1g44APHzY0aZC.3OwMu1B_PHs#^\'C1N2EnFS3vX5oG)BNoz
U"g(3psCF?gMN?6:CwDRmw,In8bAsm+rqBa)Rk?*W][RQAT&3L:%b#_nF4q<wKq'F
U"+Pj,i2GJ2fm2>XkKkyjxa?.U=XQ9Y;ruaXoL;aRMm.^?c7MM)ZTl\d*S<]WPH)O
U"=;I\iEt[P-k<:7qLjRN++ZM[w2t8.oOygc*+e+hb8p],1iVTdj5K$_:B1hj>T1F
U"OxG:'4S\LV4C2W,c5eH4hKddM\>,^e5H.36_2rXa[2c*I(DXLX<#(b?;aXx#o7m
U"t%diAy'lDhTM9cgvZzaC^y$=kTV3HDiIGogTV2msYH)[Jc;u%gpOZg\50+S0Fy;
U"EeuZs/>:,:sgxZQ$d_cHD%013IYt;+Q-#DfcZnXl0XJB+]gX_TpY$m0oSJ>OM)Q
U"r?qc(-fMeY5Vj^cPiXe^u:7<U&E(;:4ZbJwagK9u)#'jccV++J$C&&h)J,)]E$R
U"&S%rmb=&qs9aPc7'LTE9P=)RaIuR4K4Q9Izj6WS(udoCr:B/ScIl=.I(=or_Bqm
U"E7tVOsCX0Iu\BSB2D:-i)Vj[wp(IAiTn?[,ZN=G_)A/+O0<dwyMuF)n9h*e&Jm>
U"]3[C:i,P]U_%;81P?)2mD-j0MEFYJN'MPJBgIJ3jV#_4mnhBujq%\SMYto(-VXp
U"5[wRl3[ACO=pb%rhMHy>Wb0bH1&6^#('r0#(d*=:N9<K%A-P#,P_'hcj=^FMhM5
U"9t_mGmvT#-oT6$WIOicji5v=YTjW+yM*:VW-#_>)pGkhu0jY;gz,na51KuU4?F(
U"(rxP2)txANH#]V0QLRxqD%ddcJNO.c+[o$vWwoBkNv]1&m5O/QZ23a]epU>vZt(
U"4ND>w>*dg,nn3#_\bkHc>s.9^)Kr(^6)sR&,d-<W.j/xA=8*%]8<[vHVZgj'^;u
U"[A6J\6XL)Y#tpU3<$gLiS5L\M2S]kmZ14>uAJ>f6087JApad:rLMt_7KQUOgu/M
U"E0mr4XnJOYWp?:Ld<jO)ji/,BVY%;Kbo9x8BhD.b3tgwVm+L-PSY?T0_5tf8#rp
U")_XqNswqG\IrqT+tBkCI\Zt#KpztkyMiF4DrZUZMM_^e0n0q.FQ*='7#pStUh;+
U"j8<j*<5WZrq'->iCOe\0SG6DjsVe=ke,=A**5$4$bswd=l>h_&RB$[\Zkv;]/K(
U"U<=Y;pe<hofZgAp5SX&vp/8G*D#pVs*ufxVs)AK,+P>ts<9H5il%t2%nZ//W<t:
U"NT5Xmrn_((10\[Y$LZ'hRS4UlX4BhiAN&RQ;C7VbRIkOrYB_UDAk2Uh)cC-(aEB
U";-sEeL0B/[o7AXvNG+nFw7.Y>pABn.JsLiZjrWkV<J[xT9Jtw8q=#xe)Cj;k>Rf
U"l8#>XaWvg,jLS+dJ.QGhaZqGZqPwDD;A:Kf0[kEOj;WY(IpJZ':OF6h=o=4CH[1
U"htkspjM<4SMC7O\B=6?$0RLVR/&iM1jlX9ZHuQ>g&*2W.H?M-U&_tg=6qP3,8^h
U"v=Xb3a0Pd=jw%nG9vD$W(?rVHJKcRwURrH0Bw0W',TF)6A:WS40v2pnH>04stUS
U"rhw=^zSQjG9j_W/b4KAG]-fk(&qZcoh3S\&*7Y?MsTq#ox4=LL#-ewAQ.EW:og[
U"$q267>PDbOtDBTV*8qo9w)ufUN-92L)'e2L?A&.3CgTTzpsH-Z7NJI)6^/l[[79
U"a<v$rx/(MMYer&r->c(nymZ/o4jI&&qdZ6Fosx0CqmNp6rgC]LJc;fbs\stRE=3
U"Y?US:JrwOPq$3]ddx3=p&c*6Jc_qFm]-&r2q+UX1CQazQ;sc3f4U**I$Snh5+WL
U":ZLkv%koNP0;m3:GF/mvJN/(z]EFvmXL\btQvW<dQJfS2UV1mng6]#9':CuC1#G
U"Uq]zJjCjykq*4GVb%$:r0ce?sNV+a+=CYeW1hH?$9'gc6isv]On>4N*<)Fs^y;:
U"Cu%2?Et#$WDVz6bm$8#aS8>8C7ikU:vnv;n&jPieN(LAh?W<(e_:*MAu#R;S-h8
U"(IHrb>uZfu\FCMh,AAQ&5(<%rOJf9+xxp=<p7=f1A>u,<7p8';O5(;D%%d+0F?[
U"DUUJ<_3qXG\Ls[dG-)SxHF+':dSv)r*rMs*De*fN0.*NwM+>YA.DhD1?p><Iq?+
U"6(dd&Vj1Q%c]TkHR9oCJMVm,,dQ^QYCKkO//&cdR;+Ar75&5-;q\B;0Rw:gwfC\
U"qhi&C/)4(6<LsS&3N84YkS]hIHW9Z0DGNN3^T5J1l_=vGZR9r4GY;2/2t/5TL9W
U"(^qHa];vW,a;XgFvI<n$g-3=?VG)&oso]fB^Jo4FqS-KnqfEQ]wD]hkG=roC?ia
U"dd1MfYcNAY]N#$j^qbjK/$U>fMqNJe)p0'XJIhhGH+J*/%&-0#PsEo'lKC;cN&g
U"I#J'_.<zyF/1%G:&Fg<Lp9Be;Vt(P[+L<w=AYKVqQ?-sz1dmPqtqxBw1>Lv)I+6
U"Xe2UkXL#zyqF^x;zeUnA<8n?:Apa;+P1gD']#I2TMY#upHytt:XY(GW4GJIDry.
U"lYd74IKK)>\^mMP8l%S[_HoG&gvJO4?4$ZC7WK[+MW3'=tuu'Mi5Yq$((S>;?8)
U"BGV26qEbfQb.-xQnk>=e;oMm,4Tw/4^(Xg?>mS.'e$YE?Nmn/JP2<M6UgZFR$A0
U"oq=d<*vr[MGq5A(7<CKG)3m9&pW,8a.SP\BS7l*\>=j6nGV\2C=r[Zbm)Y/.OLZ
U"la*-&tA0)D>#fNS+rggJ*s9Ys?jjmYk\^S3EMwp\u3I\bCncduJ:Jhw:U#bm*Q0
U"mIuojr;;LkqSAlZW%-G?<_?G_RWR;c]lf,9?E4_oqHRI=.J<V0t?(Zna/d<LxFJ
U"u'Vv57YXO71VB',ZtZOUr)K#*Lnuah)qbw&APz:OCtf4/&o(-MTWBZh,b;am#j-
U"b%0y=>#3e#^/#lKC=G&B8C)9B\fbo-Z;Npi&#G]_;AyyOT(4X8,_%pRQ^/u^i8[
U"FBISC,]?t0Yr,/WabVS:_seI?bul*#_Y2S&*ZHlA$P\c<;.eKrtT,.W#mCDx>-.
U"Tlc>t%h<VpV&)(&QwbvnQ/VReK1i/AE3ODq0+U[F^K#29PBOc>n#rvGFW5Rb*R7
U"jk,$(9jbG)LX]l5ZZe<V$P^7uV5]S&vSCG\?p-7.lF\Ij9?QA,.p_#Q0U%QlH:3
U",_8h:r9kbjBkVN)#MKae9GQQ*.VtF=Z[jq9wCKJ4=*iA1.kXDf'sQDReFm-(wdD
U">m,H8\OxV3zAW58v3]C((%(.hWpZp<;3VUJq]Lmy\^RVFSb_]-0\9?I30Ml9g3e
U"&#<(Htlu%tBpbtQ%<q]<5,9[cN3K&JLz^;KG8ie]79('vbwRYKo2q7pFP9flCc3
U"8RTSR1,&q\R/kYt&>>niE$PdAO2mc_GcERsUZt[Ynwv^n.#wy27fRX<e'dd<Sz(
U"d6)#<%/%gV[H5y>T3%oRo^-X^*oYnp-Y<k5C_JHjdi'I)AZ,dIJcpF]n=R>^*yq
U"ua9J1Bcu7?g0AT*=QiiE5=5LH#N5XB5WN_B=-o9#^+x^%g]QF[Eb;qUUj:y4.))
U"'A[ZdR\0N)\((>'xdt8/n:)'6?)Q0N?8\sU>]eI&OCmQjbtzleM[?pz[Uin:^bH
U"v-1/h%=k82[\VQb5n0J]Ggr]+5_SqN$3BB]exn?[KKD$e68OqPV/jR&1X(PRZ(u
U"u5[FgQ8UFXUI$5)F9Wc27;Dfl9j'D_c$eymTQMs\aOcZ'a5Mg]bdl^3jJ(R#;Ww
U"suhI]k,n/PB&N;a3>Igv2kCkTa(as=X%er>Hs^'c9Q;G[=iW\5?5acjIWIhn;\A
U"A]kC6R43cD$WFAQetmT*5-$/92EFrgRdQDrQ_M\42;TFW$]2S\9w;WeV6N/'ZUk
U"9Sxn'WO(>7Z0KuceJ*Bc2gwD>?BZVJP;&k[78)gMD_q0/2CF9c$8x7*DCbMiRf2
U"b>;M$mIqUKFoX6o8l&\#NJPE.2>H%IBw?#hUPFGN-wq_c9pVfO0*]Y\6=-Z'6-f
U"8Bc>0%LedJ<*80)4^W:gH&kMxCBJO6.Oz#PUn_UiaN_J0nniTEIf##?s<f77CW/
U"rXQ9X[v,3[Pba]^Z/7Z(Ok*V)N<Z^65r0ToH<G9K,7)4sFtRC7,:Z]Egsnk9e%+
U"$m6vED't;AgyPZhy;WkG&;hq?hwiGRob.-,4vv3,#2o^^r=k['k=M$JB9q5hV^Z
U"j'^NIWibR<RdMkgd,K]P_NGItk1ZddPs>#WnPfgCI>\o*.>KAsP;kyaZcPbKv($
U"8bw*)1l9W]GrO0+V$l>ZhBw6>4Fa1R)tta=7XdEad7k1trMO.+2n#)CFOnCe\bg
U">2b6F=3Z,F%J)gf8D02XngsaIPR'-6rY8W.A9h.>%CX?;T%WKNBKI1>(&pjK/WK
U"H><Jo0=c-oxWM<KZ<#Pot,?udonA==5FFA2>x[\#sI55l((Fi0I&K?X,bg99qSM
U"3v5[q52QhKwpR8B0tT/UEn8,eD$&msgZ#IiD$$^*0J9P#B;ft'k$1A/ocwnQIPA
U"NaT-iU-Vbr%>D9)lI;*hBO??xQXYU;;bwDI:Gloy2JMZq/s[3Hr/PtOd<93MN8x
U"L^4UuWg=he54q/)>&/oZ]]VT>f3g5.,PUpab7O=laNBOaiJfq:2f1BHU\Kb2_#l
U"m/,B,d2JB2hJ6CVC'Ks+s[$n<4O36s*(Y6pO&tt_/;2-e/&#vf&wcU=^XfksjmD
U"b[7QbLJY><p#Ts#Ph20?Q:Q'j&/f3+Uk9&U&6#S5k51Jki'cp3b#&o^s+bUG&/A
U"aoIlXIti2YAUB?Fa7jn=9d??JCLoD/x-RF\vSMumHY<j^R0nOq-pYmB-nmf#U3]
U"=kWQ#V/6i;$koHKl$:/EBlt.=dCpkL6[N/n)#c>LMLzb-yc]PNn4aAa<uEgJVGP
U"[:Yk<8Qtnw-1:YKV+[/H^qo%O5oDm&,,f8m54wN\S]lA7fi*G)KNVb1Qs)f5t]'
U":dg3j(>Yo]69Oql$;e%4<,kR/:nNC:.8ISFMmLR.Inm]6(FsC.28KBLCq?IB(it
U"'$Hr[W;%aFKX;v.f24B>j$u(pdFB_:ylb*6]$4zaDS:Owd/,hT;dPzko&btLkO$
U"50/eY6711m$c'kjOUfvHZni+%o.#GY(X[x3ePK:9(rA<;pbT:K;u6:3Tq1pDFva
U"));Gh&rpD3+<7[gidxG_Sa\[b8='V8MQ)jb>-s=r0%B:veTR3K_mvXixqZ/6_LX
U")<AWMw?&u*[d8gW69t/C_jWEewk)N9Flwk&pQ&+s;iMJcR/6ScL%fr<;UwXC,0B
U".bk\e&eU2lulcYOL&MDLVGHRY\.#:2:t$NaVbf+(;5)J$;[Xp<&T$EXW:x=DpZ9
U"EUcm_H<J;g,Cu>6<&s/6tGG^UtgkiWcj4CNS,[GRpq8q%8sh#)\i>E3\s7t8W3b
U"4X#]a^IhMshdn3Jr.F0W\M;mIc?CA#&Mhh]k_?+V&0%rWN;Z)0Ph&FLD,bbutq#
U"wN:=KkNT/SkK7E[pF1i#80.K4K-#XkhJaxdf*Us\lMqc8gE?RiIp4H68;fCNlof
U"CfG4qGm2s5VaT0X8qUM_aRM3=6\)b6$?Oh:k2xkqVecpMQ;:<G+t4p#V4u%DC^H
U"V#e,CS-817&^jyHs#S6GEN6cht_FCod6*HYH>q-Ra[sKRkMQK2T6vFh:l1h9V6K
U"?skr>BFfF+R$YTd%0G]JxzT5ZN(tsZX+Z2op'gMSKUbUk6'.-_mH:]dRJlcjNV(
U"A:x#F\iXhBZdMm^q\#Auqgi,mr_BMD3ga/SOuqGIN3+;G;cl2Q7tBNGBpJ8#tL8
U"ib^Fe)=t3Not)f'oSDvg#:&JOn*1*,=lkOjjfaR7Yi)xf4*IhrSYfi0VSE^CWp)
U"[07U3h']*ZeIt&FJx8l.wE0QRu8fiw/>=KIJ?8G6xFIH.6a0(Ot>_\,6J^&/[(Z
U"a.MQqOggj.BuMGr%>KC^L0SXzZ3+brYf/-qZ6ox8OVN)e[;Ug#Zeo=j1-5eL$HE
U"U1d,duwP2o;VS>?KTQL/-^)PZn/m=Q1-q#MWjg9cYURA4#HfwZ&F2k:D[E6Rx(8
U"B%p>WYK1'b]YdXbl%H.3pc<KFHjpx7pCDl2r+-m?fiaUaWaVk72aidfdn$4&0AM
U">nNwU_3rqgSiu:[9WjIvF#cSkrHbMG_&()5IRlFB*Gh>'*'uXk%F]xR/W5+GLND
U"M;[ffLgY-n[[T^KgP]OAM-q)3kamb=b?P>rZeW_/*MP)aS3.V6f>,gQGl=.#\&>
U"TQnpjf[M$^<#S>s)*\XD/]#1fq$&pKb]+fl,/I/BFrbS2hcb,7#kLwqGykqQWPa
U"K:Jbn=/WxUlqG.,+RN/E\%,Bl2L39#08pB$0Dg3_S?k=l>&H?8]3[ol:XAN)wBr
U"1=EZ*Cr5p1xZ'N0VdY4%+%/c95bFlEYR[E6owvoqnN=8*sn=XJ0e8k20sJ]XR;7
U"E2SXue9:*g7Gmh<951i)5rFw7n4z53;6q&<%<s3qrr?v#Chos50eH-:w%gXEnkT
U"-(dF$SPHp_zl\&<$RK-Dj]\S?3&f6I?'?BGU[Zh1+[#/:\>yI6[PJB0QKr(A\Qe
U"9PXIIF&kG.<uuA9)-%$tYwh+J;]7)pad.IF<o*fsH0PYd?FX+cualPhd>erhq<z
U"(U]38FQc7k5Wr'U*gY#(7';&*GwTemp9Lo4pO,1k*zMdGYO<iUZQP0vg6G9lolu
U"(P,.d$UdLOwxk.Yh4KHQRY[/?g,(RHi=rv8F=pdsTnsmu_aL#iXFg\dZ'-?p;)^
U"AF5/QO3sYxB\y]*/2.Zd.l(F;0'/433q9P.J0&&&V6C3eS([#nLK<YZ3<g:n2KI
U"rE'ZFQBI&7Xy^U'-h?(?XME3?O)(8y/TeX&+O4^[X1]#sGU2dGH\As1I()?>1aU
U"CWe$h-$0M2f^m_wYo7rOLx3Oy*ZdBI1mk^6C3]LueL:F[gcaf&6()DY?^&ro$>y
U";mnqzM0dYBJj'6Mx#[^H_YARvT<RDlY2a_i_E13)Go2tn_GnPh+\B;u%Xt\+LJo
U"Xk$H#mUB>m,J,9Gp'$??#r%UO$<QP=;L5vELlx1-HK\Z9Q$P=\3U(]X_:8IY9gk
U"1\%?\LboWr#00x%DK8(zm2pd=yaq'Y)eL2[;d<ZsvL]%gtr,g^>cnFg<h98'$3d
U"(pf0.[PWonT\^Buk(9e:e6d6tr7b#T&pi:V7nT=E;E2haeUO-JIc36#ZAJt#Mct
U"Z*ncUMBkV:Pe>?BEd4Ob*fdE;o>G=(::n%hBh^*Z+cNUjW]Gck[Q<\9^u$Ib\oo
U"w='/4hpDCP73g7w#Ibh)v^9W.Q4Ecd5v+T2t.:Y)uz\)->jZJTh^]VKB&5]rbU:
U"bApo$v$e\4ioZw?Zfd41(BCcL]HY5[nw21c0UyrS$w^s9[v,fWOu+8XSaEO1AN1
U"XX:;XIulwVB9Y9VtVC>>FI/*).PT670I*#TVJ>2YnrYGwscd[ojN3:HxfZy%fY,
U"&EReKz70D:pcddva:RsXS^^JbgG3ik0f_PRJ:Rdmq5-0)Ch,);(bzazH;NaH2/m
U"-:_+I&Ypt4oq5N2gznm[r#J%3MH/%g+zIi^93'+qsNAvWOb4V65,s3lo_K(WDWO
U"7tJS/u?#RKg]LX>nZeWE6dEob$'FWcr5)8%zG^8:)Cn\26\cPJy+ILxVt)px$A&
U".vE22do3y>,DDosK%&)1lA\WXE2w/<<evi^$Lb#4pv1]9(xoVFnXOX_/DMKQ;IW
U"R5eaSN>HtB4.MxsmC^L/L/G_C:oA/p-p,35;]qM;Qp.]U[Ie0Ma<[b%Nj_:.X(M
U">=4/lr1gLM7C)o&mJ8jeWcID].%FlbA%LL=Jzdc5]4YR*tR26UP\%1\d4m&DL&x
U"^_x6W=F9BK\e-A+3%d2'j'HVap$p3\UwHE103e]oSNmP2k?Al2;T^H,MvQbeJUY
U"QJRdebTkH96$)VRdggHFe;li-)1pZGOKiEi,J-0QK9TJ-W:B*2U#05z%2j^^4)>
U"uE/wh<OzE,hb&H?]1+8/KRS_*iwEcdUjH>8<Osb,OD?.F)<<<'k]Vg$+/G_]I#+
U"3mMF&pJ)[hvj;R;V=ZOFs$KvX*N5Z>qnfH-%r+o--X;:&/Q=aaUTovw)=b')gO4
U"UD[_h.#51Ynk3<W)dQS[&keJmCnlW1vU.6LYmyF_TeLU7vM85d<eOIPebNcga/N
U"/2OJoK])R+o+5\HOmq?x-3W*A8FR[s0Q[ERHOwvC:fd]4L#z6MQd4Bs1dJS_P>H
U"Qy1WcEMIAmXMP;&f3f?/MhaJWlJ7\jb\_s(.wTF-sCV-nEv%]gdG.3M<LV8aC_5
U"ovp<OAS];Vc-4=e5M]4XRjUi)1H.[mUCj^Ly=]vujK2-:3yC,pQkfnWrmd0>rE=
U"z0=78X6%_L$67#jR=^;r3ST)G]^MS5]>L1IcO?e7Qt6ci\'Rs0TIxMlOm)#3D?R
U"0bh,,uZzZYRDy]5pBv0g):EW*diTU0,+59gOajd*_A[ewe^A4OK>NrLXm<'-:x5
U"Jy_syc#PQX%&WLcTsc.(jS_'pJSIf6KU[Rhe(\+7Y>,)XPwWY]/aYY07Gc<:28s
U"Tu1Q$R3.#1^K+A+b[7pKS_NNEVnZ(DrQ3c(-2RdT(x_WJyX]Ty'*%nZ5.8Z2RDt
U"%Rwj$]^l^(dc7>:Cnxugojou,V<(&A0O&tjrU?s3M8Xs10G2*rLf'kd)RR9fACU
U"J1.0s/.+eX)RWL6M+Y7>tnH^L>,*)%>/^J#y4ID.VObCM#>)R-=[20vIinJxcNS
U"\EdB(sR?qf0ri%X/9hC?paHqTFGk42u#V6ENJ^DQE6>6Sst%j,pG(-0w\bN\pbX
U"9f_>O<YOx'%up()%9%%%.-%K+]KM_^*3%>%%%%G%%%%.%%%%ut%pjwS%rfp06ip
U"E23KBA1H_^/A([PU'pe17w%S5C%%up()%9%%%#-%UW'pI%&4ZL[*.%%PW%%%.%I
U"%%?>2:4ASh?2Gf2**=#7\96CAOevCp\+?e5RT7d$3U%U)]s>njHc4rmRL/lO%Sn
U"MN/8aU4b$AiZD+LsL&YKc=H9KAMmBH.$5r4rVJBmluYs*3^^IKH[iTP[+i5m5qX
U"epOtY,[&R)PJ#0R_#3Mkrny=HrsPscjc7#.?IggM28EG>+WBDhiB2cN8t^a=Qu?
END SUB
SUB V5
U"i_t[E7eSF)'Eh$8[^Z\)\D'0#NYDA6k)R3WOI8nhFRi:G'n7kL6kC[%igW<xac?
U"k$)A=;IckH==AIM<h=^CEPG;4ZPQE2Cu8=8nWgxVh3qTFHFb[ME,OqV59q5-<#a
U"#=&_X1E:]hIlxpIq]G6husEAIfbef9Y4*vqqKEM;x8d*HKu/#ARb*J^%IUD63>v
U"6W9uW4Hp(b(NV%RIgk&-LLcOX9285Si$/Dh)p&:JDXdeDv9N1*Q9F9D/8[z'c1d
U"&BzjbhThipT,NG#(^EAhK<)\D,mV24D&FiesI0$(mz30NA*R*ZPo#u66PGpO'v-
U"hE5UnJis7OmH:H+5GGdIlsl$16N3ly*L-ayG#qw#+,kNMJyBwE,m.0QnKoS)Q,G
U"7ka*&z2-ACJN=nkovnu#VnW5io)QFU6trLyLgQZXZssb<#Nd<.DH9sWBsLF*BTU
U"JnubPCEav:RJf.RcCD<Zc(>LS=DAiY9W4)8.JR+'p#B<J[<,ALE:#]N-MRlE[gz
U"T%GzZyl%kp_C?gS>Vb5&iPf6uRI<,d>%V)+Nj<63>rs6B1k)_<g(Z&_=*a*TGKb
U"QX=C4^iZA$YmvVFj32*:1H7h=KbF-XlTqO_[9Leocl<OSpK$cbhXvHUmlIPjS?<
U"KGudH]F>Ze]RDWtp)63T/2Djx%idhVu/Ro#iE-R&NfNdIh5RpTc*6S,WbgBlqhs
U"g4aw8#eo.nelObo/^\^YqR8T_7tgVtJT=$giF]0XbncE%8n9J-Hq:Av'T=8GLOu
U"Jjrqh/azYp'NGQtS\wa.SX.+/HYNaqc/CEYE.^w;'3Nm?+c<hQNE;G>U-7AXrl%
U"8)t-C1P2N+1k7(yVZUPwhb4Jik<aNpu1)Fyaff#W3OQc3#FU?yBJTcmofZxN-Q5
U"Daho]L>TGLF;^VuM'^'JRr;'EJdAHwQ<+id2AOHt7YIR+Y)T/MPHI>G'&DbaXpL
U"<e5FwZkIqL,nxg4]Ba^6>/7sNi,aIsbs[k$tUGc9CLkC1=bw#WJHw#zHv8q#6kj
U"GTfRmjHBJsXU/hfLL=Z$l_^^.t-g$>ga3*]xv?Of[leQ?O(iJR:e$0p\d&SrUD3
U"RH\s>mJ:INesxN/P/^V6%Kp28_scP)<WKDr?bwv)lCMJ^bG(RQbW#LFJ4tF6Q_&
U"^fFP>kuCwdTDKrR7df0)ISQ;-o.*R7fU0)IQ4;-o*(R7f05)IQ;*-o*R3a&rd1d
U"MDtA/*R7df0)ISQ;-oX*v8rsda(Ycx>4g\l)LJ;b<6]aTWpi77(>[SW0[RASEvN
U"iw6r1[McoYd\zi/]-)N1O[k]f6,O*#3%\]#c\W^d8l2Gkmtd)e?5nW+M>2o*P/4
U"/L9)FQ-Dv0P)4<&^[Ci=P[7%S<l^]T:?D/8=eLED$ZKU.fF%S]<bsH=?1cpW*hq
U"1/9ia(Dc1(5+i_oYJ=JHrag3,K;yvBe>b+)/EQH>ODi6RiKDA.D=UJ4DB4m^%?*
U"h)2/O6RF[?L[-cGJJWD=P1BLWqGs)KCTDXFW;dH0q=:>AlY31E]/2)?>U_%>Ah*
U"iUfdmNB$GG#Pq,SAQ'JUD']8)V/hNMQBhVH4Jq2eT;k-HMkrXC>m$(.W?Gb<J7V
U",[c-r0\w2vWb$969wt\d-4w+u%p()9%%%%-m%x+J4M&:M',9C%+%4h%%%1%%%%u
U"tp%jwrt%iSgfOxfK<Vc*NDfac&3Wse?gAP?8k5:#EAk6e[#q]<)te_krj-AOmg*
U"K[l[_M'X3:CZJmW/sr?KAp<FT*m47)(-.][sMP1AsJNT3.agj_Z8nd#7ghoesNc
U"5+K(5LF2ble]<WRDuB56pW2&3&aX<lWPnpr2N_7nLQoW6NqlLG2,F=:5^5O8[2s
U"?PumAsN,r]e22'NU\\6*]Y].%l0?EgUX?)(cFPcG;B[qS'dqkP\^ZmhGhW<([<B
U"q?f1RJHLCXF0i;[-;\55u<Ih14'lN3DF3Er8SBbgSHRG&\GCee+$$%v\Z05\_>/
U"Xs=/[?C>R)dm2p+n?8LB96:>:1)hGZI2G?%viEM>;oW[wWwdGh82U%6*)$Jf$94
U"vLZtjF<G&K+zO20-aD.T;Ol\4OYmSKNpr4Ev%6EJ64&6HKJ6^s0uqJn.OdBE;sc
U"v8O=bk5Lk.6QY;PCOIJrO,aSXSW9Vv,$*+aR&nO_esBB?pQ>7RiT].1&L&&A7CU
U"ioKs(#s\XHjUzaGegwe;QF:I5[cjXgs7x6BB24L-?613R+;Io$v;G&(A$Tme>Rm
U"U>;lj9C]bmrHv*F$pk8YrB5njXn6KGX?&A%d4Byd)\c(a8L+sS=,1tITsGS,Q'G
U"+CPPl?8cui7M2:EuyS;AwuU'mW2F26L-P8US1S]BO#-5*#r,=um.8J5VhZ\P\s\
U"\C*TG2#kltoEGw/p#kX3N)#RhAtJskA#]af6)=g/:EGAE^uXxrVS7#4.G'cO[kB
U"T+dl.<tNgT_C*6[i-bl$fTF2=AD$VV%rbPq-U7EneULEb\gTpm4j3F1$1d+[p[t
U"ZC:/H,zj$v:oQWTjQR]ggldmO)+N5xSgS?B8h)M.n->6AWF:,/KySDaZ*?eam45
U";Q]cRJ[r/_'DT_FBQAL#rV9QLYjH>qMxC-DMR.Y]NM9T27$AYJlBU($L*.A9LWD
U"W+ayH$;,m7CN*^J31G=.y8NMNxQ&JIzP_\fO#a6Epia9_h5^7xBtI'7uuXuU*(s
U"lQVP)b\k7$*^$:sZ;I0n#]HIsZG)8K(LfXFI,.kJ/J$?A>(gH8Us3vu0F]oA'Y\
U"qJQ\,z$WmSM+KddF]N[pNuo496Ut9j6:OwtWEa\pwgsmO(&1Qk-T1gS;N_h6#;Q
U"LRVM+)6+Yw<_uj3xw[Oe'%w'Mt_v2M5>Im6t?oa_:8&Ve:6tIkbPpFLqf6rQT\6
U"Vx$8E,U6-j*\hmKF_a*F[9Xz(Y\u&9bQrWG&fN9p+xn>:Gb5vwdZup,:S?>OgjS
U"MU[96r=Fc^/V8wXM#t^o?o3>2hTW\kb9P4Lj7Ro?LN$Lb+I?,;<H%b$z;%5pIut
U"V$v1W_G/$[RS8E:P9QLXn[b;fet4(Cdmmog.&zZ5oJb_0%v(,%g=1:j:6fR=pg1
U"l54Psxij3=0hcb$OHxMHJCw^ps^y<KT_wdO\YF4*+,_\G-fm7?:.,O]zH?<9R6E
U"W;Sm8tgcIpco)N3X+^uXKF]'w/LLK.Gh'As8J[rMD6q.G'H'ug=mfo>J%Ph7UZa
U");)2)Xt1;-0/Tdmb4gk0bsCj;H8Y&FCwnF?I^_-a1IV2H]byGx&ypskZi$60sD:
U"17>2*]K]0V7R[:p>in?a/pQh50N/NOhX+/a=;kU6L2YP0jBG/Pe=fS:ELRU;D(B
U"%:)MU9L?wpa%B:9lSiGCTITiKC3oz8U0^N-v*K[[#tcLce]GB;R=%L]*A78*a1-
U".*'d]A,,\+\rZ=B]eUb'1\vKlnWSvu[LA[[[,[4rU3xB>]DW/Ga0Fn&DNo1doli
U"AYlJ(\G?qkR7G7<3estp7jasC+K\s,#gAcAdcs0AdRX<f]msFZcd#gHqF]UMN].
U"^FKTZpTJ;:H:cy,T#s3uuPd8d6<npD<>==4NG$ADWeM%X>Huup9]j.jF-Mf1c6C
U"8g#=q24,26h^4q,'I4#tm$$5cvJApq[d<bZnlAU7^vRLA+/lJZf*uej%JVx)6)9
U"D+;cQg?7XV]H;-*RjRZN[56osyM(lD1V)$et\H93X&jCjQU-&s2d.HF>VwT?48f
U"&0BlJie6,G\_h*Oe$liLe/6FXyI9zHkdAe,%O$41WbGA87doG?(dqvR>Ba6DG%1
U"\Bw$6U^RcA)AV'h2,IUKeEqVW&^1twMxF3HZpw'x0T)ltCrRFH1UAYVJH^nT14a
U"jyi.13'3vv87qNt2H0X95Vl2w*Lu&5NovU24>%hnPkZ:gU6chL*j;_66BX[.ekS
U"[d&=DC>d5BX_u[<*0V#hY87E_)P^WcpVQY<a,aMD7)#P%&+t9FwhYS9T.byN#-i
U"qEU9\bMm1gedP-,M1N19PksZ6%&81X:OMS4Teu&HUFKKfIFF,Du/aPC*8l:UGMb
U"2:^LjfqaBR#m,;E_XTs;-bS[NKBn?dF3]eA&d8SJ1qCw*>)VbklI+HJ1/HDf8.c
U"fT6akmm/Bm.Bv[H]ti.OdGVP.JY9H&g1O2bWvNr62RFsbVxgu\\IOjRVX\p7XY6
U"s7SWVuffYZFrVb*JM6_/?HogBGP),zdsO$a7pcZXoZig4^rKKp%,f8CFoh0U>,R
U"7=5Uan(/okzx>d?C%7C**q.iWLzV+0JP>Gs'EI]+2RF4C6yk,*/Qejr6[?2Q'm\
U"In%5'56weQw=^V8$H.w0<][ad?)Nh3=GtMK4nNbpVeTXQeY(>#[)p3mLoc#TiXp
U"J&MQQQ/;xq_p[A8&\j<f,0Thr#j'O=w05DQ+<*kSD%W6b7fjtwcG?5TeR?qn$[_
U"PhZ\%D267S9o1Z\+'u-stD/,UV7s]W<)HNWPGC(EiC_&VW>[P:Um_pVWw3%L%c.
U"iL1HL83#W:eH[/9:HRRw1%e]qlOp[K#NOW,CMd0G#EdCO&z6$u8w9D;3mb7HBki
U"7'mAUn/d)FS>4uku3O2cb^/1Q_%g4C7I<soRf3xM__Yu=PQ\GS#E*Kq]:^).88A
U"x$)pg9nij$i*juquz&\pb:T#_Jme4#uyQbLn4-ak1t#TRp,jWU[g>BJ;>L3D2H(
U"x,7F2<59\a/st/897:SPK2q6Q5=e-UdNJ_>(rt7DL]A[#(1Ah99dgEY1eyAhcNE
U"zgut2NkW451UpQn+-Hp7p:;8;g(E;TB)u_nG3PJ9d-T\YTHIIp%\/[oqCa*9+dw
U"E&n/P1XTn4pG>5ks.6O1MPyBtb]ICvU=a4A<,7B6_SK7SMw&Y6V_<e?2pU'VlJV
U"P48ys]d3<C_idx2kA,>;#LBdy/1*B+QX^Ft3P=+nC9Xgg3-.kX9L/$<>W[x)8:]
U"a]fT4$9P)As[WaU96o?G#_d#9wWOi-esoY.(KI*_Jo1GJApBwqRr1#guFAmFGs$
U"I\G'\C=k.kh']kDAa>g%^HIq_;Fl#:Ca-VQBJqIeFnfIf<9r#,IKRbYjCQ=-R^B
U"o;DJtoP?_7/y3%&*W>tH,A?6[6^aUpYY\LL(3ohY4f[_Vvd[It3A=<<NxQ'f)]2
U"d$5i%p;vC3hEw)Lf1)8bicS-Ll-J2Q)n7E_+x&[UIN/tY>-J-rX\W1<#([\]V$k
U"d0+;7V\7\lK9le(1b%7c(c$A1bcV\=e\\N=TroYis2g^qf6'PF/?t$UKTRjDb0D
U"<&KQQpM7%jp=JjpInP[NB71wpTuZ:(;jykj#E90:qd?KnI0nKkg/4\6#4SN0&87
U"YrVfN)\m5]UWTfCiAr$frhacX\rrfEQgq5;LGIl?<E?gX);1rO#+ne>?9MGBcK&
U"Ta[K#7)3;re>h9.N^kHIoFD1cr4xZv26G?uPK#4xAg?lJ/<d6WKtj5U)'LQ4-+;
U"pIaN-Y<T0<QS5PUN[u[zpfrl&p[cg<g_z<siQu^Vf1ZtYqwsIY+^*iFoQ(P:+J1
U";FpDgv0^QLLU+%(-Ph6vAvkJ[sw27jsznYzKhLP:ja/I9q1I[^>9udp/n>F0nX]
U"U4ZtHt2D7]Ga\PGi24%0<MEz/w/'O;/YT$T1b:<J(&.Z&I*qH0.8]PCYE.wAL0;
U"qTtYL(ONg4YXT.JL.r^p]iZ8ep^r4V3kti,^UIIe8^0T^/L1MSBX^Y$[bl\[YDO
U"tob&1bQl0I*:Bu=VFfg3=t5SM,jsLA%xzaFhE8^mmG0s:#[Mo,;c491b.MTn/qQ
U"kR%eM=4lQgJC$Pm^DI<ITt#UMYjTh#EtRj6\*4d*q'>.]TK$i+l*i'f]j$<$-2?
U"na1Ph1(30Z4ztZ$\EsHlb6rjC<FuA\/jsI1VDTfM04pL49%ELi,zNZsbq6mGkRQ
U"Vghv$TRs+ZqDUMGdTLlJ%D;T]8kCHnqX5Acfp<NS?buGiWkZjW0GWK0Xc+25YsM
U"at#.swE.)X^Z$V-)O&V9zB3mC:g*849Xsn64qORvdl)=60rsM[L-G8Ck:Q%bOK.
U":=6:yAbglS'V\98+Hb98+H(3hj6*fuNJurHgg(Q1v*=oxv.LD,klFkXT.SiaeP#
U"Oj.'IkE&t7f-Me8[0j%aEvX>lU;EDQcQi'Q2t_o\=c)XjPA#+E9b8EVKfGng/'<
U"K/i*/p3*TDg6P??4,\l&]4=Eo**6*$,LX:2<'H*HQW_L#feVz[67kbdQxu9R9Kt
U"NTO#lT8jel4O<X=dP1tZYw2?3W;AxKWig2bOT90DH=4Ag$=b0U?]3xMMkCbks4H
U"eu,UWH9fD/vFdkcwP,if=nJQ7#X;v=<5^Q4#/d0kCGJxO*nN*%idu+NMphBV=V<
U"kT0G^Vx2jCCl4t(PH3ifzo?XWW&]=*Y0bYsj$;na(iIj'Q4ir1VO<dXCaiX'0(G
U"l%K+i^xjJDKYWB/^QLADI*awIKf^#lGFwO(j+d_CP0DX<,-4B\nJN,fcQNUaqt7
U"gp#wa3BF$D9FMAJy\?slhm6v)\?iHR-k$i.UVQXFr=ZJ6?CctXjWXWq2feKZn'=
U"JbfjLIl9rGBt;uZdmR6r5(5l;[zZ+fX.4jF8p_n4ZH&hme5.=G=jvkc<UK1[B+P
U"n(/W0_b(Cb9Pi<Hj#y<9K]oOWJiOn=dpD>dxq=*xWu/w&;ES.4.Kmv\(ZE_t(gl
U"JM'/VlM2/mLM2Sm0hjR,P/^k%Mz/fQTTP\Ly$wPl*f<S2PYf-7pw$;%R#t-d^?d
U"P0&:Bqdn[Vl\0&O6Atqsis*v7$>Gqc>=Qhdbp123jO0n[uop16GnTd0,ml[sm<a
U"h0iPnNktb0]51RyNhf%Z6w>z&h13QB9nM*N4*JNh*N>V&89/E*74]E+mPOw9-je
U"^,wKoV8)#ce:%&_uFd0dc?7&C_zln6-B*20H+7RqNf*xgAoLv.<1ZEQ:o*za0'3
U"S?6q:EQbq3j5]dRYQ0==0a^*ER;5f/'TKq0^u#%Mfr,]0FL_2hd8mAI49Vrhg'5
U"<s*Yx'UV$&OdY0oF=D-^o.Ci6pRS8v>lRM=P6IDb6'mB^'uUKuQ3]^SR\1_]I9;
U"Sk8Mm=<_awNq]o'l/\&9ABFH1[/lqZ\WNA*7K2Oq;+X\e8gW0lE2l+bSu#oU+Mp
U"TVK_R=.C/QpTg':'_VEeTb(rl(UiQ#v;I:h$MJ)3.Qa^u.;D2pEk-<XLhG-iE=#
U"%C5B_BN)pI'0FPSK1'WZf04oHre3/\SbR%8m+oY3)vPb+2la2*e8>R-Hx7,iZb'
U"Z+eqFmnEEGX\HO=aSKNaQ)qYLr?\l.EDdn\RC&GHW?Zpm(DC=lAdapDsp$>aQ+E
U"MT;^zVM9'0&YdBk6[Z&AD/w&>kIVV9PGDpBo>Z=Zi\1_Mco\8jJ7XJ\WZyXD.mr
U"q]M=r]JOdS9-BVUPq3O5TuNFW&)A%rgq15UT/OIH\,M3dl2pLg2pk/p*GDFNK$z
U"m##kyi#'^6f[qjaBg_MSYM;34aYq+Rx-hrrbmmkyTUMt\E8QVqno_h^gJ]d5,Yu
U"%I>n\CL.28/deiF27SGpytJ(=0;v+NtB4W06H=8D2?uOs:#-x:Gwh7#IP3f?1P:
U"b;/.'2jZ9x9L_,7ohZ.0UXFehK.GMt_9ICc6$P9f,ay=9?*Z),1__n/ieHqr^se
U"od-;A?e-M1%P[cKC5>*[>UHUYW<6$$\5UFhWWwne(?bn/A7S)cYVX)7n&=f9vkp
U"WJoEUW8&YojDoSQhiR(1*N4wu#YC2]IF2-r#4o^gFFqNJSc>0pAFg3Y8iA<QaIg
U"Uwo'Hhh^eN)*db2&:K#eZ42r$CqV*zj*[<a3j5KdYPGX;(jjfdlA;urabbiFpsK
U"VlBrK_j>^Po%VROWdtUOjh<1F5W[7CI5kC.FJ%,r=d:c+FBTRkh*(k4?SH%dS#e
U"E%mp1PREpSHNbhE.mQ6D>[yhdoKXs6j/M(5A9#u,tI_RixC0:kmh:96GDhp^,CY
U"6ahPtr[dLr2J71QW:rXp=sB/)Ibn0f2i_*VU_^Fz<$u/d(%Ppf,ICCfa?QV<oB6
U"0xQ%oXZlYb=r2IK\Fk5'=GP=%'&-X$J5z*EYg,fqlRU3<Ce95F36?*R^HiyL+,*
U"I;\Ex8K$5w;NG(*<:H&#j:ZFm]5T'VSynr]l(TMAq+-I&H:8=?V[?F4F1mCj4/3
U"3/vV*he]I3*6]o34Gs#FZPW'm#kZp,#R$v\yvdIP)CDiHlLSx<Dr:S[68D>_gm/
U"/%O[z;erKJ%GDmJm&zpQw(r\^'9Irn+S=&SVfwzDk*wC-VDG0./NLKfW>*Jx&$t
U"%iT;z_TPcio/5f6'>(??JYYb=V%?DndiALh(<A0/pja5U8rYH3?A<fvZ^/)xzny
U"2hi+hns?Bk3\E(y^*dcUaev]hTx9;O0h5r1enhGCK98KQ-j5f*/WdO_[hE3x7%j
U":U4:/u(6__s(('[h,01e)TV/JK8*.M?4F*x>q3#]GM%%c9Yi&&GT]>P'ieR\;6^
U"BuduJl/>j=&ae]R2\Ye_Bb[T5rvu[DzLy*l#h*.ZnSo^b/(,0=C-rR(QFD'^ogN
U"geJ$YcLv)_G&%X'DPo9>?Bsv<q1L>_<4M]>_&8y<T;RLmR,oJZO7R3tM8LoWZPy
U"]LS<*c-iRFdh7*;%^0UvivudqEx>eu1z/#wsvgY)Q#)kK-+&Z3AwKX>_EA$u]KU
U">a$#--*hUSE=pH\Gpvls)<Gu-_gZk_4o4nh31?n0[:%X]%bji;4IEXelDOT[fK?
U"*Qu$fuOuA.tYdRp3e_$7j8uVX&UA'Mwa9p)5xUa)7eo+sQ-CUrWn>IZA)>[AA=c
U".>KIA>AIxX?ICNC7NTSE/Ro^##$rKa6rAmZAE9+JQV0%G_T)H;OGXg'%.tVBw%Q
U"BV50&b5yAT5,<Lj]KdUIQp3Cx<,(mwyZ\I$s9SgjBMQ*l5BO=Vn)&:cQA:2zNls
U"TG%aYHOoao,:?O*6u'u%GW>Wf61L>OT(Y-d(DlP$tZ+RV)bJbfqWP6;HWBbw^^5
U"%-5qVkpwHgnnhTHD2-PGi*ajNI*FHY>-)l*=<\<RL6HY&g6d[0<#ZW7Ol)M&ra7
U"[2GW\4rWV#QX8_S;an^0\tdQm=[h,Sb67OXk'-Ot(UE;_aQlU:dkg)1-^B*+hAN
U"eS_MVHobfLST5I>Ouk&FN*O5hGf$osu?Yns8#7;N1fP;NvY_H8KCtYDEQZ,V[^u
U"5B\2[H]B,&?S,j/,U;5?_Me&S+8fL=U55=j/5=T7b;87q&E0#jp(c8sY7tP)q.k
U">6g:/YG&4(_'70PW8T\0TH$U&GROmJ*cYBZH3g'kT-_l_6pA]RT-;NG'q0su\H<
U"N)?]N2gA+**wY/Kg^<=&LINl=UGBk>q'u&p$x5?xC1f>lR<lR(h6PesBHgOj:a[
U"C#4/Ya#0)]?A4^aFJF+t/Y2KP#v-uv_mo1<Lfh^i?jJy<;+LjDYHLmR.SE]kjd3
U"GW0&=p)]QPbK]bDS4I0+J3#BT+i;CSfM[0DR8d/>pv9g$-rmd:6A'hWkS2OCX>%
U"IUCrInD?s04YC^f/0(<el4?9^Y/OD8%+dKUAd_Sm>YZB-0-q05C60940JK9-'[e
U".T\$qSI8i6SIuse.d*F1g%I)7BLdkc7j$+c<UuR5$hS357_s8zt<KYc'&y:<unz
U"),z3:MYIx14%Nx+mgZ6WPwO7?E-+=j+E]lucC3n-GbwEI7,ePI?>8l1\yYS7]bM
U"wYE;kOG)8n(oDc:*,>A/;Sr6pjP8y?sO%=E$N=9\EN-Z+*cLo&&cRpckA#RP#nj
U"lrb_2S?B*\osSat^m>[4nM9Zd+c[tkPl^rg'KepCf?9R/ci*B/_E,>.DaW?_nUs
U"a.'RZ/5]J.5M:\y%BL0jqM2<k^Hj><8(-\rv)juT-CY)9^=H>NrkYji'\&I2-D7
U"mgi/triv%AYm7_v00v&hy3B]'Z3dAU?a'lhKYs/'rvT_1dO\P)b_%ZJ#mI]6u$/
U"&$]\6jLb-')%^Etf&iNV^oC9RkqbB&Lw<7t\Y[zP+\OEFeLpmR(Q+A,IP3SXpT*
U"jWa;wMZ'JT9D&yw<9$c#J<Itc<$Wp$_#boQ6FT8MMbUY^T7/m'YP]J)AMAbYt(;
U"8O_G/(tP>Z2f1Lg4j(Y>s54#;z9;fbnTVhr*o&o(HFvA9>j7zKAa#BMmsUAkz%h
U"kZu55,tt/k]]xFlmQx8BS>tM.gXrPc\=w2%><X1]A_pW/3iunFCQaG'qHt56,Fn
U"j(v5[f[Jc/H#*ed9oC6AG'GHtu'$].j:Ehw=&fUvLWWBcLA5Uy\h?muy<fG:wly
U"/(r;>ad)m?d4QajU(cfcWFc&Ze3F:\,PWiIK3,b[_9sb(,EKh/afxQOAEZP(7E(
U")erf^BSa4Y+\iDt'uSn6fj9IP5.T63?.\jYTBA&%Ydrw93l/DyK^asvFuAtL:&C
U"ESLSR%?aqurjs]j7kXQDBGEp4hn%coiAYV'804vLlSCyDV^Y&Ce]ZlY9:RkZS;T
U"lN3[ky;ZjZ[FSk7if[g>;O,Y&K5cXYj%clTtV'n_=h\6b&5UGG]V)1Pdh+M'IWL
U",4u01*9K0^Ymf#3/TJ0\>_7I3>6jH-U]#1iU_3Ag\0HA(WSPTax3]*?t4(<KRm9
U"0b'A9qpGF8Tk&m%4AHq*#neFmJTCP+.49.1T+0]nf)P1t8L3t((EITGF9tH_$_J
U"6YopG9hUjOXZ#=l4Y3\x_0ggl?uktY-e/l.$s4Lj3jt40Ew+JsaafAtv)7U_^xM
U"Iq:,ci]zGd*0.tG]3NR9]njq2WKN$adD\(ED6Vu1B?S4$*KR^jHs(M>Z%QE?M\>
U"Z*k\f$9.SA=kHfv<#ZnbO]x3/+;Q7bg\g6hiE$]]2fH'(]Aa;^\4*_sLfaj[.OS
U"KK_+E',1(>6g:#vZS.aRG;#GO:vOLDBm$rpw-v<6_i1Zl>ZNp0a>wJ+G4s8<XhW
U"B]mSV/7-Pw0'z31l_Hj+NIb3bk201Gk2\(\_4z?C$4(jHTmJfL=/:,m]*<NAJVK
U"T5.uap5o55>nOq:fAi(R&dn^9;S,7j3fh.m_)YKcs/#mCC.#3&=^5?9m$I4$sfu
U"FaoKmV>fv4F$3&qpZaf\k2$D)''gw2MWk<FhknAXPD9GB/QX?MMuh>MyC-bNIKI
U"*T.:_NOu]i,hZg:^>BT_\V*?RMX?eDeG-./MBNojdq=P3q+2$31Wg>:<?u9vQo[
U"C_4FDf;39gMM)Evz0I.3h<5*7P*G8]*DApN-P;bR:B9H2_<f?_f:(W_fj8p0Pot
U"4hltTfip.Y5f4+kas<,)$N6#.0;=lJs#s1GC,pC\]8Zjk-vAnt.s3qrE\'STGo$
U"9v(fRz5mX]bxaA9AShp)DK:93koqmBAl[f0t2I_Xn4kA7dmMcL=]T&YxFd)=\hK
U"-jR-n-0rk3S1nQSbC>4<Js;t.1qgQs$;(v_W]Yu7rHc;Sru2yhx0tb/$^0aJtU4
U"hpW%Y2<G_JY'KOgop-o?hb/&/u]fDjfQWS5yi^\Glq-N8t1;MvV619rV_f$Kx%<
U"up(%)9%%#%-%uAwUKn,0[%b[(%%S%-%%,%%%%w%hYSg.fxlz<h>SUj5v]=Nx?yw
U"1-9)f*PE#wDttFc%--MnN.E.u^5+UI%IoA.uoPhe3uUCgN,)SLZpW6J560<Ph-;
U"WDNs/yFeo>yrX[0nhX&C]HY5co7F/Fk*>XRS4<t/2cD2/*C.pg_GH7tBX<V^nFU
U"EpdN6UY>,4Foik&Od3i;SPx3\pDXc/$-g4#vA)MNAOG=\G-=n:b?5JRQn7\XHc&
U"OB&.w#k4G=^;Vc&d>=9oVCoOWh*#0p395sYiL6(AA\MmbCPw,rNjA:eO\e8WVNI
U"<'_\FdI)EmHBQ-EQvne]DeMt/F-I)VBeI'=&;gZ+TtJ&'A=[Z.l6d.Qc$,OX*#3
U"G^alOEc%Ce/)/XgXB;Q)C%>Wv6kwGT*=X3W'5$68T/i=\dhYqR^=7hVo)f2w6>8
U"z8l>M/qM1w11;uJP'PXf(zO(>9*%Q9R;i6t=M(x[TfuKJ6Z3G(,KOif6k8olo1J
U"+??nH1k'<06a#E(,PYK/VoHi-dRQmR[TJYIc*:STq&Wy:Z(?$UGD:m)#Bo)t<ds
U"B0X(B;#$w&0Jpt#<.1gck8HV'/sCZ;OmQ#?S]TjDMCB#g#ZQ4vAtFxin6Tp=t8#
U";gjo,&$&/B8j2)D1Z#lxiw5k9uym/qJRI%pSC^Mtsb23;EiL.]G#,qi\2Bo(t:9
U"6rGd:>ad3n0_cANO*lXkI&^db[.o]qH7gWv7[LhIZ64RD;]]qi;5A\L'=hz8<Fw
U")1n6Kej?5#(qMm'ms8Zv>wDtxc7C.w1J1>Ils1^8jYUae3dD20)M)+P_W_*a0(M
U"'=jt4=Sz2*tCH?Q]B1uK?ENSVKNssd7yY>;bq4YP+c^1CIJ74PDrJpjBEo^U5aE
U"(VWvbfFPaBT>zYUE)-,svmLSb<R/VP;/^Yr]Neelpn6Z*:2B8R'WDQ']19E/_R#
U"EkpHKwt4n-kB>,5L^7%G[Y#YAhl6>$(/nTqd3biPYb>n8CXf,#jl[UP<RYE&ze4
U"HQ]kohP()[NUhDZ?))*Tt+DEOLKeEk[Gvck>)Tc1ix>N>;1k*_07w5Ru0)e*(m2
U">F$p&DO<6p8u%p()9%%%%-j%egK:Mg]g%MH'%%%u(%%%.%%L%?>:D4ASC2GCDw8
U",tTep5K0]'xUay.n)g%)Teyz(#W7GkdhQMW#Z6Xjt*><nHBPx$7J3&tGbr:u$Vn
U"gueE5Qn[=p5IK4;VHBrVuZlTj^4]cv(_+Hx^+t59Ah.+Ks)EGWAs3\adANsATU,
U"g<ce?Q'*\B+2tFZQfA2*04ohQ#<B&m3uV8;MoyV_x%*e868-]oNF^k[[7B^C%7E
END SUB
SUB V6
U"ht&pj_%SA%-<<Jc:K6SOtR/&4Mnn-5D2\<EiZ\>J/Np=abX-M;caJERi:KsP$SI
U"OBdnZQ;sC\mlTrc_fm\_2UI=VZQh?NT?po]BVmx\dS\eyGl2EzS:n;WC[6am3]?
U"4=K8*ZIWfB.VNDrN5:.8A\,Pfi7^\^#K>=LvOXa8l:o,#]$c(sTo*feSm\P2M:9
U"<?%0'lEBD:?Nh/.BDRnO'P0S$QJmHzlK\(g9>\RVIUnC6#(vCa/*veez<1F5Pa<
U"s^.cGROPlK2U00-8uu;5DXspQ0u3>JWt\/C_M-$<=>Los:HA:NW0.tiJW'UivOa
U"o,DZ>*'DTa#WpjT3*]+A1v8;V'KJhSljhAX^\jiX/aQ<A%ZrX'2_Z;k%llO(FJ;
U"l8D?0:+DwvD[,dw2)2SG2Kr%1Y%DAn>dGj2XT>1b$o,5J3yLo,,2gb4nSP-#>2R
U"O.*%A,,vH/FA9KG2P8W%_n.neBWQ<nFSOp<j?qfHf>gxCueMk%dup&%'9%9%%%%
U"-a%o.K4M./w&x:0%%%+f%%%-%%%%%%%%%%%E4%/P%#%%%;2>6>S2?2Gu%p&'9%%
U"9%%[%-%GGrfID)f)ZX%:%%.&H%%/%%%%%%%%%%[%E%/&P$0%L%20A)3BWS2?2Gu
U"%p&'9%%9%%[%-%/E*(B$<S$TZ%*%%'%5%%,%%%%%%%%%%[%E%/)PeE%%%qhi%Sk
U"ts%up&'%9%9%%%%-%:erfIb6m/w)j%%%)I7&%%.%%%%%%%%%%%E%</PiJI%%202
U"A3BS2?2Gu%p&'9%%9%%#%-%U,\KMPgYFH,#D%%8&1%%.%%%%%%%%%&[%E%/5P+K
U"%I%u>:D4AS1)0Bup%&'9%%9%%%.-%K+]KM_^*3%>%%%%G%%%%.%%%%%%%%%&%RE
U"%/P)[k%%%utpj%wSrf%pup&%'9%9%%%%-d%UWp%I%&Z*L[*%(%PW%%%.%%%%%%%
U"%%%%Ej%/PEAk%%?M>:4ALS?2G%up&'%9%9%%%%-%=x+JM$&:M,%9C%%'4h%%%1%
U"%%%%%%%%%%E%N/PNq%%%ut%pjwr%tiSg%fxup%&'9%%9%%%I-%uwIUKn0'[%b(7
U"%%S-%%%,%%%%%%%%%&%RE%/P-69%%%whYS%gfxu%p&'9%%9%%[%-%eGgKMg']gM
U"H%'%%u%(%%.%%%%%%%%%&[%E%/8PD=%L%?>:D4ASC)GCup%*+%%%%%/%%/%J'd%
U"%8?%%%%%
END SUB
V2
V3
V4
V5
V6
CLOSE:IF S=189AND 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
