'=========================================================================== ' Subject: VESA LIBRARY FOR PB V3.5 Date: 06-02-98 (13:22) ' Author: Don Schullian Code: PB ' Origin: d83@ath.forthnet.gr Packet: LIBRARY.ABC '=========================================================================== ' Load/run under PowerBASIC to extract DAS-VESA.ZIP ' This library intended for PB v3.5 DEFINT A-Z:SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"DAS-VESA.ZIP",4^6:Z&=34970:?STRING$(50,177); U"%up()%9%'%7-%:u9;IE.*5Vy?.%%ka%%%1%%%%if.xR%j%xfSuRgm^*hJ?*NJlc U"&A8;P/I[LKW?,De]JAX(fA%Aq'nM=[.Gf\i-#qPcb%Tu-/(HiC#7pqggCJ;Ehlo U"-H4)+n3IHjMIE/&lVQ>7-2%rj(GEqUH3CsEg[$1t/4TRV=J(C>4B+RWGM$kkJn? U"eu-V:vJ6,ALOD$kJughrvmC_km>.pmbQkqOZkKs&^h^'nmd[AxftK[9\b^wrGEf U"FcGW1th:tPA[c_+#&ug_vfA:U\HG#t?1g<&<1X_IIM-)Nf/s;U2Vsfk>&5RfD4c U"M/:cHhLT>jTMf$JRJLH8MF,Pow*s/ulL')oh:&tcUn20q$f^TVWTFy54t,ftAQr U"v]gh;k;(Jtoi+a,OsZ0N.OY]X6ADR,AE>[_FGZ4R.sD;G0P)>_Ucvn7Bh46\F#R U"R[#i,xpVLsMBo3'ENp6lwUAVavXK?)2ZF9,=FCp9W.p]NC_mCZb]>B&*^%nX.&. U"mR2ff12(1gq:Z4vC;L5r2($G:kw,)U)<:%VCI1rmYZ0RD7WRQrfk^nt&oEm.irX U"XuKyKgL6RcZhv U"PX=6dy-X&+rJ&L7N7DbO6BRZZqD+24k0Mjzzis*)FDu[PibqJ4iTXT8_NPj7^-l U".Xz#f_e4o>zu5?So-?_;cJ3_prOspPZ/_T\EfvM,lJ7F4g,Z'NV,b+;0z5<$:6H U"Iz/=njRUpCJ>bBiSE$'\/2yoNSgr45l]a'MTP8rdLa=p,Dv7\LjqR2;QcP3tu<* U"\).ymnW-LwmFGEeMMQW^$?J#c3Bk1Z'i1)LYC0kOJAk)xHoV7/W.\cl,$nzbMbV U"HnoI0E6>[Tf3o+$\:M&J;d6yMk.pRjo2'faMGzX\diBw\G#VqpHK[9a9fzOW*<)qVq>K2fUl&s(XckV+vQ-%&>- U"k[K5$(/M,iR.;D;oXf?Ps0TZvk*T;jFw&Kr^Pb0^iJ3h+.7^:dWD%6C8fg5HSv]3^X=P$HL)l U"*+=px#)rR$bah<<_NF;D4a:X1G3a%tEr]^BJB$7cVj*KbUm&8:B_-cd&s_LYTQ?QT)_HCLf6wlGZb=SD)+2Uq& U"ZdjuYS+*1^HJ U"Sif8sv)1QPPMLl_<\,;Hwr&kq0GA+eP_a2p09>wp(U0cA'/jlVoI2Mj2#eG U"_2G%NKm%jZ1)4n^S7iV-c/;xd-e\a[H\6])=2P>R(_c:^]hxBTuipO+13#_]P.p U"3HtX)h<*3SmE9>jH*Jj^SX8rC?GESb&3F>k&Ya0:js<(T-tS#5Na9&Td.i2Q$H? U"SXbfF'(-u\H&xZseN\J[S=412+46Y?VJggjn%Gxk:*ws&7B0<(;(7v49a;$QMgp U"+u68%o5Z^bqbT7:-$:Cst>ai9wtE2,M5d[&1+lBhD?K+wQrR*O=sb8TPmhons]a U"Lev>o4:P%J6_&oo*'o=miqd%MSK]N0xkgyAuu=S9k0(;hKe,Q$*J.x*Qd<GUjfk13O?q[:=VOo^N-nUO7\*NVKqxIF4>w U"0+nvb4$?M=F?.[\\.mqqReCA=P%jRChZ&yW%YgriSq9P^KVS=39S*Sl'nGdZIzW U"QerFUK#Vs_+_mZ^$zUNkQ$0TqCCBjanaMWQ2Jcu>$s_61A[?zTL&.XMSefn4N_? U"j;qV9A,M_Zs:)^>b/kf$;)w$6r&/2m'cw)Zq,hP]nTC.gX^Z=u?FYgfUBWME3&; U":FPCJ,D(RmF*VkQ*FveE&2b1;gKz6OU(Asw)Zd]KqCv/3S_hp,-QRVA-.jK.lQy U"k*lht[I)?m4SqRbNSi;=k_0zohun,w?=K0s]bM[P_xER=iwVpJI(^)(;pC9Y/vl U"H'rl<[dt*b1-# U"H%$*J?w%^al#ARYmYA_[hB0X^f]pDIL0[$7Q[LA, U"X;3R$wtldRl02w'tlq<=05V6B5> U"NetR;e\^(E'jB+_p:B/lI^&I;ta(cO6]nC*/N4Rafuj-vXj-B#/\ryC'LdSC1]8 U"4\-/J?mPv4__K/ZS7QU;PA%XGG2]tra?'UDn,OUBODG$#\)1M7NQdc#W-0:>6)Z U"0;an-'1?#,st%48apjAR&Sm3U*S'ZEBD*P2:#^'#4R-rsr$M37wnN'1qW)kd-x8BH5j U"Gpoo:PiHibuIsL$>4?h\NEi_abdWi^w9tNSz/aSy#6;/f3ggL[(CMfQH/Hm/aEn U"6(XO_t';s6O:BBCGgEoXoA_7I]J8C\M8<_KKlYj')Xp5RL)8+BEiK=_pbKIe42s U"d3o[jib__Wcnr'>8Uc U"HP%O;UJjWC/53(LC]Fm4_'Q)FUm8kP.q-ZnQlJ0dHQNo&D%eu5W$8nIeJG8%Im& U"eAfKij1?=LI(&*Z91PfC#Y-%%Q3k;tdrW-.N\14OStB/&ExVFFm+.%NC>(O:ijp U"+hr8%q9LqJl0S0KNZQn1m0roh.&O08^XgA+1b;7jwEZP0$qMph^f=YPHA_p-H'M U"%jQTv+J-.1zfF2qW^j<60bOI0*x+dKc(LA4?.Wq?5MEAKiWlJd;ysH\X7s/A&m> U"eCfg1IhtY%mOBufAW&Ec*'Wb,ZI>R']F%rx%0qeV,Qg$0-i-fN3A48QVeKk,1N% U"RLW[2RDM'6&2dCx*]anUu]Ck$dy4yMH3Z'r)BdO4Gp&3(S2&,7H%>mG?6,*Bh;m U"[BZc1aq()tQ;maWX-'C#-gWl50IysJD_'%dpIh2'65T1*T-;KPZLECQ-UcFS*S2 U"\ZQkl_=dsBWtB9Q8+br$<9XPh]W?=>U.%J/ U"\AG1VPHi_TCu-F#Y?LE?MEFoj19qLQE+yR'$%mej)9ngFt3 U"Tw7Y'L;eu6>=ejJq]Q)fy?*q;=/IX1v6gB%RZ(aW%DaV]=s+S/5Wqn4L8L/x0.9 U"'9aw)r&J1:66tDSmT%3'<%TvPPK'V;;2uKdp$/K0+8bAN'/* U"IlfE[>BB<1feN?H2t\Gh?=08Hs'm3gvjJi7yf6];MuE,7VH;X)k5qGD&U*4)_K$ U">W_Q+\;ZCbJSaN-glMKF)#zFCXl\o'2(g\^VZs1+?L*6j$nN,9GBA7oQF7OJC?$ U"vV9w2CCJ]6TyehFa[Vb;N;0V0V2^9],e3dc%=dWF#S%?P0kT.Z%GLFl2nrpZiSB U";7H4Jf+n)22e(o023H2dLsZsSj=;oxG4-0t&j;nmUmkXJ^Ly0 U">.%Lo=(MG/,6uFAg^C(lACTb3'=)DU9^IbJUhJwaZ$haMcK,q('r3ol^GJ%qfB: U"GOt^e^09Gh5WrHE]Yj:qHrPmvlA4#ZDZT39Ar(+s8dr_d6<1AQz:S);+tmH7Z/= U"rCc>f$x$qtrh/^O3g$pp6\$^LJ3,z/Kt72#uNY'2lE%g3>[U=I+sP U"*x%Fm'sV0Fri9zCnQ_8+;qd;oJ_?.OA'AI3.\dFf&xyLB5qcm?hL?A65_kUcdng U"_?4j%.:D=tN7oDT)gMCHmrvkdQVUC>[<0u,%-r2:D&dS919na+>4mo5GhRwo^D\ U"R9LMWX+-)5p5QZt\*naW;*]ucod9,L;oX_e5?_Cj3JN.(Fd#%.NYy:D#wwkixTp U"s.3XDr7(Ps0HXDCo&QUlHCT\LHbudYI\8e73fHKlmf.f8e5[Q^qZL5Qp.ZeCNk+ U"OZQ6HB\$$UuN=ig?mtJrb*6;1ApJwu5d:cm6xf#qWv:5z#.cV%[88W58G+*B55R U"-i/i-ulWX5jLK6Tntn+p*U>I>=mJ2pZ, U"=rtA1nsvbxP%-u7&6XT.K0U/fR3E+KyWsv?HIH>#m(uLBrD63/O$1M4B)GBXF0h U"#W0'vF>OOS?ex[4)8VcmQri]OU,8)&2&)dxPvMMv_f-P7arBXI&ZXip=s90)P4s U"7vo:SB-Zh].roVD6r[7EUKAP;#eFPJmaKkD=FF$5=%6h>I8>(mS;F\R9Wd,YOH= U"&WTln70[rtHwf^BSuKis3eGanNW:wiQ%A]xW<*O*0=33402Xe1Bl^En*-HTSnAl>qr-lmQ8im-RL>d U"L%ms;dR1(hhDhxSG[(L$VPmFh;AO/NkB'm#45V'u*QmtYVU0t5E]is-K4.g[_ez U"RDdOQyXF$s?zkL_tN&21xTRC_._&;sb:OcTNxlY>_ffxE#)6_bOQRrsQq33t6#4 U"9il,EKLwKq;Qp(S8/[AbRO/BOq<3'MFgmj8[o3BC0Y-\NRf.Gv>w=83c^j$WXKfBB0zw^i>GpB''-a8cC+ysB-c9Seqq_<6/Lq:-^2T8#9LV$3c\GUYcN5HE U"1dkWE>zew_SK13*vFZFI*wYEo6x()K/d5\f6DcErSZI8Kize*IQfd+.r>-x.KV( U"HX>dw0*v>O;U&]R_l+&\hH7EwPOv0X&TToM=pyPa6umdaiZnI(NF#wv(yG?a U"a,#j#5uhsJ2m_$t0vS:5Pq#-NM%5\L-Bq*rf*Km;#MGLfa*8SC:PRi+?8QpdX0; U"1\YidX>=(0gK']fH$K:[i]7llbx8i$&wE^\->%NJ2uU7nw=8PN:o$2q.qDu]vCU U"*^a8/Hv%:VMDbOe0NVkQ#1b[7=k$u=+.IwP_W1lO;/]IC_tc89Xun)]f/;3KYu7 U">Sv*d]\*F\%^^<-hHNO]U=A\Ov0OD>W7T$i.4bS U"(-bs>pX-\4u*?[6N#'LqL_'%R&]YjsA'dY=Uv:]]O,*vFGAui[2W/rn,:L_2(Ae U"8i1uu,ea<.siF1QT;_(cm%F);5#iyF5N/ekLkji17mx%\6OvSMJGB'-(PP*4<.U U"ET)+t5OYU'(-/,CM;/.AaCZc%gTd^d8A0B^gfSZ1g(0\G07OkiNh7F?:t]2aO=W U"Y5v8<3&19us.?CUxcbn^[r\U7J8C?TlI6JF)QclND9_Gjq)vXKj8-KO;,X0X9;y U"Y27A(ssx>?TH*I1_,x1LG\A5*DB$7w1E>M.mgoptrJH(g7s)/Qd5x?Z3J63md+c U"e.VwQKLQ%asV&^v%HUy.sed39$#gD1M6S6pYC:E;W(6UG&/wS6si3$AQ5J3Y:iI-VYHX+^v,ICJ;NAH]G>qY.%gJI,aij#\Q%A>$uvL%F9W<4tt?)&%Ly;PBV6W2$sw? U"=ZGUfq(d,YbjljB)uQ'DBGMUG<2:7cl+spO^d*o41hO8 U"_^v^\61TXk's-Lhm/bnb[^)*fOLDDybPPj*7CRC5 U"0%&d-A2hG\_6woZ6Ha+*h%]UV)oTgIudG)eR9p\6X=7nNs_lCZEue*cUyj4ZFzi U"kdt8Ad&\kf/TJVaQWXzdH0FP/37Nj=d8sh#YPt_ U"$Mb5GL3+g-v.Q?Vp((:=2#Wsydri-hq%lefC5%:O1f-O?$ge;A]XeZQd+Cun*Q-gKEQkt U"Ue1[4oV9NCN(^a0t?oJP0tYpdLaTgTZ-PQ2t[&+.8,\tMd-AVMj6gTYOud4jB0? U"P?MHSDO-\5z0On;([XZ;[n:/#_hTaLD8?\:s1#dA?[XhcrNPo%Dup(%)9%'[%-% U"D+m;I1n2WYN[A%%.%k%%1%%%%i#fxR%%xUVS[ugqNJJ2KcrNhhlNG&U_)^$16L6 U"U$^[M#olIf5X7F7A0PAg1nGj&&pfu3*/V-'8Jvn><;I:.gB#Ugo/Ykj/Saug&3f U"2INI#)tD(19ZX6OTg:JAMP581Q)de*DR_DBcxH^h6E5b)qdcgvlf9HH4^HJcbml U"aHX^H#HQlQFLG%(WXTiIr*>QM%=7:oMOfP:d(hh*--[afP'dQih?M#0l%&+vJpc U"DCPg5Fs%zT&P%yey5Tt$Cf9D:g0^/0ktunG.j:deMjzEHCwo03^L.Vd+j#[[4Ri U"X,7-wf'txdAFt/JT:zT[V$\h)35RA1z2ANgoKGJTdud-C;5;T11qL]XfgKj,R3W U"k6g;V1quI9FY1diVcGi/u/e3aYW/^#)&'dA,8y^]E<[HPJRA^cq>^S+N2cw(hFSF;)c'R#C[A;pa8:Mu:C U"AC6iIrycEsHaTUK^?2:1[C U"Ht2_kl6E^uVkBRT*^rzGs:fSHd4Zlh^?uHO#l#_G_7n^s1m>=?xY0EwMM*m3E1O U"g,'>]W#a'wO/4UV:8X[\#vR6EI%9;m1aSHFwBR9Z0*m8FA<]0gSpIS)$rnY,zFr2g8hu058OU*)oAh U"VaCh?MT6,l4K?BfZdpPr#4JCcG2%qeyLyYt[Uk*j+a$sfBE=AEsr=n&rgt^E&$JJ/+$MVy5X>Y,sBilU0.,u+UPe U"F$\iEk=)5l.:GTCu0Pa#s+?dhuO5?N5iErZthhNeld0+%GH*K?;T9fqlt0(iURs U".t%vhWxBW*>Fk:/Ut+fql2-;X*1X7[>iIJGI]PXS'th)[SCiX\hc9>qn4*8wyl0 U"HNXZBJdkwe,7r/r'uaNLnI(qK'^(s]h=KKCP.-S:nYkDm2v79H]uBbUX$s'P_Lg U"kTLEABq(_ljNqFRmMF1]T1vI],j:MaKIwKvb=6\Ccf(>U3HCx# U"s\60OGhJ]:(ek>vY)x?.8nm.NLr4Xqv* U"u0IuNm[hH\V9UhlZ_Yd^$NGA%k/^9gffqq2-XlvFEHkq;&)V%Z=LbDtT/>S\0Z; U"L_(Ei*e'1XiM75d0swmraq+>Lj'Et]CM=tBVN% U"^,,]t%8huksPsU78Yd]A?bSTU;BUEc8,mM$1t%c U"8iH-hhBUm(W+So:6oI0ROFmN_PI.SRj;FHIVXC,5[d]:bk=F#)LmB;xOg$R:XYd U":.Uz(/C50,=YX[dl__hl;l28()w&%AzchsyWWLAi#d>,J#;G6EVmxH_ U"D^LOiGeSYT./Sxm.bnb(;2-^F3KcALJYxxtc/N/tDLvN_K2dhV$.:/Kog#MQm\4%Zl6.0+m]7U5eX\si U"_BbxdJbG^b_tEG?ZQY-1ge<7YSqz49H&7Y_gKOh+\A6T&ZSI2f/rsTa_I+a?Ks9 U"k-oA2tpA^,=e8uDFa'?uPquTn[>mD35WJEDTa6-jp.&)wMh#p3Z/0\Y0X<.9\g+ U"dM7#-S)v?YM[)'jhh7BO28D'A;2(wFZu,:]2fy0^MwC-G:oRX^%t?Te7;'j#pW# U"#C5RZ:brtmM+MWmCiF/b6=urDVlDj3/#VK[v#38m>%qwIWFiTHa<[XR8*fKcL]7 U"MW#/Zq0L6v7^[hQ/kX4xEoJ- U"6Qsy_]E9QXLIn2s-F&ouWydg?C=g9wQbIu2h_oaAFRk_#aEh=-p:o+aEp]T]>n2 U"dfc./mJy'Fp'3vu=$D%.A*dl6#EUqV5R&H]S-[=lDijK&:[Fpdy:pbDf2YL7RAO U"z;v-f53C.k\s#RLA0rMrNt(X#=H,J$<7N93nN,S=U[6$*=mOZam&,CZs1JQtO&b U"NnZsq->DR/P7w^/cp1S0GHwBunGnrEIg/N_>-V8mX1UrO\ISei+S[/XlCEQ;1jS U"DmY?_O8m9f]Q.0>:+g$^Nq'am2s&('-V);T1\&.2[c[YFA3Vs/E4>hau)w?*f.[ U"/f3xh0]s/OX_;:6<3Lk3/.l;7MdWY(QT-OKS^/_ U",Rk5Ne8P\?qQIp[aRE(d]==xq2Nrv=xscjwUN[K\gVF1Q?tXfp_ U"hgGxc'4C(J0rCBLxT1DOHu7sB?i]Qoc8QNATL,MO4Fh:nRgUTyS/%71*&]u_YoL U"'edPJ)vfGo5A8XRCd_,mI7?X[BY7)17$3hO.oZ?(Ib]syRTSN1UN4i6Din'O:a; END SUB SUB V2 U"X=Kv&CELv+i1pq1'+];[d:ZRr-E6);hUD4^a3A'5^3VK+oH8$HmdZ]%Awac5Un- U"9vW?/l9+8/9fef1KB+eq0.k>u8l(d2?x17TwHjG,Fl50L8NS6&c#B*ngCK&LS>4 U">0*&dXPWuuQg/RF9+hnY]#bBU8]hjf:b'dep>/dXBYWfQ9J;?dWtBo1=;*3GenJ U"gKR+[%Tr)Tee%9yd\Y/<(YW$?i*ewV^&kb+vr[F5,)A#j>2U,iQME980A4:\A1/ U"YQI7VOD8&'E5$.J1Qp'[j3bB5QS*OWesXKiMI%_[2%(V7xRqbedwD1PYlabi9J_ U"p2o/'8+z^7SK:>)cmMR]2FqsnQG<&mV()7GOA$Tt_+yM&VctJ4UxaoB-\v>QYjB U"PWEp*Ejt\FWaKe9jmOqlNbeTqX*15#b(-e^P6P-[DUg>_\kG;/QcCMFF4B8[Z(J U"jbP7Ju>_Rk7;<&BB%=[Dn]zh%g16.2g8$kAZ7:T/CC)YM[bXx%/bG#1kS2/6JtA U"Nl*6WvS1wQQVwOV6MA('=QMWM-x0aD1E4F#FPimg#u]en U"jE=>xrD]jny+1LToj%H5j'9%K9WF+QqOSt1)jO%cmj$9RM9u?$E6IaxqH%K&nW% U"h;VIT>1B6bWD12\ZF8E\_$>[7[hk=ha=U]1W3a>kaF_B55Af>aW>1r#7ha5[mKh U"5P5A;U#q\h=,6AqXY3Ogn))q;JXDnN]OCPqA+oVWI,]jswGKHW$eKW:R<(.cyZC U"p;KLm0t_I*,:Hl,.pBX-%H<>jFIl7Y=DwW9pIMEBclJmo&$,Oc2 U"fQVXS_b?6ZgFzRl:iiJzAvQ4u[tfpA^VD$ek3fEQ0=Bjh?1vl$rEL4#BN.aBd68zFH%eqoZPQi#X&KbcJ4\fAlLL$IUT^_R U"U#&ffNchDhOuSM]6MYFp=_,;WD3jH%LrL?4bL&Q^KPiJdZIYDR9'nMU:b:6WS&8 U"OiFN%>xFlzp[He-9TkwP?OSb>Xr,u&(]i$a U"ssJvJO:K3$W*T&q&YkLILx<)d5tLx$AMi^qQ/';HzCow%8%Nw> U"wO*K)sU,$7U'mUwB'K8m#,_um2OmT_EdEb\MbU-,b1*snH<6Qm_7w<_^p'z^XFv U"7wtaAmEvO*Kf$;A$_H7:H&e'kFzF8L,bnLI[N?FO&t$(.NlC2]0g$$oD_%F0P,V'&\FR7OWK\.C:,$/HEvoo#7=; U"MYGWO0#Ng>4xJ#V$9+iMPcfY[&#T\w1Gk%GSdv5Ix:rF0Tb;M0duTLzMPTs>/qXh[H0bQ5)*1L0Zjc'Gk; U"[F^+U-.;3VWULqRKX'Qa#e2^.>NTr#$IJ[1G+ZBvxSkF\\V8q^to+qP$Vj[_3\Z U".vW1\5AaQF]GuC^F1=/VT5FOiPY_Q=rg(A1%fldPVo*qIGO(pkWvp^61H;2SwaI U"-/bg--$Jkp/=<=xG_6TKn8$d's7ZPSKR0-=BqQfOqRw,U/h'T8_3oU^3>$0hJMM4X U"AiZ]e*el#)mVR7;-I6j8A#0m%J7T&$D*:(=o>V]I7&cU^Mu-a.CJxYDvwML]o46 U"q2o2J?XMaquVOJSiscNdZOjsGab108c9DTt?v(s#la,M,#rav7?l+)&$8R7A^jP U"e9HhX?ojdnFB%yClxgj'>/Kb+toIUAL>fE#7iZtx]Huxh)3RJ_([p*j$.h$bG2/ U"C(MDp4z,mu]>/;aO=q$F.*RP#uPYn9a;*fLX(m6gER?PuBe8BK%f5\aWTF,[DEh U"p:jYAYkhv\ER?:J3a\PQm1p(Jp]Ocw=Cix;$eHR0CJoQKJgyWwdaf+O0dOXdrPZ?HxfE0tFqJ(OD?F/TsulXSe(2,K(rqpnZTo]Qv76- U"?.,Ho2x*vwst7cc0Bxlb2H6J;XCbBzAMxgysto4^3DH4s9'?Y\G#&ZG*+6vuJLl U"cQ0c,ll=-hcxcThsL-Lhn0eylRSrjP]oI'yZ[,9t7y%yys,T.X3I4yP],$NBf&Y U"f*Bzlgg.'p%Zg)3#fO.SPhnH;(.\igBb&ponQKNtFkNlbDqYh;RK.T].FvJ-Nle U"i5&tO+QC1v%9Vfnh*7mP$,>V&7cmcVkUG-slcY0j U"ZxN5(6GKKZN;NY,vi)XT1#Tb:n=^XjxPrBLiktob55=^W5*W_fUHJGl>:&iiET.t[_xBkA7PAH=G&OYpEur>?FDC[ U"2LjKk51gHrWX7/i,/I/H&k81r->3pkdBdDCrNOY$]n-_zr\D.R6/a=J'UF4k%H^ U"M$iF\BJyu0S-)P+GUU:xi^oHg+'(DrdHyc\ImOi:\[Pkv$h=nP?AAWMcr,;=>Fm U"7>+fYsX7P>d=$*AiF)JXlj?,er60wiiV0MPjVs#+6WqXAM%pM2>q#0GrBJ2rfph U"8sh:Kn*Bqaak?FaiLlJdYTJ1X5?PGNuHFI_nh=.5+;e6ee0\-5+/jf3KAX>O]P: U"bcihLwR3dw>trm1UiC;_sDQ=Ul61,Ednm0THTfIqD.DOWhU3%ww:v8r/'rNejb#Z7Ma;(=(GY2iH U"c-Af-.#OvdeFrFl8i+rg7eVF&Zvr1+P)U3c1C()f2C8lyKI\hu^j+uMQh>6C;N: U"&zR/)i/'.xdFdcQEm?Uo0.l2t9&qlZa9bOZBk>FOXp\W\,q0<*g(u\]'$%4/qDm U"s4pBX:;Hb2D;n?GS) U"4sFVAutnJE+kPQf&XPQ=9aOYNT/ep6-[e.=\?'kfuHU_sp]0lidA['14p/([*r, U"])2XXng(qK?)3nd]BVANgF\ben0x4APYXn(H$i+[$bkOebmZ_#OR,*3<_$R1VxI U"g_0.AhR9]%Iw]=hRm,.oLyk8*+HU/h&c3R9hbOM,V3WoWEiP4oBhu6:=*iK#(tq U"_S\vQ*%\bZWq&Ye7W*OneoXu:c(TIo,KR]1J(Jjk5t3ot:rg%c%vfOf%;Pu]M6c U"vaG^C^2ncnNUd&w(qHhnxu0*IXZ,g#4\=Sy2-H0\P9Fx2\nVDlq#VD4pYYj:95% U"hm*58qK:-r;Yi+WZbK3smLgnS;Rm=a]A6SS\H$o7TebIq-tkPPoN1NUI:N&Z'$hF]VsGHpv08-p;Y]5w3 U"I3TBFFT$f]X1fv^RH65tvx]]2S(GK4/W-U=cw-=Q5PQP&sh*0x::9HniD&Jd?&vHxEtKS=H-odZ/$tZz)m0i U"[[#8><%H7FK*D&d%L;.b'KCodPVA3S'Sv-Wxq*5=Sb[S'M]hjqO&eW2<_]0%t+oC>Cjzyq:9n-mqc0sKOY]<5-5wadh U"ore,pgeaeX;aQcWx.a+;vLM;nBhv:^nPLxf*6uKQ'ouNZr^/=nh5cW%^;8m5i,PEq*mDHyHou81F(-#RlQKP;bVWcU&hg):p>SNHeT#W8Bvk) U"]&<<,VhM;g6Hi^1S9*L$)=_2$c3qRd.rG]siVEZ,aw46lE;gT:qk=Judjh=YeLz U"r,8a9]C(&hm2Fs#6P-bO6[fso%AnK$;8]muTx0xSN^?*kl6luEWWdR>b1?1+1Y8 U"Gqh$h0>iEd(2iEy4oURh&fKRkhcRT;M0$-_.B9:=AA$8N4;;uu6G)ompVx]&X%n%/FQ*5g?:TbqE_3 U"b45u*35fuPSN;KiQkoB,Co6o*kH1k)jgtx_B1.C5YSZKeHW#EY^^/je[(_/J/bI U".XePHAeLn3lQL,U[$.HqtC:MNvQo#mguDKeR?VXbX/TLb3V<-J*q.kIG_JbxLt3 U"2V\pFDj#\Ak-/xi;?t>>eJ0nZfFcsjP0#1n,3ea#ZPU4FkI\n(rtTqk=73]wSR0,piau, U";MAnF^$0DCt[skbacVW>L/C0NKo?]oyF1TNyo0TOlrV6j0(-b<9ueItGo[hmW,R U"X,3sEG,V$-hSv/(o*fMxj.#QacMa['[4F6_CJBC5RFp?8cix<)Int>zOs[?(2rr U"Hdf_.9$/sBG-nfRM(:xws1>rXte5Qn3kdxg%(b3L,KiUB?r9,F)mC\\9 U"wES]W]h9_'+x$)\wVZ%/M5%t-bcN=>Bnx0uX:<]apj.kpWlifH61&A)YvHPq9M3 U";,9(U&/05MP'5G';-fHJq;n)h=D:k^Czm=v2$LkX/d[: U">6%gI]/FK]-%yh[/h#[Jb7%]3H7%YA%?.$2AAG5t86b8Q]UF^6VP3oMx(%up()%9%'%#-%(uf3IXG?]BU%7%%b,%%%0%%%%of%xhWZ%[Suf+qfw^+3< U"E59eRr4\KE7Dq0o-K[jNG^rv^Be%fENwSveOI:45PXqZ>$lhIHkptLl]vi7TKi[ U"P$XM:Bm(?kT[wJ+%5(O99w>vsq6Ca(ts1/\$tYZ>0UQ'Y9Z\Ji7[SdV7bOct_qY U"E3IkaXIhggsT?bYqEozlW0)W0*K5-Vq'*&vk*Na-?cFaZa*EXZ?4vRT*LIas(2V U"C+118?)iMv1Q:6Of_$cK1&H3aLzab5%7*:GO__7h=VVGI'=])Dn74?j7Ed999ky U"C>8p(Y=2^et*gHV%0up(%)9%'%%-%yCwhI=2JbxO#(%%+%-%%1#%%%%%jxfn%sk U"tSCy(udh%,>[I_5L.Pxx0s/LM,Z'6FuoFPVP$2eEzSmR'Mg7c_B)E%j]$tD-EqtWZ(*>'8(AGV6VDI;D\1?$BlaIU8b\LE7gkY U"U?;9O>Zy_=)pa>*?K&Iu+F0DbIsN;2JZ(]D7_]B;l'fR^WRQ[4fm;OJQ'$e=<*L U"K;\7,ix,iF#[R)dN-/UEh4GVVs%5xYnIY,Y]++v/VSCF1Oha[MuwT8o1t&u_.v^ U"^.Ktf(J,lV&i=#6&J&A5/&hhQ7;lTPps:9tOL(>s*\n\)iUsbjxbMmC^PIFKggQ U"IfcZJq5hjP^Y/5MZOM7;AH5P/XHhK\pHVW,S5cZz]> U"qX;V?vxR4c)DCpNY[$/gw1mtgGDn9:f5Cc_GJTV*:5ANxg?;wXBr./Y+ U"U9ok48AsMCS5RihMDbj_WUc1l3?p>OVybaxT30THbUNeNq(i:K[JEpUrlDgqGq2 U"kcZcD1jSpew[fB3t$4(0$sP4_l-'oa4Cu<*gWF%cKlA0WF1o(c6'[7rEP4F6O?\ U"IrVTBDD=7/9gEWAz(/$_(#,XhRt]-o>2QC4$YM2-']R_uEO1.*fotFpw$/+3?=L U"$KQfT<^0z?8V(],u'?$ZVEq8F'm0dU:W4D2q?u+A/tMDK;*^khgF^?714B&-i(y U"0cc\lGO:E8w^k']Ju&dJTec/Fsq11dvFTfch$+E?Ezf)k;Eg&'0qccOjaHi-%?[ U"ZTOKV=TZZ_N&:(n$_LDCTNkIg/3eaimJ93RLXRU6_i/&JI_r$:D$VYl*#kr'l;pI^Z1L6N-5FZJAC$9f U"fjv:^yNIw%%up(%)9%'[%-%k_SbIe.%%Zt%)%%'%-%%1#%%%%%xRks%yU]S#]ZU U"44z8:Id\9M1_g+FO+KN(#F,;zxnS2d:8WZ1s5j_iq*eoAfVTzFaXM+PSdHjY-M& U"+#Tbju*20;U/u4Z1+3'e]#-BdK)&DJ*QiH5pYJpcW?,YnXLj*p*ttnme0;iq1Kr U"AAAgJrL-V0N:tcKB2&#tIm1O_IRYaW&$OOI U"=1)-t/Zm_r_VFF.r=Kj,iE0TE7UEA4IOYaFGit/&VuJjF%3odt5b3'a8:xTWSv9 U"=4,keBsPI.U2x'f^qfz6D[SNY U"h4aZu'#=/Za7VD55ifoOW+Hsz8WGDI0(I-DuhggcO6t$1t[)-OP*4sAOwWwmI0l U"D?[0mlH4lH^wc?cfoc(fcIO\kl0?pJ9[;tPC3aXdkGQGYpy/yHYL9wpfh_A#[8B U"4KINsHtFoaOKLmc.hVFBX>p]Gav5mtXWQBm0u7a&FWn32g?stmJ5 U"1fMA?*7+kjW-MHSce%B)'_,-H^Yx'LY?;00iit'BwGXT5nfbyJkqz))8j%-?Jt1EM%_ot#41>((m*0]cPZeNbhrl,KLv[uvdhm$GV U"huhLNT1iR>t3AM]lkDwxG:3EsN).+Uk$g+UGF2qAd2][$>Smasg,'\\S?K]? U"xf#rfG_;<'M7tHXdq:)*IzPn+A$x5 U"Fz?UMZnsnzt#ap$u>5x1$Q\qH;Zc#6fN08'ZkYEbt8Jbxaio6TiNp'jXVD.zhLI U"V0'7-VuXc+vM\NtDA/&,Itle6R%2vTFgKh.n8c_lcl4f?%)OBqO\YGGEH?Gqly( U"TxDG53Mg6E3Mw74)F0k%0>JtYlxeFTTRjS4;_HmoaR1=cEZg2J1>(\Un$;tp*=L]%t--3%N1N;V U"dVYc4hNxVpkd%[QQFj^p\.+WiBeMpQW5H.ul_Fkh9AVqQZZnVGV#lVZUY'j>EVb U"zD6?wDCek7+?)UTa-QeRHUIcKz&zPgM81S^RTOG1)?cc'saf6KrOB&EEXOcqv=l U"##ltvAh(;KdP'bwO7-('q)[sUogkXwK^'W\R6Rgbo.$#+8Wth&CY[$BE^%j4c02 U"5Ldl&60cV>- U"V.]>-Pb#vE\Y8$G$59>%YO=#Z^t,5r/>%H?lKP,E+Ym5'qIxiW%Z%740_Jhp_A# U"wReRxkq.E>3213WtOrM[Gq.]tM8i1E0,C4r70+pr&qF#0\^ U"tp9t-6/)k-t[stO^j^TXAO6kr9AHq0RFs1J8,.:v*+'u.s*n%RH/WuTo59TwS8A U"Qajj2*.R&SD:5>v U"h5XT8L'?g]hlTF&9MrJ&NIgY\X#FA/?\t/L2?uPc-4uv=#//l-vtrE>SR>h^>.bex025b>;rx\pOD$e.g;(9lZ>rHP06'x3.UP%R\mqKoKuIYvV[AvT5Ivo U":;>3osQ)w7=s-tbduj^)a*&s42#dXi,ach^cW+lSBH$JMzsFW_5;-e^mttq;N)f U"O'e#_[sbMN600ny\:jfJxvk U"iAMaCXMc0)<'DQ2yfk)31OB;Wi,vwWvs7oM-ywMLe.O(O7MV+aDM0M$,VjMBH/B U"9WnT7Leofd+7fzg+uv)/?QX6Jxu:_auB5b,ilRvQs%6vbN8JBGl[r=tY^,')r.; U"vN7e#d$p$&]C:i&^r5Y^kskMPRcoG U"4HOmGM+k)gJqcr,Tt(pPgbE#wTmB%XU0Kv.9JR0%7Ip0NwwsrqrdtvilTkNZVU+ U"h06gr5=a?Zu/\/VO2rj49^2W8zHwrkY>ZX<-XXB:eNM'8=Ht,anQr3iqyW^_Rm( U"u)GLIb>W[*6QQ8$>j*4<^+Fxx7HSLJn,qn#fAK_P^]dvC6idqG>us4Q8IM4*P'8 U"(#d^rR$jWRYOFApbI]_>kTMfPjcqfhMod5W7WMP-$,GHtgbt3gJutCECoLLf[,G U"rM#XuuxH\H$jrOHxj#Z/MdOmYMqxOiT8mUYi?c%VXkv.D); U"M%GfE+vejTR4%3G(^(gdAg^WxS),dP4Gr],K$gV(#q\SmUPkeq%BlgSGqo%lB-b U"(5?3_A<=Zuq$rXkc?/\jiHKH%^,LpvkirZjuPuRLtn]N;ExRCBIR0/aX,/J2B$R U"c;4%^$^ U"+Rdj0^k[7\zv8]GZ1E+DQa.GG6EBJ6iNhDm?,QLCDngpd&xCfpYIr64aNoU4evd U"6k>(lEI'WNcGBvwoCD&r5buH2/mR7sl*uD%MjwDHZh*XirWrrLtq\2,&)MD_mdU U"+wuJmE(n3xJw#pRCGBnp3Hc3w$Opyex^g:6AI3bnqcPUBo&kfT%Is^s8qg'Qo/+ U"[qL,lFqvkb6sjIu6LAs*'8T%8#?nCSKw?>>2vCO'Gbm:B0>uVqs/vnLWEP]6x^H U";Ql=:ObwuJw2>:Q%?xUeBp.^w.c/XmvPkrbk\*&WxUHvc6?6b8uVJHj&WsFoj6? U"qHsMciZ)Ub/B.\z&Qre:WV^bf+uS]_?e(nrHm)2BzfBl/xUuF8ZT:F',;?6eH*p U"eRdmjnFV\lW-Ij$K7$>.I%vZKo]3kFM;f$%e)*qjSrLxJ9.%P&pvIB,[ZTzd+Dg U".]*6OA\p.CxMle<2h4toiM;NNMC[-7Bt:<$sjulLk):qeHiHBnx3jG U"d9P:Z3Ku0u7'Q8ueH-_mt^WW9shsk44v(htDI,eo5cdZ4D&Nollpp8b]sj_8uCs U"\?vni(^; U"m(tC<+5r=6hZr6PI6UN8j\W4R8[WA7;jsv\9axsi*^'R4$Dg4fX5ad2kAb3k>\< U"Esd9rGZ;3Lsqv^rldX)SakcX0pWI&m U")HfHhns?=Ha6Sd)4QWq:CVOVZW>&Taas8f/6#='3D^$0QhNzGMA2NZn]8YuO1(i END SUB SUB V3 U"Od^F9,-p^3kL=MKs*a.Xg8#U01hMH3UP,Uz01ONtmdlk8F_wpAX$k4eT55oGX%a U")yrQv'rg(,uh$]^(]j6vJl5U$+?o8H8DF6uts^'cXZ*xAB^S4-#n U"MHwPjXwwxtUua;TqbvHk#d9u<6i8a-vf9Ck2t#]js+hPl8zmW8;aNt1F3&_*DbWokShl^],TGdCBQ#3>aW#5ehXXXRPGep;9Zxp7Jb0>Hh-e,PhuZE U"tr-%\&jbImr^p#M8U:t_t>eId'dapC#&=MilK$c,nO[Cmg_YvpL80Mg$;LP+xp-J2u.Od%up()%9%'%%-%< U"wf;Ir0.*[E(%%%v-%%%1%.%%%x&.hnw%pqSi7rt&y<:=Tka560I%dq)PJd&YtUI U"z.\.++2w/\?X9Lm)DIL.794IRo#Xe,Oy7'Dj0)F^.&I*kpes*vaA$*,cQ^r*Y/i U"e_Ee,pX>W7-RV(c1*z)&u-8WhN..0^k\=aB<$EQd\V\B,[pm-lol[9*[hVR/ExN U"a+HY0,9aGO29lht(v:gO$G/.nMbLPoDA/Aqm#RQ?2v6s88BaZTB%T3k4PV-NYQJ U"64,[pAV(HZt:DPKb1LGf4JH.$S]dU;M1hVHkf+<0(FiHdW-bRIGrHk4>ilYopi' U"Jpcz-.PFi><_R5hC(8eN+5+:[nVU:3e;#%)..9'Y>)RhmL=qKX'*+4O*_.&R U"iqUjTTq>0R/ANg5/=YWeKG3H;\9SC)PuA'B:X%Pe5gX.j&aJt[8ZRZ.'AP=Zex]jUYp^jY2oWR9&z]R]+x?3\L*xoH4z'pI'(E8*+q1 U"OIW8)IyA#b)PieBm?J&NRx>_l1UihFphPmWb0]CxO0-,JTWq-;U=gXf+D)i1VI> U"ygIclUwHtF=osrcv\+rq>GNCF&DKK,)&yP).gDD]hf]q$qG4kWeJ$RO0#TiV2VF U"#b7.qmrMW1hAP#)MX%Xs$=47AzT.7Qm9\4tdT15nVe=e0JS[2*^;66i1PmG)%qv U")bpH9lHgt]VIOfF0(*HAd2wk\<5HMZ).hN#,z5/O*V5E6?bG-g3H]O*PBCH/Gyc U"PCOO+& U"QOMNQ2LcGA]t#Q/'I+K(NRH0Sb$m80dvXgd%kH6Dr9&c.EkX&u U"Y1]LaV^q.=Wiv6D+GvN8oLY#lCOrx,s?<^c%T^_\;nX&82(7cI^VoJQUW,LoH4Y+Ls2WKh; U"f-J)4zsR./avf32gFmrg&pVHV.$WXLn.j?SV+Quf/d)tXg-.;It4Q'&fmqod57= U"9(;+,[2GXmXBae;i5DYOMiT=^P,X;aK??z\8TbpW[Ojf>(p(Cu_NJ U"Y#iZ:6ao(4_X%up()%9%'%%-%>w';I3J/^,9(7%%R,%%%1%.%%%x&.htq%twSi7 U"rt&z<:=Tka560I%d1)$0*6iE.JPd2.9+2w3&)ZYRik)J1.7AJISg#Xk,CY7'Dj0 U")F^.&I*kpes*vaA$jhK1MA'j0GmN.DRthpW5LJ&JK7+k4*s]ws1,Bu/$3?t'V?r U"Cklr$?TL3tSSU[d\./i^Z(J?Uxj]N:>^?aGOB9ch4zv:gO$G&.pct%/Uts7+92h U"-K9^Rih^[\Dr=4(,:-$=A]SA?Q&*RhsxxF2GFZrCtJe:tsk]F3qhN3xQ#qWhThD U"IE73i,j1+McQNLcVh#+dmLgl5\o%:xXc*9NB4/7;sah1h19%:IqW$e8S<*%/V91 U"'YSf4GKgnN3*1)2$/q7#p>VWLi[D(JR;5:EAteOMTUzZ(*b64%x57)FgB:&dq(' U"j7G6D'^IZ=8u^R5]k0hABVc9IA.K<+NP]wW(/h7<[B*;:5'j+R4'P)j?Ms'V8r: U"hK7*IuE:6-'yC+Oj/W7veEzXFrFa63?M-='N$a(2>w+#XF<0qp>h;oA^V+G0?xq U"Ht[fN>lj[Fdq_BB(p*xILhp9RuobwH*tv=DOo-NLFewD-u4.#+tgHS&tEd2wHrb U"SSGRHtFPpG$JYMjSEho2*w-JM\q%BHB7?g2YqaKW)7'l'4aM$zE:>12/\=Cv]e% U"U?$8%o07[*?La$VR>Z(S1?6E\:Y)PC0/[D;KzUaSn:DK'x%_x:\Gr#c'dPO6,aPu*iRVpP6vMPXnM04zbsU^*JYX^IYj\b82sF(=CqU6&tW U"n='3J:\[ku98Wp&828Pc&o7qdYsinEi1.V(<3j)nC)Uv47dC/Uh)VJV%KqOH2$1 U"Fm0'6dkB,<--ZW61uYX.X=-2GzueDJ(VX(22NBcwi U"z_M-wB*jopbGdIz*-.eE.10'T/'LOv/DqSj>S(1H?p;5lk\3wa'Lt/;0V*FHwnd U"8Zj'/fK>-M5Gx$x\boTc<]>%up()%9%'%#-%OX03IeQ*U5D'.%%?*%%%/%.%%%x U"&.irt%SnshT.yT=BLe5L3(cN]B]'[;&zYrFp/cC*a\GOg=_+PN/Mq:xpFT1+SZu U"wmH6QVHIe'X':PHgXM6EE5Nt+m8f$1'LQQBFhCG2\qMc2w7I[l-e/^je4Bi>hWa U"*^o'o7z=1[e7Xg/rprMq[uan)I?aT;q#%==Grgl'I_)voMKDC'PK+2,1Si0+gP6 U"9Df&)&ThV&rtF>;Zgps0k)yzQN*p3rZTN^dkPT>Btm&AC5^v3RJQ2-3bM8(h&Xd U"7$G?Q$kM]x\]x2>nY U"+yp0;%uUC0alAcq_L(d\:pioJVF.<%2L_xsMP/m?k&)_\;zn8m19RNkV?SxF%ua U"9R%U(*lX%X:,LiL:7+#(hNp\?PEQktERl6Jkcp/&^0lVD,nR)0,CaRjj>'H&fqJ U"Lm8n?MKrx62D=#_=u^QV&lR(L>Ti/BSm5NFl[$[A U"q)?l)R;(.+i3hSDge$QO6I+GAy1Q0jz#Z5quSHN$Llyn?b'Kb6nZscoVLb\6Fe1 U"#tiItPtDQ%PjX8hruFES#/K35cR,]wK;N?u'd,k.%>(mM>qEii3)+y776;uc.N- U"kpgu#Rvhn^#qng6jWns+Y04-3j U"8J(fsNPTmBr^q]nTiJWEtpM3krY<_];3b&dkMq;5=lB0.QS:P7RR6;?*3'*&]ph U"(7&^o,I*074Qb4\Bu3L$o^+5iN0#J(S00:GUV0VkM=9,>='K[*RTC-5Qqf4:Y>I U"09c1%:r>qo>1n;+1F4\*)[)'oU>qm*g]jx'g,EG[5-:&$23+9bi#0*/YF1xr?.l U"ik%R0pEDWnhJpR(Cr#t]AD^gP$q8i=&(xM]pWJewU5oAVmb;uE_[q?$7%n-)b\f U"_+f$5Su=FU\W]*q3jvA2a)PfWTHY#t'+BX6Vr#&8d0BNpA^Um^4AU:sp8-MHk;b U"5nDWPA)(YUb]C9f*\Vdc;K\js;pL*e0wB-c>FE;>kn$Brt+*mb*d,-,Yn7WThME U"IF3gZe0IlR6G\EbY&F7gA$$\-4Uc:9#9UX>]PLLeaEIl0ET_8:YY&*MQQW,kHD? U"SIlkOU8EVY]CN_r>z^B78]3C5m.JHHd5yzAil+ge?/r$e=4m3\=DS:lf.c/iKcs U"MJG'hP.xY0cUy72,&61[^:hILenQzNd[^4')mq(Cq<4wN25wO?zM'g[<1K[\-Z+qZ)m\gLjyV9%8Cp5dF9a^_K]InFNSPHUpw&2 U"(*mGt8%V%:/IQQ>>sg>'GYk:.F;.^N-sc[7)z?+/,F+&nnt8W;%y)G'l,-:#a_X U"ZMkv/F;0F4;hQ0xP\VY1hmh=1Yl=<^Mau%WN=J:r0ZSN;T^*rm U"=0J\>g;K3;*d8F%kBbq\zlGo9\Rl.QVskyS7HEndSu9v7*;Ku3:y.=\I_\D#=Ar U"6;eeT<9.rUu'L^r:axjwW:3Km>=TImhEQW:UlCok^&pc9Lc[7&4OcSD*L$8&zC? U"8\*d;z>8qoJA'PkPkubjH^Mpy4m,Kf2/KYqDXRb96s#-L9#^RH<3=SJ)vQg&R-d U"hX4cFpxIq-RXgJ6-H3S]I2hN#PsJ1?'\8(SkrU5\+V&tJx U"HQEFX'v&NzWm3S%515oL:33M2\.ee.WScn5c5Ea\_,SK+X$Z,=J\^j=f6keH\,$ U"^\rDg01D%/ez)7_:Yg4Os-8:/yNwUApio^ U"Hj(JEQ=7vY4dmZ8xoal1RR[=F)3p:6=/;J,LI8V^BGc6I&geK7ss=bJbU\S>cT< U"$+Pxz]8Z[tRk_mOnlY&tGc:e#]YIq+D3^t.E&N&up%()9%%'%-%7Ew;I0T8eo&Z U"(%%')-%%%/%%%/%x.l%jySi7rt>y;,:\k^9LdXd?K;+tffgnkjuQvw;aLeBQB*k=$5sc=3,qP U"<8ynaJY:D$OkS[sAE,,7x>2l-K9^TEXjkv$R9HdF+fCIBv#,+k:Y/_iANBf7)%3 U"b6iY,RtA3'$7DDw[pc/_4=l-6(NJ;eQ1dZZIhp0y:VF+XbT2ft[nxChZ*X]lY%0 U"7_H&xEe*$=S8%>8:K]VPgpJB;^M*P8H2[XQ:eKk/?c_1T&6J;C2^>6-) U"iM?D2^IKk<#)=,U(uKj*0J%%Y2^($([LXghG73MH6AT[8UF9-[BiJ:Q&qdQO:x5 U"TKe=iTbMKZeT&:.JZG?/3bek7pf/78_U02Sy?+Oj'wPevGt&.a8pu*jutqi#fZei-m?H8RSB(l:6v-:Y7YUY=)Q>B<7SB$;lG:#f;AF2x'ArTjr+?T2 U"*KiIa1e.(q8eh^A$<,Y5o75gl?*RFqR*,,P&P34dY+/1&U+*oP+K*W,z>VjV1&Y U"mN\e>k.Gyn4w?Egxkd*NGXy't4%T:/(>:H/#4,?:D%ca6aA^n2%Okfm%-%:%ic5 U"=>6kJi.wpU5gh5r$1hhWJiR]kgJSLDG9+.pOW/E^TixRD4bR__\[ezIx/[J[dcD U"XjJDEN%fgjCGMrbi#NSU*BtOP_xUi^:''_%4=#BK[GS>d'8L8:U0s,*bAwi/a-X U"L6gT(2-?H'B?i_-&m.UR&qmC^qkVdciY$\r8A\/baR&Z03Wmk=oY,QtK/Nl_Dz^ U"raZDVgbE^y2(k$hg)dNmR/WEwEy,m4:?3k:ybLi#Gn)kpNKDi1a&;Na9=<^/bpn U"/vmxs;Ps#H[cdN?]8*,uW_8x%0up(%)9%'%%-%Iaw;Iq2aB9P[+%%=%6%%0#%%% U"%(x.ns%ktSiRrt&gT[=9#h&'kda]h(6r/k0>#S_3:(ReeBo%'1I U"%m,xEPeCl$#0iAg4uE:Yq]gAxjC9A>B91Uiha_/j5g\V1gMm0k+e5$^14M+w#A).<5XbQ)s&ZrjeFjU)T U"E5Hq*Gq.eX:=w8k%SH]MaP**YEs1aW'O5*DGO$XgDbOvA^#YzlBn-)^JMn+CWd1 U")LT3e%iN'Q8+5sK/8J&qv;im:^)P<0WBCnXqzTDL\Pm+Vf\GV8dKb\osKac4f7h U"[FG9/H;5W0p4W7Mh]XRWtK>f_f1p%dAWBi7(T>gV30fVf)g-]UEmfRaTK^$qkw1 U"XPFG.Y&So&tctKjd;yg$=MJB1Z4tX%dGL6d]eRt.h.tk93t)6d/U&T/=1zu%rPz U"kmQ%_5D=PbPrQ?i-FcdUXIn&CpCMgG.KQ&W+\nU:R(U?\/m=*&mc[DoBb7=rEZ% U"TePuGV+;7m0cbgGa\]J1.Q.4wn$V_<6ph-n9AqY U"[jqI^Y$VBqOY9^+j&)dT:n\[+,kw2c]ie=kZ>=ZMWmDG.U?B-V+*_oI0*lF;49&2t.bg(>uY'*]tDfr& U"0[TdNNsmf.w,9nq=>ZufKiaF(l5P;Oj=YWN-z*:zK>Nu%kP?pJ\PjWH=2p2+F4( U"/&rVVK&a+SGjgkLaL[R'6#kZVPh1#_pJURL1kOq9J^??&JV[2,J%Z^Sg U"5p/8*AG/rBV?+]SE]sTd?Z2qg]RgsC8?wT.=vvBnlGvDNG.x'N;BVx^k.=8eQ0( U"[ju\[_M/W4Rii'lAtTr32)n:jWQUH&D(ZC]-$1Qv_o+BU7+^0[a['V:w>#yRuZ^ U"S=f1P+scX<<.BzgoxP8#90i=,C,h4+M3ELkeL[^MSvC7SPD+4rAEFJ9A=cUF8hr U"h/Vj;C>h$HA0cTcN0GW]xijB4b)_(E<(Gk1djWr_12m4+%edo4SXYYZs/)8nx%J U"sn#^vQ[8g9u,6(GM?E%kwPduH1GYU;Hpdn/jQEr:BbFN(.z4Y;H9dJ*(;Ya;q[- U"A,[=oEI.b=,\_J5pmn*8Gg*CnLE> U"=H+XL7-XV._U=Kej*;LBrg?4Yi\GN%&up(%)9%'%%-%OFw;IG5\dea[*%%I U"%3%%0#%%%%(x.qn%sjSiRrt6&:r>Tka560IAN==E22rce1w%;,RM'?sF?.;4hW[ U"2nm7u[C;)c[7jpCYs90w-eA_x#o\vA/]NM.a2;6FrFq(alJAoPp'qA6XE]5\A'c U"pb)meI2?urlE$q1BE[pT/EuXr^DHZ6/N;0pISr.FW)R^sr+csc(f3wcQ[8*n-&u U"2:$yX)BY^pe,kWqX=UGGsi>l&a$MFCBidUMU:U*aZClJ*l$gT('rNBIkiCJ#JeD U"B7So6c5'AQARzQrtFFW?*-K;,ofA;W5,=65jCC.jYWZEqP\F5'_7#;myj+CcD97 U".;iCq*[c%r\0o]:2k=G5J6IS[%f[JU\4vm1N1ir(R[j88Ip\#v>r2A?'l65 U"=JLgr/.96gUmc0+_f3/,$'J?28.?.FPGTwQuh(#*=Dh?O8,\I>+hie7huXvvg): U"[\7cfW'rOa5I#b^Z$qq59a&>I&T&u0h U"<]-CjQNSll+HDA?-Jh&-r\us?<_q8*XL^eVHi&n_SaD#kpGg)]:D3VA6O#[bcSc U"C:63]I\\Q*GTZ).x)2BSonDw$PIfs'l\WGk,hC=W0-d/7S(/]IuML70d_Gc<[g+ U"bb2W()a3=y1)^7qe-P]32XsGGYVxSOoYt^?R<7>r3\+]B8n'$&Pt+$S#uIoJR$W U"B'L*Yee=&sx7g*ARj1=x?bT4QGQ-)Sz9^f89+nfK#70uJ*6(tPJO=-4\warV%5u U"n$Q>^NxivHDNm%YB<&XZdzT?O_eo U"2>mj0#J*06sT26T,150W]$DuKt%5H\TY1J8\zI#:e9x_#(J*F8OU;7d-J2d11(# U"M_.U5Y:\s:28ZpJl:iW'OgG2XIYJ=+[lF7O.b2vd)jKl*DM*.HoB0Ux=<12uJhh U"zc^C6PJn>frI5$2i_'M,j1I(Guhxp6q(.;R]sM>e'^k(hfY>GI4mB3=-YZ:2U[, U"gV#5'on]\1es71F#q>8S)RAc&R)e,PnAR]PM\HUsAC^K0x-8^P^cq'PWZBD U"X+:EFAJI$%,EyZDO_q?pVS4GlgAzQ8QX,wcl-u,1RueYD7r'eM(CY+?H+_Do'mb U"tXoEdD[Vjl)'=RPG-]NN_..v+I5zuxqnbuJdv U"V.C]S5V0Uq,PBUTV[Mr(>D[%aw;Pc.LP4WP5>GFt4BNrlL-3KfUn(]'2(PXcM.e U"tHki]1-]%p=0k;:%;26^MMD8p>CR5d$U0dUV0./c9tD/hK]gS9-/Tl**D1PL+^2 U"jbB3Q8>KBERg$>s]\DzaABVeu[N+55xz][a3rnAl0RsvsNRQiCJ0upsrB*i.up% U"()9%%'%-%7Rw;I176%&%/,%%&WC%%%1%%%/%x.r%tzxj%SirtNF',>$S'?7mS7x U"Z^z)?Qg=3jKXYJG%7+qc6BQ-$h)3>O(qV/NqjETSiK4_i$5y2iBk8(I*[N#pB][J,b8:h6*Oooi U"c_#=I_eCajl\dNh=[id38jidXu98+6$sX//WiK^)BpxDSMZZFCB$XV9rAfe3QC8 U"xYhD1D&'o>_o\&+zcKB)HrkNe8Pi3+:p+Yq7$p^+>XtNx3*8MHAT;p)_GV9ZA.Se;tGv'2H&wKMP<\_9\F)aAgG<$kgg,LHjJ=Ka1w9:j9T2 U"]EKz*P]rx'm-i;BFa=ZVZj^*ibW%/g1mGU\AcVR12=HD-&N4OXcc4-a=#&QRN\Y U"jCj+$4F_\m<5='w9?n:>PcLoR] U"8#.Xao)V6h[*V)G5JY/Dr?e$4EO?fr+Kju.u[vU+NFp\/kQVhb-PKzu-]Dy?^Ke U"rFmJ?vSQ*u?j0s^FR2e%j=LH]I$lSh.xcln^OITq<>JRAv&#QubRLIMU8uf#'n( U"eas#690;#m;3&:#-$IJ)Z$t0CjA=s;FXVtaCYtY82O[HEHV#(Gf_0.:Lhi62c>T U"7/FlMJHn'7g(wKwC\>Vh-UkuH9Rs-,DbxcugHd+v0Eb3%)PxZYWf,SoqA/kbgoo U"'J'#6#2)6J_1w[KY*qb1Z-uo#lvm5^q\NrMWfYYSc- U"E04]8:pInk$$T?Rg^p(L(y_,(J<%&ihpPun3n10EVx<&v'ux+h6bBRE32VI[aW:1R+^[k U"l9Z$Sd)'H,6A6m+D2s[Dw'UuqwV#aAo#eQ;s+7:8tF_S%)iQu&;#^=?kN8A3pL23_+Rdn U"%$g*Y/IgDuCk/'Cg4qu:y]P'PALI U"B%tEs'#hSO9R5bdsUiAAA/4N#pFnpNTw2FJo93_WPUut U"b:=[TB_8&lE5%0v,xD/#^W2Cw%%ac43qaq$P8x%H&0Q(VLj49]B5qJhmG%G\7l] U"LJCR&h.($g^3a(>tPj#v24SvjH%6v3h/a.C:a/9Rx0Qvd5&Y8&X)=G(NiYbD0Y.& U"iOr,J2Z-#VsNjE,MfYNtVZJ2SZm)Tbrja U"]fKX4PmTXg4wGkg6nr%W63AhABjbJtn_]4X^jVL*r8Yph1oXp<>02=ig-#+cmMj U"I,87E#,fhQi<,8hgx8#Q0.g;fi$pALfv.8PaQLmq4EYf=m5pT5qZtTrANr<:Djk U".5mOudBtJAwDc=2>b'la$/nY6\#\eFx()fHemnU^)Qm+Cw^SHP-YGmuHt4:p8mA U"4cADrleSk-gM=m?MtW4FDu#VHD?_g_BZ__\aDjT#&-Ic>5'/f'd+DujPBSm5M+l[dq+.6I7A'[As#i_j=ue--:aiQf3 END SUB SUB V4 U"hJx[6bSN>(l.4_k94wVn:zngO'VxCsZcLva=cWegh?7?TT-v#7k0f>7Phv56grd U"]:^Qf%fl8pTo7L9Q>T4IuxNfF^0KWY)Yp.8W]s%#oRY'_lNT/,q:mpq]3='q4]\ U"zd9ZFVD;kA-qI'GlG8D0$/R+igpmP)]8dh+N1hX6roUl&I_Fn0NqJ)3eIYUq:iQ7#*A:$Tlm2r6R(.%#[#7(? U"$y5Ao'KS:8+L*#4xn1S_1]S*9SJV*Z9[h)gkEu0)>^-[iQk8^Y60L1*3kF6:-Ut U"8vx;H7?K9]UUs[f^y_?9(Jd8[,b9ni3akuRS)VmR$u)/ggI'N8rHq*MMi'5W,+cm U"GOP4/LaCL*GfKLASebWRZCI(n;GPN[>m-EoR2qQVuY2d:FxPbR(h?blDJ:tp;k] U"oE44)^FHE43];J9x/g2d[k/ZM^7I'dj5g2i9)TmTu=cN9]aYw)SE=F_ZJSSN)H/ U"gQll?enkFZ3aZo&R3RZcM&:DrCH=1TgPG558%JsLik_CUncIcREq4>gL)t*10Jk U"qrRk9+e,*\BAM&lJE6utb$B5w04H=Csi^UJgjy1e^QTczZv$rMbPm U"L$-Nkx3%.hH&'&7c6;sRr.k9Ll0[d+6N4\4;U& U"]lt/%6:mbeO+Ds50t-FGo][\S>YYQFsFt;9tNc9.PnNU4doxE83DJb6)r/a#phC U"IB.ghbJH^pZWJIo%0Uy*uIwu)3PMPbL[5FSH8)h>g%>IVB7egg_n9,#j3Rq%-$8 U"drHid8k_WD4i*TMzda09&DOnlp#V8TR,mKT0jT:>W_)1<;(+o.x?6_YK#4JIa\7 U".=UNoCiwz'UQDU,dS.nJR]*?PRF98ra*J&g;7h)z:.kE-SLh,*oBhW_Ak9j\ U"Se87s7jf*cJ;F,504K=iQ>RKV5e#:&dJY?/P]LaaggNs&hOcXv5qCp78.e?okgL U"q]$m5J+*?K))5yH8?*Xs);n[T\+*tHqv\&NrNGyTKERk%SyjzQ7gMIi7P?icbr+cumu:iES#fB-e)X U"242,ZP)iy)c*1bnU)PzE/1E/HF)aX7WN;u,+?90izA1?Ly3[,QDji)g3&pR$:2a U"Ad\I4fjU&lpdWP^4vLXhL:O#;iT,pD-1gs=G:n%B>RHI06C#%-Zf0(N[T(gAF78 U"['0d5p6[\mu[IK&5M8T0NoObG\=tKN*3p#RsB%w*#5S]5J8&5.#zSVz.&pjm&/G U"h%2uDA+D0SIv*ky;3(8ELAOQ2>'r69xq>w3CJ#Ap>fse3mOaPI[m$Hy*uma_N:, U"=OV\?e&5wKxRu2ucIL0Id3vPRoY&iU-#\5(zke9,1lD5jcq7#\a56#iAN=-#A3/F19e2OnOH[s^[+O^OWU>iXeF%8;Z_m-cxEvD,NkM>vZnI2iP3s U"wMlE;BVk+mOtZMG66vZq_.#]S3CQi$aJ(DC+V-q6;(Z,qW-EB%Z(Ri5].?If$=c U"Ev5)>/efEKlDrVp2n\F+rr5G/AE=[.2?WbY]HWk1m(dDkj?][fm0tDjF;/BB0/? U"3QDp+v/#/wOx*BxT.HP-0)AOsNsFGdwXjt2PbfM%dA&4gF6V,2#fD;St/(MTF=1 U"]5DU/oW0I%(Ff=IO^5YI_%2uLx$:_gYp;=YGXsp3(UaO*.3#w(^/oVVr^a(am+M U"[mQM;4F0/Fh7E:?EN>S3isv^%=\uE81*'u^qVR&9TAUSx)K+s](hjK_;.id3>Eb U"39I.g3WSMN)TI-iY8>AIQhFgP\M>qhm8?L]Va(n(X\EC)y;;sDWxliw*[0>efO+ U"NR\>NZHi.\fgB$lX)>f_IQPj0J&gpxRR0oT5xID5lPA_m1rX#_9;N/r)n90h,2a U"oWs[n]_r6,pCEOVNSJ(:24A9L+7%Z5H/VTzDQ=:(YlQH/=\G9gIA9jRGF;.HWo=ufh3.9pD=Zd8)HI'\Rj;;[C U"4rJttbm9H1MjI=45N(M&50MUC)Y3\e(qDcaU]S;Db+3-TZWvk8]NR]YT;6-N./g U"G?:)fi%tQI0OfOwpJ/bh'_[]WSURT2uo^vJ=Eq#6:TKAF;*&;oJkMol^MM-P U"jvWxDk3XJEQ49vBw7KbY[;BXode>.>._H&U]B9B\%'NS>L-Qz5:%^tl%.FHb)4# U"6RBDhUy[PyX\(sNrrF>0H=q%vt^Y7d,= U"g;Sf?UuL:X=^qmHw]5648FS]+>#9U;;\c/4xmG\Eh6Hr(XSXil8uBNFPtxY=J;i U"$Ypj]q35s;hieyX[fTdSm*dv>j[[7?(Nsi&0L/>?)l[39kI(V$+R9G]RU4veRi* U"M0sQk%DYZSwIgVw1VkmQXs?TsrpRfk5n\2Q,?a23mcC&^oXzx$$.I#gqu=>(U^?30Ed].-)RT)n].I.vba9^V3]?E, U"8W8;#&G'q0.XdBdf#\qaX7';E96&nU>=PS#p7)6sb+#Tvn5Y4q'u,up%()9%%'% U"-%7ux;I6IA9>'=&%%%9(%%%/%%%%wjfi%rjSu.qxTUa16#i,NYRP,_sw13 U"Q#8$f%(U'UeZVhkg/TA\1Kwj-mhlNcjI&4rRsqqscq]/,b8_X>6XQ^MUC U"IDBoRG*0^=XW1?ixXL*3V=^l3;PmqJ,vN5lBK*Q%?x4A'Ns7h4\kou7WJ*K1p5P?^ U"-6kWk>nAIe($F_0SFka]_O82Rl.U^0[CtqA*#9-DN8H2&V0NpwZk>CW;#v.#Vd9 U"ECpM&K'4j[-nYD^o-rxbogXcM.2AD/,sV=p'h4up%&'9%%9%'%7-%:u9;IE.*5V U"y?.%%ka%%%1%%%%%%%%%%%%E%%%%%%%%%ifxR&%jxf%Sugm%up&'%9%9%%'%-%8 U"$r;Id:-i[&#'%%'e0%%%1%%%%%%%%%&%E%.%%M?%%%if.xR%x%UVSn%shup%&'9 U"%%9%'%7-%DmB;I12=WYNA7%%.k%%%1%%%%%%%%%%%%E%%%%>B%%%ifxR&%xUV%S U"ugq%up&'%9%9%%'%-%:(u3ItXG]B'U%%%'b,%%%0%%%%%%%%%&%E%%%%=_%%%of U"%xhWZ%[Suf%qup&%'9%9%%'%-#%ywhLI=Jb&xO(%(%+-%%%1%%%%%%%%%&%E%%% U"%B#$%%%%jxfn%sktS(y(uu%p&'9%%9%'[%-%k_SbIe.%%Zt%)%%'%-%%1%%%%%% U"%%%%%%E%%(%#c%(%%xR%ksyU%]S]Z%Uup&%'9%9%%'%-O%QC2pI?0F*59*%%%'5 U"%%%1%%%%%%%%%%%E[%%%c#g%%%%xRks%yV[S%]ZUu%p&'9%%9%'#%-%,(neIdVy U"Doo%,%%'%e%%1%%%%%%%%%%%%E%%(%Mm%(%%xR%ksyX%WS]Z%Uup&%'9%9%%'%- U"[%+w;I3CJ^,9[(%%R%,%%1%%%%%%%%%&%%E%%+%ax%C%%x.%htqt% U"wSir%tup&%'9%9%%'%-d%OX3^IeQU&5D'%(%?*%%%/%%%%%%%%%&%E#%%%KA&%% U"%(x.ir%tSns%hup&%'9%9%%'%-[%Aw;.IeBC&oo*%%%a2%%%0%%%%%%%%%&%E[% U"%%'=&%%%9(%%%/%%%%%%% U"%%&%E%#%%?Q%%%wj%firj%Suqx%up*+%%%%%%9%9%&M)%%(+S%%%%% END SUB V2 V3 V4 CLOSE:IF S=0AND 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