'=========================================================================== ' Subject: WINDOZE ENGINE FOR PB Date: 11-02-97 (18:53) ' Author: Mark Junker Code: PB ' Origin: mjs@prg.hannover.sgh-net.de Packet: GRAPHICS.ABC '=========================================================================== ' Run/load under PowerBASIC to extract WIN2_PB.ZIP DEFINT A-Z:SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"WIN2_PB.ZIP",4^6:Z&=32366:?STRING$(50,177); U"%up()%9%'%#-%0T&1HkmWM#?H%%%*n%'%-%.%%&n%sWSgRfxU*(pB#lGa7tS0xh U"(F,)Y3-qbcuKHg%2Q/s-ZT48I:K\5\/aI'u5r+#g,.s]_1$jbf4xnTHe4:B0v.P U"(xSvTvW,yBJ%?cE<:_1.<7PkJFz%%n%c7EmOaQ;$d>TSkv4\6S5lN)hjyr#e%bl U"vq&iRiXdMG6qnLkpW&.rI'ht4yZbnD:YMvqZ?u6oD4dCrDqtP40uMpt0oXNnoZ4 U"h8fjd2KtQo4nMHu^2Noi\2p&V$/PWtFtZkp U"SNE5$l>VsP4VT7pVfA.,\vd\t=SJGdGFl\#^xroK0*u6vp#,^PZSXRr;dJNR7O\ U"*2QYuWFe$KPdC=&i\L\C;&t>t-VupOr$uJM2>]>Kw8:+K2-B$65jQNt,rPf_1?q U"ec5w1x1ch^hLbiPmA3Ku(Z%G\:kb9ISORNjx&bT$oM.9DqSbpn41C,iiQN?.vJ. U"qa022srM'7WnH:B]/G\bZ',RN)0Mi#f2*7bu,]J&HL4Mc]5y:D^#KuCK3smK\)g U"4];4T:Dy=qW[SgjH%XubZIaMwfMigV$A[V>Nri];P5sf.I172W0vvmZF+Ob\;bH U"4p.X+lkjat1U2rUtkTYHCCUdB-cS\ytqAD9()iI_V9g* U"aW9o_zXn?7[r*c;yu*-XKc#H_qVKQpIDD*X]RAuh_2/a1kh)T$00eD;mwq_(wIW U".q<.4.$Ox/\J7mng1vJ)O*NZv\7_[P U"%H(Ve:#gtn#7hG2=1_AQulot'6;hwFN%BF/TG<_jTUK-)m[Yb\fr1Ya06*v(fr^ U"PN+EWaxC$^cH)iLmpmHP,2lWXPIlZR8PlJsGsJx_SxikGmSW#fG.MxB(oE*TgT7 U"_?_uuI#c=Eob]\U,hs9ptv/(*'E?$VF6TF:J:NJ((B_-14iyC.ACHuYG.ES=XOq U"1u0Yj#$)_*I[)l_fSjn?c$5<2[:U[(n&).)ndPv&PaHTD:F;Rj^-\93QE&>7^^z U"[c)d'829gyGAebs^-4GtotiWcT7QcTOXmM'sA1^T\_C7,(Q6(?mD\>.JcS&yer, U"[&_aUu6u,%)DitM:E;G,ubmBZ/z9KK:DU*3\%k_Kgvy]l+M>1VlQ#^/=$F$,S:, U"d34_B'F(z/+[+g(_]WQmg=Q\hr^CPG]XlBlHZB&sYX)J'70R#=c>KJ)+/a1T4FM U"kU&)>bYb\2HkP5KpdKE?3th$lTT\g0DSe^.1rnA:H%pm+LBqb2j[D]Pv,FA<7tA U"\N0*6*>dkqwn^f4L(uJ_D\]G1P+CJxD;b_=jh?^g;5UFWl2/moibHG U"5LL_1v^DtQWshhS\*/pt91e5$^2k,fB5,sZZg_+.L:K_WG2ch0*TNnr/qR[?#o* U"T^8U4I%s9oByUtL?:kIj't5Y)cKpYa7Fw24VJ_[f%cP>_U3uIq^g7AKlVT0.gs] U"yj$+(c1nlV?<''[V#4mffZ\*cR+0[tvNUBL*?mIiyeHCS[$23E=u>k4R U"%2;5&2Eq7Ju+Sf?KtBqcGW05xgT:B\g,/nT_*iDGPY)+7UfyBVXV*SUDrMu:+=N U".x#Uz4B#S/)+2[WbGFE70oB.Y/nhyXEkJQ.IMT=L?qu%J8$ve)o1gpZF8kMgIp* U"MaO_1MZcVc1%][-X.,RkEfS;wKD6aq4fucBrZ1jm6^%mBI.P+5w%i[Cq5%5,xw9 U"eRN?4&fui2+ZjZ'mER\KfKEK;ni?6K%crxD35m:[*#p,()-wI%Gg'5Lu*N-M3KZo=vC+=7cf1(JN#H#=#h;Cd+Zq?e=itHa?%.yb;K0 U"EIL-F?4,MfyKQFM/]0]x/7F6j'e?D-*>zA\5F(^4jQVWc[[:A1;Dz_2fMh8*B?h U"DYH[lQi;:5,QuOu23la0X]#jS;dlOX6Zi:H-j3U75pO]K_H%utdO\X><%Zo?SId U"Fk99zfy^xSd=/ajKjtE&b>T#1cyDu,SI_$*fCf<6/Eh=[u*U:K_AC_1 U"Xs3Ee[XUIb21R[h:_Ve#0dik;9DTE9iseH+M;$B%JpgmFAS-Pr.X^YWPxSxzstccLu3s%'YE/jVR#$4D U"'o.$4MtBpdJWxbheB1*c(>8\l=[oC7-<]vPjt,GecUt='+**aLqza#FF-'/'2f? U"jNd$$Hu,d9M'R.K1a]cz73J77N1XWQ3_2q9v> U"NIA<1)R;OIM1>cSFl,:Xbtu==y,4)j2.Ik6%&9tI7bP1n1JQ6::Y/NL]\o+&.lw U"y)?HavHl2+1\>[Gm(%slx:ej*+F)KOQ$p'IB$c9='-3g1T'S>LuS2blm$%OVUD0 U"yNxO'>-mD4#)4D%L/d?eJ:?*t1pCDjw&0DVP9y+-$:UC&MWT*6T_FFC\mKBiaBl U"/jAHsSqiEvCSc.]5TN_*6aY:=)SjRz09?g(5o]_e\g0Mi3Z0'iecg)e0^.zTVSU U"4D3*N[_'8G-$9)nci-r&NTrk,a,o(Ob^s&d%.;$$%LeWn0[MkCWL^5RI_%yW,i5 U"=[i8FH%PK:EtissvFMmEl[B.C6eJP/rzkhKr_$AXEAdkn[k2M(]5*9KC&J21?=7 U"W'[2f?5)E2Ue[h%CDi[v'8XHH7/tJ;woYRC5JfJc_&,x15I\nyLOtk6?4efX?m: U"(hjcAp3iW?3]m/RG2o\]5jk0IYeKN#hss;NaZVcMlHI8fgk1X_AOX?Pc-+RNNQ/ U"^Efm[o2,xJ7X(;W$]C;PcH28:KqoYOBWPrY$eXp#3Wc#;;hUs3[RcMw=llxV4tGTV?ZT6'Pm U"w.tpI]aFboUyTJW8dwffX;*%0o*#XIz50u,,vr$PNM%Kh:v2QEjP U"-+abG%Qq%Y:$Rr^tAfO,To'7.f>q)n2uow9fAJuwSARit]Zg9'l^LS_:wV2Rg1' U"uQds&2]W\,3XP56(pzrD6^$bcbe]INCNGJji_Rm=]4p3VB(qBI+WYZ->pWIO0qV U")'uxRbehLM0KSz<)5nNv%Ec?uGuX%MtlK3J5W+-ftp*HYdIglEk)-1&AKTZ52-L U"d*Y1&&6um4gc:J=V=L_XSpE=e0T'=tnT U"$cOb5VTb]Z#$T)IH5;)ah>B$Gg#$f6;\K=e9K'ohOXYA*IIxh&X2_lE4AFt(MUO U"ft>Y97dZ-vDal_N8#8XFmmn25SD%gE/nIx,E)ACTnkWfiB_#HEo&F_*ARV*A071 U"nd&$S[qYiMTH0\S]%JaT_pGxk-M3tVcVh?<%0/IJyjZ$5kuR<_en=_B:;Qm;:P\ U"7Yg$]zNZ[^+F7<%q1J*BCL>G/?>:qp[oScm+8?KsqlHHB[P7 U"E810)'j,q8M-'lmL_)*7QxCs-:$tk5YMO$LblW:='9FV<.]Dx-GBP19ci0Mj94# U"Q20?q)]^pm4;of6]9=$#y6sCH=_Hh$E5?ww''KXnsW6n1rX/Kcz3rQFR_-?9jds U":ZN-HezZhI:EB3(>xKU\0rB))+rdhL95pYHhDs\SHSFT%m4C:ms\y+Oe6%=#FerzV#L U"6=\70PqcL.0Q?Y(PEh>Q2QWO?#3bA8,:&^dY$PMuYR0uiIBpi-=PC6O]3k^jqT] U"B3x])aQXN4'3jjXbZ0BA?ZF*Ht1q&uQbQmevcD8wOf?9Z&m#gP0mOfH1--1FH5+ U"_&_jthJ]fgu$(>YW't3l+ov&=m,Q_-Mu$EH&D/U/K[1t\B1o/l.oFQ.^Zq1_O7m U"WTI7VQ,(ZHq;wKSswa1NBKAZ]pxJj-)Yc4_uh)Q$rO+8%Ql#zI]r.dQeDtE2CQl U"ISMm7rQlDZQL(#ZW^hpO5U5Mve_IReC#\bgC[]1>xYTCHGbQ1=R3;A(7i?F2NW: U"R#?q)8h-#gzROtiANBLK^]Vc(9]S3uW'h1,AuZb2z*\Q1bX8^H*NVoI+El^\59pz:iLx]+,L8B%&&f,)XAiZYJ<6zl?Gr3vT*bg*g0yvnB[')<2zg[\ U"'8/IyESITRVpAc_lCgoHbkh1lQu**5%tH_NQQDVFi/6E_h%pE%MJcxelCwj-M-C U"k_JyAbOk^8cG.d^WqA4h<]l2cvr)o/hw8Bv\A;]I?,%8N.A0OzjwYT[eP3FO,rn U".x)*_AYjj60[c,TiQ+Eb#^%A0gu%9pP3SSP2[0+gAA$V%;5D$8Vin?*Ge8^hw&; U"[UGUmB0RQ'u1RxDw^.j+_3=LM9hS^'C;rUT9DsBV3=3+TfX2q]$HDpJSte0nG%G U"^pH]9Gmed:D0JEWo:P+:Sd\i5\.WfXL6Zte U"=4vv6*V-s'dp#0\Yhh:&T U"eu1Kr[n-F+T%vc)BF^-NSlu2f[Qu1r&JwR_%/1OuyOA2SmsHg]=l8u U"vP+;Zg>hjh?-pOzsc/2\j\,X\>'Q6e:W0%mqdCOko*i1SRn$oEghhK8_ U"wsC#ks>>;G41rkwHGtQ9W*/Xcwr[NfHsu&\_>dfN+fMlkziEMn&%ReoWviqjNq=#niDMtExIDf:aE^Y9,p:J2$ac;hJ(tIAII_Z606)Ma3TT:aL>(_7& U"7L0'=c1'2t*HD4^l9(LSinTY.%R_j7?6'>RHU2x[NhiSk2'K&POle%$L.t*j[]W U"Yl-<.Xlabk2Tpk0ie(v8RB)TCf-_H_$]_[ U"n+o%UL//)K-s#;>&PUc7oh2dGqPgaUGewO.rijrJbq*uZt&t:BPA4lBM0DEtcIz'J$Ba.Y]t,/l2,egRv,J?5tt_YkS U"rkPjS&YC=2j=Rp\1EyE;\l2+D>y[H61<1m=d8QZqo;E#eZe&IFGlbEpNhNWc3ZR U"4NJkY4[A]>7)(+%%LCEX07BSU#L?)S*5^3Ixw-7*__qlxRhPktO)lR2BgmO5h(K U"mL3?6UeC4#Sy2R-9U%>'F^eUFST<.9&.^_/;i2(KS:^.t9qB-x1i-)H36*?I U"<>kv+2#d&ag8GxoONBubhO/F3)>;>nG*u%3_S^0N--\VhRUie.r_D_/mlZ0md?= U"r9Bup24UrK3$F,2%aY=L:X5bN6on+nru$W%Zdm9DOY0>w..]u?>*c;XZo'4MF0z U"o)+PE*\0j(R&0Wlb&kw;s8D5eWTsCNkBi?kS*GBJD4V-,F338RrXan/5OX0,:RP U"j08;;8O)(e:HdJ.xEEG+#WJkuzkhaR'8.c7dNB[B-e*E4;GNV:UE;WeFa2Zz+Lg U".H]a2ePDaGL1t6pK7UbdS*#K_3u00j;o&q7&&[rd+B[lI0S0d7oztb\2_f>3BH&\%lQFDJH=neF U"]pP/xOOVnU:<'8fCU_9ha%i4mwL+^$&z4DQvLoF:TprijH8Kpp*9*3CmW;N%?'e U"pB9.,XCkFN8XwF)PdY9:;P4loiT?r3=Pv-rZNQ'JlmOv0nOV[RU^bQ:\E39vgsd U"OQZ>>RT;IAObI(KrnD#12^iuPFsbFJaVdd$8xfneDT[L,A[TSHnW]tc33YUo$(#faxPw78mbdoNT\]\tUgj0&=W(SNcSK5HcpSV,FVT0>LcGdf]Q4wQ2\_ZGdR-]E9>r5VIgOZ U"S6iDhd9Cw[Sf1MS9>I43J%FHas%CCCLY^H U"4#eF$'(T<'jma>j=GZRaS>7,oq/=t9iV+TWlqeV*gjgaK?jlg%tgb7Z]pEZRe-Z U"gg/Ruo>rJ?BDY>caUeWlUk/:I6UUR1aC-Y0Qy%\LeNCAEJI.b#p5ql U"VswWP\4pbst%pMqc6h8vL&RVcY4+\^=TOhJ7[ou3#;vVquax--,qQR=J5vQ9v*L U"94Ql)3Cvn[Na5=Z(_uB1[5rIjD(dFFum&W/8*%SKe/zev]3GL7Cr#>SB^w+H0Gt U"SjZowl5*E,2'pDU0+$ U"q76:DW*CS&BPHC> U"L+.ba+lBEe'T&(I0uO)Fh(Sw[#,T8WP9aA>i0mAQh-?UU-$IvTmp(s.2k-Bh&A0 U"+X6.'XOXm9VJ=*iq>U[4:/M*mxYdB67HyXPN>)sv(8MQdcRrQPIT4JE](P6w[ U"6L2aU=i.QolB6f1WyTuSlb;lrIBjZEm;S6EqI.7xpE9. U".jSTv6tg26fH_MKNnei_H,-+uG71M4,E#'g5>B&br(.%GJP;4>%-:_;5)ms]jGn U"oK&P&jw+#0SsR>)>Sd5;N9Znh9/GJc)MxUcek&F2/Up*R.Pg_Vy?MVjdEeJ*;Pj U"/9oYd6D_CAcL)r05u*3fuKCeG&[>]JR]x.5j,eg*3R,:FfKB\_;V4d)S-pITIJa U"J%n,1.E3nwr_g;MdnTrb_56o2Y%Cr6=ds?X(H>%>a,#1U^-J#T)%H$xYu6N%/-( U"qEm*MHDb:?7n+38KFgO2TB=e[xK*so%sZc'r0$)-9g5R7M\0ehYiDaWQ?,1dr]_ U"o8;4B?bWI;'$(&qoU>\QM<.JW_get'ZS.wvhLUG0)2t&r_L1.T53-q[)W>'Z.Z3 U"$5)OrKp15z1ipUkakylQX=/&+bn_]Ku:d>j?)8sK_DJ.\_7D,F*mD U"e9JbLbrngbKe^kW+fBe*m^If7:y*cdnhGnA[?MsA9OsOPliDaeEYPMCN5-L&W5n U",h=3y:=P*pk]928(166z^lh'z-I2^WV2/1De[=mzr%yAZ(hS)nek2HXU.XhPHLj U"oxY6w&-jB\TF9Tq8bD;9I/QNwKQsN[^XQ2:unmt]J=fTv$wP\i0nInu.\nsT)pJ U"rrko3t7ej';yNwy=ZHQN_T0aQT.z&6?6is*W8\q(h^Bze?j&D;i/ew32>4\Y[=h U"nJ4)r:D8+g=bn8aBc<#-B_(t2Z6IreUbY76Y[Rz/-I9Hri[h0A>ELEk['A[d\mq U"c62(muMR0SgC&>I=GhO'I/^=Q)G5^Xl&WQ(ve/JFT/JAFK&Q0]d++%PP+Y\itna U"J:%#]YT]1[GmoM[tBWIVRA+Hp]mrST;Ze6PomD2Z6'U3\ktKqYa7UMd=E*D)?.JY#]4,Gc-'t'twIe^KRTP'&b.(_J'T U"1I2[::xR'(['.oVPo^9A)uae)?N>:lG[eA>H-Pq0br\+jj8>^\vRh>(QOjR$*X] U"q%]qbco\+5QKtD\vT$fkS-i2s(_E1EHXZDBbQCS\W(\:gFCIDak%U)xrHiGt?=8 U"GFGlm$#KHsb''e>QvV&xg1**,G*])eIH%C#($?>bi#AiT0QU/3:**BIA0:SwC-] U"?T&2.9Z3TrjQ*r U".X$u,RI#?wJY:b^rJ_;J_I\#I#^=','n\/m6H+XP4#.gIoc#XWS\I.S&tJep\s2 U"2K=Cj5s\$;hZ+s/EO#Px),Iiaxu(+ku-6j6U?>MOGXyqIIAM$,*um_Gpv9po1*+ U"lxc+M*8(6dTHTG^\-dO\h06WI?=5-o*>uS>BLS]h2__1/9O\q;c/E&'-eZAW6%% U"$>TYsi98yhdQ?m?-vdf/9iazlW)LvT:oUl4*(4M0H;Ad/S;6cF;K_pjnLTFIE5& U"aH&r%K&[k)Tw>Us2i40j%=(T8;Lb[bASALDVd*3hh;n_W8x]^7P=i'O*sh:K=.G,[yjI[6xE91uSSsz&Uctkii5.zSdO/BXY_sD$_, U"X?GD6JFYYuQllx&SA]Z3JHkM$RY1UGdWC[=e]=mZc]r[I+]4J$UT]3z*vy_e'/c'Ubiu+hT81W#eX&EI8SW6s56p1;g)idjk0L0:Yc%Aka9)B6g26?g0ka\C&M1/jrSE[m-hWOf)C U"O>pK(+Fj&?P];akqjS\Z'wo>;,+RCQ'gjH0]j:#_*5QffAjxQlZf-e#+Fbu'tR4P%.z U"33XP9q\m'5p)j4W<=J19xzu>W%z:4:\I>m- U"PO1VW5Feo7vTS&H[iIC?w1t4IQp?kLi'UfCUMdWCOLkc9,MbrXk%[60jmst?B;e U"x+QD)]XjM_U=u;9(isqgaAvgJC%vXIgr&NEKZBK*QPSgwn0R/t9l<5/K2OziH8- U"_3.FGX(W8s4Wu3BX]N:,/O8c\&(UERuD1%U2:x^]i[_e&C9pY0I<=^'ZwjspWFi U"aS6;3O/vgy95r]N*Q2skSQf:$Bbcb4(nF&-B4M$$nF3Yh1&(N5+%uEqq_1D4k5p U"n'9%gIyD-)LocR#89/n;dm$sl)e?a&?oI4b2?LK/G8.mS-BB.JrK8D*wmUS-f-% U"]B'TJmL/V/MI<32,PMO]V2nx6]=U&4:DhJpI+TUbQex#4F2Q$'e2+D)xndlRxSi U"scMEkY:/KQHS0W/khS%#FjEoeI;K7glhSe[\HdmD?U8NWIIBa9.Ee-%kTYRJgJY U"zJq+G]yx.GKb0%(/M+:B%0;Dk^WfRS/:b:/U3nf&m':N?&YqCw]SsRXG08jCI5J U"1WXdua;4lm77K/Z]Tf$gj1s,\9_x,DUUx^r:]zYVG09;1U&zeBK+u*:0m1>L8gp U"+'n*ECCpL,lKi7lE2o6ZDul][kZ-ZSqR5D/N+b&Ed8m;QUwS:62)ax U"-R6,S17)p/kIVD)^H5Em*mZc(?.,X';9iZCmRx3idQQe' U"8uzv:TTZcJ(uMqM]Dx'TPt4x<1V>%/iJ31JF4IXW;B7-)#M%;R%3,RPl,)^GKn:Zw\N-^HJO::^3f3 U"/EQ)awJsP_)1nS*pv#e9oRkdiR?jc6=lw4's65UI%O=0z>c%R^Gt U"\ssWV9v/_QyUBKQf0d7KCd+hc_VMG/?2nsCpq^#sTckmV0>Eqo\Vt#%$u]?U9&* END SUB SUB V2 U"LE=Zy;+1R*,P^hX?Nu*?6uaIyRh7]P[G^+I4<.]V^i[fY2UPyqBe'kz?pOs>jJ6 U"CUoGs's(NqLgW:&FWsavj;g#zo&S5iCsg/kS[43.&o<*7TePoqwn.3H?9[wN3v_ U"*[ZG1vD%4s_[qaSsj[(e(R2Xsy]*)dB(l_$=/l+UyVa_#K#Rb#wYHOSTBAZ0q,B U"FoL+s'Uo*[KPArXx,K]O$sGA_Hr%blL:]T)YIk85gj#G5'fIONjEbiDIjsg$:VveR\RW7)e08&kE&A[ U"Au8>o8T\jjL;:6'pjh#pAO;mr3N)sbXCDI-/-2$<3/(lLm=l7=yMwy%[u U"b,7/J;-9S&;[;Kk+2SKjaM5=r3=HMrK2+zpl2%?qy*Mk0UPfSY,9Ah,?CaH:=Mp U"WyY59bbR]S60i],Wt./-.M;#Wqia(L-OU:QGk/;tYffr-K3.P((9$p7.+qD6qIl U"#88p&jM,7sXp2DoJAxS,J%'(gt0gjb-wgjP7%DHEM71rS7r:6Ff/3C.d/&(_PGU U"i'QY3KJo01/fXP0GPln[za/ruB*Q=u+j7O7J6nFL'u8,oaJUnXtXazr5FSDsH)bVona='0=ZEFDM&+fj?(vS7CR$P/tK2p,P.l7y*J U"8Ia-V,*(9[/MyCTRP(su_I*%nB]udQjGUKmxhIf)A$-1IMs^&hDW0n3]_a5t2Kq U"[Q9VW7(j-,DZa1*anIECS-$]8/^.1i%qP25?>:3#S9;aXde^AeuD-iS=;ND0+62 U"S0W/4),LPflPj?+#(PN/LFvR?;')6x6ZS5td31BA0(84lVlYJ_PQUylq0j\qPwB U",dnFuVWsf;6p]0>\MQfq+BkXP+'gk&^K'vHkOkBhG*(SxyS%B/x>R5W]9OEHLd* U"*2zDWvmYi=s6RSq5O^UC1wOjhPtm\br-vNI0A-Eh#A[RhPAoraO/h5ADHXr]#+9 U"A#1$$D9g-L([,,0RNLeN-i+%&c8syOSB)kGB=m U"E_Pkg']nVCD%uPz9F$Y+MoX8_9ugQA[sk],5N]5k?mtF]&br*Q72>9ZKRJ28czR U"-(5_3s*8?c/.p4De$Dc:8r[o(-\93&4Au9\a'm[Wem^_.-0Q)I U")9MF2$:nNiYiO0)XaEk:'sTq?5]'5ZdykNoi8&/l$*N'4IS-5,yzDiriXnXXOx< U"lfx0AxxO6&[-lOAN)=.m*MIqabSwI$>$FQIH'<:tp\fT+X^FAJ>GD9/QA.jGBfE U"Qs41^HkTLn+Y7EIlzdHc7)mY*,<>i3(TRsDgr9REc(o]WQS_0 U"j:<$a5y#.Hh?YL:00[dUwKeKl5g^UeA=cb3#m.f9hOoOBJyg6u2ZJ:ixSfuZ+;p U":MKH2)&&1qYu%q[2E2#IA2$I:e%1X:&]6.ZH8KegaZ8S[_]#.dUdr's'nC??Zcr U"f:mT(8ElSiZEj22-0=SX6JG$ml#F:gpiZHOV U"[NPtO/b_R,]vo\^NEBfV(Exe)*de^^]'JdPwB_;%i-1#iYcx)Z-;cS%b(w#6VEo U"S,q$S+uK5VgCOyjd=Q5(,6V]YQ+UjfKIOw9sL_'oPQeia,8K&=lgdWSK,TpqB') U"HT/-qOyV.XhgM.^,i%+^JV/>Jp?MlfFjDS$BcMUCp6*>G[IdB?3.Os?vEXuk%Jx U"4JG(0J+ibnfPG^L(<,o8d*hlm/y)A*r\j(W821u?K*[pFZ6wtc^1$R&eFO.C+66 U"I$Qd)x=kMHkM,>\wF_rji4\V39#N6sj:dbg]QIh6bSo32kRn)%%k6o)]cw% U"B7(P+kc-;^Gd)\0B.XX4(urq& U"B[,k*s>^.hqArvlA\RL7]5Ar7a&9n0e#MNud5(9x9:7EgAXFf93x#\[PFlA*yr^ U"0H\vC^>y[MHav8Zhg484Ymp?gyP5fJ]rz9UF$&BVB=%*0hI;tHh,;aL/ks[Po:m U"Z9]Je>-FmVK45coA1*8AbfeJ&YI,;^5:PT6o%hLL0UB=AbrDk4_HEv;*i4x3kl) U".w0%g[m\RSuYD;ZKU'pwpsT]6*J1Y>'H'JWy7mZUrkV=JISmg.r,%Y-p]YpIPI] U"1A>wNU9[ZyZ]s-*He++^866gGd]Isvu(83Jc)xXf4Cq-G2_krZf??;w#lvlQ]uw U"O-&BYP2AE\e;ZGS2eVmdm-M.QfO7(PkF8W4mr:^ThgNi[,=^gcSJ/:;R-hRq*Yo U"o(2178A03.TCdn:oXl:I?JVh2PEg>G7OCRBEc>p/+DwJ:IZBQ1)'kkkkS$Vt8>_ U"gOqEOkCZbmv*g4[uHNDXAc':qJ[*RED.<$70mb;PR(1NKC^E U"eS*PmS&$),YIfY2Zv=wajO]#M--;U+]VO9Zl/;r(DK<=XaL4jr]MMj*HcZhYZz, U"ANft><_41%ibkm$cWE_2F[vMc]1w7OWY8,uFhx-Ud]X^U7?1H&t6]K'\CIgkSE: U"m?eji&SbdU,tHV=;H\kVaSw/=B*KX?lhmC+SQ6V4fkEb-]cT\*X,HFS\DbR)jQ% U"HCZa0bJLeqVPDFrig%08/RQ3OLx#(,z)Tp#KI-W+7M[JOqg*f-nK>i-wKl&dPBa U"8,o-W5t;jLbcrB24DTKvM08XQE(RiX2S_7+D]SoC]n/fHGdN9YiDQy-X6(d.Ypw U"N'JmNqhk94'D.gL+b%DoZa5%L1e4a:bal.ucdG%>J2Uy.0r[g;:KQc*k+U*f6wT U"xvGpok=tlL%_YSP1d/r5#8p=k=k7Up_^;sfcR0m+wH=%/ZOpXj(ib:oZDZK.BWd%E5z/CdD[z3.wbeu6R&*zbE:waHeJO8g*B+%Gsi[;q U"#RgC5fsa=jF]2vg[['5Ms_dCMj]<'reEVmM)JgIP-5[-T#pHgofw%jlA9hHIknN U"K;WV^uIH]%=;YN:?0gv(S#S?rXkA60r?li%rm]e2U7sV)-el/gq7CVYL.MNb7>pO*o[Mf0z3X-]8Vw=LaRLmkXs?Z+Wr99VX[S U"8(0eFD=Sx3.LN:3HP9(n33.-wXvKRDRD0&+>e5fK:4 U"aDAamcnC8bKbQI^BN'L6Zjnjo.(9y/DW2Gi_>Kp0;]*t5blP<51$.dh81j* U"xYjG2]p*>A'jpQ+X97rDwLr+cGbNZ/=ch[2poPol:EYWB:tMc-:C:mu_:gLM5L& U"g>9Q\Ki'baz$#IQNUze3LyA>\4)[6fd#ET#O^qc2v$hkkU'LunRzbj>u/%\0e3=S\N[<:o U"iC/nCe:h;>T4?vC1S?>I\xBJN1ZKQ8wk05f4iIR]-.O55;,Y?]YyDE4Ts-p#00U U"fg#h3sy.P0-O/-?;Y$qf>cFS0nQov>c0(Vev73sXFH$z]:P)CLRIZru8B,BK#qN.m.5L??aIuJIx U"%7PT9a#9A>3v#D3w)6k**9c1Y5D(R9NK>TrZuIQuMIdG.%ae=fPXf_Gn*9rwWn0 U"9Is/9'yjxM,swjecNe(crmQQ.'xLQ6.Gn_cCD07?=4xg*/CF>Lm,E:N;nvGSusd U"g$7yr-JfZ:yjHstFYjgUh6:widPPW3aEFmh,Xe+U(mtbSl2Od(x/1;_1kLE$LF* U"';z]Ob#u>zZxR:*h(u\:k^O55Jx7qc)pd=ajh0Nn8c6XS&uK<:7&_NaEH93d>,K U"(*z\p?:L5uYdAMn5u7+oV%J.'ae6ctjS#,CH9nR4WM_r=6J$eZ\6]8qTEy3pIWN U"B>,X4_7f;*:,1nnj^D:krjf3Vj3Zb&lu*,]UV5Y)86%_2wOlFW>jMJ7h*uaJY0^ U"xu7.&>n%%y6UjuEV^^)w8,g;=(3?POPeueyXIPAr U"b#sCb6B5W3xII^x1>c7hUM:$kspfsFE=EQa9ai18iRHLDxd61mU_YELr;IYqMIe U"%ybUKTGTG^A-dOJ4uWaLR?5'Q>>*dY(MAm.U1]49$-f6^(iiyaX0/i/'7gP:[5v U"]gDj&*MmWG>Qg]W6[8kH7ydb4YVU74r8kY7RLD.fq2<$7qh30R5mIa/3]?QHH=N U"/15HjnZABD$*?'=AE>Hd9^T2WD;ftuIe%fB*VTJ;6D5s8rR:+Vo#5cS3DYu^56H U"?:oG$Re$>yS=WPB114>X,V;K6;+&[N&0_uGX-P;;G6W%tUl#Kj6s7/)m/An#>hP U"lIMst>I,^ah_WM>6>HU:/GhAZxig%ga'gFEBt6*Oq/5)0/v%*0oge3Dcr)YWJ0r U"gXVYS;$1,UQthgd>T6$1-n5K\>le-prr?TX.bce(+-L^4jBQqeGhC'UH7.%)bdd U"Bq8w+#Y5RBXqE%6Ddn0sj..:;MP4fb#nJ]g+R',&=)Y5dci4e*2F>3GM5m;yBFabmfAb/Ak#:FLd*#3r U"$A6zH17fJA'=lN31^W]^kVo]sWRoH\^^&-r;xA(5?GS&0OL*)s)4q[aIv#Bragd U"c>XiP&jFO4UE]VEH+00u%i%H#FZ/[\q^2r[u\r>IOaOELcD?dWDsMj&)-/iUV$P U"DK5qR6T30z7rR;WC:k9_#n6)Cu*:qyu&oX't&xmj\HSu(6I?iEuk.KXwjp-/,>w$4v1C U"LP15M52>/u(3]MX=&Q)L(ZKZH:<1H'lC/1&>+f<_fTY;/y*'e#OgEV2,^]t;$;cjJaQ U"Z_qhMhezYB&pkx#21)GR=:GwQ/E05NDW0p7t.kx*pHle+?a9CJ%7B;%us^a+zdX80YjKbAc5oIpcqr=';,Jb_16RNRsZ)?Ohvcs_EyC1WK U"y'Qrrd2OM(),9Lcp*C&xXVm8]=+N'A U"DzGg.R.j#C81JxuC#e(mFOq-yo>urJBDUl4fdo7/A(j:/m5S\W/p(9fWUksLx^4 U"B<6yFVa.DSNi+BN8r[mH$0538yd;UMG U"hNN1hog^xrUzM_X3E[vZnmXs)i_kg(94LY;7Fwa%SVw&=\.],^Ed-#;VZi^*ipi U"0l<.L<6.pdnXaNq'uUj-Pwl?NH&[yHY%i,JFJ&/ U"^]b6R71$uWZ-*]WTqJ*)].604ai?]r'(-LqF8pB=DGHh)>;E^b?X)L[\$#)nuu& U"<;#DdYDMYrNxI)o.y[:F]Cz)'$%ksp,^$L U"_N(fvqe>Z8LIGblohjgRV_Z,r*\=vAnYIjtw^<+rs]aA5HR2YfUMlj'hG,n+nkD U"mu(Z)dqILUi9igRZUWNiOf]jSsDa,93<[.#KfI4CY8%eABPxA-r1WWJ[s/+WeJB U"eGtW2+KI5h>:pSfF.(KVKizl:aIKVZQj/UE$k=dq/jt?t]ui,Pa=W'4(3zX U"dtsoq=F;BdE]>.;NKVW3+)BI:61.I]Sg#S/\dWd(Jl]=XLP*o%Zy#chyz7K/2Y- U"^R#k7rN4(>cc\CvuN4X_.4h1=8RCC.]14QP$?-Pfv U"%(cek\LVAepc-0#8#IPVpxq)^7OY'][h4n$y-^./Ea1OzLnxsZwOP$,( U"j6,$Q+s,R:U[i6Adr0LW/bpk=]dd-mCkXB882$EFg0pk_'r U"w#9Nr*j\/KeGjmHO06)#Yec[&oX,PPbCc[SpDj%.qIWPcjl/am>.HV-uVhF\Mi; U"3KL'9:'aUIl:k%+64>V23K6?;P]Ac3Y;D=5ao8O-&%r.C;1j] U"Ust0'E)5H]&1i*8#d2-_B7l.]t46,]Y\T)?=?h&tefZ>qAs9?WHBmuYTGO6qiea U"+e0%K\s?GEW9BYYhiZRKLX$aqAQ&^uWJBglr4/0gBKzb*b8QeMxx_YJ482f;Z5v U"7=1G]5%)dAB[Dxf_0KhvI2c2.g73n\CTYB7M+Xar%[MFf(2B^zfeAA.:o8T\jSv U"fh#U6aW%glhV(\&dvrU(Ar1I(REqmvv1Mc+2gIGt4by#,2'17&]]((tLKko+Idq U"[w[grB7):)jjNb?4*2G*FaKbp9n-?;f(Em52QTq5#YzrL9uQThaMDaNR_=AbV$] U"_WJfoq8L7QtHE?p5dQUSOFU2dXYIOC/$dP1NNMROxdW&7;-4'Gb%T2uAs]qMw^d U"OjSPT9-3q)OojJMszqvAq3t0hzbO(#\15D?4x7:ZNZ44,73'78tRl[#Au66(-J\ U"yQ91a:R$+bhO_MHBCMPIkw+DaD';()-W4;ZpykOJqD'c:pyao4+M\jNb3#lPbHL U"*&6B_Bt#dsk>BsDW42a1GB,Ul43jV+&D3IWj=R#bhH^H%;G4KFnDYo7i=pf]MJ> U"8gOqCJi/GK/qJ[O%UZBTE0NsMDNhW8odQD*(M;%m>NZ:oRbrP&q0:9zdN+aQ(%t U"S6p_>bcMGB&#\+pgw6M.UDbD:;.Qh9c:)Nuuf:BHgYtOwj1%gonG[.DcGBQj$&E3rqR-..Z-^t-lbK#B\9VHBlSj+bx=g2( U"d3.8GvxLPayqAs3vYBd%f['w>N5JEW8v[QgO-&GWR7ehzEemt%6?0suA*_RxPX2 U"l+.t;TMarpIYktJG14%B*i/quoYXHR5z2^8MDZ<]il9,l\iaK>h'I:^XnPPgDJ^ U"C)E4PK^B:uF79nNd/7BY&9nweLP7&]LOdUx>&.'Ry4NR8Ynokn?hey4Hhysy[KR U"CKfkbC]wN.AlC_x1yRWDdWbLoD'vt4<;GT-Dc$K:$A1p4(/*wb%'eMDr,^BdmkZjTK>>Cc3o\BVo'+DB0fF8VY(=/VgpYEm3D U"$grT$7vdkvS&o1e?+];+)ibqf0$NcALZWVV&NOz1*J5KRP2bN><2And[oKN6_h& U"ji>yV+39Is.LZEmLhK5SW>-[G)lPOS;^PWk0/.w.8as14kLZg)T*bNk+d=r5XpR_D.x8e\.IWRb?+rW;1;$l U"5G.Nd>?Sqxju+X1&uUDUa\:'-&1_PR:wZh1dIl[T*\T4G\&\ggYvq>:CkhFfGqW U"bglcqJ+S^q=#*,=>,[XBlu4Jl7=,<\N:?aM+-3N2Mz>Qm5'\un^:au9-nYx5TVy U"xJGiu4jE[ax+BsM_kkq\raVAY'qAoEV0eO,w?EEifQdOauAB&>w+6WEw>LwC=5] U"M1N3^\yK<]:5^_T\]RB1S66'k4J]]bi=-6?6Xx>O6-im58OL3]c4Lv\^gnK)pT6 U"$R9_2$+&+DKE\CW]]=woL%i^aA+l\n?ecdXv2=.3WRmc?$Qqp2knMq=8t_jmj$K U"=jM&HBV^c>C:B9]kg;sy,3ZA0Z3>FAVgE'l>C)*=%)?:78M&F99K%;wc\nt[BsJ U"2?gOX8FfXDfYom3B;o#)e8T>/HLjDO;cIDGAA U"1zR.PLOdqU0.9.FZQ9y#R^As_*J9vXW>Stgew/PunY,EikHv7:CcpP7f$3seQDu U"xhc]bWmDoc>bk5N08y6;^4)7-:tN&[YP:\SrE/p,SF*d-12jG U"&l+7Q_-4,SeUS^gkn3&LoYf39Iq515:mv3bN:efX1C6Tc6p[=c:2hH;WH U"VW,Sca&9BA+FJU[3rtCXR>jK+yinCF[q$C/VN[\[64KK3a(qNdFIE4H U"L#aU=o\ypL(fArcH)fypaoZto.sLB##T7[x$jpw9NMr3bkk#+\D]mAd0p_mGhE?6US^b/6SPu25hTULI\UvFo,hIcj>rkBmdLij9G40_RCTV9xe U"N+3*98O%VkDU]d*$M2vPDRyE)bse>6JXgb79Do=ZMybupELSZ.Rf^BiLy),&ii, U"kG,zW_pf,jB?PkCa U"S&islwQe*bDH;+31YM&s.Wg7j.GIJ END SUB SUB V3 U"^9n_1Ur>C=GucYOLcfrU'/fPB6)X\'rA.%6WXkgbY<0mcJ=X)u)6;PfelSrGE#/ U"I7Q/vD:AiZBCnK=OO;:hsnAUZnrpZ4w3^PpA?RRn6]Y9+G&)h\2^Ebz#2o*A7N^ U"CwPo1et;^OT][/.J03awC\GDcI:-U+SMP*+]C.cj#E*8]s)cM U">._zRYK2sI1JxKSSnQ/+vDeonz0K$OML4\ToPu-x(+2=e'(^d$>C6v=cl.v]YnH U"6>bXlMsA$3RrfES;Mf_mdiD'LV=Us2'Aq8ywI#JZEGZ6.-G2S6bmy8z?9.T\e-3 U"PsGhQS79dV]Z*yb:A\GcZ=C))Gi+1t14#X35_IR%k-bzJBY?(d.^Mi'L>xe-$A4 U"+^isE?sRh:%n3prMLKgzY;YZgsv:Nwg5 U"QDibj>>;NU9g%l/5ju.3,X%U)$Bw(L2rn8NN#Np^9]a_ZJd.V(4'4o9L'6q//ve U"z^%k4T..jxG\_14]L,z[x_whf%H3SbQ<,z\g)o],t%Y*?mCeOl2%>V5Zp_Xo#uD U"anEN=bxbjaOw3eM4/K2BKgZ59+e#_9A$vkp-/wO))4dIfuzBNDopTlLFHEcYuQ_ U"-,4b3%nRb%*8^CKVG^(7pd3E4C[R&FLAu;DEjQKWv2hMG&j47 U"X-v^g]A;P[al%8+;K7Wht[*gfTp1?G$5H]7CllXh3APST1iLTG3Dx\J+6* U"mb2XAr.gaVGSTp;m=9&YQ?h80:sQT^iq,dU5(O'9^;q34KVmjB1?CG$vKRHZ6-E U"v(&.1Xv+i04x^YdGZw6\*=+Xp$MOa8]UM*k>\TYZ>Qht#1$^E_&iOQ\\J3ps\xd U"=(9RsDh=Tc'/pOl1O,NzOX=A-dJQY>mK20mG+2W&D..vy6-\eGt4C--$YDntAXOho U"IGG-n4marnB-jnIB6<*F\Zg>i_1S\V6ZUYmu4Gm9U;Y(+E(&Zkjf3;k;=>m$)ce U"r,PH*Bw1<28ij3;:(P29N/A%SQ[UQgXF'U,ZH>e<%=lW U"\gVBQ\RaXwh?6P([..RV*qo$IWQF9/^TKug/N%SqpWy>v?%3VN[+oPiih;D\&Dy U"Lw4=(g/A''-+\rfD9pOJi;F\2/%?dk?N=>Lv7^1Zp=oup=%2PFF)mofbpZYwmEN U"BZh<%ssT'B_izP;<0TR.Tp?YjH8D;#h_Q.c&,iK7H.>A,q#7n*6fpR>2A8.Rr?= U"K*xS&=(..:?]d=r+rtN##f3tK%NON#K:QcEflMV7O.I50:emD^?7ERXQA0zhWLP U"$Q'^mrt]CdxRMS;%59h0yc\d7G/]8G5m+Hkoz%j,h+D1Lvq0^S)LfbrL8]^.26e U"a;ZHa%F+ofe',u1qloE7>m*b:mI0V'%pY5f?s]NSrGv)L#i_eBVTZ;UKjPEKE3J U"EH%&;El%Lao]z528X<-Xc01FX0XX3p]NQP#rhhOcEuNVHM+G$s5[vk U"Hd/j+5SPj] U"-OW7]U'/#cCG55OY?>eMnFUFpoPkkpFRVA;^8CwexhMq[)De4r';#kP>p:jj%N_ U"c:ia0IqIl.4eI&'\)*2SOj-&JIH& U"]u-on+dq(.__t*8JjIl^06NcO._AT(XCU>2oifxmO'e4/]va)fdJr5IesSpn7'S U"milDPQY%mQF-C\(i=1XNVrqpP;YCDpg:SQtb(#a_p=)1+5b/TOZVO$$Q7jBmU>Xkl^6Y4&Q32(5z*qK_j6X9& U"I;QS.sJwS;)DuUEUOsMlw^iDM\VpR1]%DD?;0;=]637\:5u?iiD]_j/%RwqfvPw U"V$mF\7lv8XRF$/xP/7 U"Bd5Y/(Ij2:6*Hr.?Z/9fsgn>2I=uJY,Yrlz:$BqxaytYE=c2-,sBJJgRe8WY&g+7R'd]u:U=7a.20nOyutAoK>2G9H6?$E]X U"_X[?SkWkVr<']l[(PTs)sjWL'DF)cTp%Ytp1'VRITauC'X.?,j*21[Q=hL.LeiS U"gEL1TBYI*;EmaaK#d7;N?WY,>:?A:ZjEm)7Bfd+f-1p*^LCKb;_<;[/k\I4,O6] U":ho']9#.TA')z;:IgG.(rbBrKP6v/FrkN-N3SkZ6CFVU4arGo8=[*bSUe^ihoQ+ U"VS3F;fK9'cL[0VEWA;F:qO-^6wZuV<%iyuh%K&_TL5EM,YNzM9o5#9n2HPR[XdS U"NnIWZ4)2%\B=Y2:J3sbzekDdx(]+,Y^g:*Y&h3**^kU0F+]WnkC,I:1;]InKMa- U"A6#I1P)I8=w.Xc/kK\Hdo\TpUh8^UiMbm<$Kwo\tqXjDxRwounvl:lYsH+6AULu U"f8u^;nRYTcxuTxpgNa$t.wkHuxo#xTqXwR8.9oTp^8xvUtNs&>lOsl/4R7zHS8+ U"NlvdnwNsvNtu-xw(cq$Tx[qd(ob^qP9>wYX*$v.j3>;jidXzn83kZ#QfN[D)lW9 U"9oNuurXwYWxE7co864lxu>mT$tcnRdxMneXeUR27w-,_SNbr?dD8CPX8*TKUu9; U"+86^Ce8mN*7jmY*Hu$4X5'sN578H3gDS&UGK^=Wl1yN[UKa79ELOE?nbbm(EswP U"J#7='='NmB.,CwY2?&f3GN=$b743/,:j#BWoKOW)eTJf6w#HYe=-Ye0j'P%7q/V U"-WJjdV5kA94M6_EnGZUWdK8*/2z[r=*HRxZ*Y_=V^4g?.XxM*Mz#g5bEnyMU5NC U"4dvP'fX)H=Aj;:&7Cd(^Ax23wv6HQbMzu*c4Z2Bc' U"t:3u(/8>3vF52y)(yE9\]k4ZX,MZ7-x4=DP_o,iK?;E^ztEF-TC'5.UW,#l]K+Q U"vn9oT8VfBuSd+GJ%dB3D0H(%:UiPqotM)lr3OPb=/OAA&+Q U"^p/NQ(/eujd7es)gr^;q)dA4-r U">KEf+c*1>tREOMzZvUng*tfR>_77T<.wbXoND]&)*vboo3$'UF=Joau]]0)ImV' U"]$e/][N2MBHJB*CHwf;PQC(nNO2YZdF,]$qGYl,rM#x1URJo56<&p>rFrqY_7ix U"XpEv0se-+6OjTs$2.y1_GFfTn;-7CIf>:BEIRLZB]Rs+$#q)*e)$U%zq)c$t2irc$ U"\Q9T?c&Pl:e2jMa\\)$u[8ySIKMI6WuqU7c]8CAp(c4C^2;(SLUR\lceB=)?4&c U"Te]qU&DlGsAZp&lV%0g9+J]Eruic^6:iZS+*.KXb9*'b.G=,JbMH0FG]Fj1OX0g U"c]DRmJ3L3'^ndT$O*H3 U"7%KD?8Lbs;13=jGKi46W_OPolKe'SzZKd&&RE.nV4jpqL-gAAj8VpXwVN_Zqfe= U"f)Me[>NTQF[*mGl',70-#j576(4P:56<1<_'T.Pe8N6smPceFIlj;KCj;-F: U"wS2*0*nS]'72qL3b&I*v40L%-f'X'\ScL6jDyshwSDP(Lt;zD(NFBc&v+mALXTv U"INT>9Ov2A:P$NjHi-i[\aK3$Z#>#cGqxVEBU^3JkCjy1F',L*;c.8wRjy-G,5as U"Ih&=&2]4;J%Wpb/7km3X%+buki>6^)'PdSuv&u;d.^/z#SBUzQC U"kE,4;(G*qE&C79(BXn:AU]k#1PfJ046f^7UC>9=]Ri*aD7f7kCU-6%;i&yU%''> U"vyU'Z-q2SyfK2zxd2/\\f>FWHV0tEg7qKkAN(Wk]$.+3iG.ON=G#^>,>_H0t$eP U"sRv)W49$>(D9NFZ+H-EiNp\ND0hVxfj*l:W=]PKLl:m2Q.e$)%N2x)4;6Y=32v<#aC6K+ZaV=UtH74SE U"L.(;9'ZzQ']nr7%1P'-tRBj7]pZ?2q?UC]NyXN_wp/l-Ai*Xj62_b'']g,#nKKS U"-8HGRp3NZO3F3ttXHRRN5-#(q^[HQ;2X=6B_a8$:]Of>lHl+EArBW?uFsb&m)o?6N5R8/s-].ts%M0IV24 U"8x8k$G(kgOYwO_7AUg%zGG U"'03k2IOX'L=[#:MaR71WZ9*P;c\C+MK^w^Vb1,2C&Jw9*g;TAmhbVG#g6+'w[vu U"nud=L:l_7yk1$RR0<$B2<>af)?t(GD>dJ3&YNNP\rW7;AZ9K U"V3Qv=3u'571dtF,B=TK^KHA\ku77:O^h%sEM U"8r[GUFsq19cPw>h545U]*cvn\_mJn]X6l%WgT8Kr0%Fj:uda964N5.*Q)igf]l& U"#m<8mDNXx(xjmigV3s^SY[WaDd+3W;.I?Pja#k$<)VLzKaB:Ua9ng>5:;EQtDI. U"KP<8oi)WvD/k\z#qW\.dMpPqjvaE?k99N0Q6Yq*c$nz3W8kNEhMJStn%/8OQjqN U"(PViZ?;JHFXUaptolP4O(ciQbk/H#LGJzpGL9: U"c94k'&5e)prt)o;(?n,[e$IDb6;qRmj-b/j'eW(3xz7k^s=#q(9BpBtG$GT7t(A U"B.Za>r+JT#,9<3;u&?lI9E U"HT3&f4s1Gu%6hIE#g>Uk_HiaYyFgQXOp.nE0d&p&S4qHVo.7wKWI8r4*^K)--m( U"BmtKE\XVM3nG:H9L-daHS*daT$i?2bjgppF=Tbha3ucYccTAQ($BJ]FL\zD=cZH U"auu;EcvEgxd6Dc?tlg_ U"rS4Wn;w,i4vJpR,hI.6oE#U_O/4u U"JbF.X:_Td)^F0/-pfJRiSei2U1Z%lgjlMLOM[/QWY91kE?Pp8cdd=\nnoAD3S]] U"s4_nOnD4kZ4i*GX#P;+G U"N,:TgJIrssk=jr?,nMPR*l]a3iQrJA,B<%)&%/wW'fQmGO5Y1y%)s)qt*0=Gi[v U"JU93f('rWx'3-U:5a5's U">vJN7\u[J:BSrJVj^>7C\#kEu:16'I$r1$AF]CoI_A0Vr8W(%b5J=Bj&)U)MM_v&E^jLO/ClVUN8 U"f-5LCbjh#g;7'2=)o$g>9_m.6;C+&Rvs-AZK0X%lB(&M'tArx_'Hk:cqlEaDKW%Y1[5=n6dwJXF1eP9HIu4_A$&>-*wwouU>Yv\JeF5XAm31O0 U"kK?DDD$=P-gXcjG4'G$go-g9;iAKMbXfTjSdwgE1EB,Xl6[G1[#G[4&ML)cG80\ U"dKdy]V,$lfl+H3/7=8^t%8bV>1QRfH_VfJ*fL*Rg3KlG^0S/avuH%k>BK[Ep^OOdvig8FFUWdhmncm#+/FY>4nY U"#*j[6?I=<$u49n:*5e;54i./XtJui)WT):5)Mi0aUY+#tZk=WpaRbx-KSl-VSdt U"J9p?R=lqs^MH0pM8Z+PMEcta*g;>&81Z:MN#y\/Nix+/'[vo:cHCo.ykuI3qryt U"1;?9st8t5-HRK9958[T[9huaC+TMPl>.S%DIbJGI0npZ^9p9\/Ec[W3+N-b%%1b U"3\dJbe[I3*Ke^c$\ZIdb$?u\ijg,XkwFN01VHf&U,BR2ldjJen7u(q.vM#JitE# U"LG7;#kaJZ:kNHl)PZwd;rISeK>N2E5qx&K>iN]+X>tF0mqxRM6GEy^:$zKD(;xt U"]LLbN)UIb?k=qwH'MhS*BXWrXZ53k1s=KxXG3Fxxq:Yy8rg.Eon-?O'^8dy(D'_b&Y0g7o,qYpPH2C?qcQN9u& U"-?#jt(l2qJTA/49]Yn[:B1jUNP$9xdXBRZy$p6x.\g9X U"%OXHBG_Oj#SA;&>*2U3-N)ll';9d2Oo0-xzC'^Ujj]AJiiqc[JU9v/AHVs7U?'KldVjxZf7VZ1JP&2)*eC7()H&05n4$.DsgpH*f3XhDP U"KLpAvo_W\PlPuHFrEL'G9Hxc^VzNVoC>*4-I6zS1uc/KdYynU[L<>z37bBTO2L8 U"KCjlVRVlv#?sX)8:L=LsjhPFM?R:T1PC(cG$oc?jft41%Fi3Hz3%\4(dTh6^6Wd U"r#qUP1S6q)(v4Df9PwYN#bZr*\[R+/'AbnN>eyRlAL2-gvVD&9F[u U"J5p?OQp_e/jHGHJQ_+T')78/s):=vS_y%;-1Q*a&Vw)1g,(9aS7Mt/eDR3xz9S- U"gXO$ba#s57p_Bnv+:)==V?Td%EyO>9P>2KRbnY>xt6&\YC#)LmOpmiy['+bUkz7 U"^EWDOqs7v8XZ=H6FYfnExrtT&>yy:sarJ.?:%bf<]WxEL;'EEZ9aV,9<(VGnK_; U"%$tGiF=[]DspSQ-690)l'r?ADQ',EPoQ)QT-TU3Q&h\u:*9muV,I6RDoSChO^Nn U"?Znr,BKVDY-%1a]d52T+WHtX^TZ.eIO\lqkW0+?V(AZ6=T&l0#R%4)q&R%k2IR3 U"XVelZ*2#W>PcpuO+.r;arhlo\[G;3Cnq3s.%,8\;C[o:3:*^\p*1mQKF1J*n^%/&Z.od^W$6:>/A[&y#vr4125-JM#r:d#Ll+Q:sW< U"=p0Cg#M1S+5ixKGmc[DT8rN>4zlh:=\(cQL&dCMrVsuaeox**?J?DSZ)Gru0+IB U"MAwfOlD']8?IWT,o49k='<0TIyL]HaM,F:EM#*X#+;G2b5%yc^:Py_qD9K;ug8E U"Ug%0?]Afp%(>*Tn5.[bg\k0NRTn%FU'd2b[ U"ZpS4>))a8PCf8r;SL.01q2L6*,=_^wVZ\v%gZ7=d](hf3klB2hHq#7fqo9IQP9O U"9Y%z=[X$HI[HGf$L.he6gFll5Di_4H[/>Bqp*GH+ZSoeoH,)vEac]Tb3C&?A[75 U"NWZd\ftODpX+=0#JvU[kIj'aPslfJ8z]D9cnC.GY8oJ7V^h\\jEm+ekdBk(FX1C U"YR^tSUW7VAfg]ULJ8f56,qg1RQE;%n\-v&O_0'wnTtot%Hupo$^p8.X0'>wS;YY U"b-NVIDnG\8/?sgatq.+*NwCH^-uTgv:8_6l5x.9bAK8XxDk?[=lD\(60GX[[+<1 U"'7oN?]Wp.Jd52,DLyOlFOBMx3=CMiTU=(2bEm#s:s4/54VfDSc%ACo1#jPPIrI] U"NAOiMA5'#4A=YLV+,?qo1Qu%Kbf U"-+D]w8a*93M+X/aC%KpE)V*O,0&wWc/_RNP];ibeuKM1mn9'sX2(PhL&9sd]NWc U"*la8/>kX/*ZleB^>oVn6\k7497j0.Kf)zGy>%L3emfy]x;Xp)Vw0%F:,oP%%4Nc U"rBb2J*vV#8jw;iS.x?ENJU_^>lK%Y0?0xUF%$sya]QMZtD;h\C721tW_803iS)-SJiO#Kjb U"5H+1hXQ:H1/_]TttChUynLoOyJT/OO-Y'YPs6X^l8WaQ(6]M[6x^%QIZ$dR3rsR U"%v:a-3,913_ue0^\OSwl-qMIa4e*L4a;[r,-?bZdYk5>.5/Kv-GsYYFNfIC)Og2Sfj=/Y,\<$^BV$1arw/aBE]#]hm1LO>_P.5^Eh_.,V=e+?=dgOu3QK^Q,_ZIb#mlZ\FYt]3rQ_%^2%uZj?\GWY\S5GER[#ngF'tqF U"hq):=>nTa0:y)hsINIfx9^?/xagn0j5DQOyBJ1'cmM'=]Qft$Y(yMNfYgQ:i.s+ U"&.zdi[r_y42qIb]B68Ab:8Dbpi6L#wUm#8ah271b*A4MFE+yv?^#8'76V*Rw[aM U"MY+cA4F8TkRi6iUId\?Rj]^S*h55_=^37eT-H*kV[6IJj3e81o003J U"fCl/bhq#h2'HOe06Gk++=\;SZJh[5D>Q%#8X.ppoaMvS9N]x:UZ=\/;G5?CNY0R U"%6oq]pE2_m3?p)eLzzWLNrNv U"HbV8GphN8V)NY6C;vXQu?*YlUSG1Pb&VjIbg?=p>oc0:+zuC>6GO9=-/5\JlL4i$1*Na372PEjHI'U$ui;ubqm)+Q;OW& U"N>3tRbZcMSAEs2O/cq(>r>4.rR_p&*imMBc>PvKa<4vA)gA7V.-bNB2pl?B,;_M U")Rs#S6?4t&l&4hgm4ZUOidcIo\Eh;N=EA9ehHn[cpL?6bw\\U&vGZ/$vhQ=YhF( U"O)t&7rNu..B>9Jtr/6,8[XqAO):M<&]G%Xg1fx8yYU3.VB^%\I8aW_ISCE^lA)J8;Yexz5xp U"REPQ6FNx.Hip/z/35w[8Z=S*d+%9&O1Nfa4=s*OhLehPhMKDLS)e[81]k:5BJDQiwhy1-oY_+(5-6N>55We)sl1XRT U"jwu8vQ#^k[^<93d.4$u#,C<(,Q3,09s?M0/zVlZ#&thp+473T77t&][Ev?NNoP/ END SUB SUB V4 U"(Sqw+#(n^6YPMNoZREs4LV-//t=&Y4WlyO=s*bcZk[WKGwBSeW0J4V-Pjf>9 U"(uI^,dQIhR=s%T)^'QOd:_rxWW+l\$F\7?CBRuWf):?;0LZObmAIC* U"g<3gEOIepXsS4TiFnV:0f3_##[[mn?XBIT-G'q%YLg*v/$A>AmaP(=TpLz>D3'k U"\Q-q-J;$iph93Vm'ZE\gMrf)\:de-FYW'&hGG8)g')JTT&&W(0DXaN'6(KPgnY[ U"kpX4)n>'4#s-nU&C7mUP=zNlc,g-mB3#x+[<%13/jT$\g;^*rwDdeL-_%T+xq[J U"X[Ki^>OcaC-+%rZ>vgM. U"us/P7lKu=bwjH]DxI+sp'%rsebw6PKPOMM'o;]*mbQF5%O3^])TJk*1KAy?VhYu U"C_I]eRPep^9T)\1H[Q[EB)\'[:l*_&A(9SdasgmbG.]'z])+t2K'\ECjjN1:sI/ U"pN/MUMMV7Ci+yj\Cq(:Je/^#Y&WaRsvN,Cy&[,U\g'lRIX+H#uLmo2IK1P3=3yQ U"9f-f7eNjrpNjWMvZ6:$1j;Ser)+JA4lZameDY>O1Thq.t7M]AT1HZua6cZRXl*_ U"apa1ixWaWI.E-Y?+H:wF9Z3QOzQJ_T7M)[(.n_T;54d.I)[3e'#We$QhwO:4772 U"PXILYrWBw\F5jPnyoXbZ3lMmIo?gv6t&w&3C1+YW.n_&kvwTNkh:ku$cSpedht, U";c(H#,Hao#a2YLwkROP<^bZb5UnFNa0Y]qVp*txEmjDfkfIF=)V^'aP*62ffx_' U":+F/67q/%92zSGTbSTU,s-s/My%i\zOBUoM&*:9i#gEOd'S1Jm3F97U:BYnat6P U"svsjBas$x(2KlCDhX;yR.s%utDEut%&uhkS+K^L$RWb]K<l=I5&+N?h U"9a750OB,KCgtL?qYx,%up()%9%'%I-%5(KvG/>7mHH'%%%T:%%%0%.%%&n%skts U"%ySifjy&gT%sIV1FiH(^XHuxN'40qA/fTlEdVgQoR=$7dpP6RZDY2RTk06n_mkX&$U_qOY=QK[6ULphUaWJ;]8h U"&mz8DBr?pHsly9/XSJqS[;kC)P2W%c&Y&#:s7BKqM$Bu\d,Q>0; U"/VY9UVaVi-(B6ZL'ZQAq#g=omwgSss+AqQbUS(aGfZ9k?77P?bts34HTugZy\## U"CxTT5k^Dg>/u*U)VHf_OmX\cefJqqo\j&DQ5ix:I4&fPt$$r3xa\P(UC$$Gro&0kWv$'*p/JvJo8.n'-[^vSSNnphtoZ_- U"YA:]KxRAvg#^2CDfg1/f(GVRSx+Pnjm+HH'%%%T:% U"%%0%%%%%%%%%%%Ej%/PeAH%%&%nskt%sySi%fyup%&':0%9%'%I-%5Ee1HER/dK U"p%7%%M%%%%1%%%%%%%%%&%RE%/P*]K%%%wjfi%ktsy%Sgfx%up*+%%%%%%(%(%& U"x%%%*(L%%%%% END SUB V2 V3 V4 CLOSE:IF S=193AND 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