'=========================================================================== ' Subject: FROG CATCHERS Date: 08-24-98 (17:26) ' Author: Ryan Lloyd & Peter Lloyd Code: QB, QBasic, PDS ' Origin: lloyd-1@worldnet.att.net Packet: GAMES.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"FROGCHTS.ZIP",4^6:Z&=26714:?STRING$(50,177); U"%upUU%up()%9%%%I-%U%o^Iu[3p3J%.%%j&%%%-%%%%fr%rtSydnqLF'*2'VU1T U"Zk9]cF:KQt>Q9em:1419qmj]B,eL(XcnnN$h#r6c$ogOJxx.CyN-q]&>FN-r5Ah U"jwXQ]'-=r\TUUZ%YV#--M3_>ttpj&eF'v>)uI;mGOo U"f#cf/gb9'YSo9Yfh%(up(%)9%%%%-%^,'[ItX'nF,#%%%j%&%%.%%%%f%uuqj%S U"ynq>tF:.AOU1T'Z-^;HW>Ba-rEJLDv?%6KccQcA%2:p$YN.rOE]'%Vq1_CbM,IVdgaSOhNoIhK>R&7YY0,c#Q\\ZTSsI[EmeH&GeL%Lup(%)9 U"%%#%-%bb(TIqEmC3b#%%%j%&%%.%%%%f%ywjj%Synq)<^v/';U5idH)NoTPh]I# U"$FU.*wG*4$IZ/G[KkxTnP;of2jsLb'gNbT,*3J#CF(m*#H94&KKfg+h94iucn?A U"T<:1GY41lrf'=Bf,KM7EDlHSXoH+GUvPJ%IN_-pK:;[1l3Cn-&%PK8)umhXcwdl U"%hN/EfD%p,E_NPRpN-e:CeK'SIgraX[:-,l]2u%p()9%%%%-g%>GhIIxu4(QV%% U"(%j&%%%.%%%%gfh%pWSy#nqz]9F6=EL-T,9%m&^W6c>EaAu/TsSY9)\fgqc#=O7 U":DpcmYh03hGcEX?)(a_Vb?4--/,WE;7c77=d?ao/G<)\FZYkO1Oi;6%pYlO*=200QuDC8y\ U"tMT1oUa%C#\/H7uMpn$bcWt:'*J&Mic4opCj<,*1&u%p()9%%%%-d%oMJ^Ippb& U">p%%(%j&%%%/%%%%gqx%fsiS[ynqtrT+#91UT#&JR-R+IY+_ZK?5cZAYke:/j:oKxD<4L1V_=% U"_2:;zvu,o1pickmA4Ecn:s3(95;c=Z9_2t=6::q0B'm,up%()9%%%%-%;S_NIgg U"QIh'%%%%&j&%%%.%%%%hfgn%sSyn.qz[V+3;U5L)\Z:Cwsf]l%5Q(8HRdO=?79( U"]qM74SfeAlnjBHW$t#tbMHHt:Piw5mo$xQL_yCG9,YbYek(OQ)a3;RDR4+R/Z:Z U"e3#fUY;A(=KU2)zo%0EOAk0L5eEKBU?[=mhZzL2Pt9?6LDh]B1w]WjJI2J\Cd9: U"ImRZ_lal[M?FEF'H-I2QgP2Zks.*DjSHr-5$?Ja2OGH)pvfXjnUs>2%4up(%)9% U"%%%-%2FxLI$dSZ>=#%%%j%&%%-%%%%h%fyyS#ynq46E*Q/^13vuIKP3OQ8afA*:X7Nqe[f(^#;DL7bu(pdwr8g*H*fvW1tJU,d+]hv[ U"qHC&Gpb,iSQx;XmU>wI1GTgtSZG3KOV=BRHi U"NS*mg5qq/zFi6.0T9qz9>B1J]$QIZ0'Kn*=>+WIW+7?T/LWMCv)I%IQ(n'Fy5%? U"2AQ-.SY9Y)K>,jUr%HEDD9SjV?1+J)DK&u%p()9%%%%-j%]wEXIPf+%Xc%%(%q& U"%%%-%%%%hmf%wSrxXptT+H#9Uj/#&R-W/60;KUr=Tn>54Ib1171Ukd*UG%u%p()9%%%%-j%YwE.I/X_)LM%%(%j&% U"%%-%%%%hmf%wSynpqLI:+.EZ;dO^=dU4tX/6Al U"f(8Mcgi6t^o#6vBe>]8$*_;9\01;g$Ezc?Ti_So.)(6m95^.(b$w,Osd/O5*hiO U"F&Pu(_iV,e&My&HE.g>D8h;gifP(HWV0of*2Ntcku7tb-rMTu%p()9%%%%-s%&* U"SXI]Vs&Yq%%(%q&%%%.%%%%hmf%wWSrmxptT>+#9UDj#&Rj-E&S==U0=5Y>/_%u57s6).qg1QV,Qg1)#,jF[\\tFM U"&C%up%()9%%%%-%>x*SI=,X2M&\%%%&j&%%%.%%%%hmfw%WSyn:qLGf%3'F1d*u U"k)g\bG1=NPamWx;UG7*4YjLr;P9-RELFfiMTHrl$KdTks0Cha9XtCfY[)&Tpe0b U"('94^63*,d[+6+;Jjb-U1O/nBbQ8bFM*1s(+1a^FZ/ U"9rWyaZ?W+gdELuWa[g=[x9h?n2[]E5DgBH'8'v*up%()9%%%%-%u. U"qQX9%2up(%)9%%%%-%;,#tIy< U"kDZo#%%%q%&%%-%%%%h(t(yS[rxptoTy#91Uj#&SR-=U=%==U*+>)- U"W8o&)=B3M;DS/v%Q_7qUp\qNg01BjZuK=u7w(W3?OU0DON[92UL+=Yc(%%up(%) U"9%%%%-%:b#tIbVqCGM#%%%j%&%%-%%%%h(t(yS[ynq.\^$;;%U1)j&r[22?PUV_ U":*6Y%T2Mhp,^\ewZ\?OGq%eXHlNeDTNe=N'8MFm0d(El.JT)Mhp9WBb>h*t+xMhN*kmxOAM^[\2_7UE:Y-Vd[8V;xgUC_,V(hoj$tTC'f>Jt&rsSNNWD U"mE?K+1]\7z_lHcQ\U_XYD51+;?\+a0c%d:[H]DWK%%up(%)9%%%%-%AGsdIr57L U"Gt#%%%q%&%%-%%%%k%wtlS[rxptoTy#91Uj#&SR-G_>E+.+yD5I U"F5VPm&GA9)Os++%uQe8tANL(eQ[dZ(EFv%7qI/uJ87-fMa&iqMn U"l=%6l[5p-KpX5+Dhk,=>[IBlB/tqjXl,rhR.0.a&TxrmpXduUD>^Ogb*(Lh(dY% U"n3%&up(%)9%%[%-%c#m4Jzin?j8#_%%m%o&%1%%%%k%wtlh%myxS[gfxfkLdETU U"]aiNkn\F9AI_8J#GLGxitEIPq#c=TY]f.k?7ERdJci*iLmqeqh1:-nVJh(yA?F% U"Q,c]p_?RbI6(n+/z\TgzZsgYrX?YX4IW70#0[_=jBI'(EFSmD*.-\RUoNYeK]Ga U"$0Et$=<^7EB#XbW_TJk_n&enA:GQ0bI-2\(]#+JZMT;'m3.dkUNQlRMrf:cMq9$&4BSvHO1lLa5:(S^c75gxM8aS?(oYZp+YK^rq?6:7 U"[<<\c>pW9ytuVFAN4Qe\F\J'h.,T8YR=fAKIC U"L8T+fS1z%[lgHTObuG)CA/1g(70C=KAFhfhd>\/3Wkj-bDUrG.;B1c*7Ef=>41a U"nN4E\unp/tZg]eY7BBwBDn^t^sS4%pKb2Z5jh%Qv.(XGa)*s.y=ST8sDq7VYL&b U":/.-W7?0<4o*i1\6imu&+'?(Zn[s/$jEDQc%dA#7GtD;N7LnXK,^0MoB2&?Kv3a U".]gu:*3#:g&K+coQnImf]&rbE:f4PVKwBVi3K7AMVuK7iJRsP[jOV:FnhYk2NZ7 U"2nrf1CXVku,^aR_7>YgKD=Oe0/\*z=AROecVkRHE[e25,%:2$5QEfDa^to7(#\b U"-w[ifhd[]VjWOTCsZEWp[X&3H_o.jYd6gH5\YiF3wM?,OO)UD-3](Lnq(crUOYILBdsl[=YshBcAw.Mlk U"EJ>_r]HidLOe&>&#eY6X(I#,kUos,A]<^.,lse?_\ltpvwFkAo;Xfp#5qYCrHN> U"Q=]HZ_J=la(cINh1OopdlD,mCIRvgK]Vp/f8EK3$q+A\6AMnQ7BQaL*\P(3)'P# U",MC67N+74eqZ\>;$)I##sA,z9u6r9CYV-s'YpCSvj7QDuJ:r+Na&A,Ls0-vUA.* U"'*bp,\Z[&BfyfHNBA]Mw?-OOc-[KuaqDCUv<\x=Hbn]_#SS91D#sr\kzA3A'Z/> U"#d$MvV/sLPV.K\7\?E7BfM&W;CB[ofAXxOG61,,181,0EmUp54DBK/\Hk[7lbh6 U"0gU##,c\]Gkca\QkK6UaK2vWYDh-mW[auTHRq>Z U"jf[N4=s1QKeeYbE,Zt&FAw4Wi?7kwr9-,6rQjqNB:5wOm,+u$,P.n24'(rU73+v U"5mGf#=7Oh6?NoVNXZs<:.f'F=2kWIojKQ%AU$Z/]507&<]UA/_jFM>/v1)b)H6' U"n>K%Zd3GV[k#wW83_o+_elhIO7kyEj1)i>i#r8$8#b5Q27XRKwE[Lgi(?,qFKRf U"AmVTOrF4Hfd-8%Un0&F-UE?:YOh-0-Z%B7o0->:.XhzqKvOJI.9Ksp,N,8aTrEvtJ-s U")tA6aMnSO,JI=P#]fNGJ(aiV.x3P'L?4G;_DG.i'ahU9/RtD5$WFq$=34s%uNvw U"uNckxYGGu_-Ms0aE2sWDtl4#&eYF3$f;jhYRPM3(oYUASy1TNuUdE]Rb'te]tk5f4$O,(_OY=tGOvfp/Ae U"gQI<9t;oZ3NB(rQ=/ah/weS%6_I)5gg%-qI'DbJE_]]5mC75mo8%eEV6[mI'B#b U"5mB1-s4-,stNED_i-s:7PmC4-mB-cmD5aHhp&PE7Xe.=GI8,('RA'&RW)+Bt(e/ U"A/GU_R-1gR:ek#E%Si&#I=irP3+?W:j7jLc20h>1L5%SVP7ugq:gHF/M(y%P5#T U"28N^?XY+UZ/K%'YG8/Xmq59&ulu=_'%f,n[U*s'UV2T48SeWdmVlTNoa+N'mEFb U"oS>0Tiuxgnwz^HL9.Tf*dg1dhi'mnL;V9HDuNQv];1Q9aIiLeY(UGGC;1V)CkS+ U"%nSo94;Gvo-29n)OuUt[6(T'NO..he70?Yi/kqY8>fD>W1SPmF4&[Ci1)6#lUOD U"E^G#D.coLPRsOijnU\GhYJ/.5jhB_Rf$n]-wtC'cvZ1o*x9lroph>>2_JiIbHRU U"n2)b(u,CUpg-f)_r/ksr[YTf':8CiU:ah4=U#Ux8'U2IKPzC U"/XXn$?6lY(04*DYN1u0+di4MU=LPnT9x>6+JVA_qF:jp45>TXT&+.GMIMKC4*G1 U"um&,&=(;ug^][23)1;0FGQeGaeVV$]NeBIHQX% U")8ohCU%lgg-OeW$&Qh6WdP5.1wE1-6ib[YeVeWJL.b#[)OI7.;r/fc:ln1;QmsY U"n+VamGi^-%BaB*m>DPcK>3hkD_O$24i:p7f/+wyV0;uXBD8F+FLovp,nD:[+Cg- U"b&RI\U%B+sfEL:mHjYma7e\QevB'[?r2L3^)x/W1'c?LvQH]Eg:$n>v7X?Fhij&3N,0O>I U")q=LX[WkCUaH1kFc#h?xH1&5jQ]5AqZdy%);2]5e;10e%pZrm?Gm0?cEl2k\:d? U"cO\2&\0#VB[#CI'IKR:x^EApc'06ffYgk5vnKAQdrdgrsDf$Z0?eeYRPxiZ?m44 U"0:D3sQx]&]A.4\w$XP:N5(8pj:2kUwU('7Rs6oaOooG)6L:&4Y/V<^IW;.FieN2 U"zuqdhmnl%l&)9+sWb>lcu?5%ljFTb4+Qox'mX$Dy^rNkNv^t'TW3*u8mqjhkvF4 U"M$buXUX0H9q<+)8NOvLHPhtzQYFd<[tYzf;F7Our'G]u;czNakI,fFB-=S#B*'f U"Z,1SG]o'An&tB-O^O5Ki4,8UHp',Y0.I;zi'knU0-I;fM*?NB&(P,<-,tq>u*81 U"$C-#bF:#%LD2Q)(za3#vgJRIx5A?bVxj;uqjf8cL5.]^J4f2S]WMkkm+hlCJu%pl U"MfLQQy(\:RIv-s;oDq:\KxQ=c*tl0Z6SCl.\(+18Mb.VhcuRTK#l?Vl/Q=tD)>' U"i*5->p:N$_[t;tiqpu(SKK)+>,dSVOYUZRuv]bTuF2917>h+B> U"hB]>h#>7h8>hMl;I$+1B#RZsjn_CGL<$JV+$V1_$V_D$V_$JV[$V1K$V+2$V^ U"mesr2WU=LNYfe]:kUc\EzMMN3IopELtQgAKoQA_i4U&$SvLSiQ4uj[PhXpW(pID$4B; U"wUVpYwl3616WK32(:rq.Yj38_FZJB7= U"Epm4P#)8AR7/y,ok+C$v^wg>A:7$3QB\0q/Gld(?Dh4jPwC+P>HRy3- U"By4K1Z*.Y>#O;XAj#n[Y]tAG?%$/c5ArbAT2Q_>4b\>[p]9iPC-E2tbiuZ U"mfB-+Gk#2j?K(VQ0wa079,KXb\6X,WJfC,UnXwudJwhC6,&)UH>5.p U"/Z.v/K#,k2,][0;JWESE;ODCb/4nPqN_&Bil15;hc*CcE2dLgT>jCSg?anv,:5> U".'a+-s6_yhZ*GZJ;CDIGn'=S+wi/Iq\E)%i)Z-pWChF U"B56<\[:pAr*$2?HG2a;P$U#=M(qaz_GVdc$y#<6;fPqQ?6&rBdpo+ZVRL+0)a>x U"^GI\E1RB]QSO&gdmdNhDP[Iher4rg/S3-LS.PgaI^zY^:W.gh9)e&Resqe)s4>0 U"7i*pQ4RD%EFO\TzE++*aPQ4me/4P_:dY14R[/I*pdrRb(MQ;wN-CSs&2yPm* U"r(2\]+hC.8$Aa:^/p)]B&TTY%X/9.%1%nw<=f:N.cn.+Vv]f]Lj*b']z%O#l#78 U",bU\&=&j59r)]51fiBjLi$NT[h-iCYY$E\Q-MBHaN2[_%z%A8g) U"A0ILoOf:e1iKN_hfLoA9+In]s%9LfZo#V]',rfn4iq%CCqN3(>Ve&gSqPm U")/?4Uyftw*BP3Rcb:A/UZ%d?EyiS U"04YiQS<+>*I%?6stF3%E/+Bsl(RfB57fc8cd(FOUL18<^?Rs*4IMCnC-;nw*2hH U"474MZ2#JV)pEo\5]C U"N8BB.;Yv0+9H2_%k[bQ[J(*2=?9=lu0[NRjENNZEM4;q>+um[PK7+HJWGMv?5AS U"tQ3?3?h,X&61KvjFGKLB-Ds,PV:eM&?7i&>=Bu/.9sZ7d-Zq%MxJ5mLr2F,Wph$ U"\'Ngl0EA,aho-i7x_W'ql]cd:n$+.fKL-.Q?8_*Imxv;dI-$v4VrdY)nCh'>d;k5eJ_sSsz33rSe5kch:P$ U"\omnC9xXE/ug:%u\/pv+)>hroYT5bEY(hPrED^o^EixwJRcQt+\+cn,Drti=HCa U"D($49)uSskgWJ:]Y(_p#r$\wOTDbz'NHfpwLcW^4.*RG$\IC0GvTDh U"9C?Aq.LjgODiTZA>CDZ5H1+i+B5TGkJxF.<)b1N#x9Rh$Q[181*33,=ajt0F_]e U"lBmIC-)Wr4)j;+R%9&CV1r<%n7+=')Wc])*SSXx[P\VOQu771vwaCs4#liIXZMp U"Xp&DQ0uYt0vZ.tKa%^Oh,ePuEcTX1]v0n*5EUdv(5a+k8s*c U"5Ed5j(0+Zk6QiA5Ed^E(4+Qayps4BV0r$Z\Z$l>+FlyPP7v$E/22m+awrAK_Qt[ U"^4Tbs8cFB/MJJCD--4hieIE/q4/v^d=T17KO\avyYm7F:R2hScst[2o+Uw-[>I\eiu4vB,MPf8-b)Pr>5UxT3u^K>YC$.7[sx-FOO'1B0b'5&3':RXLgzu<&WS7?s;+mA2 U"&R;*n:Sj]7yrgAC3J3al'NAdPZC+iriT1aBq'19;bWEbZtOYOi611IJ2OjFB7Ch U".*$7OW,lst3+5LeClsviJOtf4Xw,G&RF.R4'ayl$_xZyf2q]xTbrVJ2a/p/en7+ U"IAT$O.SmH3I']M2,M_+(^DQAfGeHK+O7>=U/-D[($>&T-yZU,X3PFr#*$,PvLMW U"DT<.jx]ykA*cPdH]LD-U24'D0MRQ/hI_jSPzt*'j.405=b]S=ka+n.gdVJN6^a& U"ag-mMJq^8wgsBm.(tJj>&^_BdcEk;x*qFiXFYQ7g43lvo$22(HRD\euTrcNRAUJ U"-3DW5FIUAfbs8f?_$FJtwf5/p1e^C_OSgTo=%=E7D[y.uT6$o*/EIC1MS+11]*u U",;PoH3PXCxiY3s/MVzBojo(UoYf*+%?*xMJ(,%bPjwo7TqAkO U"Z&b%ffZps--rjE.-sQ38%,pcjM/k$%iTVv?u4Pq^3DlWci\K=SZ*_=bDoSvp8kYmI4*&gj1YbeMQQO^>:-ONSUkNH,K,2%?&1?7R,0T U"YTgj&FFt.p];9tn8c2qzW0r3QE=Z+&+d#9V[(2kUWz[Yv'83gF)q[qz$tD=SBJZ U"FkT8Ub.uEhS)i(Sdx8bWKUb76/2%4E)B&vP.\>m25FYj^$]$t\A4r%+s=g'j8.g U"7OZwI6xJ)Qu?LIrympOh##h8fBvI#UHl=TYo4[[>**c$3DtukSpr5:a^*FeOv%A U"?NDxNjv^3;,^<4Nsxyvtv3a#(MuqX1<.3i<-0MKTvz5Yp&yU8\#+_=kX5rbN/kYeA#>=b+1O2e3s.z]iC?--h#ne5_8] U"-k7v1u-,Ed(X]__-6^>'?%;hJF'QhB&Rc4pY8?c[g&qNA>c6ZqCdLl1:nrZ05R' U"ot^H?Fh<>FNP&NcAn2kEF-f-9CW6.NT)K*VEf$)+,i.^:cQa+>D0NQ/Sip9?)3m&hS+k=R[HEtEd$;d U"/qz9:>kJ=D4L4jk8\=A=MYwdRE%V5KdBucvK'Z+CuQ?h$hqna*l1#u%hOfURZP4;-Noi.V>b^M'E%zz7GffP U"RjyX/[G7<^(IT\cvS.*UD)c-kgF$4[/b>?3BVi[laaMb4DE4]LuQ*l8TnWY&3J$ U"nd(LoVX1&M=HhCr+OqM3,B*b.>QZ*iJ[QN_)$30Yt&ku31kW1rjKO-k9i1nt99625mK3F]7ld[/81GX%$J+([ U"x#rdA+2tW0o^Q2C>&H+RZZ%R^c$4T.An9orM5qkD.+PAmZ3nzF[-ZJ=uG,/NZg^ U"MLiGile;H(R(.*4qp[\aQ5zBtBE]3l7Cx*=FHd#V[rbfDJ5UZ^WSaVjGClD?+:+zN'M2&:;-uPesdC*tqi:;/u[4TORaK3iZ: U"k%9Q)XB&ZVs&Bll=.rgx,T]C%ff%(YiuAu)/2k?%PbXj^f&cWCDQ3,_DZk2)O=Z U"$p/V3>=7PP&m'y\Ew6V(qg.*lNI4erF(HS>_R:xRjhl*[VF6mhEwhtW=9+TY9R2 U"^gi^,te9+Ml/OP9wRfeJ2,6t8,&0'wXEldH$)_=3\TM_zQC3Zs.ZLD9%;^bB7ND U"3zE(#_zrD2vv5x.y*%ks[a?(neM<'d21:bunJ+8HdOT<1?f2wU<^cufPndujVri U"*$<=AoV>EP95W4qAP*w+fQlN0R%IpZ3;nqdp U"yff]bZYXOPhP4bMaKdZO+$aj.XUn557:.8[M,EaB&k>#iTHuV;0x5,fTrSVQ&AI U"K67EFqInW)A0Y-&04$R>:BmCtRa.$0\Q#Eljeutf2rb?[AsxQ8lxBb,tzvD,Q0e U">GO]PPdh14uiTlNg?\FkB[:Fzd%P[adWN_j59.UO)?HhYuZ-knMda$X/ppOljFr U"jzkE>c\LCp8joV:i85qQ>W_Y+<4$a95H/Ccumk*S>A*LqJfJVpBO14:X+jR1d2N U"7i-=qiAI7YUuvd:FLIwTRFMetQocUeh%fT&&IewMvE,F^xe-%70S_W(]I$k%$=7 U"(Gnnpb,6p%gIkhZ]qC&qj9BTEI/rQmMEc.&e<9KgkXV4[i,PVPz1&*2E9)SpQot U"UiQ^-/]f]z_K&l:tj>$NJ\]b\dCv-aj1[?i8H5\sQ0nIV]Fln1PWq%$gnS*'$op U"/iq[,E=Y78lBZYCg][aNf)6&;p']Xe]>#0WfOQ$ubHmISuG2F2&m)XV<;kEkXcu U"c%tT[:JY0Z\]Q6-^Ar^?HX>EqPJ#jBeK.VKDng]l\RQnkeBfjnf]r0tNt06s/h.qS&tqm^D8fA8aUPqZ/+wt6/mis U"9\?i_?SDwu/I)VT5&+1QBJJdGwtG[&PGmLX_.,:.gUqH5Q).?/%\i2Ty2#2o2#,#]b8XBfD*Z U"'2p[Cv6AcXd9))H+9XwYtP$6OI8g78PXyO[NGfZUXS6ePfA?=2H[fZN[T>WP,FK U"jay1-pz,O^EwmM+q62*Q%=C3FU;6^8-oe#+5Xm1Rrp51]c?dIPqduC]<-m),eL: U"LmxQzQr3QbtvEZRcgbgXN[E:4mNCAW.7up_[v60qpgZ[T*0tj6#HW=jZdJg,LY' U"uG+=Pj714fRML^3fz,??sL'j/j26^%TZp.ed-?PSpQ^b3L,#j]#vFPo[Xu;b[NuTjFqm[ogoE1yT U"ShbxtWmMA?0[EDAYYvR$(JK$*VLlu6I'l)y>rdQ1>Z9B000k>#f.o?45\)j5wa0 U"M9tj5G=9(Fjj.'Ol>Jq(Rh>ZDRIy=1iwoEk1(e#KOA[8mTQlTM39U=PIBDVfZjO U";l]tnYg%OX)Tf.OZ_fGwYCX9+GtqZmhP<58??B$MAPwt5%(ylrFmbNz&:c3ZgYW'A<8J11Msk7CvinehbFUrZWt%7rlLbMKsRC48*ZMPJ-8^n*&Rw.k U"K^ol=bvjY1\Hq:QX[n]0f'2m=LMrRYnhw^Bhiqz&X&(G(*yf[ud,g^ctX$9XkX( U"0T22Y2bOsBJRkRQd^O_/+E.oQQT+'Cy%mia%-=*mxL:9'yT#<%8)qjbh2cmf-Go U"T0ts;4[9F2B/#.SZD1r3NFhw66; U"P$bEDg)3u5MC+^6TZ)MG?hq+0jJ/p(InF9JHu%$Qo5z9X+Jj2$B?(=rY3JRbbxT U"k$4JdcAFV4:#_D]s/<&-6.Y&(5566n91=9U6A,tL.%uhvW4$cMYqur/t'5FomBjBw,i4;5s>-T8Ct&q U"DO1,>H3uGuGTO9L9CufKTp_THd+r7Ct;s(FesHr/ycV%j'CMlT8YggwOf;cfg>8 U"W(mZmKp8?kbmb*6LcM5Tggd-XFSeuw-3d.44ju]fUxvH38B)e]R+, U"5HRqV_wtF5xj-]f47(\m*o7b]9h,DSaNeW$sw.nALRh*f%ij9wVW(X61d9BPmz^ U"Qq[<';F,Gm+va+1Uwe0gj:emlhHG4^_v]g9UUnt1P9Uj'vBCsbnbN1?W29mlBrL U"(-:w+nm4iQcg>7q;(9-bpPuNe(j3bd8A:&ISJLRY>BA:F?hGxXyVNPza:Fu:w3$#tq,e#\Sws0\ouuPl,09VpImZhH U">/O6::%C&XnKs8D,N8GyD6#,ecE'HcN1:cqhw4hNU*hHWp_N'03Ou#BPlJmrfAQ U"sK^PE4&x/K<^D>##'SIm'>NYKtjy'DS[%KR:2_UmWPIqaD>/=gMmFajC>Bt'I>R U"9Gw;h3Wm_bmJ=u#S(ykXWs2$XKR6H_6X&+nVAn/$Bqs). U"Ax/JQDbl52];'wZ3BrA-\J U"?#grT0Vp9jXzgmrlEtIto$RsPllDn4kfHJYq,k8vVC[$n>Zohv''?O&%VKPo2Ve U"ki0bWhR/'?R=D^61DUQ7XB0[Z>?7q$*pa$3bY40aXzE1-BFyO9#qAEauSk]%VFDB8QgBMkgLc$[Yc#[:0OefD34iDcngxD U"[SJEnz0%:+YsE[CA[eh$$ U"Lz_+=S$l.l1K[ejX]/P,0;^b#?t&msQOlk&hf^%<0U5bIeZTwO1$W:O7*MCaRe3 U"_?ol2l%v]Iv)'uE3-=in1*hZMq#+HA)Dfh(&?_BuJ\\Jq<[>DQ>o$M^HF>(bVnO U"JDRd1pusak3lZ=5#E<+6-ChK9aVSrZg8PW]2ZW4'Y\]qoC#vjT\G2Pg%3EVV_F1 U"bUAHL%mSO]Ac_KcNRaQP9jW8h]GE&m28UueA+m?J6VB[vzBNc;uZ/*h1'rF3$$abG+]UOx,N%E+rIXt> U"RHJ;9#Ac#RerqW[g?.Fulqq/:uIwc:2yMiq5cC++fugkn_[Yq:ox*Ak'D=e3KVc U"?aFJvW6BRJcUnX U"'c-CfU..SIfBW,.BD?19\YVVVe71WX><^-ui*hR=+G'a%slAH3S5=z-/YB U"0KC['[=/(Knt6T\AlF=0bG?CEgk/(aN)qoSQqoQUr3h']ACb5pQe9gC16dY%Mhx U"(G0>WW<_$A'#2#274wniWb];TYLHPZvsIQ:T1N'NIGUeVQk$U?Qu=%3:CtI4d%[ U"lWdZ?vvO=P#jIE?9_hG\LVG))vv/ U"NEQuI_MlkK(lC^brAOTjY3;9ZG/ZEX#<0OAK:N\65hnFmVGWef9UBF3HaXm;g3sfDY\*Kefk_U,4qV3'EP(8'.(12CYbj[/?-b]^p?I&0'uJX2^LQ6 U"t,_DO5_H8ex&Gr]AsJb>]C6i=zoc9IZC>>gT'u6=sJ\h6F.0xDx4rtN/uxk-px& U"w+$w7:g\_^a3.q.dso[^F&WjF])mQrRV=#I^'=fD,P&pPHuYFZk5uj/^F&8>g[= U"J]6R0SRA%*zHW.$]YR#']-]1A&yg\K;M:qWUAbfYLpn5K:5v#Y),cl?Pr4/?oe5 U"2AR.=GYU3tcnjxh#oQS_%R^iLj]6(G4mnQT947RBRrR:h99*kM/ks29(Dq>j&?C U"gpFE]iEjl\:6i=UVS;ST][](=3W(R32eJ.e3E7><%;OybgFj3f=UplaJCOeEY)Y U"tEf731L09;uo2EKj-k*G3:PcZc>;:9MFUo[;Y7>1R9*A8Nu3>/_o##%f$spJGmR1Ii$OL61^9^6ZP,?2]1p3p=Pm]g6nI#0yVoebFY\1X)JL-y[ U"+=;'Zi2MV3-BNLp?jm9j:(I\L6wo_\Rk+>#a>t8jZ U"T?5+m<>]EhN:h),dd%a\mXcU=CFOF4L:j%(YGmL>7V1uu1u$ad*?W%QfXh]lsgM U"t(]MGriom-A;9l1S%f0S7F/a&A#aa]STOTp%DTGObbQJC%l=A,Ief5D*A^is&23 U"xQ$i4kP#5FETgh-H_j]=t#1r2]$C[:Aa>a*_XDXug'XE)7JsE4'';#1a&?1$p[g U"D[^$N-kt%i\:'iYt34bV]pdQdPT9NF3\TKh#W[Akl-kub$ac3_wZI6=Pu&/)RB.^:t/m U"S+WmaXYdB]>Y>iRh8q0L&?mP+TEV/jw$kMGWXRO(0;xjKg:)Kn/Xmow)G-f7N($t8LdX U"Lu8#\Ko&&(R7\6EGMfC,Mknx%r9.,^Ywn/)Wiq(]u&lN*KMyK\KXYJTggrc%.NZ U"1RR4'%2sBmtYKwbbG?b2v2nAtB0)E54[0Ac^K:jtP[TAS?Dhm4+^HK(;[K[O.<^ U"fyz:YBMYip%gJ57^?rRd.F#[4cqOB<\=6G1%w>qY#\jUV-UUHL2#2,Y3Zv,%B\j?2rqMX4;M U"\.UisKT3Gbu-A/CDERCY-_sb'.(0$88S0RruOm0nQuqeKo?Oj?d=dP2.#:2a$C0aSa?\L)/Enp_T?=DKh;x[6dLUFQ:v#\0 U"LVeu_n8\?p4.e,].T;X5erqc,]]#Hvd)K>u>4^?=.GqKjNC\$L(':\'0]/iA(a' U"rsbsV=XILUDbHj-%.>[*upM$E2KYn9S,D^b'KXV?=&buV=XdR2lD*RPsikP(bdM U"-38Bq3fYd^g94I5L/VbEK+t\%+zy_'R^aC\Tn]9(M\.IFGIUJ\6>=DVG.mK^1E1?cXTMJg=e(5T94:h7\[D7G) U"KGDG4(TB\e#9D+:7QAQFii7([qbtX=fKS8o\[xu*k8Zp' U"q0j:8\Xk1w?)S8X-D(u));WF=h.M4LQpQm] U"(;=&%,WaOpBvmBoV6/ChY'np\u1joa9lbmQU=XM.W;FFq[n;>c0r-i$^uxo(ps-14Io38h/U0>7jMrf*ZmY2$XiCE U"(+/;k*rT;#OJH6>D#PS2(tmBM,6OMN%c&bfanIUj*OSXdlgmf]g#X#gB4*tb*RnqTVJY%XIebeOw2l2V;>Y5/S-E/AP*<.b&ibgXn'B2P- U"XTmzgvmm1dJ'$xM.;K'5GDE>]HLLzXxTv=>9^f>TT1Rd%.Nkto]>'*h:YV^4/BZ U"lJA+4SaQ4bOO:E1/*a%/\UHNSO%Bgfz0k&o5ZHNSO%Fgfz2k_1u>J4+-U0g?M(_ U"X:,FWC[oZ,iIi_U4T_j6e2XW8uXe2*^\q*oeAJHhqg,>enLqX?n/2Yp>3mv8W'xn8ALYN_2MKv;:hrw&S U"7&-M[wj:OH'ZO42;W>yO3w\2:LJ,cjWJRf/>fi,;a/'&VNKF),k]w1/)&Di4Z>x U"CD.7_ce=T7T^zxorqlVJkS?nm)Fyd;yOd6e.c?U=5\G U"CIo0mm2=6KK60To)bYOl\Wfo-_taG(O1o.k=8Ifb_udxiQxC(y=Jb7RCD*Ihh2Y U">]Df.gu3>l8^ZBi3DNv?igVvUhG^KT4;Zf-dt_D:2V1Z^1rvYQ8^EF'_>4327&2 U"VO'pPEN&/1?u/24lLV+KUiPZ=p$$L.hATmkLFy8JL>OXI%1Sb(oB6ue.4J=FUhE U"go&+7^7m&9P10c^WcM:,Vq_4(VavI_d]y-q&#mFGkoLjRCXs.'N%mm4;Q]\0H-t U"X2'4$tk%5LO:g/>,V%KFYW((jDjP7=>X\%q U"Us:X-[hj%KDhY>(jSkqvD4+\B%jZN.'G7J?Lkg4sgIbCjR':Y%vs8ZqK8O-SafeZEIhFFmpgck.) U"lWrv,30oI,_rG6B2$X)RJ[+#<*Qvv-#)5RG/kdxz?<:)DO,1j7=R5?x>hsuAV\; U"u1aU5;\j<_u05mM(cnLUdlfH]85j-nCN0UikO>dsBzkY<>aC.BM\;FQa(:xoaL$ U"jl^6ouMHQn_qFKQ6/qK(BS>:ua21#:NyDX-K.JnA'j:y7Aa,4rdZ8J57XKIP U".R$ICeiqyPn>r,Q9pj,kz(MKlcy[0m5QP.q5WKirD-[Z*Gq4b8Vh[Y^Enkevl(9 U"?7.$]GPTI4FNj3am&Ep*B>+ore2lC&:zZ]%R#H_IHXw)M.2:r4k1pQq U"z7N0vA9UD$LK:genqNDiLZ,M7Lm.=kR3Cb'hj1G3>jmLPA0cXpY/m1kJY.Xd3q' U"DUXWPkb>uDW*1d/k+S5dZ*+l;%svGh$tr'H1pw]RPtv)oUfi9L)YV<&?-qAZutYO;5dS]>Sjt[+=MQ1]gx0ahGRI:1o U"O.ckR/0jtD,q_8L=I)U+34.h;+CVOps#RW,;$\:ZTlm U"9JpbUDz\o*k/gIl'x&up%()9%%%%-%8CjEIV++QG&S%%%&j&%%%.%%%%lrtx%xS U"yn^q5[LS'hsgis3]aKm'\QsWghC=2PEe0s-caVRau%%up(%)9%%#%-%;,PkIg+7 U"jjr#%%%q%&%%-%%%%m(f&pS#rxp\HG42OdU1SZJnBgfJQZ7'.9BQa^Uf97OOwsk U",Lf#A6DBYaHY?e38Wm^f(\9RF0srT=9fFP.W6L+%8LL/D;Ps/tJma95HrMh>%up U"()%9%%%I-%:P]kI1d/eE#%.%%j&%%%-%%%%mf&&pSydnq\I/0/OEm1*YP^>YNTj U"2m]vBa1Bo&Z+bx=oK9.2Qnjs$H<*o6b9QK6E%d40R-(rE[-ouMOjXy0c>kZ;$?q U"1'0XTkm6ND5djgC[0f27%Klw<$)cV%6*Wt*n?s-#hUo8VCce626adqhm&;aSu%p U"()9%%%%-j%A;TjIx\f)&2%%(%j&%%%-%%#%mn%%jSyn1qT^V(3OU1O(F+#9UDT#&R%-(#;^u+1;ae+=:*;u3#_Owj U"O,*E+\42?V-/1%AWj+IsC,,Y^4A([MI0tMty/8^ U"5V0'lnRVes;'[/kwM/BRc5r);^m_jEL0\2,\eZst1#6Z5AZm3['(QUw'3gpXe9m U"bTx]S\d&+Zx^6?;DA8u%p()9%%%%-g%PbZCIKfs)t_%%(%j&%%%-%%%%qnr%jSy U"ngq<_J+2[Pfb6gYV;( U",Y+w'_m=wp6>Wsr=TT,6;l=#ZC#t?,K<(S7 U"RoB9,pH9C:EZ_Slxd[9J'*WVmc*8Pqvc\jjRH1&VeD*:jfg7dQO3F)4w01M/[&-kUaUb6NVY U",q]JXjg#LGJgz+G;4^&fdup%()9%%%%-%*B9+Jt7lWT&C%%%&j&%%%-%%%%qtlt U"%Synq>LI:2AOE1TG0e%L7<,Ym][%3ZdsCg::&+MiA7p(99u^jJsea.f7FAL>*_O U";67C6>]IMzx$3,P#$CZ/v)GBBN6=ZVbj'*\I.bl:Q:$&_GK2nP.+2%R*yLp_4%? U"AJWzG2tbZpNHN)bKR=B7eDZ+%up()%9%%%#-%k.[&J/#5x*/%%%%Y,%%%/%%%%r U"z)))qj%Synq-fL^/%%F1eiJM/g/_Hg:kBxZFDwo[e]:K[H,tqG-D+/#wBice3dB U"N\*o#zLm2i7Yrj8K,'F;KHf:^$wBfM6FxOW#cD;,poG.$kcsb>EcOu03dUXgt$= U"8iCv%%up()%9%%%R-%D(0^Iqf4>.a%%%%U,%%%-%%%%ul%zsSyRnqfa.p3SE71e U"pK*WPHursPWx&1_Y/D5UM9G+E1j:N:GU3jn.qD%^kOU U"LWBM%<0jHfL8+5-D4HV$S-Y#epgLX*[ktBGpm'pl^&%up()%9%%%.-%)z0^ U"I,x0S+C%.%%j&%%%.%%%%un%sfuS#ynqDA\$7O[E1i*<*tj=/Ja/m,2Z>aeOTpVv_m5GPcJ(.5G_'7EESF1Vwv2h$mA'q*V U"I'O9ckmLNIk\g>XmJ&gVhK$tH$C>G\4''xb+8GD,R3R(7Fg+Ci&u%p()9%%%%-^ U"%ueR%I1,;(&d%%(%j&%%%-%%%%uns%ySyndqz\*%6(V-()4'7Mt=ROfS9,[9=R1 U"%4\chdXeKDiODY]*lwpM.ioHKT$,DcfQxHJVPqHd*:yBI(Il[v1/Dx&nDn.*[8T U"R6-C.:O?&c>J0Jro%e.,^'nJ+;:HP5*q%^oe,8e(I]Fhm8PP(Sd<$qU]>?.AZI1 END SUB SUB V3 U"bx1Nl.u.5U/IN7^im=Eet&P$rQ^NnE'e'up%()9%%%%-%;il48A*iL^wemuKU%1up(%)9%%#%- U"%1,>WIk0pnLt#%%%q%&%%/%%%%w%hmfw%WSrxXptT+H#9Uj/#&R-WBWI,q5yuX%.%%j&%%%/%%%%wh%mfwW%Synq)L U"\f3';t/VVJqr>9kx8 U"=N-PAeR]wCmp[r+-5%+DsC_g4W)]_?+sB:79RqL24'dS-2ZKB1gU&T;.V])&2;7 U"XDed2$\]=oN=M'Z6)RkIgWh40BcfL0L^KYUkzT/C/P%cup(%)9%%#%-%XFcKI7H U";tks#%%%j%&%%-%%%%w%qtlS%ynqzk_D\<#U1id,P:04?3eJu:4;;zes.ZpFy** U"s'J%Fle])^%%4DCJW9n$ztcx#4fu:,R?c/bR:n1O$HNv'LPp3.V-7Ytx2hxJQV3 U"MDOIl$)ka8mq;+vKFaL(IWblD>56M'9zN[Yx>v8KHRy+GOf+/P0G&81?[cDBB,w U"[Jd*mr%(9]'a5xl'M^w0J5LcL0O3r9T(ExZMXOn#+\NTu%p()9%%%%-^%ixM7In U"=B)ky%%(%j&%%%-%%%%wth%pSyngqD^*%2'V1.jhyTlJK'k:1ew7%>NJ2#PU%Z4 U"Gjfp\c??lk?<0#v$]YU*ULss+8'#4fHNbXY7k>.9C1g4EAthZa U"G$/^+dm#t,64ka(gH^XD8AD>'(3aw4^;H)KG^b8;-'asu6_Z/CEK3Y$#'JPR=6R U"fZfe&2y16^O<+ezMiNLU81kBrABZ'-]ZGsdL^$#x0B;9hrFB,JH4u%p()9%%%%- U"[%\l\mI/>2)XM%%(%j&%%%-%%%%xfs%iSyndqr_J(6OU-+hd3s.+E,qyX>K9Z^_c;Gc(,_.6 U"$O&VtZz&C,up%()9%%%%-%7SjPIA>Z[?&#%%%&j&%%%/%%%(x&fr(u&SyInqD^7 U"f39Em-)bRt:XP4X4Y9tc(a(s0JKd*^ieg(CM:Ly5Q6'd%4# U",JKdWTJd-WF2H-#&W;>;v8;7hp:nde,3=:#W+E>bNZYB?_QO]/hf,[o;u%p()9% U"%%%-g%QskUI49U)t)%%(%j&%%%/%%.%x&f%wrWS[ynqtm#y#91UT#&&R-(\.5UO U"65[[5%&b5[KMOzQ#-JMVEHLAO0_E?hFS/eAoP(?Oy^,p;'g/VlA_)/sIG?9/snbPf]%JJALTX7G&1rWqfV3]C;u\<$m,gVjZTNA=3xTkg/W3d0,MQ(u%p()9%%%%-g%ylNjI9E/&fs%%(% U"j&%%%-%%(%%yw%zSynXqtT+H#9UT/#&R-((*V#p-8d)l*b7,.:hGE%y18(3joo= U"&(B#iJu=n-SW'%1/;M1]?e9Ipns=;Fp=EYkdT#ita-t((<63q('%.%u%p()9%%% U"%-L%).U^HAzV)Cs*%+%%5%%%/%%(%&ts%ijwS[vgkfJ&rW%dz=MHOb$Mn3Kln;K U"ZmbBjLs(-)h0-14i#se)SA8Rjiq;C3RWrjS3IGl:Qi99#.fN?NJqTZ'BjPN'(rJ U"W)$_)k_Sn)RCG0GsMXuhmW$mpK?pGP1W/A^TtVllwtkph5c$tGb%;HHWsOt^))k U"_N^UPnC6Nkd+et:k,UYcX^>fbU:Ebr_.,HFeY2,5UA\gDh^Fp>BGE8gDFr9L6nl U"XhJO7&6Y;r1ivqX0JyCSK3A,Ze=jDTS6,f%l4<]R6Yn2\n^lZ\P[26jbGOI U"cD.Yt6[h\=#jnS#6g'sAkt?$b29'isPOh'd;^^r>+V(Li*E/vF?dRg'eoi;o4Ih U"#[]y8RC-/OhX:B:b-'kawCco.k:+L)x8sDmcK%$4x%B#UQ4?BsK62%a9QY U":\8aPrGraGa,+^SN;Phxcg0aCNb1/$'H4-_fU:TI)Sh3:5m$N#G/=-Z(namQu(t U",LKX/eyBZn.GK1U*0Wl1ZWN9)8/513Ts*9Ph-zH68[v9DqoL'j\1Q^g=&7:>1l; U"xdjvsZ9gT'>:B[g*rr9p=DBH&0_OB:HjAb7HiH,Wm)=/d9+/o.3BN[bbGFWf?(r U":-K8)S\\UmD'H6bX#5ijm&[N^iX9AUx\pE'YOUN073^MasW+G8IcCqVy]fyebMa U"Cn+_h#a(9%IGwr?4-v%(.MDd0mNp)8[0Pu:3E(T/L1e4 U"5>J25biBSf#%^z1FD=HIRX_wrtp#^C)iOa5Bx%rYM\WW>oXe/H80rFbl2g_9f_Y U"O.P]^uZPbS[:UzPRo^dO15(J3Gw:b9),Q0W786flX+.P5UI0M3Q6E U"-s5EcIr'IZ7\OLAL+NZL\OaNH+WSQE2n*>P67mNFty(M#=cBto4BdckdAuMOTrfVvscs,4<[2id7=%79rt8V0 U"6T%IC$HG,\YJcT(0Y_?f$Jr_jrtQp&Ppp9%ih'Rt_sbT5I:&+F[P]t^$gFL8\3k,4t)tVULxqJ7mY5->vFPfc;4UEkv9x'=EMQDy6tV&[7dutnKa[dchJVx)uT.cg*eEp]nT.TQxpaZC(5&M=4h9Kog,n&gdnW U"5.D^df[ttzU%c42p0RQoPWK>Qp/$$d9H;Or=7eq>MZ5quZ3?o3JtfVM;9X?g=tB U"KwtTv^Ox=X:PF8$-rv0u%p&'9%%9%%#%-%Ub%^IuQ[p3J#%%%j%&%%-%%%%%%%% U"%%%%E%%%%)%%%%frr%tSyn%qup&%'9%9%%%%-d%^'[[It'n*F,%%(%j&%%%.%%% U"%%%%%%%%E#%%%t%%%%f%uuqj%Synq%up&'%9%9%%%%-%;b(TI6qmC3&b%%%&j&% U"%%.%%%%%%%%%&%E%%%%N&%%%fy%wjjS%ynqu%p&'9%%9%%#%-%>,GhIxDu4QV#% U"%%j%&%%.%%%%%%%%%%%%E%%+%\&%%%gfh%pWSy%nqup%&'9%%9%%%I-%9&]^IRk U"1%H^%%%%_,%%%.%%%%%%%%%&%%E%%%&$'%%%gglz%sSyn%qup&%'9%9%%%%-d%o U"MJ^Ippb&>p%%(%j&%%%/%%%%%%%%%%%E%%%%l%(%%g%qxfs%iSyn%qup&%'9%9% U"%%%-j%ILJaI+vg%57%%(%j&%%%-%%%%%%%%%%%E[%%%3%(%%g%qzjS%ynqu%p&' U"9%%9%%[%-%(bEEIZTA8%$#%%%j%&%%.%%%%%%%%%%%%E%%+%k(%%%gwn%hpSy%n U"qup%&'9%%9%%%I-%S_BNIgQ>Ih%%.%%j&%%%.%%%%%%%%%%%%E%%%&y)%%%hfgn U"%sSyn%qup&%'9%9%%%%-[%2xL(I$SZ,>=%%(%j&%%%-%%%%%%%%%%%E#%%%L%*% U"%h%fyyS%ynqu%p&'9%%9%%[%-%]bwEIP*f+Xc#%%%q%&%%-%%%%%%%%%%%%E%%( U"%6+%%%hmf%wSrx%pup&%'9%9%%%%-j%YwE.I/X_)LM%%(%j&%%%-%%%%%%%%%%% U"E[%%%D%+%%h%mfwS%ynqu%p&'9%%9%%[%-%&c*SI]3VsYq#%%%q%&%%.%%%%%%% U"%%%%%E%%(%>,%%%hmf%wWSr%xpup%&'9%%9%%%d-%x*]SI,X02M\%.%%j&%%%.% U"%%%%%%%%%%%E%%%'[,%%%hmfw%WSyn%qup&%'9%9%%%%-j%tcZ:Iz)d*5B%%(%j U"&%%%/%%%%%%%%%%%E#%%%e%-%%h%tkkj%jSyn%qup&%'9%9%%%%-d%;#tRIykD' U"Zo%%(%q&%%%-%%%%%%%%%%%E%%%%V%.%%h(t(yS%rxpu%p&'9%%9%%%%-%:b#tI U"bVqCGM#%%%j%&%%-%%%%%%%%%%%%E%%(%p.%#%ht(%ySyn%qup&%'9%9%%%%-[% U"6n\jI5l])rY%%(%j&%%%-%%%%%%%%%%%E%%%%j%/%%k%nwjS%ynqu%p&'9%%9%% U"%%-%AGsdIr57LGt#%%%q%&%%-%%%%%%%%%%%%E%%+%n/%%%kwt%lSrx%pup&%'9 U"%9%%%%-[%Fae:I+G()+D%%(%j&%%%-%%%%%%%%%%%E#%%%9%0%%k%wtlS%ynqu% U"p&'9%%9%%[%-%c#m4Jzin?j8#_%%m%o&%1%%%%%%%%%&%%E%%%%*1%%%kwt%lhm U"y%xSgf%xup&%'9%9%%%%-^%CjEgI++Q)GS%%(%j&%%%.%%%%%%%%%&%E[%%%g%k U"%%l%rtxx%Synq%up&'%9%9%%%%-%;;PkI7g7jj%r%%%&q&%%%-%%%%%%%%%%%E% U".%%hl%%%mf&&pSr%xpup%&'9%%9%%%I-%:P]kI1d/eE#%.%%j&%%%-%%%%%%%%% U"%%%E%%%%1m%%.mf&p%Synq%up&'%9%9%%%%-%.a%%%%U%,%%-%%%%%%%%%&%%E%%+%Eq%%%ulz%sSyn%qup& U"%'9%9%%%%-^%)z^^I,xS(+C%%(%j&%%%.%%%%%%%%%%%E#%%%S%r%%u%nsfu%Sy U"nq%up&'%9%9%%%%-%8ueRI%1,;&&d%%%&j&%%%-%%%%%%%%%%%E%%%%Ds%%%un% U"sySy%nqup%&'9%%9%%%I-%iWIFkpnL%t%%%&q&%%%/%%%%%%%% U"%%%E%7%%^t%%%wh%mfwW%Srxp%up&'%9%9%%%%-%;0>WIg,qyu&X%%%&j&%%%/% U"%%%%%%%%%%E%.%%+u%%%wh%mfwW%Synq%up&'%9%9%%%%-%8XcKI>7;tk&s%%%& U"j&%%%-%%%%%%%%%%%E%%%%2v%%%wq%tlSy%nqup%&'9%%9%%%.-%ix]MIn=1Bky U"%.%%j&%%%-%%%%%%%%%&%%E%%%'Pv%%%wthp%Synq%up&'%9%9%%%%-%7\l\IX/ U">2X&M%%%&j&%%%-%%%%%%%%%%%E%.%%vw%%%xf%siSy%nqup%&'9%%9%%%I-%v( U"9^I+?.J,D%%%%$,%%%-%%%%%%%%%&%%E%%%%px%%%xlzs%Synq%up&'%9%9%%%% U"-%7SjPIA>Z[?&#%%%&j&%%%/%%%%%%%%%%%E%7%%_x#%%x&#fru&%Synq%up&'% U"9%9%%%%-%:bskIG?]#]&/%%%&j&%%%/%%%%%%%%%%%E%.%%Ny#%%x&%fwrV%Syn U"q%up&'%9%9%%%%-%;QskIP49Ut&)%%%&j&%%%/%%%%%%%%%%%E%%%%,z#%%x&%f U"wrW%Synq%up&'%9%9%%%%-%9vgRI6a-NS';%%%&j&%%%-%%%%%%%%%&%E%.%%Xz U"%%%ym%nqSy%nqup%&'9%%9%%%R-%kKfpIIH(kQ\%.%%q&%%%/%%%%%%%%%%%%E% U"%%)#%%%%yzwy%qjSr%xpup%&'9%%9%%%R-%iKopITY2sN*%.%%j&%%%/%%%%%%% U"%%%%%E%%%*I%%%%yzwy%qjSy%nqup%&'9%%9%%%I-%ylTNI9E*/fs%.%%j&%%%- U"%%%%%%%%%%%%E%%%(x&%%&%ywz%Synq%up&'%9%9%%%%-%2).UHSAzVC&s*%%'% U"5%%%/%%%%%%%%%%%E%R%%#&.%%&t%sijw%Svgk%up*+%%%%%%W%W%'*/%%)b,%% U"%%% END SUB V2 V3 CLOSE:IF S=66AND 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