'=========================================================================== ' Subject: DEMO PROGRAMMER'S LIBRARY Date: 07-07-97 (00:00) ' Author: Dave Shea Code: QB, PDS ' Origin: FidoNet QUIK_BAS Echo Packet: LIBRARY.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"DEMO.ZIP",4^6:Z&=22968:?STRING$(50,177); U"%up()%9%%%R-%sy9$GFz41lG&7%%S(%%%,%%%%wj%fiSr4j&at+t\U5l>hdsFBW U"2%.O:k5+P&io4'cyv[FN,1j^js*l]=dxh;d>8AE?)t(Rvs9rBX$pCaMXNZ'Gq[I U"l][fF>[I,0[^*c/4viKfRj]>_KejRd#Wa=O1Z5I\L9C[0wf<_sRO.>uFVVf7)Vt U"l3A:1LJwffRI>a9qaRLY:\.L$UWSIKzR)Y5z&)=mv)7u$Y]%hfY*;'R/b66i^bH U"RrY-8IMS%OvWP:y:Yj6*Jy;kTiX\_FO\E3)HkvW5895g1ICFuk0:V+M0lmTdKj2,JM-D[lOJ;Dp5MBKv5$EW U"7l3/c]x,.Zc6]^(6:E)5HJ4\PiZ1D8(7c>LYr49oEAZA=DV.T,Bz<3U5hepjpG< U"Wv6ple>x**4Kx3Wb:7QXK?6WadSO1Deb[eo.A.S]sdL#oO>S.ZA.^=;+U?6Z#I6 U"0iaMT'hlLEw%(up(%)9%%%%-%=H-$GoIjLCc%2%%8%L%%-%%%%i%jrtS[ithFk) U"dBTR[7xmbhu4TdsaEgJ7K=j'DZ\\4xReBWn;R$GcPlWD+X]b/O'OvZQ8wE#&uTZ U",E$K\tBC-+pm?*hlvfQxjaw]xemcPtMnFv?ZW87PuTJF^hwFLVdDB]Z_9?_c8\c U"<-[p9;ZpIL2puZqrf%qT?HN$TRbM.NLlZ92qY#USuCma:b_.EQ+=E=tUgl9hDR3 U"9:&I\m/dCBxr/8)pcxHIq(d72/Y_pid[kOn]mEaHr+nOJMftBL^bh?%wP0i%9;k U"9WE_T3&'O5x=r%v'cS9PA^j28q_FamFI6dMpN U"R$s6,-Kl82H.>RrUJMlQ,LQRZhSXp6].B/vsKtJ<%eI2lIkIHWLF2DIN2cB>S9dW7b=F1vT2 U"u0AJl?\p3?2kIHx_e]9EE;$>Ek8.%Z%l'xEJ<,.&>RZ8'n*iu(uJ3bFubhx1*8m U"HVQ1Lf)($S/f+PhZN+1A=pQJQwCEKZY3Js/,pHl]cVkhYTKo*2nK,ID]2CGBZ,P U"8O39MdTwf^x1s*?>6.Y9Q'D7j]9SC/FNh_Te5f U"_shSxM5^sMtBeQ0h1:s&82tQt[MFe,A&f7.hR?v9Zej[35bW4Sbn<#u+>y&TJ.I U"oznZi%%B?Uj/w%O)6W,TL03F,h]#003BD[c#1Hl'WnpQX90]edsvkh_&-5OD/PB U"/BLi55k^q5(xCW8JsXbB$AbsB)9E\+\*HJTT_FWs\XS=K#8,aM8BkI+>s1CL7GT U"7RVC,_?bvmW_E9,wdY^khmWe*Jp>f$6xTb3YgrFl<-#F#oFIPoC]q2]fO/YoUH< U":l1H[HM7?oZAhr4fqK:D4\fK^1hk]U^7>E+(b7MJ$xaCFe-0pE_gL?3XxqCJGlM U"%IQjCI7SOt<>FNoM%NA2'TX,H(X6\pvkC#f)$q(P[9/9/77.MfELHbZ8qXK6/\7 U"w]shW4h)g)R##Gufhp&m4g;J%IN]L'e+G]5g0*q'oCLI:hvtcAgu&X=sAzW%WR< U"p6;jh U"KE>y9#N2(NBLIb0XH2PhknN5fUqE7gawW3i+QQ#+atXUE^pXkEA0^3q=EmFw?%V]g]]]u)J<:xsMbqcNrY)h4#O3O U"hqX_Go9,Y3a#2V8A37]8iG#3MLnwNd*^5VI;g^eqrlF[TFh.0LK:)8rWK^u.a?h>Jrw\Hlukm(.]+M1T7T:^bj5N^C U"_UA[i<17iKJy'pEkIkuk%[d=NpJ2wL-0^AVA?jW>jtCnTCSMJj_z17=Aou&_uFj U":Ef'pus2)StU1&ZHTQ%dsm4Z2v&N(CQ$)D#[&9(j6)mY-YtF+9X4dYZKZ^2kx_4 U"M*1:;=SKHq_(f0bmNq$EDy6GQ>XFe7g)j6B=V8^(TTUp)#01Li&>\6V)1t8l>OK'_2FxT+=m&[dU:uY8BSl_Mq'?/1KpUG#Ipe(2>^-5Y*NPR96p=YlmlWFrC22t96B#o U"yB55YTV-BnHC8&Z[n,M&)7:FJ02:l0hwRX[/2,UXZ&P/2CBEkfCOMM:+,9pCHu? U"6)$#l$mt;Jj32kdli1GeZjHA;,AuYG?Qa/[t+^al<*_'h?9nij;%PP..kiDPiN, U"fIjhfKCQ^ij9)&?0vDe3#naT_I&RtJ/-f)x/w>O0&B9dMsm3+AUI\C)DQFoHCR; U"V;Qo#5TC2=mdl'ZQEYa+Q,Quc>M;KPMOt$+N3J#:UA\8b3D5tV4XOU=wjLP_mdz U"3WDJ;y0PTLnkeg_1_#[u\gUA)H9$r38//6xD'+pbYoaC6O U"(vtBJJu#'T^=W6e.N+P^,^3XBl&J&2]x$ue>Qg1r0**:A3wP2CO20DyIBJDoM)^ U"*7mdHv-h0,iudU&B1+m;q32AC7Otx3q[3vNk#YnBQ$e5GBSfu=0W7kL.GL)T-EF U"e]w68F2tE.R;MsK1FmvgWLwxJY;LodYJ:F=L&SDbZuYtH1F^sk;[\,R[nZaeX(U U"ej]U89NdYH)^##(Dx3$YWSHoD)CW%yMm5B3Pd]4[jZ9L>[*hJ038S_e-bzTRp<+px?J U"G\B)RhNw7Og+2;Q\SX6c$Ul,7e4aXLM4\]OkS$pWT(=#cu6*Ms[dC3AwAi28UyO U"V4^ASVIr0K%&Hq]s',_CG^q2_p7bL0fPy,R\CS2a^74.R/GDYpB-%D,$jg(2jTO U"m^qXrp?pFD^,HlRHK[rfg4be?SGIJQdpq680)aTjOuJ4Um2nH0Ipgm.(;Hpm%;D U"G'&]GFeS2n)Jo;qMtRQJ#hw[MKl,tXk>H(Gdu:I\EIPN)^Eyjr<1apkB_LDc#Pz U"a]YN10y>vfjj,j=ak#L+<+tq1I&+MgLl.y=:p7:t8;#^D^v'I(LP0rr/beU:?SA2y2q+d9.djX U",3.6fb1WPACrICEIl)KuZNRDZJN=ypmj[-T'hST:Z%?Pjesf:f#VTk2\Y8tp\MD U"$J[;u?RknI]rJ6o<06N#$,bsv^X9uF(jGcjh-k_(2)4-;XM.MA4-(nONBaTc)=dp&fI6DN2<*WrvMuou_vN2 U"pdup(9+m$&e__C70:vpb53\&2fq^&tc?D[&HoIckiLBO.i(N?BYAZUlh^.[-AFR U"/1HvW#]Xtr&oOW$f;(;3)d%3.zPo7B\,^r?J5H8ID59D6exk*_='Zw3 U"1_v5dGEexuF*rL4LuU>h%i6>$jdEKf_zK(cZdns:WHY*B+9[-=0tnZ-jqDu%p() U"9%%%%-g%+koaG=;_&a,'%%%l*%%%,%%%%ijr%tSgnSlxT=Aje5LQ0]Ng:o#\mVX U"34fd,pL9$)/I9%;pOZb>dU=fT7W1>sqh$64Q]Ti1xY=^WfX$-EeS;#XbH3l9h6Y U",/.9Np1>s6-Z4RPI;JEd*1hyyJ'zGe0,j[SN*(gYiFV]]Gq'S3Er) U"K\_Ny#jcH3I^^kw7.aYCuXJd U"W%fjmW7elt9[Udje+*:VbN%GUXj#FM-lS^GZ,slOpJJn^JLM,48,27=AUE\130B U"oVA4u%*Vc/-*9'jK)L)Y2cO00W\=YG_c:TNdvi,(H<9F$02-G)#CK:K\R6B0_K) U"Plk=ue.KBD^E\-uddR.MqHjYKj[?s9$Y?-NG[fUf=-89$g&,WsCsW7KN(sb<.2W U"iLSyk;eIjy?(&e%OF+92Z>#1nE0?;F=%[&HFZ3]Uq#tQ:DI15H$jF=IzCcN\:=9\K U"AFZZ+U1?2U=%J([Ug8lnQV[+3G+HErzD*H37SZDg7nZplw$GUha,]VztNZlM.z$ U"tb.LscIB=ArPH-XAdFS4q1t<0BVU8UgC]M-+Wa9Ra1?QC)_'u>O#:8//&G/hcPf U"9ao);5F&W(j.eJw&-t9fu.,?O0E-P0O6aOjR7E9U+rsRt:+uiU=%07e/&g'C,^t U"O*Y#Nu+-1'zO8S;)hRjt:%)#8A%V9:.I-\)e$1s-msn9_EI,n['\:%IU8aI.;P4 U"8/:q9\;*,9)0?'Y8Q;I37S'6&cs9BY&=U-1((re1I=4uP,hYnud%;P$99W)/a]: U"kiFcq1;X(4:f0YMw,+rY1]#,S&r,#6^=TU1sQ+&YfUCA[+#IE6sP^>/[AR*jY(' U")9Q,bz:+iF[q5Kj+/PV0Yp?9EMRK/OevTOFuI,S,P7eGYzF*71n8/O\g4o9L7oO U"d9YriVm].UY77mM68a2O'3,m_f*Y05*B+ec'F*W%d+E#em^^G>U88I]c%U1q(Dh U"/cG[CQ(6+q14G.eZw*H#9j/S_-*O[UU==;RhY\[e&P:$4/PQ+07+L.eP7([OvY5A7+d U"O;nO'\9u-g'14O.(.>M/J/GB;*-NYpu.,?O#/+%N,:fp):Tm(pQ-ZY6E&RyUBV3 U"Pro[%Q+D99O);&K)c*(Z/d]g']RLT92GQ;nOZKfq+':cfYCiC%W%^;O'iMTA,HR U"HN9.y3:-?9*MRXe'chmU\oE6Q?:\Y.fiQ/Y[=].U$9/J]#Ku1M:0kYb0)>K&MEO U")?^-k)X;Q%i(Tq>a=^KsL1a.U.g('Rf)E)Pq_:,Y9_0).K3kIUQw#&c&fJOR[_a U":YMa\LPF\%f^]1bIVkAb2YXi.b=C$XF,9vrY>YPtF9hY7#UYs'Q'=]%+s'\0qz. U"g*[OBa^&m,D<9))(9-%dTTI4959)Be&tv9pYFLi%u*/$E;Ia/5P[Gu/Om(4Aa>V U"mYY]q&qhstALYOzi./R4UWTkGY$49Z#iGAG(yP*f/4-?:qP,DSP63*,M1m.%8Pj U"Yf%8*,n%D))UPvEC+[,-<<5v3<\5vvYkxK_E%n-ueQ^/&bPXtO7tX[AT50mu)3L U"WmO(6t3D[W\M*EkD<[dF^JI;(j5BS+i;mqu(p\^U/2[NFE+<7[)6*Ku)[4G5N)V U"ZymIpxkR3-FsoB:nxe*TmI>hYrX%FH'#ztD\\Uebn*Mn3e$MQHC2>5(za\w)kNf U"1eF[xKF8$aa*%&oIu>a-iG3hFY2AP\UH*ZFn7JEF%V+4H U"OY[,a6MEMae^u,ZNEJ(gbhcYvA$kVrprOGm18DgzFwrpy]N&Mjcqc&SMkm_vX<* U"4IM0dW$_T#TBE0*lf$c3(/8d>?1%Xu5>HbjF+0nv>cU%=tdKY:)uD6$+,hyo9sM U":oY8IY-:ol+hS+WeATAC$8fmiVU1+zK>on.EaV5Vv[(h=6>W.'f6m'Wk>747jB% U">SRnu)8Lp&]505)sz=bRQa\7FOoVaiMdrdRRKHJiC;^zzRkNX43M1lM$X8vSWJ1>LIlkrAQ U"U(wKJfj\T-O8Xf1N83H*s9&[o[<7DHf[OKF+l#/pci^\;--CkcKJDQ2W[Ii(O$i U"sVAL9l4M$F]mTU1n,sn9tQ07bD/l1zXMB*-R]Fvpol[WnC9pg.nAx0UzBGQ/vRA U"TX0(vMe3*C$%Bf;Kwr7fRn.(yYhc5pADCB^Q#0^;l2nN\P%#]g6O-+x23[*Ox[s U"HlsquUa7nYO?sPFD6.DKpl&NpWsdb>Rqtw.Jzv-nOr=1Z,%o;C],Ug=p,:^rA=lwT&A,<7PR U"GYU'L5YeQp,+UJDNq,AWV/'PU^pZ[tNiH\^;$KgfDol<3+2bMQtnm10NC\7\-1NOaa>*o)qu/,ZX[c+bAC U"tI:JRbBGN$G=((=^'5Qi#eFSAih?f1Vus-Np6qpJ:#;-&\Y2FXr0G[,m\ U"H\b7VX)?*z/#S+XI3ONgp?VQ'%:,bGgi\22/)Al;2vTW]2p&Zhf-]JMO]0DXer0 U"[,Lv\BFnf]s9L]t9k+,(>,\Erx\=1P[9ol][Craz^''Lw2u6\=,r-,H#aR,&&+pV$j.Gem#XXu%ASAUOn2$Tqr^t+S75[NNUT;M_WJ#qF&cg=ox)Pqdf/bbYMkNiKnVmK75>?+CXb< U"u8$jVR8rl[$h-X8kF?F(8h+ml4c>p(([p(C7JPNCZQ[hTe)4;2n$CaO&Impl5^6 U"=4VC.R2H(T(LW7p[=pzb=qR20VKuUzEI9Od U"U(hZJ(EC(B4.BlC7AAq.yC7u-S8c9%qkPjXXg+I(3Hnhy;nNSMEINRhrinj&wZ] U"[xFdrTNZc/n^hW&lcQ<.Th.M#'?-Bk^I,Mc3YYIY/hmV?,Ch?zpr\N7Q,,,&7[& U"eInDIVg5_0xnr0(fTT4yOd+nn&n90_]ogZ8tN67.Bwb=mZdimBVu;hiiX>zvl#b U"zLS^?1efu$pxhWVsyT3W.NStb%(YZRweK^OBkV9oK4&oS^(vn;:Oxr1ml]zQEt5 U"Q.FEUilCF,n$6>-%cHpAkU$y7F?%op'SZG8^4vu<1DR>lhsnb$gk/'.3u:sVab_ U"XuNW70.>ruvcp;DV5fXr3:9PNvnyD.vh-JzK,:T.$xXWs,\_D&z.&k*f:wlfs,^ U"h_&ycV%)fzrwxs&t?ADNtsD&oYY9s,F30\i2>s^SGBATxp_-+S8f*cm'Y_QmOox U"t#fk*V5myz5Mq9NZXIALnBiA4y+pWzv2s#lriJ:1<:4o6]Y;%5u] U";juq;cuiNCM+9w6IfNk(ufd# U"qrK;%tV$OV,cxSku>1(+JLf;%E9%oqOZ?pMTqk*=C(J/\8#tpS7[60=nF/OdG,J U"^6.BNPr'Tne4'rhCJc>.hQ2pz2M[rgdHv%B(r$l^Hmu]#h.Xk161&nS,KDKchwG U"KS9^dM&,C0Qp>.v\gFAeMS9Orc_6sif3Kr%N-aUA,%BoT(eeYpM73= U"jMtQ5u[wNJI\ii7bjnZUFc*WNLS:M?XtWHu^4mC>(>%AcYrJfuMkTbc)P]]ofG8f)%J2y5-7]oEtjpAH3$UYf+s^#FLe$W$w/UZ0Jn[E1F1jk=00\vZVG4uRBtdEM;E:\)frS,yZ#Y)*0,W\%,12F8n5e+bdA,ydRZi(zt[en63QEI3 U"_N^X?qtk5YgoZF9*z61uwhOcE,=e_4*fslrx]bvVgBWalD(pn-ZL4l%w0?Uee*7F)]a[lY8t U"k[?lD^0I:>f%JcYVjJdwXfZrehdeaKt-=vrgVfe>>BZ.6LdHRxdc([x9;2kr)F]i' U"Qm(JKy;[rU(K3>yNnvWdFvIhm+d*DZKf%c4xe/;[[SW^a9pHJwRuw1RUwR$_wR/ U"8wRKUjT7Tqu;5+nW;a6tT3FW*;9feMTLN#VYGhlUfhIh47u'k_U^:qzk0883mNv U"XTZ)MiqNZBLIaZ7k%=t(?H&kzLzhaE&:b$NLndspbNZtsn2 U"mucw=vn[\6sG=[SQm=eUl[F+7p:AWt.KWvv&74GgN9WTi.KZGKfEpTvb#;r+:.W U"yb\Jz7m[hw#\8N5&aCbI[-0caW1K_d\.J>$[jf=r>kC7Ni$zIWI4k\-n\7btP^; U"b[3n'9$T8:<%j?$_)G-beV?M*-omBa6S(cd(3eT1>eH\dM9&8gsYJV\rk2q+#&^ U"nW&P^qOb.%L>tu6+]$-<._Chp(.=(o%NF[oa+cm9iP#jWbt[g_giubA9VW\[DFi U"3+3N,c:,p)Qq[I:9*CTRo0jh6O3&Gk9Ei[okXQ7qd_swEFh8d'sOBn\Tmzp6wCF U"p4=OJP,hsW_tsQ)#nk>Tq%dPWSKfBV4eAoyQ6pT1ndv0#1.? END SUB SUB V2 U"+XCNNi3Lo+S'dJMNol[x->&(D#[:\zoON.LA,bTjmXX1W-^#,D$S;aKY7Q2:W,p U"k(bjdz[WsUMu+p$J\KJ<(kSNj:+e=7='g_7zWS8#uv_Wihg],D9c?W$R3sy;s\. U"Lak1W%_sad-TKKN4YclWv/r]K+dU%fe=.u/RwzJkwU_)MD2QAt/i7kMnsT0QGZI U"-R0j_&2clUHi&aItu&&]&b/[-T:kqDg:uSC/bjDeEth.om20N*x\8E8fLN?DyBl U"j9;bIr]6o:ZC4Rk23UhI.\uf*MsuhJr1cF>(T9lpwqNmXJ U"h30?>4]v6[8E<7LY9nedM5_/K_kMPx)CMHS$$JI):Y+MZt7qe$1miu&10t^Kpw:w)A+.^V\K<$9h3P%3;Bi[PD U"sc)fNKX#qrfC#&k;&I1DEx[l[5w4gU-F8lPc=rJ#S]^(T=6zoARV^S[hr:Q(xL; U"etS$Vd:5VJUX[w\svh(9jui:$gh'MY)3gX?FL.]Z2?]&TL2Fuy[LH'KZ\8=wGhJ U"C[ro5MC6aF[3e2YQJNZ[]//CIr4FVsUrA^U_eEJ7k21=\6yD5CAr:.[S=XBHarA U"[KVi-;aikdLViCVwlJC(kvU_PdJ8[1s6CKGr,=lEF7[rJB=LQBJAknD3CCr<2[_ U"Vr3OJxk/-OJ.gkZ=UR5-S3JT[cHFa0[Z7AaA^k&Us(WrP>fvd[76;a9k>NDa?Lk U".4C1Rr>Vfs[r8,6mBkb-;aVkW80-]QJ\[mG/mIrWn[whfJx[w,TJ+kW84 U"-$$J5kxEC70r3&[I=V<6mNj=vXJ>Zi16ng%ue].%]TI#)IPg5?v8Xc50O^U?P1a U"2U3g:%L:T7e]a,rsR49-VYCU+%U0+tQt9v'Y&U-#1+4QD.QFPEfXvc#1*g(eIWY U"KJoUp[4cG7;Grl>,H=aX[XcDa>1=LXv:,rD=Rz=&//Cbr#g=L\J9P>vB_r>W3>$ U"Jp=$v>k0UX)F712rv>;<1m$gk,[3QNuC[&q.?=/T$Q><6XJcP[;5gd/p0a;l[;y U"A'/h0OLESd[U7[;(i'-(S0DER\DU3/0:Y'[8Svm'2CQ.X:_YJm%klX?->a=kUNr U"*[f?ViABa)kbI>r2C(WrX=;L[J1#kX>lED7crdtV)C$a1kDp=,;a2B[eXr3cJ$p U">,>aI_kl[Z7:aNFWscr7DUsF_rnU3,XJdU5)B7:_r*>V-DackKpXIOBJdVIP_Jr U"[SM2XrqvHJB<5?*9fd.c_wkUm.R=wAbxQ6rY2*^$iirtacW3^grctac3>^xPl$x7g U"?e]Js%Vi>Sei>w&DMwPKd^u_bt0)i]Jf]<3^6FFemsh;LR?22r0*j=_Fg\6M/bX U"-LEsRAGGRX?Bt>S%xMBGW7rYEGU_KX1- U"#RMS'2_jBK<[7H9Sm?g/5b/8aNBVUxa\v,s=qn)Xn7##XJ[MJYR5Y#Rc[H<;S]IYX%/Dc U".v;j*hIlpgM-mb;ZBhK*DDD#X-2%.t>w2#t4*8&lwcWDew\=Ofdmj*aoA0?%p+S U"Tp#&n^]pRK'%ilgq6cv*rF;kE3_Nbp=g#39L8#^K9XT[>7KjLgCjGw3L7E6GU0V U"iM.)h2o7KZgbiBHGxs4-8/?aM]oLLXq+:grvTuVlXxpd*BHP8cH]K8bxAdbg_?2 U"9%[jdDKpHJFqH0(GZ(%Hgc.jwXI;XirOi2uiWc:ZNkqx%(mr9;NE4>8_<>SLl7,bD.7*xQolKi+-cNt#8Wt_2Kf1 U"G,X9#QJheXnf[\DQmQba3SSdQn]4xVe?2)S)M]Ir5#_k[RNmA:ts>gSMF^Y-q4J U"GH;.wU)_.p$Q>nI8&m-\pm;F8#O-O3M_Hr_,%l+m=82La'eWFKPA U"0H'C-f4gYVFYA2wH'=aT$h_opi5**_0748^X8T]KtY8+E'tXpl<]P?,E:_GMvnB U"2_].TCYb?MVL$r%[6S\loo44FrHXm8F:Ki-CXbWmZXT_aN.+M1gcE[#YJHkxNA>Z U"4eX->,8KQ]C]DKFxP3r\)M>e6SLa4H)=m0^ht$g5>LNIrP&+;^=amHC5n^>Af1b U"G*[h_JJi*/7E6CbQU)j==n%BT1^u=,09eE?8W(2b8_hpJRq,&EhJHYh&BH6I#4F U"6m67[ha6Ia0Bp5(V(yB4PW$O+F.2?Aj2[Br8iKXgm_Sx,.l-H:fk8SPpg=J]W$i U"UylBfiUGpBd9bA8K8-M]frnM(4P4fOra4sA>ZErlK,Pi]Nmt^xJ=\EF.BDk(U>\ U"%vSBEEMOJA%n[f%^jIZLRIa;/Zt[HYhl,Afkm5ZPQ%THB1BBb)ik]^LRm3u]>tn U"De[tYL3GGYY2ahhZW8?'ys($>2/Tj(*NuCeEb8O8l:/Z_6e*w)u/snbxWKui:C^ U"Hj#m[$G-jmkSM\#gPG]$QMA+SESGiJ##JaV/YA$jbxLImq1C*lXace%pQq-2r-ltzZ U"RrnTcD>X>gqd%<9:>EWK;*qgn#V,+hAB6GmH(1TZYlr(.jtw^,4FSus U"t_$HF;'oL)IMOT2.E-n#sfcFM4%%=L6)8MgnPu%VoW$y&mH0YG1&7Yb5st+.jcT U"^YBl+AXjN]dhw56jSYSE(\cRQD8(Y4u7Z.NZsddBu)Q]usnm-FBhiT.Mb_)=fLJ U"z?mV%>rT]7I]LGqlg8[B,k?[Y=;x\n2+[WLd/HM)87)qDoHl4QmlncMR.VBX8giw<%up()%9%% U"%#-%MyK$GaeSeU5Uhe0uDu;O:Ig7BP U"&8*8<3>ku%cQM>EMoy(RG8Q.6QP#?.x7X%Q&hoJchTOhhLnPXXt^Ejp=raIS-L7 U"sVCSp6B(IPP+juW0kw=CIJbb$-aZ4*3qK6Uk7CKqU1?H:+5\I*C.nuQUaP7:R U"?U#Cd3bqqAn4X+d U"7)e*[G'Zw[5ifoxGoC,(c?fW)BHm#Gg1ovXqdH&IbIS2H(qhvpR U"[*Z<(7dXp8.f+^f]ap7DMuSk-dliE/n930CJZGFy^SF\V(V\Mn\uIb U"8Lsg8[eq1KA1k8W#c'XFE_V>GA1L?\6EGOAN%&up(%)9%%[%-%s,w$G+S4rb,%G U"%%H%m%%-%%%%i%jrtS[qngf2KJG9sjOpb$26W2%s7gS(IS%O)wW.GF-2\Xo_W_K U"('19IIGNdLEpZ>S5k U"yCq[qH]k+,(^^Jrl=GFNAkf.Iuw%+DcJz=LsT>2XM9,5sZ$Y?YCu'3EjlPei(+M U"PPyMj&4T7BNK7zcfYi0umAJ)ht#r=%83KItW>LO; U"9kjMFJ-(_MPV0:]vmKhIaAC4Pa-vUUz;c2._*^T#f0Ym^J_UZkTlBUOBa-5#Lk/ U"1x-(n^n(N6-E+pphAYZDBkQ*9E;W*1:J,loNbi.0OGUk+jH4hLTL64o%GIbBW:B U"DYt$U%k0+OVrf&A2ehP<51Ktu)k%s]nNg%Z-qd$tTaJT8g)J:%z-Bq1xT):2h2N U";Rgi(2/X-_vHOE1EkqwMO?r/Ms>.R1-r_f%Nbi?/T[-?J49Cc7We-v0q\uwp&1E U";V'm+jbSj$[jFOvlEbL+nWJ6khJL;.WcHc0n9Rs2g(F.%fa-J>m]?D#fnotHB.( U"hIc_-\0KG&OQQ$,=0Q\Gt<4FqY*R7EY3Xbwx/3An=b3eE\%gtKR: U"j8W/m.i['a&x2FC3TIz3B_\SSY_Um(N^]yYDQKUX=jr^\fX1uUrmY5[=/3$zr]d U"K6N+wskQg^tBpBCH#1CvJf_8H3Vr>q[B05aN7*VZoPgXGM>>3I4#(eg)R&hMqR; U"hriWYrR$BTeEwiC*?YV'Zt,ahR,cW\eqhvg.ZA%Q^sceF>ur?9l\7*YGLx-AlnV U"7Rc$Va;8;B-#L/Qr(JRms-TDC;325Ol.T(GQJ^(Gr(Ib\r:WJ#p4;hCNE=jT(E6 U"4wwhF]3lJ%p0maJ+&53Dt?t_l;&h8Rw=O/FIS5(u93e\E[3:1d^FlbRi?AbUs#Y U"#fbWEO54/c'T)gXGE?X=7$-h5Gbn\3jb=Z,1EUY4P1j5F[)-R5s3+Q(,WvZyomE U"aYbZ?5OH3,PA:Pmn$8bV*tp+C>7;s/r_kuukkUqC%,%s[= U"kI#J#zj>/aMHNF>VX4\POIu4d*^,emJ$xj]44rIA6#HpL3i*j#JD[o(+epyQw6oV,Tgq5Rs/$:Zm\+Gk[jME%SBLC9T=t#3F8wMo56AH4i[6<*:t/ U"k&0WJ_.E&=JoJ=(\Aq6.>87j\P%M;KY,pJ5qF^r\%.zyM2fi/XN*%QolmsV5anm U"%;N^_\qq0#H5ZffcshuRv'w'SbbbdbMgRcR'5WnJ[BWjniH37MAPmk-KpelGiP, U"S:P^.,zLf?N^&z;I&ap4):aS(GMY7ZS%Ihu>QKB_>g[77tS4-5)/nG0)Yp,$4#r U"/.40418'pQGi*]5'FaSJ&uAlMcpOw-OsGt1mFO:e:YgeYe5Z+[+A6%u1BBuLD0- U"rrjJ]i:.ZsT-](6V\7+6:J;hB>I-]1r1VhoL_hQBYy4x8w+KUpx_TO^rDBstHOF U"r*3e#cglTt-k=QRR#D?2Meli>6i#.xX8>uX_Y)8HqNmpy:9B]do0_2kG<>G'zMe U"TGu?CZYNAryZu0gkJ5bQF+d/BDAKBo#319R,n,G$-v8QN-BzkhN,r<5M(j'rC^ujcJ/ U")dKhgh)HrAjVhb>rYYQSr6uimPd7a$M?w\aW[6TT1%T(F;28g(RIuUJ_7CppU\? U"ZN/&5dgz[Xm6W+muJo[6tvN5+svFqT[;nJwc)H?dFnvk.%p[PTsEWIyZNHds*Kc U"J],p_4YF[Q>INg0=-[dI$Z$wUX-sg89VMQngH/m:A>J[8al9[VM0pnz['VL8Mow U"CV%3kw0ITY+Q-Ex4-UcXvhkeEN3dk,3W8jSRbLxxp6/_i%wBcsql2AvoSCXwen1 U"4aCjP;Hm[0LH^&G.nv,&j1pu,Olf]>ZfOs;I8lU3KH+H>l#HLnlkc;p-cED$jfN U">9WsqxA\_moZ/4:GFVbANa.K^w-[K^c/'_^Nf[vcGl6$$GC\\b6-a-GW+I>[8SL\%YJ U"8f5g[+I:lIJvkb.XsT.A2)2GfXM[/PZ]-%y_A$&w*_-1gAgn$Ft0f7t+E,uL:KD U"iqWeUSM]c,<.*1ui^H7Z%-+4MDUE)EIBPAA.wT/$LWlvRh'.iS_n,aFX&,jM$*% U"8XNv=FRwn.aKhOiZ:yr+7oZR>_Fp'x[Omu8;7IK:?^0G;9h=ur;$1(K_yN[b]ZdNjbw U"B%h17JmerL^J+2&>i*8A8';I*h0(,#wHKhGTSU8JC_Ygx;D'rPN:Kf70eo[+t_) U"[LumtciptPpyN6;aaj]=-6Bw]asSH5;&/?93Cg]>ERgvW1>dcVI,Xyt&W7t'u^L9I6LmLPj=-NFs0GEgHJYQ/T8oU81JW$C U"7N8siq99.CqBNKXe&sW8(;4mU=Mt*?CxI9C3zNN,bRT1i09*4$>C%o1YpX:CgZo U"Z%m?/O%P0cU0:YFbI-thR#Kg;D'?rp)YivIK7#Ds+\zZjfhRe8hH[en,=;rPc:o U":,.m,m(KXP4-Z7Jjf?6sA8zu1/Q^O?#jLeq9ULh0j&=_.x9Z2x%?J#_DX:aV\&B U"'Og'A\2.5ZsHfvs7(_REtfoAN7L+p$Q&#G-S8tv-YRk6[kKp5HACJVLH]*6TsIe U"DDt?n^2^w](hmIN[XdYHX U"M7>dL#C9j;MzrH-q'N+Jjc[iE7qWv&+QOMlG#Dt,.V:EFQ/)h.iKe&grR,9r'Le U"S[pXy*>v$FQnguS(feJTTD[89,,EdJ6-Dwy$h&,2BhQvX4V535V:)5p'ZC8#1hP U"2c8H#[-BD-IMDtQ&.F'']S2F6KmcBw)tiP[dt#aw[ U"8A\?m'a7n6NQ$uGYR)0la/f7L]x28XU#KBETS2knW5gEA\DI/Crk++W5NHJf3V& U"_YevbP^P_KPSyHJmh^R/>.II7ss#7EmdmvZEDeR.Kl%V U"m^).7m(1S;-Zs_ZpVT/a>+^m9+9VmFVPTr/eOR7v5..,m+nNFYr4-u&'&-baU[) U"(DYB9X>?+(ja8Y[];'#vxx:$qmh$%g0fd5QI>76moZf:XTjPU3,AoTP6HTt[$rp U"3&mN0d,SUv+)u#)hMYOXT7=)]nOD]9R3+5Q\OB1quGt$P:;BYoBq8xN(-KD&DND U"&/#F%aVj(H59.p-G[((-zX)N(6,nm,x>HOS-+ag9kd*rPF%kkBPh,/90-]q3+5Y U"/Rci7Q355egg^.4k<4)tKri9.gU?I4,7j&rHtg4qjXU[3STZf:,)&Lbg U"#O-33G_7,Um/FAI*_RE5md/+Lh9c:pS5z2mhQP:EQf72pTX-s7Z7fXB]E=pD3]I U"GZ#bR%^gV,+4C.I,-4?E$*&bPXGYMvQP&+8iuwYZJnR]921Q.Xg=)_kBKw(BlKF U"C2['Y?nvuccxw7mJHEt\?Y*CrewQ$UKlm=j[$3L02%N*04&'Nhb>u6XDGc=I'h' U"ZBj5Nt5)u*=hA&vH=k0<:FiVZ&Nko8QN8D#)j]R<-FtCm4ODCmUV&C/QV(F3Dtq U"cTe]_XdFd,G[7G8_I:\#^>>b9I8\(FQj=AzSbLwf\DSturVY[ U"Q[=/&PI*=8-Ko4;W1Sy(L\,_'L7)P'SV[y$Bgo/MN1S&FPFkOZeb8xwh8Jz)SXjeuV8:G)^0k=HLDhQ-k7FIZ1Q:_dgZlM_x9:'Hb U"okSi'&cGSLG(Snnh6riA>LN6A2S4pO**mpFiSxWcD3-a#jNhFMF$4y^5zQd*LH+ U"h3pp<jzwC*a#8tl4*EBT,.^Ll3KF-p.AQv^ggw\Hm6qi*qE]i'Atudr7N7$-#F U"MLK5pxm*,&>]2l)TMopYoru0L%)$YJ->;?%6EcQ:?l(-+Uj'%:(UN?_;'6Y%+)]l(%]0%d1=r8% U"*#u)B1(&]j79yZ[&+>C5L:U7[&?5Y72'Q[Fa9EB9qq)^(iO<6BYn'G$d1%%+Dk=yZM.ez5giCq5okj;>-he:=y'4xSPR>Ai;\7&6)-_o>DwKQV;, U"+h2'IYomJQfj5NTd/S;QVUbtXwbRgOnNhZyk2hWf1b7ds8j/Tbbo=DT]p*\cwp$dYlVc5btQrD<4 U"CS:'VjW:EZ\fA>7QJ#AZ3U1$_)O2q-YQ;7IE;-mduDG\Xe(dj,:XAsTRQ#NK>wC U"g6eEsgp#U;W5Z.'fs>h;0N63/oTNhRTit2bHtw-5fw_QFlX6)l+\;;,5xEv70Z\ U"NJG)l<28Jmxlf7i%FaDs4\8;uK=pju/m8iG/fifwwEhR*wx_nY=5,$%]R_yjJKV U"fPTC$7[B:SMT&Z7*B2fRC;U]Qel>,ZZPG?P._o\Y8fP1V.gdA8=t#mPr5fpdtJb U"DbO0-4_p+o:oWD^640l&o$/.583J$RNMA76s.T8T]PWU/5e#xFQV>XNZYKax;j* U"Fpm$A.MkUyUuG8xM8% U"VFEK#\vSwt U"BhG.Qp>Jj7sa?vDU'nH;<])%2*esMnVSBOkO3fy6k[^+rl<)hvCt&&5pgYjhtr. U"h6Ti^&F6'a6zB?,FI#XeiNDs+c9(=D.Jd$UH\OSm>QH-02S(f(3H.In.w%$?GKB U"dT%=kaJY_:-c6roHpWN\Qn%p\ufdA6]p'f:t>qSd1JwpO95C^x;?b7bX5sZ&)uK U"\Mo)Kaj9DPDDS'+-x]ux0q$c]4[;J[Qcn54,c/wfHJ8?ea2tIj1jJc4F)3'?\,g U"9FzP,]SU&bh;c+WZ'.H=KLR(3WoN*X*RM9sOG'MDLEdpl3j#xjaUdv'nS&tH9J*Iyk.-5fo&e>]]14i U"]=Qu38(?rtDAU#r=^?RK)Z#3L?)9Yq9X_\BQ/d9i##B]4]V1zPd,#+S(U4A/ U"FIIY:vF-jt:?fge;e&eVjI9?J]#dL:aY_z?&#.HO? U"KpuwEPoJE3P9Y1UC*eRlDaU?BIf_izO=(E'b0w-maP4x/NS#\4EB*PR1C0#u<%7 U"t1\Z6aA-T[4+'#OJ^X92QtY5kB/(:d/#+8mSo$Ex[/a(?e[N^[XbuETBypAGNNS U"u7*RB^zT:w2T)0(*]7PAb1X'8uZD=kK+o;)N-epEe7IlqUp<&juxHd=2[nz88x7 U"BVjfkGYh/KEA565-bWOyh U"KZ(%oJ_BCJQtm]F.Ky<%hYzl.exD*D8y[uhx]zSqub-F[VzATWdlfQj?.4j1Pc2 U"(a/^Mc#>y)w:u)8G_::lGdko26EDsMn#$;Ry855a2&f>aF$=HML.C U"VbVEQbsISbL%F.Jam,Tes/XM+G/'gOwd U"Wc&fm>')s[FEle?rY6#s]k=bq>m6>,hhlfv*S$/OQI]1j^,_2op' U"jj9L_[.2i$rlTg^4=?v1mfjJqq:O4V#[\Bb3MT7'W&qFE^#hM?\[Ue9nBtCsCV^ U",Sv%F?li9#GJQ(GIdv/G$=WXy3,?LtO)C9a]9%Sd&YF,3jR3Nue,I#l(ahDOb5G U"%/&P)/K?Pl=7i=6CIOhPnD?YVZ+QEPYjfK=42)HM-i.HK9\;J1/+c\=-/jZw$uU U"QwtP?B7p&1(Di[:kQV:EbD%2V06V U"jS==1I1FWND]Dw>q?r,#6X2G:M5.K:JKqj(KePxN:OS6wpNw^p2gk[nEnr U"LO>$PZTZX)a2;'/VVXmc.+;PFCqZs(4eKRs2iV=hT3:GP(H/6TAZpfq3 U"(Ur?P0R\tB?Y$$V'T%lskLmVoq%e$:JK,Q:[AYk64-((RA$-#8]Eiy2a?: U"'=gW=G=F\P-hhsf\ko[k4mr1U[o)pI^^rZ9Mx4m*cM)ih8JS0 U"_ma4j8hM;)M+j&Ny;##]#2E'bv2#m43.a\z8K:m3?#8+sqN;Nv0(+oHn&0.p4:m END SUB SUB V3 U".b_CA'hhwJogOm-FLu)ZZ7NbbpDLI#YWZV]0H?AX6u]Y(K+7$gkPk]]I/7NQ=zX U"33cB&zBf&jAd--]s2CJF,aVJXsBS:Gf_XuOeSXQZP;#dW6O+JC7//Hs7g[HtMj% U"[bpq;W.?8E8\$0M/j*ZB[K>(ZGqQJ7rQ*LT_XLZW-WUmpm-5P4NhfVn6rHJ4Ojh U"iI/z4Z0AXvN,7ckO3'YxWV>p[fl*1:3rQR>8d_r:E&Tyabi?8M=.b?<,1;Fq3Z> U"[.vs(,l9(IMKRG]I>W>BM]djU$pV_X0E-nYqm(=Gt-0OB0LuT^37YB]0B)sjg+\ U"M7jRzuA=:Gsd_p<2tGEuM;0/\-#'=FfZpajI7q)^ms%-K(8#v(5&Gt^I8?_YoQx U">l5m4JJ-),I$+OgaGU%e#bR[Ap'uX44?E>&v:D-SHHjKkfE\$Q/qCbQg4E U"0J2+4,0jN&jSm$=svgNR7Va:\X#BXh;Z]8x&1K1;OzY^u:BN*=oNDsw(/+f\\yV U"lVD1GkcLYfQk)^,+6YZo:nm*=>B_2/=T*M[d\LV:,#p]A=sBep4DtajfHB0*cF& U"9TWUZ$-AM9G'*qXBd.bnnSIsCP046QW4sLlpjo.kkI\Ut4\evk?(IF1FWqQk;#R U"+'i;S9%WHF'ccd&zdCcA_w#&$pxw\;iQJ81yz3/\vpjP_3 U"%WC)%zR2^.0-bBv2csq(.R%,O0\?YO5LGk0ocS6?\2US,Ru2?AY2YqU0o&Mt>Gc U">n\iF=26hQtbOmtkn0o]YhT05f:)_EN U"v#bpyB1xup.pgyGZ,wcTefnRdct*ckB(5'bZ]x#'O2>GytOFNtc/WsH#187vc7o U"v=HHRdN>Y+khCqZ7/w/f9(aCWRj\X;wtI1;>bY_bJITXwu/sCxzUj/aILJ)Fi*G U"(knq'gPT#iBLz]TT:VKdL7KUX8Cz])B\1B4$wVu=Y]'ZO;0(4N-d?VDk\rg.d+C U"eESxpdInr[?;L[CQx2T U"n7tBxBBKD3_Punr=ahO&_QrUFbFU6EfypFSc(9B3$kB7<>g+WQt/o18TG)Jrz$] U"lc>E40MVWCF_q:xBpajl5YMtC89AwP(kY:bfg?X$d$=.e3in6;^damP)+F3CoK= U"&r,i,XARUdtW3k]ex;BEjmJRP)<[&tG48-S8's#a)\UP/Z0,FoYHVm%;be\.8cc U"B?HccB?HE^w]rL:hSt?2+bv2dH8nC-[#I8kIj24TmNf&[Av,h/jYDJ)\H>6S58F U"moMj;Pcg4f1CJ\0nMNep$<4P%fB[o*)>8OCVMnxwR%EuulAA>Pt'[)_:]pRxJD^ U"k_nbl'qVi'2mpR8Nb?.*NSd>tr0?gr)TiJ9%mQLL]GS& U"&-fNBAg0&0Rd,s[Mr[^LV+VZQXUi0Ms)=GiwQdD5f&-zYBNudTpQ U"UWl$9n.Hq,;;ZM0X6T$(F8 U"Hm&'dW[u8f&G^ELGcqc+UvBJ9[Ug#Z0KR5/[;#9ng]3O(*LJ9LMc/kK2o5H5CvX U"*%)(4*,#l]QDHGw2O[&NaLcbf+,>X;]qSYin/*2':hE/\2%nDb:Fm<&Z,BRx)cm U"^#t6wZr%OwFnA%c#+?x\QzH?nd]A*Bs*sBF3yS5G](SBfkZZnzgM2qA,(e?Bc^D;mw47#l^Jnnl'SV\F,]6*,Mc9aOj=Iedqq^SnKybV- U"]euo+t,srrrh6S<#J.h\xk^bLws=tf'l#o]O$t,t-f$6ZShh.EjswJOgLzL$5&$ U"]ocs2-sp?H>Y21MbNdI36M>2DN)rGWS#*t(=a;HOGaX=YnY94[;H\v:j/#T7Aa7Znht6s)f\xlxtNe?h*%,Vui^t4RcFFP(56&Y9cgKGO1ktfLsXW)d U"\A.3]UPw_M.O-6txi:OT#PQx:N2LxGy(gO=]2v^Vudh'[#?L-m\69MN(%up&'%9 U"%9%%%%-%