'===========================================================================
' Subject: Decompiler                         Date:   -  -   (  :  )       
'  Author: Daniel Van Els                     Code: PB                     
'  Origin: dusp2000@hotmail.com             Packet: PB.ABC
'===========================================================================
'>>> Page 1 of SPEEDY.ZIP begins here. TYPE:BINAA TLEN:33806
'-------------------------------------------------------------
'                  INSTRUCTIONS FOR DECODING
'If there are multiple parts to this file, merge them into one
'file using  COPY PART1.EXT+PART2.EXT FILENAME.EXT  Remove all
'message header and footer information (everything outside the
'">>> Page x of..." lines),  load the result into your version
'of Basic (QBASIC, QuickBASIC, etc.) then RUN it. The original
'file will be decoded into the current directory on your disk.
'-------------------------------------------------------------
DEFINT A-Z:DIM SHARED K,S,B&:V1 'Created by PostIt! 7.4
SUB V1:OPEN "O",1,"SPEEDY.ZIP",4^6:?STRING$(50,177);
U"%up()%9%%%m-%p4maO,d0Ck9,%%%;9%%%0%%%%mn%xytwA(Sy'Oy6'*,>T_7hME
U"PwnVVG<4n+]7p$XdfLp$Zl1=\bG*Gt,jLD783C8tiPtsequc^v8DepIj+?V-40]
U"%'M/H=r]fn>Sm>9LZU3<#^)\cY(=:pInc_Fc)YQ4qBxgK&f?<'9mUX2S#U=ORZY
U":&uZK8ePOGx-gv$%6qo[o)Bhg$EaLTnXB;._[8Ke)ktE\<;\%+a&l'8xER7%,nP
U"z_sOT1GIYSlTVZZnF2(uPa2RFgFvONiCt)'rv.*WN3?/\B9qEOI1\T0Vce-.M?Z
U",2_t27]l.YRXw#ibxR7OA&U?\7OZ?Wpfg*rHK2.1hh*B%CgU6s:X]EvcUE7imV+
U"<(3vz/pf<s?/5%iQEXRQjo$9RIRET>Jg:%jA^-;^VIT22=s2I2>C-qHu9ssTVOt
U"q^w(g5Yvo<W:q?h=O7-)Mm;eCR'M8CB3D?\<uZW.71h5h_sgA;cVdUg::p*c*Sk
U";<AC;9RY[P=Q%=&R;8S=rP[r:p*R=6lay4WH8E7'9tHbXWZ;Nv,;NZ=L0:>*,6$
U":iWILY\Q.wgjaV]:uJuLx7XnJ$NvVQxZHg'.cUsxt.uDQ0?YZUSKS,UHO-XShh>
U".\\M(&w*<pJRU/+%ebG%64EVH,:pAa.\yj1SgZ$+dL&+CI-f5UOLu>[[?#/OOq5
U"nr2YT+eMwgmPh\n\F.vRcU2283ZiVA:^d'=\7%;QERB.:TB?(;*DA:?]Wqni_N>
U"VC-9C<=8Va#u3bThPdl2+\;$)H%\M3ZxbSW,/FxYjl4zQ8/:UhvL7.8Vr50e=7e
U":CU0x+GRrq#Izq?2I);D;XlOvCWH7T2'*q2u;-S?S43Y]g=a<i,[zmz5W?&k.j?
U"[ep3GT?p[YUjrj6^p.,Q32O]d#Ka(XuXkN;B=rd(d#bRzRF&iV:Q?Cg(vl=XZ;)
U"K):dU$hjOBXh[o[I6)u%CZ&'9+b$2lPpPIylQUoANYh;7j,#mL>ng5QYu=9wA%h
U"cLKs)C:&Pq61=t)K+Zoe\Lpd$VnVU-j)B(6pf,]hVWVbz+RUNk]+.i_OpldmxVh
U"2-qQUe+V^s0L0/.]2]b23x\*j/JU7\aKS50iYa0g2h/?SMte]GEl*Gs*\g5.IOG
U"AqDX62<\hV6#333kswfgJpnVAX&slPj1C6+(Dv<gh&3'2__R&;FPg*mEQZ*ZS&?
U"X3Nik?Nr5HU;[gP,+:FTOTg2US:rUQr_>IJWTB1SB,&/NQt%j3OiNUpR0Q:/r[6
U"5(1I[Zqk]Lid&Lh>sPnCT4%'QaLq4d(Qu6Yp?20ILR_#;-8%C)OfYX.n%S*7pnw
U"ik[9fOwl(M/]Q&LHe1n4+),6r9F0_yAxT2M6K%hHvniV,<sU-3_aSXL2O0n:+dH
U"mHD0+Uu/P\&Dgb-&nIZXf<9oIK8yI\vuU<9$-TZuxFDhCNFs.r+yUkLdPwBQ*4b
U"ZfiWK5kP$0x5tx?]Q5cbddCb8vj(GHJQCSc.ifE\7AMC6Al>TTnqZD-:Dx1[%+e
U"QZ:gBLpxlU8RJovhXlmSR^>ZQ^2D[:m23U=AL7Fr&2([PF)bo+I3j[5=rK'o*zK
U"/>Nds9C3FQh1kv'1d7obnYx=RR_pLxXKtD+GC6E$Z2?<aYK&+]Pf-C\4e?-o(R*
U"EIDZ]Yj,rntv26knG3'7HNNbUC?=JgI_D0UGZ_3gLOB>zd^pFc2K\'=zrKUz$'#
U"/F<VSH+*alBC]Y01iF#%_4KaAd/g&CgD%:e=tWT[O85L%A[N0BwTM+beUB5sJ16
U"GZwT[j<MNad]WvdaId3yk(Rp7ocLxTnPpVx$SMa5O1-x-MezHTG,MYz4SLh2B.=
U"b\DuZ_u2N8qJ#)yD6NOk2q_B4].uhu7$.pvH:FLWYx+(ypJ3MvauXSXec&0bW$/
U"R0%#^jw?RrD'iw,<V=phYvXv6uhmk16VgCs[sstH?Ge<4B6CQ5CakfQFQND:mwu
U"t_mOL+Pb%M/nr#>oL_FF$a&L$cbRb^bCuSfh&r\-h<qV=peuE2\oa;UN34>%LpM
U"]o?cR8:J-609h9n#K]-%='uNexg5;-R3z:[8yrK<&d2^5cjp3(:\nSIX0wd>6CI
U"6M2L>f0/PewUOfk-OahUf,L(N5^bzfur0b#(*pNK9f#a)NSzO.j?F_O1&8fXy(V
U"UkQsPxvjM.+ToFlo8Wksdm^%y181,('6MQtqC5e/oL&I7qwvmlEkidl8M$6s\Nu
U"JDl=m<OA,m8vW>8gqs)39)wGsra?rd0;vVdaPYP3OD'UpsO1i4_,Ha5'u1<t9PR
U"p(#w^4>;l]?Tr$.Y-lPvVHr=.O49&+^wbK9*WCEr_tUUcLcEx\OOE*RjTmYpTI$
U"BGZpK+Qrr1O\<aet&g2lfRsq8<1i:u<UFuQhX\wlv&5(VrDDAhvWrn325z8WSfg
U"o&^6\[#[l;zSWyvV&_He8WsF+x-qt\u%p()9%%%%-%%j7jdPJ:s*US&%(%['%%%
U"1%%#%mt&#ytxM#VSy'gy4a:,=MU5bUhPfX$u#E&tip0gm+_/0SjyM3fY;41m+[b
U"e81X#0+BTap7>BQ[N0:jdNXmh*x6a2PtJR*pYmAE0)6]8sG<Q/<.Iex$6-R$pz\
U"<H^9csYO%FMUNcJs]6ISmG#7hn,^El]Eh/Vh#AOs*2,;uven&ZgMiaCV\m2S'd+
U"\TpM&65N:#wH:i5yvhGTIAxZ&lMu+FHCTh;k,(%*=t(DZq4U+[Q:nBt,uHN6CZj
U"]o$vM&A*i'J<<b<eS=)t39RjA*F/qx8:N%h<=?Cptg'f(hM))34EGRfBRaAo.cW
U"O\4tumsr0jCbr7Bc5hJ,<^jmrzZZkG3L1QXVpyC[jAL>,\/RT6sCtda/$[N:67u
U"3hFvjhpNpp>8pjE2xfQ[:dsQbYDk?iL2XT-,GN8^[/OR=)x2&aY^K3g<;wD9IMz
U"#]SX+-P%,iRJo3$h?VIDoa4*l-9G\(u#LMp]IQ8%Xa?pDT8fexfig05[wt94Vw%
U"+up(%)9%%#%-%A%mzPR>;17G#+%%/%:%%1%%%%p(j(xy(wMVS^y'y6)'<t#R^5w
U"-Pxx0cL4f\cC$T%T2m]b'BR9iGmv(-v>S543Z*[QJJ:T_NVNMX,BkgpJ&fi:$LX
U"mH5\;dXT&z^q^)lZSe&Qxy/C1K/AhU0PQU7AEBkYZ8?^&X^GD/PfAlA2_?=mi+m
U"e#<51'9eI5Zj$tFNsJ]f'#A:>OqAqsmm7GY8G.<wl]v-(q6\m0oV+qvS\D4IE=Z
U"*k'i1\(q7dtU1Ms6q3[Q0.Chmo->76.v1mbfm/>*04FU1c:p0\j3CE^m12gcX/f
U"-udB,EgtMan$v$fv$Odd'0pu<Ul<A#Tt]bg*v,1.No;&Z-Zm9paSZNbfDztg&dD
U"T,&fl$M*1%m-Si^C$#Rn5CF1X5KF_5h$GCh[Nv.fGdQwc\.Dr5$c5VRi7uS?aYl
U"8_1*h-R>BkL;lA:Q>UnPU#$I&<,gcEAyOmIKIR=95f6ZeonP;2d408-/%BXg(dN
U"9X*[[Ext5='lD'5S/l#thck<>rIT(s88gQ(W>,q%Xb%RX3?X>P&wi%o,t:E1l(U
U"o]C00>N;),%yNXX,dEh&H&u:d0MdE<g[fM(6qS(^HB+EEax=G]O0$q)St8j4mI.
U"R]tPXl3VM(Xp_k66Y(nWjNDx(hkwy//=dQFZs0cEX$ge;WyNUmK.-MmC;4v%;1M
U"f4'gD*8)2,fp0q\^pBqi]k>Bg,YV'.DX?.[5eh,4#cx*+<QVu+fj:*DjJ*f*TUZ
U"#Kbm>O-PW\t=l6SJyG'a2z$qe3pqR6XRCEhKJF5Bhs04ZpX&0mgbb/\MI54z?-A
U"FdD'l]*N4r%[vqM6?2\dEPjl:4-+v0%gN6]B^Q8:CASgL9;wPg?c<3S:<upmuh\
U"9f2*wKM:rDSt[]87GW\>j,_KHX3t^8W=Pf<Gw^I?)85lg;[UzNV-p#r7jJ'Kcs4
U"5,A&5'vr5d-B,PKw=tB)$r9#]lhTO(\)0c5I:6Q$DQ>RHIDQ6%=QbT;B,Co5F5C
U"e;l,XpH'Fu4P34-5($n:CAVE&+md)JPoSm;K4x7?k_J-Y?g3+NXnWq$)&Q4FP0k
U"UBks,WA-[IH/N1]29DVl,AM/WNeSP7eTr%BH]-.ulLP^-t=fe)fw=,7H/g1SrLP
U"1-h[c5':M5^A'fA22C7*m,fiJ#/3P/RbPr'7nAOf1J#/hTjTDT.KwJ9[gs:<n)j
U"AF0H7E0opQxc_26-Q6I-:-c;-76.+/kPC*576&_Qf8nH]+sM9IE^,S4^8e(5L0i
U"(ALbIYjkA\i>OY;k1=A-JN1c,z6g'*P;_?Ga+>as*)4l5Yvcq[dDz%#<2i9_QFq
U"0fJXT.6aR#GSMKKEU>t%kDIM/=J\YMeDg4]*0JIp(g$Sd_di;C&1g.z<GAi=;3u
U"r5(8X9iSEmzak5$DsgPF-PGM1yy'=\d6;l%PxcVaG?WOqB(5kw<(QRY#3MEI('x
U"txo5C&=jrXF?NGymAT2%(3OsX'MnNBgGbL6g8HiuQ<L+<=g%&[,_0S3sxt3^U_z
U"&zTFimAY4VQcTQy8*_<Z\Ol0h;3J)1B,p?dQ]$k4p2gO%r5)xaTANx+,.>#oVzZ
U"WY#fB*^s]a^HfG^/-cEC%PUsI)m(sAWw67:0u5%G[K>s.Xyoy0['qFB#'=fTC4]
U"w=5Q&<aeBA<Ii:'RHd%7p%Jd\tW1vnss]]*G+yM='P]E?<lh#_</f>p]YGrd>b7
U".g^F'w0asj;4Xav8s)]*xx8b(g5P-MUd*R8DfwQbQ#ar'9,G37:w7'$]Jx7z1VZ
U"1Gx.W-M(9].XZ%wNV*_SY[,/SU>I=O2CT$m7.&ut.nMHiFq'NzhHJWmM+qnCcBu
U"&rBBcx.,M;<^/aIpTj?J*Tf?P+h?,rx-N8Y'6MLBpz$M&'pd[WD\<?%G\cjV/8;
U"<.xOQ2N^p)lN*iBg2[#+\c6::)x-i-#GZ7oBwqxFQMo-]cBp$*_K[3]WLQ.211e
U"idn=mc8VLj86Qcxpq92QcV+bM56*S:nHMYu63[I;Zie<)Y[Q_PjI\Tx[j_.Qw%0
U"up(%)9%%#%-%J%4jP<pSDVB#(%%d%,%%0%%%%x%ujji&([Sy/'ydz:r>Tka568Y
U"2Ngq,$RUID(+kGcN.X\%Pf=xL<c<BB;X*f,B*$PU682NGRXpSe/Z)7*k()el?j_
U"6\,zXHGa>8t)YZ::,Xsv[Iu,R9R>lk_Dm0l^ZrWul3Y)vP&>,NNDM7<OlAK3P<A
U"ao.,n2VONN>^-a'pN1e8lGQg)v]-sG8](Sd[]v5-/?HA%VK8aMS,Hc\Iib;_8fJ
U"$74ON:GD?DGLcXDyHu#(<-hgfJ=uYjPmfGePTi=Y#jOm=6DP%^S2_XrZsHZQ3(?
U"G?=[gQz1,S]]fG&qP?#NeH'52=eu1hb47TcgWF1)U/UqB\3S9BM45k.?$7Ita^o
U"1XX0n,;o?H/7aq2]6htd^WiLbh4K:,6?3AF[LKGpVLW-3I1ik45RKfnM?8r;M/_
U"Rpb]8-3%5l]?OACSYJ$?z&H?PzV3/.Z;]8Zg9X.3h7(L#tBYr^07]ZgGY9k1myq
U"uhR,idFzFlNcI,B2_TLhJ[lc%tw8NrO^Tl/_wrvBffKdYO4H^WXxR/;z3qRWHtv
U"QW9i<35h:GBeU)Dnekzk^bATnB([GWcK\iY0V1huWl%AZ<=7U)KR'Ypo6qUGfLv
U"&B>PHCRn/IXG$dSpYA'RrSXWfschX5G;cD]pL8G#wg0+D<cO.L:F65#YUpD#&'V
U"$Cv.v%=W]Z&e-$WHNSIY,uBY2PL:/I_ZS<iHPof+W?C;v69mIACp9HBCARbq.Se
U"LMg;MMO>EChv%<_sV1rMCHQlRUM&[kQR6rxQIe1=av9+fORAd%vtZ1c*cKRS]1?
U"wEbnqewBtU)6TT-\qs^lM$:qh_8irJO]JS6Zu\R1VSLM5*f4B(?k(n[)Qg6U;4B
U"[IQpORd4(VhL/mlh><8(PB_pV7M5\hmN<mgTRhOth5b-q8)Xuf5>PHCG^n'T0V^
U"M.]Xu<^F]_PK1ST[#GK3:1^Fpq8^quK63SxPqNo(XqAt),7s(;-<0)YpCKMo]jX
U"i7gM)Q4,$H)3#V;33Eh*moF#/^]6W#>KP/f-\,vs*6vJv]r63;kzq*gR3\CU1$b
U"3i;umCg#mspE=)M2z9+)Cg)n2D7)uH0<Dx;7NiYjZ6N'U7WTIp8V44^YS&yT>V6
U"aU*XMdk=)XkBLj>E;$(M_0TNYaBd9Ed([&>qX)HuHWws_P)DOucnP*6'glWlo/k
U"A6:(,EC^(XXtDnlof\<%u?vtFT=\u#Q[#gcatWsTDjp#r):S:gsNR2:7,c5pb1<
U"R>u%p()9%%%%-%%m5jLP)(:%O1=%.%*G%%%1%%%%rfp%jify%[SgfOxN,<GB\[a
U"]wczl(D?o[8e8SFLNXalPArAjt;NOV?NfT\6(hYI(eXX9BBFm*2b.N%)Wf+.poA
U"?WEVGoE5rJ7a'V%#rJOh,okzh-^6XtF<iav]Op<pht?acc/uvm\Xuwi#xusrc8Y
U"NuHnWxQ+y:fN&.E:nvCTV0ut7PNCpWmvchsYxj\Y.xqJ--1cAi1unp;#-U/qT+X
U"8Kx^X8YmKd.nMN(Lb9Hj7us\hxq[=JFk\8-*U466ugN#j^=*R#DmnH)L^CJllbA
U"De08sMkRpN*M?7nfaZ\IG2FCP5vCALez(bKw\',vV6y7\:gwJQ6]*Q=.qk,q/g.
U"b0c=t1^>FgC5&yx[fzK4r])Grr2Gx'$v+8-%HVKrACiuYF-,Ysc2c]3ooTX8mhM
U"#3#jq6<p#5q0)zpOK*>_ORr5lKLK0PyA$dQ%Eq3\8(rd9T=GJWc<NKH?Xas-42'
U"UzwyTblC*YdV7yoLx&CMUF'%'FcS5Gb(UpcXP2BBk(69A7#\<Q(aWi=ODa.[j1t
U"OPdb(G)7fEFLaXw&JD+qr&y=KdXh$rW(.ahp%oqUG>4T]%=r(]1%Y8o=C3Ux7F^
U"X\+]P%l(f]J-*AdUAG\Rt>LZ\YF*;#H$Jf;#Mr][qHb3NkP)P>76a(G3m)GJ+d>
U":iQaOrB*=],z_X8tvr/U1X:[dJIz6og]yy#o--H:o--H9K=ylPEbwOU8xFTEMIP
U"ngeKs*KR=M6UQlUr)-lY9#R)TkYO8:Zk;08Y6YtgGjXPtvpH8ki[7B(b:Jl&3s,
U"W_%tm:j$ZMXqlYCm7Co*]BpusfCf''6Yv\7_V5/KLv4sB=mQRClNS-i3wy.*^gE
U"7:w5&1rvXN0[OU:dDL>*>Sh*;C2m&;naXJ*C7VNTaQDLgV[G9<TYyBTln'[,iq&
U"7Q$aY6klqU;6vuwYfBsC1ivC$5y-NO,Z5Udfu1a5BqU9guEiiqI.?8JGK-Y-lL^
U"GNdxXo/g-&L?AZ51C6KRCYt*L6xgMKKlMlFes2X2rgvaS&nV&S[8<j>16e*:(4G
U"DnMf4sp?ass?,pR4gXNGp7;VP2V/T._s5D1EYAvASbD'X9Vu0&_Zh9D8SVQ#7_o
U"<Htf*^8[4tfWsK4N(f>*Q1Di9lZafLs]\7+F&0G*-6b:-+>Ga$R16;7;2dHAc^8
U"k2OqT3D4q&it>Ip5K<I>xnCg\gk?Z;G\I+r,$3jT?FbprHSc&*VQDPM5RacmnfG
U":K6Fioc6q\%Kb=LTavS_Bkt,H73i3l023%uk7^1Bq7CLi-?8Sj8q%>&3B*bn%41
U"FOBHnl3,U=G'XCw?b<(:Zf=w5<:i;2%6<0Oowtc6$^bb86lrD9W'%0+pPy_r]^Z
U"8i^)$*k2>G*WJ'MV9'of)zE%J*[ftZ:[2a.SS'rj]FuXQs<;o>Iq,EI]$A7K$o>
U"Kq%SDeqy($f8[HN6yFYYq,9_fKZd#)C.9z$Ev-eSTzshQLPKaCo>pafbzcD3\KU
U"g#rPL+9X'ehHAwY7LcN0.35;J8ToJ#qGnnqZc-;92^Jo)tLXL3D4,4'm*&[bV/1
U"z3r%.^fIjMRiBSKR%S#K3So'$K<v]XQ7*/-w?s1dq*Yftf?79w&F5Bc<1u_tynR
U"6lttG1T2$jbq('7O]g?Btl\4R>.xmxN=&hmaHhfhH7RjMFY1T\6IpwF[tMw;Tv2
U"_,*1)&3hnwFZU7?u;.EG=wfgEV4*x=B%rGmeh3OEH6e)A$4WWT)$#mKRp?%gg;L
U"usYqK4e*o<g<h/awG>\'k$Fpj.rW7[/aM;Zrp,>uJ<?XpiNXqGPqB=gGcf-/<_#
U"PW=)/^i;h/a2\zG*?xZr(#xT'eoA#^ePhcPE>X3RWgb7?;o\j>0p-Iq\?7tYT6s
U"_dDi]tpi%=iGy5K1c:+'P,L0;*RZt&ZxKff(\IoHsYljXRr;NJVeBSIcgj_MyBh
U"k+AkbaBxaxoizm14p=[dD]z4BY69cruPr\OD>OeOMCO].=J#:VSXV//2[\v4f$E
U"j5]xCE\,#Z]W.KVgq4aXCsbuB#eh#vZiPC0Z?qGPl5uNRliV]KI0ODT]F1M3UB%
U"[Lqb-KZn0tTE9.NFcP%Aq$1'DDFO-6NVoH&mz4$Si/L8eb;suZVV5wXWOBdO/gf
U"Ng44DKq4.XJm_sBPJBNLxY$UTbWr-e>2BjgIao\GfkYw%j\zlYt=F8xSKqfY=dn
U"4%ok?DPju6TuwWk]v,YSXE4uN^fv&[Z+'Q?-J7bjH0Cd.qkXLY%cWOjuM_.O1=E
U"OVHx6-[_zII)<&&+4;rOl^_81fS1L55IJ^ut7Klp3hG-WJZVmHOctvwdewP_p*i
U"0M*5t<mC*DlFPWIhF:J)MzB&pwq)934bF6mio:]P[Q1:6oa?.NjCR)PmKbSIR3d
U"e4MoeW;ja1$HFh3.#x[XSN?t-S1y#qf9\K=vxMWP]S77,aASI[:mOIT5ele8i\a
U"'h*,/4>Z1Mh+ycFOKn5dI&WobiAtZiScWo/t'9Ha;1k^WuIyb$uKBV$bRo[9#S;
U"#R8IH$<3qv\e-_$l[+E,[q,+-AHo8v6QcF]anCZI,aobvJfH2rRmm(,JKv^,Qjm
U"GWa9QPGYRCA.p)a#/I:72-oHp]FX-).0&HieG?PfGR5q(,H^jp<hTm0p9/KLod5
U"KC:)6^^B-h&nrqq)j0HQOP$_42>>4NL#%8jI(D%mhnXw93\l:N;HqqscEZnSMT8
U"gm+SB,L-n1GK]i0Dlcr<F$fibjNHSss.28386<[Jr[$[_p6.(G,;GecF5:0jSXF
U"Ei3Wbv=m%1hX9PE8/iM6V<s(JzEPi/-tG/UqMpiH:k-npMLyqWg#Mo8t2uamwVI
U"1>v\)yx.8=ydsI/j;<gbTeV=gwE0*;\<EHl<TJ=q+5I;gn:b,;ulEkJ\T#\3(E4
U"?i6>V9R5C+lWkgeXgB/S9/WCNSa,NCK0z$%qa9GgAzLF>s<&S9o'B-VAGf%#jv+
U"<A2%=QKMswmt8Cf[v3\jB#AZ0Y'+SmYC'2ExS=M>.1e%C0j4z=iT-6,pTY;%Og^
U"i.%bOXO3+m916h>TWe^EG*B+=_3De>sBeZ.$[d*botf)KAe$prZUIL9_w]*MR#.
U"j:?-)T*KM+REF3'zM#*he35oD;[:[Z52o:7?Jz?tT,#eS>#a9<mR1[5cJ)J;d^7
U"z9hBs7udZg%?%(NPJsMTUQB*My]sg2ihd0pKSV/3]Fx.=g=;1US[i/D)8m5*k-;
U"emIt#kHg]=8cM)IDPAPe;\c(FI3Pc\#i\oc'iH^CJq]aQ'=tifG0)WR.UXzi/Z;
U"o%*#[:PG,>?(VB2_T9wvu=TqVm^-[#E7DVP:X(lqE5DVP:W(lq_36#j-sT']?aM
U"qs\Z1yhFMY1T5MGp/WP$w7-gd>Fc>==8)jcjK+rZDtA.uUB83[BjzN=_fY*1mz3
U"Fabu'LYT5]z#94.a;)W]lb_7Fn2,d'=lOu1vc)(FNIT;[s*/ICA6j:+b.McOWrL
U"^i:_ZZF\b/FYwZ-SbxD&%RYLpDKG;LL&(h^?Z3$?:rh>YO%JZbiK,ak#SV[Q'<R
U"qALeK3FCcoHFNi*Cruj=Z12Z1H<>h?Gz^v?g)O*&;]YkYu][TP9t6SCrm$7U^ji
U",JE^r7H$YZXd)n>Rz#DDt9eJj;cq_cb^AXUt?>H[C8swm+FgR:nD);;*P?6D-W\
U"*cP,FZ,W*RMP,f0*Wj/LPBF>0O>t$HI3(r7$U3(\r$U3((r$U33RNE9gud3t\gI
U"ap3\gIfa3\gcIa3>3Y4.U>/\:h:W086;F^(lhAwxxO-LoyOuG9[WXiM?jxFt43;
U"_iPqQn]?P\^=t7aYCh\raYC(hraY0ChrajYCT8QLa$vV*.gBZdGE3-,(h3Sc,W:
U"baU2Q5N]x=lH*GkHm>VrXD).h(2:X#$O5[%NF;'jcR)[,h0<5<\IU#=4?&c,LkH
U"/cI,kH/Ac,kHD/c,e$k\f7+VA\+cr?EXF=]#RMK2_>++A\+cr?EXF=]#RMK2_>4
U"1k\f-7b,USZCrQru9l168HS<]_2LDbyNIR.Ow;jEn337ekd8/;uVs(\rdUs((rd
U"U0s(odFUs(oE8F+HT].9zd^h;d1ojWKW^=;W?gl?FrR>Vn<-Eae;N/m,.eLs<gk
U"8/A+*I4B's;N5qKW8H2Q]5_Hx99wDNQ032W$F:>Q[S9MZ'lBO9-_cXs7rlUj[\q
U".-\$nD**_w2,w)b\Yt_./Ls/.57g+q.r3>(]UwLBANnZ1f6.L6W'T7-STg,X^;i
U"r-cIP0p.mr/z$6xv+W:B,vt\7T;[Rrr:_yx,0G+mXdn*Xk'DVd456hjnZXAb7IV
U"y5csE&IO0%F&Yd+)I*')F]jX;'j9g(17/$&qhBZ3%TT'iI*w4X=ZQ]sT[XMWnqH
U"LTC_v'uiVd9AZazME?E>Naw^]v=mb,=9(mbm?pn/r)cSMbA*J1);Fy.wN7bl*)W
U"E()B4&';r.#T33(mc7:kyoh=4E5jnC(\ot1fT>9992^B]8YdMKQua^tyl+lXT69
U"o(<N=8b)SM2.JPD3&pML/xd*0cs,ZBTd4PQ$w?rBh8-N3:;OLZ.Ng\Usz;.Z6bF
U"zgZl//ysgp*f.jykGbKD\1$ZuU3_ST)IIGCwQ2s\Y79OK)5U(i;]'aul22:0p%9
U"m;cSh/0:bI8Lxh0nyWNhtDfd#*^vvqCC#pJwg#UtrbYaT566;E&-qx;pJL,PT#I
U"C3POmICBG-yne>(UuZaH3HML8y,sm:yOjSs<AsZju5G>%vZtcbfa(d1I10fTB[3
U",<$eA>iDpT8N,7e.FyH#-VlauI.f4$j5,3lscG8^$pI7Nb*n$%$ta,BUdrs5sUn
U"T$<8'nPH)LPuI$XTJ=IrsuAQt?'IklL;giE.nlD%(9tvX(Csp80lV%RR9[:i_7%
U"_Q3-XPR[VcBt&Tb$l.<(*+T9]#T)zNonq)2E$eTNvNs,VAc9,%<w_O0N?$<qYf/
U"(dIbGk/*]KCXov?U>Zh(xm&blcf\gZemwEt$LoPuVP6Fu_/1*r4GivB#,dG&\Rw
U":nP0Ucr.R#E\mQ%4:U;w915on:1RU4eSy3/o/RA7*ou'ibtm3Mob^mMs;xwnO>F
U"j)37CDOFrtKB?gBCYa)Fx6QLzoIE_#2<04=BmuM\ly,EU1IJFgnLv89<0=<BApK
U"fjP<BG*gB<Xp4Bs#Z9Z3G2Ay>>58cj]#('WeoPsWatiP0,HWKE>WxnKa['\(Ia]
U"(No-HoMsW.RA?b-ShV)>54Nvx]uC#,uJ2aae:\oDiTW2NbX$X9:)-r:)d,kYTKc
U"qD.w)9QDrliPfOawAB]=Y;[(%HQcU-;[(H[QcU;'[(HQmcU;[C4\mz=b+Zp%3%S
U"^=%+]%E)a(/%o3%Md^%i]R]eN2Fyn=%Fb?z^PPN230n=)br?%499jY:Z]e;D9H-
U"q%z0>,ORdce<j1&CZ4Ni*KV46Fc:,o;[(OyQEO+/T5u)0*'OA;xeT/<0w=:?RlL
U"&vR;DVg1jP%J;D=51jPBI;Dg0*jP:;NX0SJaie/Tj1pWQa:/FgF6*P;FxUH1/&=
U"2SXCiF:K(oT-\cyw13_BqZIPt:%es'bkgn4Z%YccM$bX:OSnyOLH=Eam16Ykm&G
U"+VXODZJ+?,<H%STf>9d(b2]DO3b=O(kA%A0B&GI.,%aA/OmA%FIB&g(I6-oXdOu
U"*EQ%Cz-BKBZD:Jg^l0G)Sp?V=t.X54*I3%,S'&zG[8i'P^l%XU)=y;KTJbKTVZ6
U"bkBs6c$i6+3\pgxW0bKI[#9jdrhN.2&iU+n>zJ2ZH8:Z2%N8RB1OfCt\VlQ+Od#
U"eKx1j6=&yrE\Qe(')'x5;%-tsIiagx]<k3LoVA_4r2di_sU\F&/c\V^A>csI9>N
U"JUB&vag'PMCqA;945([Y,xj#>R2t\[:]FkjkxR<daAAOI3_0=&a]%e7,m'[%nAa
U"EB9AE=TW#0:q+]m8<I=/TY#fLr+'b4n)l(k:$OS1^_E3Dol(6<$OR^CuE3_ExwU
U"l5Du1_<3UupISA>wsk=/]3N2j$b6CfK;cR%.QCAez>0/N0?(Y-SY,Z%C?>,K:0I
U"o&i^P,F&tC>-Ks:MCB;w%3'+kb/=JtP/c$'Ov37'kb/C=tP/Dcb&rqCU0KF>Xo6
U"/OPl6i'CU19K>\oD6_Pv;r+b/_BtPGGd'e&f3G,b1/DtPWOd'/_&mDf-+-E,G_i
U"AN=q^1OXC_kP%XYT=01s&%DN7C?GV_RvI9%^7gC?W_O^o*U27V/&LPk7<5>3'm^
U"&:ZJlSWH*P/7#7r7G9b2*<sS9:kc7_;sSZFkc7;8sSZkKc7;saSZkclkE\M)/QD
U"s]i<8u0^)NZ$:^Kqh:ZN_=kcA-'BD>F'rHHIhN3S]h^[_ue$6ahFY[pvrZjGj9\
U"\>L'p'l(&oOkH&oOkhAoOk2AoOkRAoOkrSoOUBub=g%*DcNpeu1h+52C[N1Pu\]
END SUB
SUB V2
U"'2<]Wdhz[e%u:Hh=y>A7%zVWj1z[;v::b?qfRW4CAcJxUFqRV4*?c:S%HSCU_Mr
U"2FDtBhB4.+<sX\u>aiGc+uj\$mHY)I:=P5O_0L3x'/Cv&Q_AJM;']H:0%E$Y*A+
U"3>'pr216kQv_XOoO3egF>iUr=BQUX-YZj$l)069N<YE/G:H=lZ--<rsQB*Y714+
U"I'#'Ya*?aA0-Ki5phAUo36j*.\scpd?p,NVq-](#DrvD\,i8=KqfPrkwqD]\8rG
U"#wP%^3%$f#./$7]'eAh6Ol\45)j]+*urSBp<4gH5RK9$YPrM1%=q+0OK9%#\v(:
U"I8ZOjVwP.Xg?OS0kmCGdVxc0mWCHdxks0mCkIdx-W0mCJidrX(]T=zZpoLV?ew/
U"&k'd[kzl1K.0UVy[n/i%6LJF5N<+3eC/Y,\EQNVRp:VkH)J1]C\XC8E4WW'hET1
U"L<iY58KqnSRKfhUY6Ki=H?iucY/kPj],10Xb3?ha<4RKsZGEQV<b'hUY9Ku(nbK
U"ReiY7K/mnBKE&#?BijO.dQ8g^El):Nb8S$Q&ZU:_Tl=e*d0/aLsHmGZ;u*uFX6/
U"xe\UA)s[c[<#oCEE_,:^3go1GB&;th4KA$Udl_B'iWF;4a2XL>F0DCfDFDU&DZC
U"N:Cpk4'r5N*bzc#WDnT\=Gn/EWvEq.on-hdsd0D8R=g7h=i5W8qJ$hj)FJWGlik
U"a+u8Q\(_x3i_PtHgG[\#T>5n5j#4t5v4AJ\N>T;.rYXM=xJX6o[dl#Xl#YW.#.k
U"T#W=W\>72=)oq$Kg=$HiuL5QmpXjSmKGXT^icOn8yK;T1saHDpmIq>:HZ0=SvbR
U"NrH.,q;4rm;?\=8X7k_]F[^acI-uJ8)7;i&]Q.]Wa/y8agTDGM)1mK/:mI:8*lq
U"Fs5hhIPLJ[XG*CGC6u2[z71t_1iKQ;<Tfp9-5lNKlVFt-+l[;Rfkf3maRl/:Txb
U"_iJ]pa-nwcjvc0c>4MTwbpHe[XhHiGDS^[:1p'2+PPv4<k#Gtr^<nmbu-j6-F.Q
U"L38n*tQ<R6>cX6t%tC95wgCn0KT/h95w/gn0KbT.yD_s)KN1WxenK.qy4IwRb9l
U".MMhkJtL97cFtQ<Q6BcjPoXQY6vSRf'L0x*+EYtT7;h4l$XR=k'cjQ*5+xD09<[
U".HB4*KWbytzWX?NYdT$t4]c>bho=#TN>:^DRNhXzy6*q%7s+ZhqX[6l>=>xG\ch
U"D41m/N:2oeL28hZ8i$Y[^^fcOpX%Q2-^7Lp9C4i7vpv6VVKS#qPV)PSd7B>HPxf
U"4,O=c+tgjz-q8DSchqTVVar*ju'82us[u_kO[Hg)lwn6;t^u>pagP\4t\h(7(>L
U"6)utBD-IfN>g6WN'[n4;XH-'r\gr:FwpCHBLK6=8dr+2R^xuZZ$xQr<HPu^v4x%
U",up(%)9%%#%-%2#5jPsP+atZ#4%%N%[%%0%%%%x%ujji&([SgRfx6*<vAT]>axX
U"zAM,9rdiwhO,W+I$eC=<[8^roKhE=l6khV;CgjX_>.Zn?.ZK/k+Tp+p10P2OI0q
U"F*skuOh*si)JaiwDrJs29VvOdg6FPvtQ_Ft'D$\tDu+4t'1o66nCU,F2n'DfvIZ
U"Ib\t3IYJN#&r&>2eV;8vnHF2v[fdRU1s'cKXQY=^B[QJ=K]6etciNI7#lnmrZ%D
U".5,AhlCl4$YT1DYjl)fM)W$eN,G'4$Bd&))>-,0i]&S0+i;laFM]_vy6AV6U=h#
U"q,hANcBfBF?G(ihgo354sujz&Ym4nb>J\BD8E:F$j#%VfrGX1nJlfL9DPqsk8M#
U"YrLmfg?%(LUAm^0mU)M->hpcP4UKR<X^=D6irVlI6MtWcOGzP,M(PET?FQLW.mS
U"<Pqk/7k$;.%cp.s4o'-bAa?qir*aF%s/I9uqvY/oBB-5r*OJ_37CQ(&*-4hige'
U"/Ij#Wh.f9c%M%%i-/2fe%i#L.T^Y2raCbJvqP#54kbKVM(rwpCLQB<h.4HBb>9A
U"oWGkDt786njo/L22Xk\FLD;k6DJ%r)Y/q9tmI)K<C3:r:S'_b#*\Mv(;o/]o007
U"5BT7&Vk4iW[&_IDMChG2i3ZYdpMpJ;ln)-%-wW53x[2$>pbE.kOOBLY(HAv[Ma>
U"_A9cXR6r%.>)Cs+B0:EZz6Kb\KAekV9nY*3K\OSw+&?^J]-Yg3sF^jmWk4H[LMF
U".3_Ki^p0bk'.m9p=^I/1Np4.ct\oev6CsX=V2PWh$5B)d1193h,^QAa*&OETWkb
U";X,1q+F;Br-1HG%<$)K;[d.2R=Bfm%]Ks49-bh>(&2taFgquO\>/MhDd#7/m.C?
U"Hi*c.&.6Ylf'&[\E+(n&Y78rnauQqXtw2Hn#.\L.Q5Jn61KmsM#YT-K0C[rwkwt
U"lrC?\an??[Bli/ssHcT_K$]^=10(;gnCd+,SSEQImA?y'B'u<SEc'W,C)nIhRc?
U"GRXdi;cknajIb<65=6b8>I7BN(dGX=3^t8GV)P&SLMB_moohw(=B4*T,JRa=(94
U"$0Bf#EU)dherW2QTp#MHlM8d1yo\B]TibPg/Wd5G30%&Egv+#2\Zp/v]plc<O.V
U"p;u=mpS/0-NR[\oRYrA$h8kRJ-gV)y5kwAUsGh:KS-HQ#a>e16LTW3ke3nQiRNL
U"0#S$UB.EblTKEWiMV0R='YnEHLqkk)j=p2#SkBM4'amjC5k0aB/72rpy7)[ppek
U"#g#-oua4RUt7EahcZ4O$fAgLi>OsEN'Eki.+OT_rv8>K6InR&WQT)smo,q5rqGk
U"XU[HvIeG]Pxjrk4^4k0kQLfn[2.iq&EA=QJfE6He8J+_2f?-(DUq93hgDG#gf=(
U"gW&sX$^Kp:5Pu&q0I1<rE>T'kn&LpCd,V*c=+'-%Qbt9VY\ieA483)1mND7Ws(>
U"A'1<N-'.BA+rb(e\Vb$n[:.^$U/x*Hf#VS;B0=1=Qb3rZi>p0OF$c$epSh#e,O*
U"=1+0o:Y#mWy>YL(q)3'6TknMo<9'$N>bZ/ot-6*uz6-.)0GuDYb,,wL#F3jb8it
U".h(&Fa5xX$$qr=MTpHG-Q0f<?XT,[]Lq9F0wKi6)?p4]^DD:m1*o7)35P&[q6(]
U"nXuewmhS,V-FIUT.3cLCjgP#XuJs2Cb&FA:aLLL+d+(3q$abWV&N72w(n)#7_DE
U"A+kW%g8o<nH9$_L6MK\9ZPW'5Bozt0UTK=dTeM7C1tWp+9qrqIMiFUUd*u\e+sF
U"4ZZV*qm[f[,FRSGup==YObR_ZNZ?Hs5eo>4,d/;Kr(13i_f:74cbc<*1Ou[US/y
U"Y&RQ[D:T*qp?9v_MQ,d,DDtiL*MfK_koFr<UV5uayN^Q&I48UeN$ZkN(O%IGYnR
U"e8*ukxiG6,Cvex^Z/%rI0rH4o?Yj<dstYJa<_9XuX5F$\TCw])?7ZfmIGlU5^U3
U"r;+-ZSlr,4H#gT6=h$Z/X*[AH=]Q7^<T)PD#&TngV\GPK.K-S[l)DDo8Pa?d(4M
U"[a1itgY,r^aL-^f$uH^4XojV&LMU7(WJrn\3^6dk%k?W)q;#LWC<$>6sjWJAh)/
U"q*rX/J-Gd7OI$ueKN/7Yf/G^R29_WJ<ZDTm9KOrq=PXa7JwNKQ+k&r*p._?*$bK
U":5nV?W/(Ux2kuU0e3/rd*BOJ]dJ1l4k>\LXqn3u]fFM6w(6>jR]TJDt7Ie5X;BR
U"sapFX1#1uU<q-H]p;F&WIsg]md?S=^;Q+2+y$L'aA(l1J%t=,g)j$'*mtvBKSWe
U"#Ubgjv)qh;D1y)gK\(z/.MeRKX)1=?(2rW:/XBr*6^1+COC&cVb\ffxfpi0I%Y9
U"+BH(/V=2FrDWvlitoFgFimI8?+mb9mK6U2wafc%w;^Giv5'(EUiIetd96dVvR:o
U",pf[6:<ZF<jU;&kn6?J=grxVnb^/&o[0;\=2i_>R:(W7Rrf+m8(;4zMQ>IE=g[W
U"(&#,?Q*G,ld1Gy$?8n,;PphXnui;x;O+edQl/jy/DWKNLAL*v$VYb1Pj-)KCV^H
U"65G&#P?)iB-G;.QDv]:>Md#X5Lb<?J/6?*TXqE(>i]D_husJoHt#T,1Ga\YRpG<
U"mk8U_iHJMp<+vABzEVMR1k%Po,[,dZedG,yf]\9hRo.6]7k]?vU._EAnhj9xl>'
U"ljLCbxC+Hlf<BGqFzNJ(N:l\fS4(.4kB=B86nj,SO9-#PYX;fMxY3$#;=&lG]/m
U"MG-Ah+<V^q&V?q8(2u_/kT;dKG,'/jjy'$O-[A+:G*qdy-JRh/-&MH,dlxpJV$u
U"JCq*\M??<Ls95ST:xlZvGO31Ar#RocJ_:J:kdsc6P]0VMNmW<O**K$J5I>=)R&U
U":hdH?U8JhKGK6zHiVkATqm)4F#*<Y$OH>)2Ji;7o4ID[&gKtoV,2twuMhj\7wQ=
U"zR.DD1'T;\>dy3z^K;;HydSeDR/Jkq_#lKWleO4<dhC,(VQ_%ay.Cq*wTNHqvCJ
U"yh:/CUmqg4^-4ElTlfQhWnkMmlRsE_YcCeI7?H$^pA6G)E&[LUse1$_JGIiSe>O
U"K2^F=fIX-&n[ba)P65I4FyQ\bc^OZ3igMD(bHWouJ&vX:Te?nH+vxv\NJ^6M6I*
U"yc:Y=lFFVM4GR4r^#X+p8Z(76]Ht.xwD.jZz)S$zb->k.mBc\hk*sH+*Oe:P>TT
U"on-cHX+\CNRcL<oQBRC:ZMG63waTVur;MU:J.HLNSyBoF^c4dE=*i]Sy%nkor>J
U"<DlB;3&86f%_TNFhl[9q)uT?ij6ea0yevWQM7?NS(p*0eN\zW_-7*,>8uaWCFL[
U"(aYk]+p/Q^V%i4Fnb#e:d+,Wxkx,c&QbrCe,ajU7(H'Zl8JrO$>*cS/?peP\ZpH
U"/wZdCBn*tp)'[,#)GKK4BG;QaZ$nIy_8.P+n)Ed/BEA%X26B#/Y?oth+Zv=RJ(*
U"eF;BebptH4oO3Ik;c$Bca/sxtIMW(um3Y0W(-6NqkUmrGNj3.8k(BH:21iU(b#h
U"GYdS7jma7i,qeG\/_(Y;O-i593v_+gi,ljOe:Cta]bbNg.;Z^r?uJ5%dWMt)+X_
U"772f=;q(uCih#H?3QEHB#UCVgiNEx7zmIISrjKgI[a[$a<KV3fb&O&?S)-dEFGZ
U"a?h-sJB0Ngwv>8zagj'CLcEr?yS*EC(WH?v,,)I>d2Im-^ikN#iuTN2mz[)A$4c
U"u7KZUlabo:'Zk29Vj6E#%k]:*p7(BGqgACV^JbIM?nkofKsuhXLt:&kU]%0iGVr
U"&+5H]w3KZcI\BL\aTiWkia;6=0j)p+^7jBnPZlP8Lwh%.o;?qf3Z?FjaG>P0NzP
U"p22%9MbS7ul/nm=K$REn&,^lnDo2#,qs-RRpv.x5qaPuQmln*^y<1uH?Jk5sveW
U"-uMArkn7d.B'R's$g_*]3U:-+N36:jMY*dj+3A^U'ukLDX1Sy_p<pI,C$BO>8S$
U"H\LlK9^a>-4X6[1G2H2:&x26W6i\<6#-yJx*cQ.lSfx?2_NEV^M9TU\/3x9r6%R
U"6^WvZ*%nggQsBr'Oa&(Z6,.hJM[lUt;:HbHs8q.Iuie[-Vy/L:8*8Wo:K*ZPk$t
U"?rcbeN?QNbo#E%.58<1]1FUMlv<-4,d/6GLv>]fH/?_cHrG9;c[zFc?DEIl;g%;
U"SzUJ$::N4a$4$D%Q7NW9JtAHJDcW63;Mm<3B:KQ4F7R0)-SJ7IH;CsM#82[4M7V
U"QUq.U:3rvps9^owsOf*6xS:c9&D?WeHZ[Dt2E27M5VmLDjn,b7_:XbVJRX8a6Zc
U"OOAb0G<v'u/;uH]B$KQ#,,:n9m-N?l:Auc=AnT5P>6I-15uBuk$llB5,3zQp9L%
U"o6lw%>IAUkg-'+,LCj2JJu7?pl9*_d/'1EQO=]F-N,H]PNEWIotGQb$6%Y8a0Ul
U"re]\dloaQeATn)lvEHUG:7#^Dv7J8.,*.OLI/V>bX[FXuuxq+(xP?A=DW/l$#HD
U"$aS'#=,9CLm,#]k(8L48/vcl+>FtZkz0>*DtH\1lLJ^MC_taD%K,G-'-A\o.1e[
U"Q2s9Vl\)yZZ7*4=yCTg*u9x6Qi]:xqRtJ50<_q/rg_(ApggvA&gT&:#]pMnCo5j
U"QXYO\Pw/rtLNbZr(E/jK$aXP#=uzrxy(^Z4IUNF8EI+lI<$PRj_6/</n8\q\pJX
U")R>7fhsQV_3]efi$Bfpkiw[K5X]rn>2v6vicvZ0uV&cVM$-3[Kh:7F0aN&dvsHX
U",9iC,OW]&yAVH[12:aT57x?8]d>l[g+w]P\QY/k0It]GCMbR&'av_/dc7.>^1pg
U"1WbnO\kNU)/EhxHk;WVP5q,6[s3JlFPxKA$>.7a#d[V]6<hRtuxi6\ao(HRKd\e
U"GY+w.^TAnD-G7+CCQvf&Gor>WnoFn8CZ\.]#V$/VSFI5[A-G\G0->d+0q:w,91B
U"87++8k[;N[DbTCJ(M2G+Z3?ITs=Gu8G[cE<6\#_>iA?Ya<BY1S=H;/a+Q^hVkqB
U"q1qmAg2I#OXL'$X0QH'-q9+B7=4GX&%>u::Lx&mGr_r]hfDv)'tlT^AP2uJS>Bn
U"p>m6oithhChkuC-1mfSJdD?>VCrNK*DbcM;BXh=tyfrCBmx%,up(%)9%%#%-%o#
U"8hP;=XaDu%5%%G&O%%0%%%%x%ujji&([SiRfyfl)*^Hls:#46KW2_O[>t;^#2d7
U"$eVBJ?Pb^4$JW)^$]Y&NC=h44bco'T6?VoGI:7SD,POh$>'98-.YG]k,:%P-hOz
U"n4yTG^xE-R4eKA(p#6rwLsmZHNNvpsl'/YNqwJo\,pgj*:^Wp0QjlFE13QuY*sp
U"tesp]Z&kh>\N$-g?cph*u:pNtbvcd(Yxpdn5eh^cp.Qtc$vbtC]8dzhoXyh8k&h
U".P,NxI-%CknW8oT.Rb_nuM(h/D'otS)hOOt;*fE+8ZuaPcLk5d[C:k.$(;$.OhI
U"v4PLs-e49Q7Z^4AMG4mP.dEWFftpIaMcF)14PL<TQ\uTKEt3rg<bXAOTdpw,V9c
U")io,/X'iLWd_$\C&aex<nFuMh/7D'tSZ)Pu8KjBu:0GIYil6QQoa<nuM(h/D'ot
U"S)P9uV]LV\.b&i;Tsr\4b9nj5QV9970eZ8N&qH?IwjW48r4ba9n5Q>V9700eZN'
U"Zr^on$(GAqQpnF>M\msaNwR*rqjG>mip>^'T[OPNhKJCnQ2ad,S\<eQlPs36q4$
U"T=0ra*mHPt9+A^<eNcma6L6xRqp?$^'_WgK24sapcjb$R,9P-#VQF*sW=g9fa7<
U"W=Q3f.sFIZs\nOr6C+s,G>\=Al4$tpCt+Gc^Cd)Jn%lVTxw$0?.kH\[=b(wjXiH
U"R;(xm0$Y6&m=0RHebGvqnR8nxHTI6n.^)Fiv\ff\Q,s>k?LD4,\QPj[$kij,MW<
U"/2Mi?]zv6D3;Dp'J]xsp:d:+G^B'iRN(RXpj$&-c1Pfg\H$ikHxDv6dHkC(t'=M
U"ElqpmBX?b)9)Cv:HN(Sra^d4PgzKjCWjhC4#cAVB/rTOS>l(PfDNGBkfX\Ov:#t
U"6=a4.S>UhdPXio)fe5tdw0f'TbXP=OqN9&pw<odi-Pi33.=k$e.bka6=0,7j3#,
U"^-C(7b&s)caJ1q^,I'ms.Ibdu'cH0[jD-(rXQqxL$4nvSj:pB+lMrd/pjjORsSa
U"3l5Kt\Tw&aNRyab9kbKhUJ&:^Y?HHam)wH9L\Z(:8R=D_zEF/)CLV^)<fQe=eBN
U"&IL=E5w1jch.9-rsP=kNxu?KXM)Ynkv=\Q,OZC78RAyE>[lZjm]fk6KTsTQOd[u
U"\Q_TKa_fd.jsvguXO7s'ZK$eyR=17urGr%XWJH+o[,e4>HjmZt7d;c(smP\(HKR
U"*(Wjzik>+jwdGW'),eBK&hdi[c&fT$cfdDdp#J<$.HfCs&&l,=&df,*>0nAa^l_
U"#CbwgB+^xauf;L)Zt>te4b-EtP6%#.0^^O+[+c5b-H&xpZwHp:eL4,-c?bu5^fP
U"_864M4_JoSP=(n'C<1^I(GDtCwGVpelo2,c0[bu<f2PI24QMjIn?Toh%ow3Yha%
U"w3Y9h%w3cYh%w&]]T$NODa*Pq$:-=EI$JF,$V^_PLQTm<XR7>gBow9U[o69Y6r$
U"bO8(q:$O8(fq$O8F(q$OP.GzJM/-?JhCHmtk(MtwnB)sx=6axlGoxDP$wN)sox6
U"ax:loxDPPwN31cf3Da'w5i)VOd)9uFY4s&8UwYLIwLlIwLIrwLIwYLIwLlIwLIr
U"wLIwYLIwLlIwLIrwLIwYLIwLlIwLIiw)fc%aM3D_jIHHhV\mkX'*OTBT'kf0g<7
U"bthldMBQ0#]1fly,KSf^F^WN-qah9TXsDJ3E7D'wuf5T8SXf1XvqD87Onupl.p[
U",38>BUKDb3w5icDlr%fX&kkmayTD-u1d1)S&5c<8emu9b0Z_OWnwQ*pb5A<0k0k
U"tXsA<kF#C7W/0l7$DMif3$z6Qu:Ns^MS>8jL<>Hilu2wHZ5KTD.NTI8N]D>Qaac
U"c)o84eX^)HW[Q2X1NZTnDKP(IW1TcvBuno6-M;$L?OpwuGlav:oUE.Mj=_hL6tc
U"xYzuSN:x.l>x&joxzuxXgox'tD1.1V=Ev[ISFzDS)^'Dr3S%Oib\t?4d)vpoA?x
U"9%4BU?$x3h&P6Am;_wD_+0N_,gHOQ(luG)T?r#&sxXkH/zUQM+?h%0T:N6)F%h0
U"(IkbccvuAsMSlsp<acu?B>?N61=CSFjH\]gKH.ux&]XciE%x=1iH%GN[%8WvOjc
U"S4wS^cKfhgBmd5-Itf-ia(6u3Y=Hmx?UwbxZ2vLvu5vL^+wEpdGRr1:ox%-8uO^
U"n<(F'dA>Qn<FA'dAQHn<F'ddAQn0<F'dpAQn<^F'd%om1Rl[2k<Pg4V/v8?-O4V
U"V/v?bwP0*eUc%$=jbe1%y_$(>dGGeetXoSOd)66boo4ur)U'vKL2dmUFJ3pWKT3
U"wHJR>wrfPGGQ9*XVDy-_Dsnd$V;W+_p*REsT4Ul+(gTzfH>ZFq'hc>cpe4)LxYK
U"9i.-AuiSll]Q(n6Prronwk$;O.KVW8C8o/IcZRn\3Cnp7Q'ds1k3#<BUPJA[bbX
U"5D6Q[uGFslD^lj(ccN&sqleH4prUW\<S>M]7Z6O$b8wn:Jezen5fFQ?9w'iX5,l
U"..m0uElqRqwxiD&zwci'Bu-mn$N1Sr[bPfmv*tr<d3fA<C6H0Btc3GnnOnD_90i
U"^&h3+Cb&3cBpW.D_7p%E%fa)c$r:m%HQyO-lKI60v#LdWxCB72zL$ltovRC<XRS
U"rZ0xEnu8&vbd((DtBL,+)sd(quY>RGqtN&h\h.''OZWw%J2%n:&lsx1H-w(c%tH
U"?_IZo$n_l+v4wif3nwkrT(ml(jP7P^x1$u)E>]Op;GyTn*).O%t68'G[y_>Jib=
U"t?/b>4*Yn(:s/8%6o>ad>vR?HjbP(c]H;>BLe$n=/ZS\04$e(At:0$P;,jvFlu-
U"NgZ[XHmi#VfF=t\ESZwveHjATf,n<B_793Y(NDDmdf?35Gx<C>.ca:kq6_]4O%T
U"T\skThucKg,rZw649N<Kq4PNVtZdorgOqiYik<Fb7.<vYFpm^cOxMtGGFKStuVq
U"+i+ylrU3tGFsU3a8O0uFP9x5q4b\xq_,vk2dTRwlZSMix,cY80utV98w8M(75u8
U"cxbbYU/Mr\Tk<;E7fdVqN>hezL%B_tIAUa*w:$XicxFh\NI>,&uVBIl?ME;+C6H
U"Wx<v.Wk^'.oN3[34iLNeHtlB)rT.m(ft4N7i+;NBN8=NxcxUZw6>o&4suBfH>F9
U"P0<k>sdUpC)NZMx44\KS[X>Iio$Q_8D-,ythHt'rc-T5&b;k9md4u:aAx#YtxA,
U"SScHs$-^xc'x8C;NQrtj5xX=qNQq&mH]uO=3wuhoCd=uFh=dciqVWXU_Q<>?fYH
U"dbquHE7dguHhXNSq]&H]uoO3wu;vcx9$lnGw:xXx9Ej*l?cq&BucrHMx+>_dh$u
U"67xX>[0]6Yi*$6ql^NTx=l^j6x'[dDHMdm-38.8Rdx^o^d#uW$Wx+][dluBO6AM
U"M:V%Mbl'oj/(zJn>G7ZIkPtUXuVI_8q\6(quhq0[5N>>47%S89cxV2/SN?xFZkt
U"?NkVXYx+:8b%c1uwunF\Qwt8uXB9h#xBSMPw&cuo%YokpjXWV/tv$jNL8k>uFql
U"&q.jfT(ODOT>NFkRfn?rxlu7ujXZ0W[N>>[4%S8=9xV2$/N?xtFkt?VNVXY9x:8
U"b=%1uw$uF\Qrw8uXcBh#x^BMPw>&uo%cYkpjlXV/t5vjNLr8>uP$LLNGU0.eDCX
U"M.#T7A8k=2&#zf^)AQk%t,ujYG2tkUX\l4;xXd1dj.AoCt\5a,8#$4Rwpd1dj.A
U"oCt\5a,8#$4Rw$d1dj.AoCt\5a,8#$FRwxN8M[8]Vcn?H^4M\Gk*u6wNu;M#dMd
U"\lOCu=ku0q#wNu;M#dMd\lOCu=ku0qHvurRu[F5wqwZ<-k>fVB=q]V2$qNb0.[P
U"nM0Eolpr8Q4:Vn'HT9tAE%dxZ<e_fNkNFRs48h1i,bnM;0Elpur84:kVXFUcRBt
U"cXU4rtuuXVYc<h$gHe]LD>gVuwlwh=iHZpBF5Ekb_3E=MN$xF\q6it]$+$rnBS5
U"\8cHx4#K<qL#B*e6$6oddje>t%0T9hD2,4Uset.a?Jw^%yc(Z3XZKWvm9>iNNqB
U"cD^LnhkUnO9x#w8tVX(vSV$$F*1.Rwu37MZOLnkU>nOx#cwZ&utr<r$nz^6:Qei
U"bIas<tdox2xag%Mzwu,Zp4V.wx_8Is<t$?l#woL(qfos4x[9M<[LNnkUncOx#wo
U",(q#O,pnliusmLZiLsNB<dcOuxu8#+tc^2=d&x\uu$Wu21K-ILLJ#9,m2UTXe\D
U"eIta9Jkxw.s_FF5qmtQw>;_+:\l#F)qlB5o[k6pN0tK[Zisp\>U9VfYDO_u3PVQ
U".tbnHf>Hlgx=rZ=<Zfr?Z24bR9d+?q,rf<vVE0gOMEx,FDLCF38Y--EVB)owx4v
U"+TAHIPMu3-suj,t$8*cjk?qtj>1ggErinRuqzRqBW5o[6WpN0K?[Zipu\>UVFfY
U"D*ZuetwuvqB5ko[6pkN0K[cZip\?>UVffYdNtoI]Xi_bHf>ZHgx=ur=<Zkf?Z2r
U"4RJn&ALNcO4(eC+%QZ4sGZ8j^T\TIk^/fk8NCw*nMPxxe7Vck<ZluYYn(rLch$[
U"ub=wd^rZ.Y0Qgx5j\WcT\o>tlrYiXpMt=<h_]xxCwp*Mdw8>;*4cY>tlrriXpqM
U"=<h-_xxC0w*MPux8S]svexv[IxCwq,MXtT228jfxtHqs<q&uFdDxIp&JjLtK7_p
U"r6nTiZ4rxchVNPXQ3xjspV,*ao>tlrYiXpMt=<h_]xxCwp*Mdw3hKD=XdF$:tMX
U"t2j28jxUtHq>k\Hux<5[r0p=.Serp)x\ukX]xj_w6ga*iGuQWdN9<wL?0FNxTm]
U"_wb]puMhn7dZxci\TcxF<c''?l$[4l^p-x=xlhXS-mrNT7oa>c]5-8Qpsni;Nnj
U"g6CxZ]qq.=isGuWdVN9wL]?0NxY&v$tBMtOM-hndZTxc\TG_xt8E$NfM-hndZQ8
U"$G08MdMa/hVMu?ds0h$DVZ?[r%zHUz%H>;[j$]Nm>1%5EFfI$=fnNodC7T>7F0B
U":bKQAIhBF9DEM=*f#Rt:c<_=s8J8Cdtq,?XpWz.lt)L8xq%8F\aXs\WXO&jvLSZ
U"):Pgn>*Md)Krf&+8rd(fxv5Hn>%dNb<e:Cvn4pLtFH_;LU2QsiR13wpHtimJ%vM
U"ldNz0x\EnZn'mIXdl']NipH^PzpsIo(1c\5s^]DDsth456WrjW%5xbIjYZ6EB;W
U"Zl'[z]D9Az3Abqbfd$tZ1LMYsgd;<Tw4Ujd_5Okl;PhkwkdNd#waEGt[SK=$rd]
U"d\l],]D#3rHad4mkbI7DKrMfBtbu=QB#n>M7BD5;kbrXcU]rprM3BTH[rGDbnTf
U"U4eDbW^A1+q]eDLl^k;2dATf$'x&up%()9%%%%-%&p5jPEleb=&V'%%&Z-%%%-%
U"%%%nsny%SnshW&dJ9]Tc9?Kh2MV4hS_)Sa74*f3*CRqZ]vr2^t[:I/f]]82vBWY
U"aU=LZ'6:-V;afc1Y2X(Lb&ECo7DXrA3N(gi5*T:.%S/vb7G5g)A=^:iuT)';AgM
U"d5+jKZI+f\T<+/MGJR>Kpor:=LS8)tDZJIWx;)ip%txK&B+VQ12JQf:Ho7[)Z.g
U"eQuF?$QxBuW9)K&Zd2V/gkk[K'#S-4_;+&fS?vQ3YIupe3NEP6Nzf%YWSFaNL9n
U"A?_'9<9'f1<x:S&paBU-SYUi99rwDW<c/gJXhCua)r>H7cH0V2crUVDs&qvV;?5
U",U/wGAbE(17.VntG_'(X#+o+ENTALdNfIydpU^ghU)1*hkNS>gjA%=_R\tO+)Nm
U"M1sbY9b5$Qa<(r8so\os.^KedLRp4[BtmaEc8l_Rnra9ApJYh0e==3>tH91(ed;
U"yp/i_d08+9v?Vop%K.dhB)T)Pr)q^BvPDtplGUJVnXB\9V-=5Ixuau>2'oh#Zc[
U"_a=<7Z%jYCxO9Xi?Phfilv^5;A?#Xt/J72m$0:gty7Mcri'FcRdfE_depDc&9pK
U"u4vhTfv(K6Y*Up])OA*N[<-;0^3/Q.+ss0;p4Zr\o\=wx<jLw-ugZo$i6NOX_>0
U"(iGaKYFgzBpNR<wd1KH6ki2x=z:#yYT0f9/\b/dijNsksMA\4Yp1LbU#U3-T7+*
U"'>,M72SNXP9xN0=mXc7[t&[U5Tty&tdh,'OdF+-%Lm,Q4L9kFET6nc^gxLK)>vc
U"wh>'<4ebP,fh/z[c[:ZmsCg<uFPPN\-$,2=sieE_mRxOE$$:)kVC1[#9+1Ci](P
U"N%u%p()9%%%%-%%N9hLPt81,/.D%.%YV%%%0%%%%xuj.ji([%SnshK>b:BKT]an
END SUB
SUB V3
U";FzodJoA(u+GCKNM(eDpADnA>aw.n5jng5h-57Nw\SQsqiI_ce4qf^d%YCIm8Q9
U"fI;Fi*H47V\k>r4J%X?iJwZk2rKuv_F^qNpVmBQeHCEbvsi2U=O8PGSuj+HDU10
U"mS)CiX%#xQk$rNnpDor8&sg>oxM8CQX]&k+owJL9pQxM98O8.7W^.7U^cPd.hbb
U"=gMNbqRPU8f(ARfonA:Z-FY/yv7irJ:F:Zad,+J7j]4##D'wBFu'JDk3MpFf>&)
U"9jG*PuMBM3&UGrOu?tG4ph[lelE,)XbQj(X2[b4VB^jYM?]6^gMsB*HC[j,.uEe
U"oP]CuV<W'bj=6ZK+QRSXCd]uY[._LpQu#KMpw2>$gh[e*GVJOXphc&vg9<aq(S#
U"g9O_X_Z:vQB0>>4=C9kH]i6XI&dWkiAp5.u;Bn>X-:4navNg-Tb?MQAWb^86p9U
U"7o1C:wKUm6'mHBb>7Jw]V_hY)L^Jl?U**dLiEt#o[raq3:kA't[utXS,LnfHbjD
U"Nai#pKA;BbJZpshBMCM=khlanCS7fA$Bx::LhPm'r7&kj+.LsUxPCh6:sO?HPbn
U"9mBm4jH7\<U/xq'2#<<B.wqt_Xx07T_AnCviJM>CpUO]Jdgh.a9<hqfrukm\LF'
U"&l$qvcg\ic9ZA^<&GB5e^)_9hf<[ShpN9<taedfjC/<%%:EM;fQ5eWg+%%([c?I
U"d8$6E7$O3.qNZox9O]Ei(Cf/&s=HR%>d<pMmW-Q#)&Qk<<W0ihe]#7*903e0^6&
U"AC_58ACo7nI<rRl$Hw68,%]$s&su2Z92gYJBr#-Z(jk:gog8<.6eHRuh3OkTg_#
U"HcV.Z(V(:'-j/67:T2'D?RaT:8D)%4cU^=9C-l\3L>Plf()84XJm3IT;(LkK$[x
U"#4S+]1fv,[/Nk?0%'\rhTF.?Mn_b'kb=_8%c(0$iqzU(&^eJgF<1:2stldPUBzf
U"XDivj+,EO0H[asPIx:<S'h6K]u;8YAshM^-SM?Ui^7_w\+[S'MLe%#QdaLrW:6i
U"^<mRT5V/8:heY$?AG*xX8_Fa.mR-Yf]9mhc2W]IF1i,fBwX^,747(*?H\MWf.xW
U"HX/0r5(g<VYwLZ,o#(iEY24v^Lj)(9u,_d-LEnW1kwTqN5)tJI-6M%WT7RX;nCd
U"G=/UA6OHNPr/%wSLK\/Db76&=4^>]aeIFA4XUT#<WPCYuPj-ZRiLnxCfj2Iyi*:
U"WakCO4GSt^DR^-7?UcC%l3bjUU,Gdu;rD)zk8kAu(LfB,8'h9tw;fSWhMXC(B_I
U"i^6W9-#B\'5msFv^m)xAqR$c9[jPN?uLQc;uLQc9R8FNPDv%wSSv)XhTLlAXQ9t
U"8U)bQ:k2pjG)#[]Lv-YYvw:vAiM)0cMe$8S4VAC*%xB^vD*_6S6c'9m0FZi1L8g
U"\MuL-.imm:X$tRo<M9J'V_#9V-F3v\J*t&<=MKU4O?e[Ieips;hPJUQW?PfBK>,
U"::*/'q$SCdCWi,L?)Lc,^IaIBQo4]j,#ZB[&BO8MS,M3akq)Qhm:UKIh+Awa6f;
U"mcg[&iM=TR_osN9RE>9.>_9B>.?*cAnX]'JziA$3PDV:ROA[?>8?$\kIca.m8$'
U"d4L7b#I)91&oAVL^Zmrjphe/i0LeY2DM[uWf<E]8Ng8'Y(V^Os+AH(DMWe#c\5s
U"ic_F#5XfL58fRIU8>Yv.V;2/afEDQT>Kc:$\CsyceuH;Q?he1uSKuG#pi^zqxQi
U"h9d[V[$rLody\_[H+zg=R-?.#c+7mDbU^T/57'K0i2#1=L\=ZGRs87=jc>6D=<;
U"Tjg)_[1L8U-FdM90mG3XT_4aHLYH49t5>\7h+Lu28g-Pj>\h8EC84AJ>cuHU6r<
U"4aQ,bBcer-[<I=FYgKspelRgc?7;e78R0&P*%4.Aok5<uJ9\cFlbq[E<J7XljTe
U";mg:Z47qlV+UWh%KMpXn=VubCKu16XSrI)\o7ko-<6M)s7';Xlor=I6glhN)]Fb
U":i.m/kshY=-vu\o_li4*QGNvY,-61SZcl]Q8qez^Dv?%&wH0-/k$9c'FNZqa-;r
U"okGQ#'_RKDCohl0UC(-A.-S_eouFQ$WKeBB6Kf(I^fY<K\tNy=(Vrp%Le9%T-LR
U"19T_&q8b:->C?Odq'dbdi\:TNFHDPsQc6KYxnWs#>o3'Y=d$:]eWP]k0h^XK$A?
U"y4U0f?ya5eDrD#BK[Kp^$O%M(vvR+O3Ar(B#0e<gE.7^1vPFPia6R#[YVxMrP[[
U"o5V'kY)pM8D+dV0LCvlhCuB8uSgu$bIeVj2;Kb3tj>\lqf'U_U5TS(rJ+amk&d1
U"XI'u,1PgA*^;Lg2Z&A6sZz)':NH\)1v=Hu,8BgO&i-[z_S\b]&74EZR[=hyd2;K
U"5hi<.uzisLZByj54RAYiLo7K3MO<&,Kxc6^FA(*u3dX*m2Qkdp1MFACTZc^56LA
U")iaMbosu-^Y0o,#'2yb=U?o7vofd0$?HeLnhFncqh'-fV2p>oFOF2uJ,)x3V[%g
U"EtDaFRN9_O'9?,P$\;+KQ.'.AZ/opfM&IJFpDQ#,O/#V*0Q%bg-:?M<Tj3AtS9Q
U"F'*CZ&_5a$GJHj/+,joX4,e,?-pt[hJ_'1%l_(7jR0(_L#6(Z',$tP(=9H72Gte
U"$CkRf^E[WtVtE0GhD'xRsU*kHI1.rfF]EDwl]1U<h33>MYA-g=-TUs%%kSv7*JC
U"Mp#aoj/rKIsQp?74$.Sdck.Omsi$*]D]nijW\Zvd)jq=2Q,](=0YQh:3S2)*hMB
U",8g+H^K9KPWTCx-_'-+bX;D.XI5zr,1i/_/#9lz)N(3OD_N$(hV-rt/=Y6jRb[c
U"zON1yf^DiWo&xcn^2stGvs\r^jH.8S;7x0r8GN#dwN[hs_SrUGC\GmC]R$f_RY8
U";e#cymOwN[5,+oBER.t[If2e&$T.#?XaaRXO^f8Ml]ZV>)74B3&6R=8SUV/IJ)>
U"T%VF%#SS(8\</.HgM>sQ7OF/dLZ[GVz+egL%H(c?C3D)Tg#U#t;7//:$;urI'bU
U"2fdsGv:y#dUI33dnvY2/T9r]q*R<JGS#>CU9v8y:o$rnDHQ/j)uCO%,RulV<Arc
U",=Ew)2YWFO-8AQ&wL/VSfX3eVtM#W$bE9q-[Sh]C]F:]M>7$LI36sdRFf=ENai_
U"//,1So+OK*5Yf[b$pu*)vVQe2Ug\%,d(38dMIr'wov9$ZV1v5pe%*>KI,4Bc_uf
U"0rxLrQ>RwKuXa_nu#p(WhLGBrX=$p2eHww%DpjZd12#wL-qgI1^Z5n[#&;hd-Sd
U"lpa=[wVpww*/Ln%EN#bBX1LotUFI[PHWeb+v:s+18[]eb2UN(ls=95^EL#CNPp[
U"-xPlfI[Hf?b6,f>XRLzPUwCFY/b\ih;0(ROb2>c,s;4YQD/B2mzGXmG;OK'k-K8
U"D[53-TPH:L-ZIcd:E:SIPU^xUFD.[jle(GW4hd)&OqpWoc,C?O__jIT-bGnSCL(
U",<d'3?O?pK50wPmavyiw5u<6p>p8HQPlEGN&E+ObQuATM%Nm:1iuUTacAi\Z7kI
U"#(L]_P)V[3De_C3VsHLGUj0jP^wY^ZAx)AU#4bRC5VO3E$LvqHnT]_IZu37/H3]
U"yzVts'%Q,3yV-&#*[)a>Rg8jr+?ZnX7i:26.[?Nt)^fC633:78*,h0(9=tuGe]t
U"vb#<fD)3&V?*&K:Z[Y5EBT]s%pKb2oUFaFTIAa;dFwv%3E05=0'CUOkRZ]5Pzpe
U"&<44hr>L0wIX#O&HC;=3<$;Hh(cvIF'2?gyS&9?;/(<,#=MYqep#&1K)iQVKr30
U"jPWs9/mT#rFeMjEEH5:o<FDDiDsaV#bG_0SITV+#NjbL=c1P_#>s^T+d7sM)Duj
U"PUGF1j/&1\-;CneH?K=0js2qFW7F-wX=mE7.x1'''+p&c),39ct/R,r:$Tj\;Cf
U"hS;;d$*aN\ecdG'wt(_*WO7[eT_RoJ_h_M-XWa9XJqZ'leZ:3r$a/5r+=ct[)7_
U",k[Dp33<OU=JS'5vt-/76ZQeppsPR6e24M$#RSGttMmvr:#$q'1fRyhL6i3\8NA
U"(pDU)Y8M'bgdeRNMi4F:[1OQUkGrbKAp=lV]\:tPtC?z=hS5UH<)%/V#?rBL6=x
U"SjSJ%LwFI&.Yh]WHbGf\IiY>,LAepH&di(G^V&I9kSHmpMJ6PVCl25YG8Ba'uz:
U"Z>HfiaxVaLNFh=mW$,<6,X5$sNEb4?f;<b7tN_qL<$SFff/V^+cF;[47q2$jXI:
U"q7.38SIp>D^=dxV0E<$xFah<I^$dg^.&Fo/.HUWf9N%T_'B-VuloNpwZLKOYU;q
U"hr?iKwyud?B-=WU?k.ATRo[<I8:7C;2cL7ZDlBl3>toC)gY>ELB8LF2$Z\G3)5r
U">NF:rM3C\F=l63y,e*L4D8s1n]O4:]H))yw[hzj&T#1jV,nri?NN3-<f,#.^oQf
U"1c1YmKN;6B2cbI?M?v<1%I$,zK$Us#PSF/(2G>dYhn,kTpva9C>d$pL,s7.;TJ(
U"\j+v%,BaWS7XfkZF4#z-]oVV2P4ae(R4]?e]7q1V[Hd>r..hR4)$?s(ad?,tfC6
U"XGKahFpPg1'K.:I#<mh5Dl$Ro3>T<+d6E(1o(gfaCE\xY_Fum^\$T;t+r6'l6^:
U"Cg<ie_YFWP0G'-mBx>4VC)R7GUV'ZAu>edZ/KCi9p]cbX1lLeRsvQr<5Lw&p[(+
U"tDg=lvDC2MZNll<iB&RWs([?_&NK5^^)^4jMcArP-.r.9c)cQV*s]KA4QWYQ6a&
U"q[e9h4F^Ml4aa7^Zs^VKdf(^n\bLA72Cft=5Abmw$MZHNAy?i$GSw7?dmYc#d4_
U"]mvq]/5H/88-2m(E\/USl(<RrO&XA.KrfUb4eV5[nb:RBR[pGzRN<-E[0%bc6m]
U"qEIT.sQAY7Myu]BN/(m=9vKnK?em=BUWjA)27+,<(]o88mMW=ob=beo+/av\_(#
U"ps+0TnyWZ&S3>#Gw_WmFuBcqAHQ&*bYFJK2Z6es$tW?<TQ?u*-&Ip\TG7p7rLCd
U"5d*G-o5CL;&U-Is3jG*-/2<mLI7)U)pG[.&%S.1d+.d6l\WbXQd3oela]dAN$>j
U"-0dPQel0T'nxc;,NR>ONtk4'u9OuRCwDJQ4M?t'$EObLwlbme*9Z22dY56&wG\n
U"cOma6-WoljT'w:>BF%O9mg-toI*pl1tCb715cPs;7t5##*-\WdRM=,sFRV#%&eS
U"81A-Ujz&<5E2K^n#RKTa$YNOg=,cA7BvlaH.w3uX5K$Fp_Clu$F(nMrihh*k52(
U"<fcl.\)OJ-]?6_)PB2Yj4p%Y^?&0/'mu?-iahrkdH]LT^e\n==\(\R1r(V-5n$5
U"fU4;bWMenLp=:LVQAydjW^0R[t(K\w#T;G$>=83KhmGdqK4heaT9l2v,emVJ?f[
U"^3H_pGsQJBGmLuoe$HmYB<W.Iy8Ai(>:N54Npd'Yp%PZwbpT#uA\\ARRmntQW_v
U"dKt'=#u(,cngCJPRjouk]g=>NpWi_GfCYg)4E3hYY2dBdMwS%iNY\bs_g94Er&V
U"_Y/TRaS%JH:>\#hx#rgq*#ixY(u9kcocPl5vl4S_DEe.2?<0QhHst%;Xw[xI<j6
U"p7Gd&4SvWk:ON%iP'.^S,xQAprq54?kf8zYrWku$)b_Mas_-Kt=>j[QT3>b(t=z
U"ab*/V'g3<i066Bah>7LI_5lCMcYr2YVoomoX<RukgDguAk&BzIY,juDJ/2OlB^<
U"SZN0BT's=B<0V_KjsY*Pxg5E;9#S8_#.9XS_*7ObKpEKF8f/36/?A;>e3=$=4>N
U"<_Jm*8GEbBo%]A+.u/w9iCPLR&TzNKRLNXfo6MfB'ML?'NgTH-d/d9,R/mH,7yw
U"GOMy&k^9iDkYmY5^m-%+qGM:G+9V3fwl1<PLB&bSszUaMtQOh&xF&#;049LYWWm
U"*jf/a-DiT(9J_oQPjLm23K*wB]NY>YIONqQR*6eY<5#sOfmj3cn['UA&jjcdcke
U"xYCCu#q8B8HC]Q(Tcr*Hi+Vr^)E2j*pK,?p(.HFE+ghuqegWtLMoF-?Ghy0D)Z#
U"gv.fcm^'i;aNNXc3K$5zF%APM6dwgWf)qk,KwZ/xNhKPBEaZW&GUy27Are\^=\q
U"%*&zR4xM,##'WA=j-LV/T%z92BJK&qj=V^QqO]-cfgY*::B)rMWH.:Gm_>I68'c
U"KM2VN-[+YnrRR3]3PUucX\DsW%7MWt<9[V%2.6at99CeRS%4WFvkEIy22Yf*7$Q
U"P/B-]?;'J2Z/&W2T)2Q/lkd*)SWQZ?s7ERCO1r%)+4?:BjL,gZCL3AnGSrWB;UO
U"0I1Ygh[nZz2+Ox4QDJU8S[zqc%''i-%VZ?[lBIZNJ'1W-#8RaqG%q5CS(k500pl
U"KX,GCgQdfRn&I.7b#PsQBhd/;nt2W%8UqI?JCC)2+nv/+Oa*=JWYQFD'We68%BJ
U"_YyQjLIppt_]sJvW,CRxTk%2y\<ag'A:>4$+JfOjIJR0A]N0<GT5IGZ^lWxRH\x
U"t1L5y5+<*Ea)P&c%pq#d[;QlCY&d+wCn)^c^B+(I*w?DvaK3XmSVA^3(anwvl]K
U"&_LzuC3_Zhi54nDH(vH3ZRt-&O>;bfco7ci5XtG15Uu%1O<4m)U&,z&Cqbm(TGF
U"2p=h,BVMMcOo&aN9qdKN<2va5a:nrchLkLk$L$v8FdyA-I:RL%tinhM'[pn93G4
U"*q0*8'n7,vbEc<8dqO21$Q\]QDG&:s?/r;qn-A>%S$OG%>7K6pdCODa;pXB?F3N
U"MlmdZ*qanc0wwxp8p7X0C<wk0B(l\m;n=EN2fT'iIP+I'icQXh0)pA8WT-ZJ,,;
U"xy&h^RVLH'0[k[&nEeW]M+0+3.q>c\>6DkKfr40aR/XXKEa7K*JclCbX5cq;TB6
U"T4wZa1$<od9zeE%OtE42tl/Z^FI=6[goWP'3DT.hTlUB.#Yd#Js5Qc5v8Oi>LBS
U"9c%^<W4.OY[*OJ$(r7KZuC.r:Dn88_dfue+7IYv)YgM%>l]je3IX:j2o/kSl%;J
U"YbOc30ZdDNGE,EolPCtN:<InJwhl\RFD&i,svVg4G9NALZtPKH#7/eMOt+kwps4
U"S5D_ERVW$h3ejj[;sB;?:$I9]U?c#V$s-YF1CuoTRSK>pO3QieexJQS?i7P]%5'
U"G8/(M[n5puHYQHhB/1;DzAr-9?>KALF0(HHj2-EI9kheJy562^-&c:dyP4#udas
U"_weJ)vcGFm2GNEN9yfrV0VN5JAx5AECSeE(lffXMSw6RRA<*5TB/FAHZ%y7T*gI
U"VO__G-(olN<OsCT4<+v^gDB)OlSep&Xh+9%qZ^1.DV]nSnda,paXl7LXL_L]=KW
U"$.89UjPE7'dFEhQVzF\7tgpuwWhL]U1MAE(.%.dj/U_rYQ#l51[,cZOD\Ip/y4;
U"H24bjuW*WLR31\/+mLTm9Ze0+bBCdu=?3MfoI(88rLLNMbu0TI><eK?u58KKp0p
U"*bj03o8Te2MbN<rjfVmVam([+aKTgmZ%jB]m#QpQUH%o]<9OlO/gD62e?aBYz?T
U":k_oY;CmWmh=hQWOHG?IxtKq*)QVdMA#E^V#CtNApjy6'b+Uyuiut'AWf\&%yNx
U")kfmZ.G?AZ('\,;-L_.pXaa#-'u1M'Im*W'aTfUX(hNMnIsBGUn.h48nc5c4Yg[
U"\l<T'YZ)+.hfNH$4;LT]ye,D^Xn_3xM(vFvvRE'59^fUe\i,,cZep++[sK9/S4r
U")?yh1r>%sbi1aM(&sIf*nS,HB[;mH8ZZccmmC_8f:;IalN4TK8js5P=m,3=/ZFv
U"ApPFMq6gKnZ)\3+V^O5=<B971[9X81r&)ga.WKuGO+r%Hpa8:TZIcZo'XhJ##iQ
U"rsA9#AyM*a*^?&=9\(e.1Qgu#>1Nf<:p&VI[lqOD6vejMKE4QAh$P$^%BmNtPk_
U"k3a4hQ9t[rZ6/siPRa($gu5Ou:JZ0OxK)a80DhIa.J5CWX-T1Pq)YJB[WDk.g#y
U"_TWiMPp+X^5w\96cDvrLd_dr8#eXfm+K\.OlOZo?b.JMjxjy=(mv:N;1Tip'*Oa
U".eGms/4/5F?&b-0;MW<A^*=KTiL7INDB]%fGaffo,h.j2H_-(Qmyh+8/UUKM[=/
U"DC]Yg#bnA(Q7U2'u1rsNoPqu0)UaKc7]K;a^Sbd$?G_6EdO84/(n$xC.6C&[+),
U"8ro\R2>?Tlbc75?3)Ad26zZVQr#,$YfatVqgahEE\K)PbM8tH[Vg_7F$/;tpfVW
U"*N^itzH.aPzNw9+NRZN6aCh;V6f_p2r<B=CtM$]$B1OulQnW:>wJYFcA<J+L[NQ
U";d:L3:rz=E3?4t_jRLd1Be$2+Bp#]md5?P'C]5);(*0,e=gVU,0k25baTbWZB_T
U"D,U+)Uh2IP$bpF*5,Yi:/+pXp9SHPp1>y6-MAa%T$]'nK<K,r1_MPc'eotca52V
U"l-lmk358ppg<5svs>2s)QokJ^MjTU?CXld%:g1<;_QNF3m;i#4J69<6xx#h3o?<
U"Y3ws7oYdssX08uO5*;NOcawb9[=5w9B-d[n'\:3F*O2_<7X]\1/Z3+t(3(g4-Vs
U"s91.iA1FRLq_m+ghsl4wklb/Si=9,Un/,4qUJxbAB_3z5$-uXgo&Ksx=,veCyQU
U"xRKdqp?(e,3MrcqbwR4%^$h\dvdVhsn=I:OBwC;*M3FiD5+fc;tjN>O2N[JDI:e
U"o>tgLn-B,SlR<8W3>%B<Ltv66,B<YRd0_jvfZICv6jVVTn>_o+j#Rv%P)k<k?0f
U"9]5woj#e\Ol78RnP5253c%>J]LV#>nfx8q)VM5X=G3Ub&k'LvW=c.R:^:Hnak8d
U"QxyD9tTk/DF]YHdordfuLuvb1xWl3ocOGmNI\UTT0>0zqqmtC(\D2y>:N\:u:%n
U"N?\NKMh8aK'tzGZ\a:COrfcnLF#VD8NE;qjVb'uXr&MjOi&.E(%e5E?>4Eu42k'
U":Q\V3Xl\Yt(j*UwV_^kWCdjLfm[UrYuA</AiMy)^t.q(6dn,e+MBa?_<#t<h.wr
U"0S,aePer.p=ev0X22m&RP>2cP[q.mSBZT((p7_-4RT(&6A2.mYjPDc'(Ion(iI:
U"hjBLKEh$j88IIy'aaHHCe6=7I%&oaw_b05.wIKEK$.HCKYjD3MNZ$L;5sTTP2Pq
U"5bM(0];ir518IHmhZBv+ogfx17K,xO2rkKRrpt>e\FlNi088xE&((yso%xo'%3y
U":R=&+9.ezH6Do#2wsO'wT/&T:eYa-cAW1kVQX032;nblxfi^[_.G)^fOEG:eDqH
U"+7%X&N^#*ry+ytf#^d.?u,CDffZoGyo5oI\ZoyKN7ozg?_3.A9llb9i0qvYL[A^
U"/gb55tq<Cnd[h=[XQ8;nL$EaG7pM50Q<WmPpgAv)C4ZYn<Yc6c+dUo0K=V0O0.4
U"=3PUiEG;?J9YPWg]XLd;ABhKKKtVWuI505'(RT\m%eh<aGRfK)XvY4-DIcSG./?
U"1XPx+-i<_QtT-dMTt/0Zlpm#?PhTAW&EAZm'iqG3OE?(^$ZIKM1Tj6=Wqi\4^hG
U"iFgA^=7/-%UCdj-VQ1A*iYk#qbgwob>*>H^KJt$98[t4;3g^/vV5b>?_C>lPBX:
U"NYbma0)-ocfTUlhxb*r:.Kt8R'oI)lf1i73)Z7)s?ft_p868%/n8:;jsW<^<?a2
U"C9+pVtf2Mn\R*d;=Qj=j.m\;I/Q5sWW2eX]EqiAC*3lc^_;r_peX+)k./0npAq2
U"s%PGRHxXjK?Kj[cG)ZK)I0,XLIdI;QDaen.*oR1;3n)aI<2d0UC^&3,0L*8>Btt
U"^l(-dU+,l31iQ)ulE.S%S.PS=BlX&Ilwh(FOL-zlHt:3f]'zRR(.KyCe]>sj.94
U"A/#*A'e_K*B/$Eh1f]#sQKv<tu\hy$k1pT3JGRr&8:qmel(m.ys8vn.9pleJG=C
U"f_$O#G,:ES=-8b7>'vJ/3vqCltiwU_vM;eE_.m&>EKAI/HHo+WYkS]c+QZEfxs4
U"b5r_#-GWn=1J(^zI5:gXg?uO[#oK9jK79U0Fl6FFKRyCLnl_LhDnLvbeMtFE+B=
U"a4d/;;T6UvUA*HR\jRch3>kWU6ci>XNcJL,1*m<l]>EYTBcssW]IbES#_6<AWh>
U"&H?;KIQBqnwfmb:4i'on]5]o?sLd67B8bj.KYD.:3[%V<3Kr*XSk9WX9tWbqvpk
U"9LrFR$BQ3+VLl-PnnRcLvluT>i121Z$7q\3.d9#hQ$_l.5cKD8=97W%ZI8[<EOp
U"Kzmcgl'/*,H+-[+oX5jf>hSg1vhd56/uv#SG4\Z&,b;k/,Na[nbr\qs82nFd82;
U"'qJm%q24m,ZwY2d/*WdJ2zUh57E%1]g*7kk8Z6QKgPKfo:Cx5%u7Stx%0up(%)9
U"%%%%-%)#6jP6C:4Ae[.%%3%D%%/%%%%x%uwni%jSnsOhf(<,>T]7]wCExGPi/\I
U"zv,$^s1l';1;4R930e*Z1UVfI[-3XY]QAaOEJXL?8wqOlJ+k/>VW0X_i)?G7#DG
U"1kVmhx0lcvLb68%ic#hD9bY_)qQY/y8aoWQ\C+Qa=F=Qy8'E-exii6+5%&]-5=]
U"krjG8tnnp&<hDkQN4W&OZN[G6Uh)[y#+[mG*H-=mD$kRcX+4n#r[,;5.Tt'>RJP
U"q)?Twu82_LMbisC+Rv?,k?[Q1I&2z8cj9^rUebMa;c#8w=bksa[-'NUq;e&L0\R
U"Q$a)0=gCU+J?Gh9QP_zadjE8D*(d*nh;<^5.GunQ+]qQ9,Eh8AI;H$tA\?0QXG9
U"PhkbbZ?$e$h_PX;i,-x]mL?r$c8zO8Ok%'o%)%kRWn]n.)jzI:q?-q#g;*Ugq&k
U"dKSlO4&sUi%Jescbp:B?SXdc;6X\]Mic%DL;]b3q+fS>.2S=L>dV#fOd5+7k9e2
U"cp.kt<D(_ntFZXTfB,%lA4N?B8X?VfsXtGA59mSrb*D3nEv>EPd&rs#5WZ8=5p+
U"\tbXC)nLp_.T8$SfF3=pqDyrf)Rtc2VY7:f2?[o&M6Q<CRY#O;j2k-_jqCk(M4Q
U"/Qsh)IDcZ9+2Wlr%(<;(PY<NkUgbRv+raTBmn9&1/^OnW_rYAD=EEdHt]K(G,hH
U"pv\).IZVvf7;3DAO/)]9f8f*J1hAa:U_=2WZ:My,fh866YA)x7v$91'[%sVT==k
U">#]?f:Zr-dKXEMdZ#6ifwjL(qmtX3iU.+f)h0KAmA\g$<OsS8DQ6>0;.5kMcJc:
U"9KBtj^bB6bB9x1I[e*Y'VDiNb[F?bzDp7,OF'Ka3U]iJ8&x2%'o^G/hYT^p6Dml
U"+hBLkX0CmJk)/BAKRGa(reC*B/fn_CmB\cPY[vnYeji?fCl^AhATg.*PwU2uBKU
U",A2q^Ui'IIYXD]g8aUR4/rIBHmEn[W*iNMLPL&Qz9rTtf'vN2#+(S$y?A>/>5(6
U"^qr8A\k(A-F[_u^*_RWF[VQhB\b_p)[Mc'(ZY,/KqoSLH[Ig'_]A$20/x#kY]%A
U"*ur5)rPJjDg&iW.<hI0THg#PaLR4%GQH4>$3ZJj7RWTe-w0bhu;r2)1l?)$og;<
U"LG]G.q'kH=*7_.(rZlB+X6jhf4t+3;sRm=2*r[^n,Yj[8.x;*PPai?(+^QL--TK
U"CEy-H,C?&96T.:]RgP2)=2%%47zy^H&#e%^N#_?jSh2pCLV5s010TWvC9Wn^ST<
U"\&fR^i3H3B6[%/*N?LFrMGY]dq$cAwiwb6p2Ke)rstE+Tn2L;:1k)Qq;Y6vWE^P
U"Ycr--,L[7\Pm5<_3eic,b[9+3'okbIZzk_.F+s=jWs_^%G-%Raw+B[r=Y,Q3%fs
U"+'^/ukrO\ZM%q8\??FT58(sMzssc>r1Oz]U9TGsQXf.t-Z)G+lMVFn(J%#vdAQ+
U"k(Yt<Z'dN[U$&=-aGorN+G7+o;SBT;[G6=&=aoj,2TmM5(=YjyGrFOL&'LGHOYR
U"E'65c0tG-8LL9yk=WjQ]eQlJTVAEWG<t:/u6D\[$G,IWUb+0jY2W:qi>D;gVG/T
U"y8[2_Ud3b%_Ep&XMSmz<3[:(hg2OJCh_RyJh?5zLl2.\FuUOdixn>-H-=57Vh(A
U"jQsXBkGXJU0i2mS(vRuKt-qzjpPb<Taoh4bX_lLFPGTo,9R2P:D$%pN<IT.pw\J
U"MgZ,bW(=CLP(Kj^uSn?7/e.4N:-'Oa0_+^^?T>0PY'P3]8%JA+97SW#3oMBk]Z;
U"e)^^q?xBnf]lI59b[7IQ,f),XQG*VeJVR0+dRX4$*<xPmN)xDsf(EBxLz>u*pnf
U"4qh/r]MIZZ:%?p]uV.5^Q(U.P^f2\'S%nQ>gt*f/*Abr(QP)NoMoV5TWT_/5QNd
U"p(-DEpb;nlQGEF3BT\qk;nD$i)i$tUy_9-le<,zaM:B?#JqTHM[h4$V=]ZC_=T5
U"rrwr=nk<7BOyGd8n,ekn$ygDH0/\K^NPjBR;8C8Z<?6q*&c4htdV(\B&+lf+Zte
U"RhP9D-a0xb.&(*lP8z49,bdlmVfWTr&[dW+#Q&:=EqgZ5?hK9sc'+h'ghYw>#L/
U"rLJES:JEFR*v\<)uamM&o81QXJ<8nuLR5qXuW$Wja]$l.tW5jR(63l*_AT$KfWZ
U"dCqiOWLo-zKT79O8T$1R-ZG#+'Ah_SfSH*8*w(E4ez]OQdoRTp*9Ea%/F4<RaYk
U"lv$<dZSPegEVIu%2JElh*=:MK+Pu]9oQ4$Z*$Zcib,bf+VnH*t*JI$3t-O+eBBa
U",Fi$E/;K]5oZr[Hu3k/c78^Aq5yX>&?f83NZ1'HJjnVjKxfTd8VHwIQGNlU/>YM
U"lgPVk4iKxVxn.pwDG)kuYrSm^pD1+BzWEH7N4ae=MeIN3X#sa_Jh\RsB95.YQoa
U"D+^khV)E?wiCCo5C?J_+6oGA*$KI8f3[Oc]qs(>\5?C[[Eh]j3NZhkA6Fu]hhV>
END SUB
SUB V4
U"\LMwk7(u5243$K1,lxb9WX?v*pu+1I7asnHYmoZ8R0mmwq>x3oA3uVi7AzZiVr?
U"]x+#mDgYp(jg7D(PfUhXORsk-hkMY2E?L(gepE1j&jtQJ5\./g:s4/1Z0\F5CDt
U"a3^J;]Sf:i*y#3goGb//8=799s:p#;p6/9M^)Ji.C8=-5PaTb9eZounN.1#4km)
U"$^O=]Kf+]2+Lxd?a,YMVPudgC2lt&5(<i*t.fNl\$f1wFqfVzjShI.?,9D<\A8c
U"Oer*P).x;U:;[VD#QDl8uRUc$8cuifnFX<p2U>9x,9$MaB/96KIcYh1iA(lm><O
U"F#B%S:zB::2mmWTe?SWkD8CVQXH=x5cuhHFHBA1oKrrteuYl#BklYi8QHDU7o]Q
U"7T*qXMc+QqS:9Z\np#IL)BuX[wvT_;U5=IH4fPptRWois0ZVn8pu6uhu7mM[&'f
U"bA,wX_:Ylt$uujukg9WKF8x:VX]_hNW8R[[T3n:_3ENb],$pc?HF3'oxM:Fb9N5
U"?7lTgQ)6>jY/MG#oq9tlurgWH0/SV)aUYecFhqo86e/=r80lz\x_/LYwsI'N(lO
U"<a,-rtQSRC-qZ6%DI,9wjBX)6h=W3xy4bQV<GA]'B;XeN9zKck]8B%P(Aw?9v/Q
U"O\EE;ZXpTY)_C,cpv#03+#v,u%p()9%%%%-:%O._.MYP+&)K'%+%;'%%%1%%%%y
U"jx%yUUk%kSfxRr:I4+1N+95UZf&brQw5*aY<Te-I;1c44L1i4e*UZVVV,M>#vQ-
U"44(R?+V'pu7$XB\Fs3=9Z\[7Y^qiJ1'PSI%GVnm1/NWI%H^Nm#nOml[kGRb%mt+
U"WCgud4gWbT%\3H$]_Ok/2]ArCk8a4kh1&dQ9&qUjMj/>o1%k.owPYKcPH8wS*N'
U"KTYJdO&xP)&I\ki.9PVx*(M2RU\?p\8S%hHZe&k)08TP]oCO,]I._:(,a/uV3pa
U"rRZWmnpTva'H%+WGW:10aM<=GI-kqRgSoZaj73[';oza?5r;av%gm1nIF^sSEM_
U"+$#U'6$&WiiKAq5vX/7=/-I=GUS(F2M=UOU?7K?Ue#)[6'8Ph=3u1Ud8qenVBOf
U"e^B$<F.)UlUAq>CpeS*.3P/JW%QN:lO'*HX+Q18rle&TQ/,RlEe1\JcQDco'<&]
U"-,VYUA2Pr?1Dq0)qIGvXw#qyFya7NU:%9Ujq7.x?y#Uzq\<\?[IAv]26T;XGU3G
U"lV0d<T#rDYTJ'eqJ(+Mt'yt6RQQR$SaRTYY&SiARH]qRH^+rg]yr2$1QP3SaP4Y
U">z3Szr'#v?Lr=#j=$U^C<pH9h4CjgLaa^>HGH:pGs*(xxo;#W7tJxZ\kvH.7>Ml
U"984aJba]RxaNlLu?9U<KJfPKR&KuNP7xZqrdnVN2=SJg=b1JAqXx%VRE5.'V_'%
U"^u'Z-Iw(u%p()9%%%%-X%P/^=L*PX)dW'%+%J(%%%/%%%%yjx%yUkS%fxr:3J4C
U"ye&9UZ9hI-):O>iy2h3UFhGwu/a_1hiTYs6tLsL?F#0CaG-iY<4oK[nM[xtbnuM
U"R$#H,P_FH_G$:IDIcS&av//MpCcP7WvEc;7:+qf/>;gUZrE748p>s<o2/Dp^M]s
U"b$$l7.D*M)Aw5:p/1yQo[v>O#1.fSp<?tYg31C++IS86,M6,6,M6,6,M6,6,q6,
U"$4iGFlhj_XD7rdKPr6'l,<0Y/#j311+.K'9&U%PLfIn'G:x#qgeqOm-2q%dK+yB
U"Y7St#Gnyq1Wf#^D&?J_.q:ywY\cMoaK.mZ=O'_?c'^_'&v[F6/Y6Y8#/m:xRVw\
U"sg+sX-g=8#K+';GA%HALA.56$=J$]$O%_ijY%kYsYnoSbMArc27[mH?LJS1iA.(
U"\A8^\B00kaB<UoGBUBk,U\vir5q2J7F)YV%q.7gH;Tf:iJJf/C9liG6Jj3NJd=C
U"\v,bbpj>+bph.sJAn&13=5/gF)1w=KDUZ61bs1lQa:ULg.<4W,hHWV>CH19^-S[
U"CX_^jL=bb[NjLYrHUh6H]$_HP<>Op;>Ge[>:?Phj5Q)h7K>_NtxE7yXFq7\XEq=
U"XDE;5B=+V+tE<09=g*mW]W>1DX'OePX^1TJ'NA(W>9OW?.ok_$*m2]E*$r;p;*e
U"Rk%*\f:G.e5a$>S*G*e6J]>cv9nM3Qp^3Yh[B)]G]&YeA89#^:n1s#iXVq_,kB\
U"a<GMh&Gd^G-8(SZ\=jo5JW_pBY>49[bW<^DW4>(lKQo0qiKOjc\B7:5.k:kt[:j
U"j2XYh?=p[,eM94u^IM;8;W.rrHuGDcSZd>.<[>w6rxYx='x<&u%p()9%%%%-.%a
U"4ILO>z'&ej%%(%6%%%%/%%%%yjx%y[[S[fxrD\3uWG&C5)772e;J3lOowA)K(WA
U"h+;Ed.rRAMSutPgI\,KXfKb/3BCgyC_'Dkt*W:HYm?A_?GA9T99TAT'=T1%%up(
U")%9%%%d-%F7IiMaj&1.>(.%%O)%%%1%%%%yj%xyi]%ikSf%xr*%-./&%*M7Y?e\
U"krHlPVHt$c=aF.$5OE&SE16\Wg1[D_OIs[E2>A7g3kuJOGco.1:wgX2cIO4K-o2
U"+Bag40s%OeK9Eo/0YUOF)[/18bg;1_$)OJ%\/2#QT;3o?eOHkYm1<1;=DUY3:4G
U";06WiPT0uUOf(10=Ha=>=?(VPnqA0?Xgo>A_*AOjQ0d>P'>X?O*P1r;0#=$Q>CB
U"o65$\_vuJ3I#Oh+AZ=La]>>GD#Pp+]Z?\1o>Bgj\OlaZd>TG>=d5ZB=Dq=<Q7jR
U".KuvOQ(9qUj#MoVYLxQac/qY4M7p^CxDPYyq.WzwoCZyxR5iMq[)Dwpb'c857L6
U"b_aP$LOU(YqVrA7oXiiLQe-JqZ<7mp$SLMP]Cq:X,ao2NCr$+banTkILV7-m\%,
U"O^=0]2?c2A'$)L^W>8G?heBk$m'<2=P4'?d;:+$+X\2><Ng?fJNU6/3M1504,2$
U"&4PH=2m3ic6aB$*THr>:WiqeF5$m(Dr=Y67idZxq?FPMib.Hu_4N'rL&.7om;7;
U"$w=I%S.noOoKa$-%]IT%*NonKCw$y*MsS2\8opSrK$'m&sTEM%IQGO%KS(>9Cm?
U"WV$xE3dS0(CXoO+$6&e3T7,^CnNGA$zcuBrgik_v5]]RDr'Ct(?3M_UZJqv\8e+
U"8iMDcuZrP(F8-U0)Ma5e.qz3&8,#lSMe/i.r,f)8.fv(n(jz(r,,_NM$]Deqxlb
U"n+<3MPd'DrY*Vb-U4IMbPmnq&lvLjWEnptL$b*ds*Nn*QA7F0*$=q;,B1JQ8dNp
U"*?r+e,54:%7JUP*>y>%,3ZE%8R:t*#3OQ,7PpP$*XxGh22;\7H#T$=u[,K2R;8p
U"P*T?u//,64Be7Ls$T>'$o6\4lT<mol+0LeA:d4G]IhCo\Wlb_e#tGKUxmo[S6b$
U"H:TGJpP-oY&Q6_D>kGL*Wio]F6*$L,lCL6<&^\FDq]IlcoeXtL_qB.qKY&7o\V>
U"L$J=dqJtPMoZ.QvH>M$pVdvr^>xq<PNxu%p&'9%%9%%[%-%p]4aO,HdCk9%,%%;
U"%9%%0%%%%%%%%%&%%E%%%%%%%%%mnx#ytw(.Sy'y%up&'%9%9%%%%-%%j7jPpJ:
U"sU&S&%%&['%%%1%%%%%%%%%&%E%.%%b,%%%mt&&ytx&MVSy&'yup%&'9%%9%%%.
U"-%Am#zPR;-17G+.%%/:%%%1%%%%%%%%%&%%E%%%%f.%%.pj(x.ywMV.Sy'y%up&
U"'%9%9%%%%-%&J4jPd<SDV'B(%%&d,%%%0%%%%%%%%%&%E%.%%\4%%%xu#jji(#[
U"Sy'%yup&%'9%9%%%%-%%m5jLP)(:%O1=%.%*G%%%1%%%%%%%%%&%E#%%%N%8%%r
U"%fpji%fy[S%gfxu%p&'9%%9%%#%-%2#5jPsP+atZ#4%%N%[%%0%%%%%%%%%&%%E
U"%%+%.P%%%xuj.ji([%Sgfx%up&'%9%9%%%%-%&o8hPn;XaD%u5%%(GO%%%0%%%%
U"%%%%%%%E%.%%8$%%%xu#jji(%[Sif%yup&%'9%9%%%%-(%p5j4Pleb)=V'%(%Z-
U"%%%-%%%%%%%%%&%E[%%%[%p%%n%snyS%nshu%p&'9%%9%%%%-%N#9hPth81/.%D
U"%%Y&V%%0%%%%%%%%%&%%E%%(%^s%%%xuj.ji([%Snsh%up&'%9%9%%%%-%%)6jP
U"/6:4A&e.%%'3D%%%/%%%%%%%%%&%E%I%%<=%%%xu%wnij%Snsh%up&'%9%9%%%%
U"-%,O._MCYP+)%K'%%';'%%%1%%%%%%%%%%%E%#%%PG%%%yj%xyUU%kkSf%xrup%
U"&'9%%9%%%m-%P/n^L*P1XdW'7%%J(%%%/%%%%%%%%%%%%E%%%)JI%%%yjxy%UkS
U"f%xrup%&'9%%9%%%#-%a4IIO>z)'ej%.%%6%%%%/%%%%%%%%%&%%E%%%(PL%%%y
U"jxy%[[Sf%xrup%&'9%%9%%%d-%F7IiMaj&1.>(.%%O)%%%1%%%%%%%%%&%%E%%%
U")gL%%%yjxy%i]ik%Sfxr%up*+%%%%%%3%3%%B(%%*TO%%%%%
END SUB
V2
V3
V4
CLOSE:IF S=254AND B&=33806THEN?" :) 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\33806,219);:END SUB
'>>> Page 1 of SPEEDY.ZIP ends here. Last page. TCHK:254
