'===========================================================================
' Subject: Crush-out                          Date: 07-15-01 (  :  )       
'  Author: Richard Kelly                      Code: PB, FB, QB             
'  Origin: newson@37.com                    Packet: GAMES.ABC
'===========================================================================
'>>> Page 1 of CRUSH.ZIP begins here. TYPE:BINAA TLEN:21139
'-------------------------------------------------------------
'                  INSTRUCTIONS FOR DECODING
'If there are multiple parts to this file, merge them into one
'file using  COPY PART1.EXT+PART2.EXT FILENAME.EXT  Remove all
'message header and footer information (everything outside the
'">>> Page x of..." lines),  load the result into your version
'of Basic (QBASIC, QuickBASIC, etc.) then RUN it. The original
'file will be decoded into the current directory on your disk.
'-------------------------------------------------------------
DEFINT A-Z:DIM SHARED K,S,B&:V1 'Created by PostIt! 7.4
SUB V1:OPEN "O",1,"CRUSH.ZIP",4^6:?STRING$(50,177);
U"%up()%9%%%d-%P']UO?U&CQ\TI%%>]%%%.%%%%hw%zxmS[gfxfkLxF[r1bYhnHT
U"x9Wvso5]'h#p.m[.baV,5K/lqO5Im\55PJXBW,b)2]DZpXh-8wyz,a8%nPv$Bnl
U"46L#.q,*OAdowxIyOdY606/CH3E]-6'\JP>)(W=NtJ>^/RzG<gRn+OJ+sQj3IY&
U"tE,_*bfNY))($(i'jZPztt7b+:)CADQ5>QH]njb*<,-q=lMZNDy$h^T3.*.F?lF
U"<VYXsOKZ.;FJ/5&e?Y+?6L-g[\(9:EnVkdp;V:qAAH;6>VC69?j_yWRC:Q'R1UB
U"jllVbjQ50dYG312UDuDG$N93H;]4WE)kTfQ]lI](Wu;PN'/^<WFhwd]3O>6XK/-
U"4EZ9sZ1UZ,H(Q.E3T6PZ9:FSRO1lDnQ&]gJ^Imc;%QEf);YgD3xp5S$[R$<H]8>
U"eilLnE#%g-^Lr=UteL:dEM/&J4=K\oOP;jaMlho%5k4XTr'HzY4iiOdioCje)G.
U"Ud%vZb:aO7RHC##E:d,&%Gn=d6>^LNbVJYOaoMeK,lMfSEip[,V<<'a_Gqn1B4;
U"eE;9BKUie^/6q5v%jb=iL>O;%?PF34jM(rQ7B;q/AH_s&I.3nfJ*?>VY_kDql)z
U"$BL=D?SGQG'uK#BU,^e,N)GIfE/GWZp;0E)NiL?R/,N$>Uii:=W</.-&Uj;ls7F
U"Fm\U&\EPn[?E)ZgFNHbxG*ITI(zKnG'T$,vGmFJI[Nn14Dan=>E$KIh^Pd)4x09
U"Wn;IFfjQIMGGqmVp01f.eV_BuEQnsaS?3:5ECujR\F)/<5eF4<QLm5HG;]5PBqR
U"<th'W?RQ1[xJ;[Cc7i-E7\)\6m$-m20rD7G[TB73YCRXZ%fDLO6,lw.A,[Iud0Z
U"2OBAOfIxf&UmWj%4n6Jlp+Z]av[xUc_foiZVaj6m(_j60qK#1R%SjXx9O#X=,d?
U"+7A,mMd7/)^+bz1t[*+a>*1-%iD\;_kAsf=LFxQmC_JPb;Q>QUiRyO6JjjzFLuh
U";uRi9EueF03A(-I#Ph,TN'9YBq^Y';%RuM^mgGM>C5':iwXi646ek06QBB+-D$h
U"9X<3dEkYQUQ)UT[p[&c(CpZ6&Cm1YjIFU?N6\8k:G(HOq5FDY*ZM_&9g'Gs.K4q
U"2l_Mz0A$i?+1pOWmO,GI'+kx6sA%]F7FGbQXqZu6E/P_WT[;P?\6wsI[5l)EYC4
U"uY,^9tWxLcgK4r:2i=&Q:u%[ybi,9a3?07e&:1hOq*R6+BICCS%m>/a0dNU6B7W
U"7C<AJ#SJ-X6,4e*T;#O)#sJ?ZS,e^^KL]3..6aW6V\p$q4&L4_<26,Mos?,R'mP
U"Yq:G2khTVJ*TOt9I6o=v,iJ*]RX0))0D#Q&%upA5_d-#GgqrD7617NwVL:tp:K*
U":Qni,ZN?]^0?No[En-2<lVN8/ZDQ.=q4p/ELd?kEd(]6X\Da*j-L;+O1wIq#^<R
U"%BpV3]nee0Lc4nwK:)q$c2I3zmiZYrR(\k&?>p[/lPUkEqFKG>#/K%L20U$fyXj
U"D^bF:w^PE23NCE+IPgoVjDb*cMsX8crg()'nue6,#4Ibn7*DJ8E:b45)Yj3l?DT
U"XFW;kbcX/R:W[<:g0=#>^nI2>-H<h98V\,Lt5%ODm*YeoTOmt6\B5ei(niI:?QL
U"3aaV]\e3c3oDeu8_5V(3J13ocC]QG.jW%?)7T:s4DZ9Mkkhe\R*%\0*yAhq*Xw$
U"H?;$A3//H_kUmaCG1k?mBl,nLO3b?1Fj>9ER;_nEc4s0ft_,U*=S8nG]R>j*Y)*
U"xCzaa(,U+nQ>loQOd#iw%rp<E7YTDNCL7wDjM(;sh*qi%w[W:-k6uFIg&l<MoK_
U"xXM7bT;_;W;6//6X)0H_J\oHsL([nC#_X(A3raAZCJT)zJ.a>,*qCra%Q'+h.Cv
U"_dc,d*hC&RVQP4M-;n5$_buJM,k'E/O8Ay1VyUa#PQZ(qBK'g<?>W&C2rF_92/F
U"qYcLD_c[f?B'q3^Db7OQ+jr-1x*)etJF6I&]GKS5kBFhK3/o=_la8*=,&CoJ=[C
U"sG0zHwe;3oJAPKC=I&yYYL2H1r1H.[X=jh*FC>s4mjXH[Me7dkE6'9$;s90m]yd
U"<L>jVXREp=b(G;?p>Cj<Q&GGRuT(CIcDa9/y#u]$vKlU%Sc9;>&Tgvg6QQ\l;HQ
U"42UEC%Rx_,UYtA?a<>svw(Q]\9;t(%SSgf]Zeb).oQL/,gAQFH?u,)'4)GrI.GK
U">>=p7)H;5>;F9[S,rnBR\hU=O[*1x-8sV;\RRDxB.BQdW2Vq16-*br=uac.u%q.
U"uo2xSdrdi>o2S6^>(I(9%Wf;J]<d$R^Wj&?:aYWTi$KViNPH/21oKhffWGOfx#e
U"wik;*'&#[/,q&xMc3YNJuPtE[ePc^-n=YT],IeL0O4;_)nV\xd*-<+KK*II>ZSN
U"a2cX6U*\4xXk2lGxs)&%CI/8XQ6%/3\:x_sN%x*IYeX23Tq>e:\#GHvR9RqLZ8l
U"d9W<2-=oSBw<wRl#jONmX&O*Eo3W,/BjUVT61)p+Z4)uAgPp38=\PBEA5K0IRw/
U"^Ntx/KkckK1z:7O>S\N75oO9^+&kXO('C#s:_QCZ=01vK,%SZocJY+-bjrh)Yk?
U"JQVg]SA#8f4z^ZGKDgf29RKgj[s;iN>><&c*v<)K10ge/pYAJ0b-T_dZy4aJ\]K
U"5.0>d:Q%9TIFETSTweqc^F91.JS;u/^(5aXshg/W(ZC\K*N:C(X0diB3#S6QQ)F
U"bb/*%>;hC]NWkG5Y=CWa4qxC#pP0)Y,c?spQ,4uV->0Bx'KI4)LsLB>QjD#z^We
U"ZrVWxTAR[2#/jX_es?SJkth=)k0TZAO,(9mmDoN9%^$8DX6(hH[:0I)e3^Q:kPe
U"Jhm<V5=;G//):]Z*%yE<RLm()1J82=(t/CoDQN4f5$[%=L<U<b0A5NU2Zr+V[zb
U"Qidi_o1Q9N5Nt>Ie.jT368kn)z,QgB/NW(LO4;lR<_.T9j,MVtApuQvbILS&SKT
U"x.XN;f.ng/#q.cVL\azEDN_CeYspQ3rK?M\Z1dx/CMYgXGdiR^h*g-fS7,JeeNv
U"+te;wW3#Zz0(+ZB,eI)6FX(h%FAMWc?THc9ZA0m?(70C'sUtIeGKa2^,LQ%d4RI
U"u4J53,Z&2:B^XkSbknRs3tE-*h9Qir<ecHkJ9tCg$<*sDopsGn'3*>E*^eqzYvZ
U"BB:G9#CAZ]It,aC/v%dK$hEz6#\96aYk_:%a>EOjjO-sE%^#C4Cs3o,TOOxBkNd
U"GU=b$I7;7*SIGGka2YNH$m>,.VV-p?HptcV'E'a\d2jtSUds0H$g2'G23fQ*b9K
U"7e'PY,Nl;h9LJI7A>#ZYRadH#'_lMX$Re9taF,BnqQL,<NM5=_M9VZ5?:,.QUeh
U"y*/Ug,s=opstl_QaKo1FGWjxP5;],&yPZ/JmXBEls<:4)7Rv/n>s.tp0#sh6B*'
U"JI4MSHh-R:jgE)J-B_;yJOc.]A-n<9=(u$-Zs:-n2LoaJcsLjShy+]R?CoSJ*VD
U"WIvUChG86F/M.UeKnmlB73ZqJm=?%9Wn<H$)X]LA^2%kGHWR1^04#<n._$j&f%h
U"[*78t;Q7>+BV[3s:e/#z-XgQ&l'7^EDu'=2adTw^GHOCH%r,3v]PBGcA=;eah+%
U"\/<(crMUcE?z-H[bKrj/ElvY+6T6/(t2ISPS2)f#D(=(E[SN;uhhB838D7CZA3/
U"YrAN_rJPgLsAu.3OsQq2R(^c%*MfA#=do'k8%Z+$5saTIG86n-JY+]4=fH8=89$
U"NoLmUv<7lVXbi*eRi$SO66/8]$ib45fRGjT1R*8I;Q+2ht9S'j/7Zm=\cn0ski+
U"a'B$i_ZRV%.>MHZ)X4*Mo/%vVbOo;YeG\o,=*qt;You<CW,aoh['WO%kF[.Bo/C
U"/4#2pEv$9ax1#=A[JglYFY6BOHO(2m9aMf8ILMwzhgW'&kxuHV/i6SUSV?/Z:NZ
U"4f*6kdV#T]d0x7Wr-V<_.Ig&nI2NBuf'PgS)g0uAu<jmoB[,RoAh&'V0q1;3lQ8
U"9fNp./ZSq^g3x1gMUuj1]hfYE2S+eW2s_ROBY*qeN[9DSX\<vA0:0eu[6f3KY>b
U"N4bQoS2i8MW2bD=[l%jj.DeS(WHUXar%V^F(>4DmwNt:FbdIi2ewA<e#Th6=+yp
U"bXh7*V,9G;rt-T0Z)s/nGC+4zM/jJ<5=.LA4fTc4^%3\u&$Jo/?Ioirt#9JAgt'
U"/]s(4NQ_FU,4b_s34<Ftg'BGN'nUenBfX75MbLcJHW5m:8LC-<X^HhRFyt1owWK
U"TF)?-gJm7;sIuO))RC4sR&,,p4;m*Ju<Lv-78Loso:t]YJ7t8re\VGYPPrKNYmm
U"H]UbciR1D.vRtnPZ-CwCm\zP=^10%BTZ2P;HSCN5esU(U7cP8]de,B-k][Jn&N7
U"mHq#1OMY)&jh3r+r%(fQRY;gvR-b2<rO2F04M:cb9sHJChKcqzM:nsbDPK+#n%v
U"G0Q3;\O+<./,2G:HnNDti7iv79s7n^i;:H;FJ2R/8-xFBPjh9R6^5y:0nD<jjbX
U"Ysh:*0l.qP]y7PqZYNu$9UN6jf-fN3*u8/$K'fQ3*um5TRoIXhqS;l,S^OIozi6
U"[u7xDkKxkA&4n8r$_Qb\_aX65.P]DPlWEM,ITd[l6f\bJl1X)4_elXTV7(9WC^G
U"Dm$dPf5&HD$=$PLF46B_]($jFFb-L3$slTZ]uTZ5QG]&F#gy2/^==LCVms)hg$R
U"MjFeGv3v]ay<r/xSErBnV[1V+_Rh\xbcC:Q^Hx=0dVpX)xaS+;r.R/Er7ro)$o%
U"6jwmxgly#ngDS7<I)LV4U5VY-Yp&Yw6rIqsP79[B4.c^z0;z>Y</SfgIx$oB>,)
U"Gn%4mRIiTKo4RHN>AGfUQPr;FQ*4iZ6v$oo0m1pPyeKmKY[^p0OfaP:kA7e>eCI
U"AZ[N:\a#dcK#TbdH\'kLQ7r8BPZoR.><RhPGY'1+]kIN7OnaIW*4DO/<c9z:YIO
U"F'-0Crq0bO.<2Xv3=Yct>N3KqcUmC4-^LlLcSxKq%gNFzM5tf,/?pKjSZ2cHI?6
U"g[e0YK3#7LeRu/]Hg(_TBZ^r4:40Z%VVd_&9T,5YktwV9l;5u(6'IS5\5pJ==G3
U"2*Hu(:B4d&h_N&/W6Pcg9O%s/gD;(-CZ?a*-wneq[FWMmVV$:HdWcPRS3PnU8u1
U"GSWfCi5>N(CfeZC]1hmcfUqb>I$0<6=w/Ir^[Puv-2KTm_0a$,1uIxG5A+oiwR.
U"9B:]VImr-LQRL$%ytY7IFlNRe_<u9Kl*_SkKh/Xq?45V.WT&M2vd'Q5/8':a1LY
U"RFW0ZoLB7i'.poY)bY4UwdA,n\EABAH->vn6prm+jkt.F5Oyqp/s#mShI_*(FJ%
U";EdLVuJ?J3Y\Z2PK7=#DY(I]S[%N:6:_]G&^y<h9ftShtjpqZ6Nj)8/dco#5$xM
U"9P5Ck1<4b0.;ahJI&Tu?S-=<f[pIY/hOg3kp'wAEe.Qrfj,H1%SwBc(*Pr^K3xP
U"t,Iu\FKY)&\\UtzN;-/TL#An4DEPdwGIuoTRbsl+PBAi?UmKV(a6Ru$N[+hRbM]
U"C9AD-'PAC#(Aam/DRvsl4l%pI%ic,mOE;,ig$b*TsLR4klV?Ad%*O^CBO:4H7J.
U"6q,,KTa*h%5&1vlX5Wg=x$QhC0Z*tF)RFX=uar<uNRU37e'lUJq'%M=L]<0Mu3G
U"'KDSO(bjHv6?6N$4^rQ+I9b<2am#1]7a99-0Ba?'hhnP'ZmB#4W*3Z3$;rdHNK*
U"$6s=5bkTE'm8i$/]=uF.3e+skUsX\+S'M#4o/_R)tD6+3hB=5j0a^fefOWG-8pS
U"F:Jdaq6N9;4/Jy.Dw7+2'.jY]Q9bR'6Rr2F26L?m6&3<BgoD'ix8/)2p,(W[&q7
U"vRaAE*$xb4^)GnOAg=W\I'Fbc'Jw#))<YhuTu#E'I%$cpo\H)&DA1:8kRD1CnS3
U"N9/^72kUh;gn5e%:#U0J86dLG4/Ul9_TmbD5ULlZXGK+JMTX#q5.Ds7+7c=g,h2
U"1Tj)P6y2Y+NJf6#Ns(b+/oZ'cln4Ph%VC85L8Bin,%XOzn,&'Xg(/#2N9l+u8_(
U"MSus<agNzNAGytPf2)UhD.]2B_K/?87=Yu>7JA]vJbIbaD&o]2Yi^QjJ%kn*S($
U"\gpLuYGr:0,)*:Jc\C\p6;F#d+cqsdiJ0ZBg(_$X_9Uf3564(Yv/LLR21tE(Y]F
U"^eZXAFexp=h:]utCm*crBN-MfD,La4.b+RIY70#Tm6=m/KWl_E5ggwetpPQ+WNf
U"5/jek)()V-6t5=b,Xmd>e??BF7(KfYy1>.z^+ET9y>j'5kE(K(y5[B42=z;P/#'
U"J)5'^byMJWO,LV\-lgB2nydRZ9J+rB&84)FA)7%jJ2j<m%l)]S#)SV'f&zQ'[:L
U"O(*RgbacPqG)DHE#[5$W6BJWP<q)Teb[&w.TTy4rh9&Zas3vL$Ami.V'27JC=MP
U"jeD(34c;,S+.pOFM5qp+fhdzuDV#vv.E-:bsBb[lj^7GgGRra>+8r$?oju]c)>e
U"ZR+S3jkpj?\Uu.Xuu1[BGA5QB:RPrO6gw^p#T<%0l'8qFM-r)Km+Mr:4lx7Dwte
U"V+2>#ERxzK$Mdu(]O;^RpeqfnE-A]6oP;':T[(ALBK=\dn5dj*we,t?ads_W--]
U"0NA<rWuc]snBKKR#VprHei0=oQXNaVWOZqKv=hBR7J4F6NlgNYIbm]-Lg3Hx6hz
U"Ehc[l*k^FE;^ne>8'D>K;l(bhMxaGt%kf43Wa9vIX_i-LgB[^?mHxa$)SfJIlRX
U"otJoHp;N8=uX:[sge85.782*u;na2#KG]3ot**Kur\ho.v^0i,uN:Aw[a0VZ.*g
U"rwS26&%&v(WQ(dpXK+F>uJc--#9vyJ*<\p7FV]yAaDk'oGHEr+^6/&_;9oCCIz=
U"JHm*k\,Vln$fdGdgac,aWmG;^ChAsSdKD*+D3u8fyIjle%][8cH=FMiabTXu>G<
U"*(-dy7G6nfmYf5,iE/5nV+'c5,(7MeOz\j1q%9IgvUDDq+M%60Dsr+SfSxiDDsu
U"P1HInl26uPq:iCQDtBez#(<<ziXJ=&PDCimbr]13F1N2VSmtqa^x5m;11gFhWIr
U"V0oX#oFaF'<<nM'QpgO=Na3nV3m0b4Ds\.Tb<2Mra%&B'[:o)K8(fP#GAcg,fd;
U":$gFnnPm%CbLyZus<uWDkjzO#Pv>KH'eMbDdt?FkdCcaGH4q%LX9P1KMw*FWn+C
U"dlRXBC)o^A4V^U#9uVR^l)Uy02evCgC?wW/xVkw9e?D'[[]dxDHkF/,sUAV5_dw
U"(woPq;Lk-o,osXmIJ9Ab?nI>T^U['dAb[q*w&.gu(bmkO+UwRLRJ7bxW&P^a0NT
U"pC>-+$WU;JT_0LF=eic'W\$^v8V[]kNarn_QEe2<T^WO%XgGZ\Tw3-<,mqGZpia
U"V_XuU'=3cc<#^yh)8R)Euj//',CET%:p?cHOIs0PUPLZ]S0;1vv,cNY2,UO[KOh
U"U8OQLo1ffZ_XiHd8ohESiBY'+6F&;*ob[-*A9PJgz<E2?C&QA:y]=6>\$4m[ni,
U"]5pFw/.lz0HctNxuQ(eB)Bf\MOR/A.B]WV69;jMk:=bf<5N'kq6oHb1sfL+Q3M.
U"O52i\1Qt1*t%IC,iJXue;osN/8B&jc-;dE;ETO]#V*HT?T1moL<5I0)j)y:K.Qn
U"VYS/T7oa+WAx;I>&ky'9^t&tX9,OSb=SBMpAt4SGM*hEat(SC%UJHG%n-NB,F\l
U"w10=k%HgJCbG7ko_Khd\cA%r?#.)Xj9[[7'\b:p^SXl]rmxUXl5bfXM:R.E4*3;
U"mnTEl&s]P2vPpFKim#u#wlJLJaaM6;6Pe1)_-7JcIH[kA.<SIqxZkj);I8;ijEk
U"3H$L>IAGC1a03)vF=R^P0?sP2vauTj'</Z/_5*eGhO]X_t0BQc(ePWO(W+X(:23
U"YjT(96e;1BSD7D,P/LO<7$To0icY+.0C7/#PB^*/mPJ8%;%IJ(:dC3](8GK%7Lk
U"b?<3&LG5xm<qHAAhN3dcUS/O&U;EmOQ7=oaG7&r,j#t?qYm<*2:yEZeL.qL6t)a
U"fYT4RmE:=z.Y&x)BdF%?[LZfk'/=emaK>4:Y?1*r9kk2F1Og=:?EE*-#a=h++uI
U"yN(uUBP,=H//0-967,uEG\lYcu+(,kT42NX017hoSP-%AD(oDL[u)aDLcRclEJ\
U"KB^rfao]\k>o&qr+Ur,Zp.2Tt^FnMBsY#c5r1qP#gOv/sE.m#v)cbek'*)dNR:N
U"AQss[(xa7or#'DL0N2DH5$*W'6/]+s+;h?kiQ#gCjQlce.16V/uonXVW7?JcRGv
U"=&^RhNH6pdXRC+:AXRoF1G)rqL$2Yy,X%N/)]NIv&O1B0'/1wgUc^.tfCSGYU4c
U"/NtN(%U^2?IcRMoc+TR5n4mM_5er.n2pZl75nEeq#XsJ6_BVNe+scP5q3LzE$FJ
U"<xc+9]>#9*'mRiSWm/9]HEa+$e3zL+,^[]YSrh;Tq0C'bi\9)j+xlh(LW8)B\Q'
U"+>iY(i+eHmbUEbm\=nQO*9LSro[O-S->J+OlM$ddUq;trNUi.f_0DEkw8yaC]9d
U"2(+kGI>EA\'&4QKW/)%w%B3\A8IZ)?-m['37/sG;B]S>+?,m>WUUbSUI(->6s7-
U"lVSJTh\=u0jtsMc%h9tVBOkTIlH3?lU5+6%R60xBjBE'pX%gr#:na7./fq<mick
U"K1(w-2;Pg.or:E,wXi4G^%2JsLGJagghJGhgqD7fp'<OU3FKTBk+SL?m_EUzJS(
U"+P]bWE6xb5\bQOW=\Q=ahp<1DlZ\o:<8=.5EB4fF]+9QQ<j9fnk]Jt:sOX>JI_X
U"FAq14,L0+OcZ0S4a0khJLFo][4;5KLk2?J0\3&*s&H6r+s53RaQ.#a^kQ9rfCiw
U"F8xb++0ai:4j]B<JQ?*0Rl)_?MktY+P4CtOo'PdZTBm?-b3d(+fvLs);Z)X>ZH;
U"H7:ZKHE67-n6iTPfi]D^BdC9<mARU;,Bu=UQIkD??ojm/LfyT3r\qhV06ylTno_
U"Xo?cGocaTT?3Th3GXWJ]wL*H'$oC(ZUDU>iYY9%:v:K6&vAKG[l#A7z^7j=xy6:
U"+\Xm]>^blssHAQbbjdekuwV?u#M\GhVZ:-C14a=K-L]AZ)D-WS_?O%:zlHlg242
U"W^Idy:)$VCj2UfD29SedbEXQ2+R;F,-Re;$$G<]C0r0$HgLp?\&W;tqKnKoe]lX
U">zY2^-Ut/L<.)]D]Y77-\xC](IAkCkBmh26(3(HXAmeOq4esZwjc)o7=a.tengU
U"YwZDzb#2k[^&fUm=%(;KNse5?A,l_0t#WdtW5j'6n(&*<JemM;i=qs%:yZh*Wq&
U"O(.kICH(1^U4s;8;ZCLycxS4i41)R6^<,;YN\r9PWB\q0M/E>QFpZJUJ>d7jYo4
U"7(gIlsR4?RJI(kkL#.Q_xr,imp_$,QIt*6McfGZ7qhTz42&^NPls]2cC$/r)*TW
U"L,dH:?8>:CAe%c&a$p;FrmLX19J,UmRt-4Z6fP?DC*B/-'?^CPR-kZAe86.Co%1
U"ScQBb<>dfKgdK?5A'U1(WU[&VUo5Z9cR_4m8qKA$FsJlXfsGeAYdqFzSf;%nfO5
U"W$>I-d8AkG(QC^(NWL\f)loBz2a#CSX7p.%Y*tT0,eKbJW?BwQG&WSmXd$>Bj=q
U"B]Q[l6H[C?vHgu8fVSs;i.:t9jee8ojg?ifi2qlZ\_NNX;G=v1#<DlZ&z638q[C
U"Pp*GuBbW%)?-Ul*7%-FjnAsFTt>bL11?-M7HCtZ*.q3Q(7HhCqsH6Rqs*bN)90x
U"TYULKSq;VGVhWo1,Av'n718QKy$$?7/l-8fK;(1R2Vn?0rVE7c7Yz82H&c>:iay
U"GvINXc(Xr1ci-?\UX$g=mKetmm'A&vP\s=u]1X4y4##-Ud3Pjs.7T]])eU*<Z[A
U"8Tnig1vcD?1l'X*I7:UY#xP'n/XQweZ-k(bdpP0r#?a9:snr3GJw(Yi;jo.Z$1b
U"n'E;z*SC$WiVQk9xFhq5md,J/x\=tU*l.Fg],hnUvO3>vz\Dh'&odJL?NlEReEE
U"9HLBjp)t&;;fRqO*Ld,r[g%[;Sckz_t0.9e7Z%S07V)s2&z?&g#dKAP)qKUVO3J
U"QHjpGV(1#m)22>;_j:=R:s/^x2;o_h\=ob3j..(Q=SlM103:%fy,W-Fi>+UGSM6
U"=#1d7Oz:Z0i??-Zwb5:J92gkwRxAIy%3f;zH;%H9G%cKL2Xy+zI.K#)EWEdzF$O
U"<cH3IeiwH,BTAleo/P/Tqed1#Gm)v)[ALpmIV-Ak>$#B/L1/4qNkbYStS*^9I.q
U"Tj/*SrlKoZKQ0YfjbA%NPY[.*?[=&#6Q:_R[=;yX[SuBm&jTA<x2^-#O(,R^<_M
U".iTb4z/G7*388t^bVkK2yq'gaU*,QHH>.iUdMvQ>hMV#ql)FZnhS[N8AbRMAN7t
U"_u5iHbA9<<eMT\K'rDF7h)<EbY]8+wES0rHF>*WQ*HN?TQG(I\^;Z2,21Fg+-e-
U"&xkH2QDk,/=GWDR]p-Jt3AP?,ZNnaD%yS4HwYabFD^6g6rQAL_G#+4W#4JGja>9
U"-C(d9gPXvr#9]h%IVSj?\#4jB/=PorhA5rglJb($kSJ1JIU1Fskss:TBvq,<Ja2
U"m^Y3/mKuUp/5A#?,s;(;^u0;7&&iPu+_H,.&AW:EIu.,V(3LX]mG?aJUcBm]CGu
U"#cKF]jeTdDg7K:ULl33C0FXT.rz'Dnc6?V:0>>nT(cv9LM^EDCc'N0l#vgQ=uu'
U"XZ8Dcq'=YI[NbwpF/4:YcNl9u%-do3[f_.R3PHwS_:Ft=+Pi$%A6cHxZYi80^<9
U"x8z22JL?afci+hh&;'NndYbUceI%k3mR4#u$\)as:Y9po)?>AryjzHp/wbH%*^X
U")TZISgFO,)/ZCb=Sh?H)o*w_kSnRxd-]8/%*N7P1AnViW/J1R,5WMf0W>m=B0=m
U"a=(Z$[TThza/SA=7^ICFm6>$:ca/XU1IQ?/TWi%Z>LDGI26Z-ddG(*$'VVi9)1e
U"B-uBo_v5K3J=vP[B?IL#c##es8AcgO4?YVt'm+K9>O9Z81]vx4j,tE-2JZ)_mue
U"3lLrK6O-BQV'j2:fP(blxI2AUo$/Z*=DuSmJ*:;?Se?*i#-Ze#+Blqd&h^$SL3Z
U"Qxn#^%2F]81&\$i#oZiV.=e%,=C05qn(5'e_2H?3jr%76/&IXo\GypV7^mRt.Oq
U"^Cn*PmF)oxh2GDJ-xk'Jf=p?v]'wKoQ6CT>E5XE[l&/_css9Q,%y8M7BP$P4-Q0
U"%.0QE11#jn3?T*t<zCky,CC<;)VAkK6QTl/?]dSrqX\aN<J[f]pI_?Wza8RvtJ[
U"kE6qU7_#9iMgY-Mw2w-dl&)XInz'25sH3QO5q4iG%ZQKhWeh)YgCK[_pByu,HaI
U"z%4+gt29_dvQYRTu>,$),L.UTg]'GsdeW;IcK5q,UrtRUHsN)m#a9KE$uI,d>n9
U"_DuhMQiQU]Hkd<^hDkE_9oa^<:yp\Rln4Ci^de0iR+c%6F=dF82*NRJFlB+2CL)
U"p=]Y^LlT(.>wqeuKoK[&cDaNr8T%uQ?<4nQt'cRt2AvkEBo-iiB=1&.2v?>'0?e
U"\<Vph\;JWNa9Mo)U(Bh>$l2ygtq#73F^uLsRc\#_v8AIU.0VIrfY0QWuU0F_uZm
U"-xq:R*-Hy-^jkTa(B_e)=U+:/B\-T]8f:i]T%1SL(m+?K9X&B8(;V=B1RnH?n['
U"&.\*h6WC8mh,wWn6OB?dQ*w1>/%(CgMNxfgw\cmM>%1\v=e2P#<bv])w]Ai1JPA
U"xSgo\naksN=#>g5x^JTkP;o$U(dY)kc)FdI*l?2'zy0.FpMWiZ]BQ#Ew^l][FD)
U"+B\(MSceM;41qFHu9sKI'EU<yM/<9ffuIag\JHLj2LZu\J;;0K9iE2*.)x43Z:B
U"8U'ZhO]Ei6\%\)MgkKfQYePij0nAJ$26C\)xg-;(pQ#gU'3Cpx*3,2cC+7X/-1)
U"x>fAchaOU-N:tQ*E_v+EF=[q?)?AY7s0[Wsl00Z%G30T0jsTs1pA:0&xOoyPu8$
U"PkQ^E>BYlioE^h[/=ee4m\e'-3Iqjpu9:zkN*lrBu(],(L9,MOPqY)NM#_e&^nD
U",haF5Nu+4:hvPEsL-/nh170+VTW$)NVZsKY,9a2nxOz,h;#P<rXUGg.tFQUJR+f
U"S7dB^N:Sob:&<9uBImQd-b*=)7%SsBu%EZXIF1TVH_7dUe.u3Y/y1u?RgrJkQ(I
U"3O,%=19$>Ks:bm^.qpRtbVdbBD#itJdC(SJHAsn:gju84NJ*G)BtfHcm+uZj>Yk
U"314L**.Y$R_$F]Wo=,r9l?,H8O]_=U>tg_&L4kQ#Lb-p8>OdEhA)>D:)sR13SMy
U"Sf7hPL>R<L'Yic-DlH_D+0w2^4aqQt:r>5nIX$APz;;IawSLOd?>k+=z.Jwdz:N
U">rGHl];J9kIIC\vMu=m-:T3gOe:_2g*&*cd)y&_h&j4_)f._a:VpNW0jw.7X?j<
U"J[kdY]Q/=7Nfs%xcQs7%%[ZyU4-dBIlIuVdoZu1GLyf0^Y&cxJe<6dS1d3[uf-'
U"*a1cx#kHkKv59^yNg72rxgsjW%DfgG)R<jFZUjSw,q2Lbv3uuqX<L1(xLDVnO3d
U"+$K?)oVsabLfiX6psXzhwceTP0DrAOl.skAhR,C:Nn4oq\g+GiB6vV<ncxi[Dg_
U"dlYG40'l>QgHYu+p0p$nRCv?XAer,cB6U<z'1k&TmWv&YYIUAx6^vOU%$m;<5&=
U"tb$.ueD]K2&eccV4k$uP&GHbQGgj1.je+CYatXhBt;4k\M*&=fomZ5J9Vd12O5i
END SUB
SUB V2
U"-pu)Kk?,DUscrijEm;CBiZ(r#&r+RyGX)CkjYT[=XZB5Z0wn^3QBWnK\;?DItL+
U"xbeYZVe\.iSC.jb#HVP52lbR<s:ol4UmC/<lHOzOBOTFaY#3$1GGP#4hyI$LnFk
U"&&U=RsVkIiVT04:OGFR5c2hFXuvQp)$;-u_DCq?gpwo?hI?D+7(Aa>K&&&Pi[4B
U"cI.ul=c42ikN8Wqs&5HIm#XD7s&h2.GZ9*5t<uOGtC3Yrh54/wjJ/H>4KVW##5r
U"1VdC=EiV#Xy>(BHKZ\I)Bb>1&u=pL>,1rU)/B+,AmRv(A*'4.)ix]3?nde7RT6l
U"916*IO#)sohRdO,gkT)&nQf_3agVyxp,Q(e:/u+6IHJ.tTvteLitVJX?w$pc2-b
U":yfeoIVOgTG_PO&0xEg?0PNBu%-nCbtJh0r5j0[=E'IU[]KIqhnLJ6y\.D]z_os
U"33#ZQa3jS-Px+du:cPA8-bo^eCcvW+l$PEc--$=6qXt9SsNlFLolzf,sGzO\Dex
U"k?NkSQ\goM$gPxB.hm%afdCR11/iv_EQ^a^:la$R<nM4OIQZARDp5-Y7p.Gsb_&
U"W#JCp.z[)Y=7qtwXlsfc'J8ZPanbFy*&wt%MG$(9hx%?(A=znApU8HfL42ZJ(vG
U"5?$L)Hpwk2:]nplb->N4r\$$ijWWin-j$gkE)#B\ux84E0xjF>%A1A+.bI?zAf=
U"vwQ4UG^NQVo>cYt/h#%IyWYQ]cwRQGqumi6>*L/tc78:'*0duFPF&VH-s$bz%5f
U"\DY8p0Qm4rJFbCs7BOKuDkRFnJed1g8qm1*MJkxltMJs495hi%p)&%KgTy+IX.Z
U"xu5cJ.D'Hnaj#s5)P-^ykHMe9m>FXW*GC-fH<._jO<H6N/>j7nn,ew.+]XQ<#X=
U"1:VNI(2WN:/rn:H7xUeMc]XtGLrx(zgo/,b.#zB[[3()r^Wp0wRHB/TuHj-9/RD
U"f'0qNIIzdx%OBr0fic954[[D5S>^::3SO_o-PYV#1v[iv1sjpGMXxW;,),Y11<N
U"rp'VGx64G=vckAS(h^H[qJ2PWB[*=\mLh3MElmiHabKDPnNIgv'?_J9[m\aPQ6f
U"E:eW4&5yPmQb1;7'Im3rkg=X';iFh44Ku]EQcrr1x^Ji'&H6/P^cB?9OgY1Wiq(
U"u'/UZ,8JA$q&^D.B8h%dWbg*z&8oCE:dtB*._>*JfIhr_l+FASMJjShQ+b<yrZN
U"]9u1FxaxbdH%<T+xA^mF[LB$gLB[nsP]XnYx0'\YsnwWFjBCA3>3F#8BvU_ZX5H
U"W9#,F6U,F27fa<B>%kZc)In+5bOAV)YIp266PD=D^VXoo5U5zhN:?ATnI[WS_zQ
U"56.=O58K#PQDWvlq+T(0BTR<2.YAn?j7uowpkV#rnfu-Ek?[s'o^3OAnPI4Onjl
U"7V_msLb9+c7&a_kGJ&s*1><V6_#];Aa#BQsKFDU%vU?+%Cw>l7+Cjl2HNbG#Xa(
U"^?\RVW71<C4.gK*78mR<#Sl'1iC+g.\#XgZXA56%+WHqB&-9=:KlixoMiMfR)Re
U"cORla=zYA4:7F+q)XnGJ7-m9:&/^^gwxs#=3qR^>j(3D,-2X4l<JA=X1A0Zc33C
U"j-CM0h6t$1J#SCJ])e$10L;tw)A(n*=ECUyZm2bO+xv+<KqJhbc4D))UJ[1R*0m
U"E=C3NSK-FpY[<&.6Vu+*64S-L6qGc2DE4V9VT>*9rPhW'WgJA1?^u;j(9T8[wDl
U"5F*t)hG\IDAbb%D1_yj1Q<byJjQ<eCyjQ<8hyTIIYs=+OyBU-Yu3I;qIA[nPJgF
U"F84lbj5=*L*ud8uJ,OSqGQn9EEVxU#d]N?Sv:DjV8YEjr3tO.osESvv<XYkuh$4
U"4L1HTbLMDp8nwMr+plYYoXVGeBO7'2]^Nt3*eht$1emp#W*L:L6QiDKa*q74A-x
U"#-0J.'xP4*DS-viS^lp?Q.kb;fsPD'/<6Xn7B8Bwq0BG0KRT:LVy<AvZ:AdK8ML
U"a_:I+'A/[WpQh/')Y1/s2GS]EOPtwOaMT.sPUs#nm?;'\E[4]+o>7^Scm<TmPeg
U".Tlfh42T<<GkEoqh'&RNe9al.20IQrCG&=(l,S8q\R\>2xf1'T;J0l:Q2$TgQt0
U"_5_mL:bIGOJUutph%y[[vt?Ore8Dcd#'O2l#$DEA6c5V/\EYtZY<xb+6+jXpgEh
U"n^$<5,lmlifHm?Ww7mMb<8-^Z\fpnk0GjGoAu8Me4<tq,,m0WK'p3s$fe<t%Sq[
U"WL%S#l,0doQ_Fj&rJASEu:fh6k4#LhkG6[:%6k,EJgSa'a(VPHZmZ]%Cc'cx%e8
U"'LI\F?\;J^:-]Y5*vaMnfRP>$l=3hqN^g=-Lssak#8sXdaFu86$;8Eo^o<.%$O0
U"K$[ddB3=S#Z\q$;a%Zo4o1J/%w>O:jQj$A/Ilo6?RL*CFt6x1B3xR&>3J3?kM=q
U"/L)v-iWH<^[A#/dcG?:s#a49QZCgD70F&dzv/L7[-T+>epj,VBe).hwh68pNE#%
U"jld$gKS15lmE$ngrZVWY/VU[Lz1k(5:,GbfYK0\VVq)Ajamqo_HVvMmj)s1Fv]$
U"ASa6=uLtUe+ms4w(73k.=\Ms3/wq?/;XMxd'w<up%()9%%%%-%;VyUO+8v#[%K.
U"%%%JG%%%.%%%%hwzx%mSjljfN(B-'%_7TUdbLBx7tO->gAX#QuR_Eu2B$S8XM?\
U"=zDV)eIf&c?G1$m5s4UV9aT?E&Rp.I(CvOMuOJVhJVJ=gb=5?=$WU[tSfdXANqW
U"ziBR*8AUDDLYa#F34X[QOXX6p-JVgY(J?&UhrXJx(r.1If*XNADblBClqEc$i-3
U"/U9oX7Wurc?De_d/YQ>r2w%phj8s.2UWnZIRN=O;q;AqhE0TV0LWVi'[[d7<+L>
U"7XT4.(y-XYhAUbE;%3;JnA2?M*Zj3TVn;byE<+6r(G<v&i^erTTRQf7N/=ErY*S
U"B[Wf1O=;1?AYP*.[P=Z3V?phjiB-h3sxag%=<?(P7ttJIIiC-u7D-o.0H4XU8h_
U"S5i]L-\rST9?Y]?:$TEU3,%-m>BLYl0T/N;c4g&%]6K\A\U'Vk#iqLMcH;ESUvR
U"43/cRifA67ILn[T#gG?7Eo?sq745E/^25Dh5lU\dfFOlQ$%J'Fr:c/u'U^c2Y&1
U"';UbY**q2EL;T'vLIOdIm/L*61N2+x1Q4%b_^z_*QghHlwS<7J=+v]D_/<cMpUE
U"m;EfeDal?ioK;PasQEOc+ESp(#g,G>K'H#j&JvvWa)qzpa>X6\cPDCqAbq-e$U=
U"Ad+/al1=b(L$:egJNkPY-J[.#-CUB_oy1.gqe$oh'i;Rv$[AYL>FFA*,C=ElO<)
U"fE3vD.c)$+%,0UV]M,kJ+/vXpiD21>L)41<;;=Fo_)TaS^e,rO+2[Xq&N$#3pzD
U"?84(?<9i/9gJv$sGrkP+,LBpDYp*5#%#634d&[lQ$b(6Ie%^,z^XVStb7kP[5AP
U">^$P*U<tid6nTd_3(=bu&iWsKURh4[wC/AaMR,=F:He0XzH?*TzN8lgq$n$-s=e
U"TRMHDLgL\IM$8]WJbyS>51K?Et]^gCJJ?>9CEp)u'OO9vE(is1-Y40qWNu,($(E
U"1a48YO%hLP+ADhaht'v9%u[3xQ^UXrEkjcx,CeMCypOF3hif>p#6mx&<X=j$*WN
U"9S:'+IOQ8Tsb=B#a-7\d;./G<MeHA,L#fQC[e31bhcb?T3?*zYGJC1GqEB:4:.S
U"?[UET,+kFo.&duh1f2=^9'Ah,P28CC=<K4O5cfMVw1LXbAOE+,9/4:s:N/vDD\q
U"3O)__o%*/GWwE[R9FS7;+[IQdQmT(YE5Kn;J\9/Wx_-+i3f#$?]\^Fy<ek9DIh=
U"Qqgv_t4Aj=Sdqw'nhW;8BwEoJUlc$FF$Tgch%L9=LbdlnRXrpQP83s944+CTlBK
U",A<ky.WeqT[afpiNR:Jk#d=JG'5,vMTQ5IWkqUE<Kb8QVIx^<4C/CdgXmtW,?ii
U"Unw,$xc^xEEgth2A_au<imJ[Q_Je&W[;CyV*XlM(a#m)1Stj7?a.TH7rVl,]tSr
U"*bIJ'n7qxggkqp0uCQKDX-M5Iwfp6$w5[i]mDjRmNXi6$+f^pzRRfk624wtSn.&
U"gGy5(Me%q=42?:t4Jw0Ja0w>t>$q3S,rJ1406xf^^4LsuL[;&wZu/er?4Mf<t3N
U"YU%SgS$#DPA#[\QF5T+d\GoyH(pgZmLwa(LKNaZj<*VieZ]B,M^9D7s:QuJ*T)t
U"?7#U'.ZC2,HxY:mB>/JhaLCH(Rn4o<)#$e)$r)D>M'rlfJ/NwJ/jWFM-1P*ga)e
U")\F+56[BP'm5m_oY\H)i<=+V+r1%VPCX3m:UJ3b'nUjTOFIWrC2Qo9GM%3$)zo)
U"nQ8oXKi0:Qj='0Nw)k*Ql]+^PMjZ=>.40o$aCMhtBn<TOYT7stxW2)602q;OhX4
U"L/Hf0?mEpGlOS.[=w1HUr*=1bNI?DQpN*f#^$,tIg98.6\xhnf^3&EeYd_BbDjE
U".tiU41iE^GfF8$j;LXovG1xi1fpP[wnXit:?-\tE9nX+ehI^<oVAi]gW\rF\&)1
U"q&hh$jbEW9C<^v%g#^GB1BIvWCbc8[8lW7p#Z=CElu3MLumP;mUuJ-YT._7aEm=
U"ahLy+mKt2lL,>Ek,n<HCB*wte&&%HJNuf_%hH.KhQi#=j\)7bB9cbg^MQL1f<lr
U"N)B&9vPL_$a&_C4?sf>UcV2SD/1K]ObN:-230n8HwuobLY=.KNr[F3\]\k&?&Ve
U"]+;a4f\B-Oj]s9oorKa&1%PV\.977\&<zY6_g10NCB55q^[I'(ozzF3nKmc[:h^
U"9=wGUk'LeLY2K)k_;3NU-rt(91L6)aFU5g#.*oID8Yrkr</&[OJ&4geMn[0ZFVu
U"02)KOe;Eoty\+XlxohyF)\X,&gR,%l')>i^9?)<(o<'qOqllp0iVX,&jR]O<E7?
U"n)w-(S*\WB/)BR\_$swbuxnI2lypv_zkwTLQfi6%c<lE.A)s#;hO.c[]:CL,x=n
U"w2ScN^I+$8TYRS::>lY.)D$Nqe8jo/wphHKc/C7QoXkG4,(6AETG_vvZXv^?Rj,
U"#<vn#,PI%,yl6k%HFj[l)jN>%&eMaO1WvRw<ftjuJ7U\EN?*jpYK-=C;/F:mT.o
U"e,JNhSK6*(DJ#\ot90Wa1M_Ip/e4[/n?TG>]+Hc)Z7ViNP_e?&$$//$WO);DMt;
U"9teSItV_'z6-azK\#l\WcnH*N?]A2=n4;nRVQuP1n6($KK81lx(oUge4L0Zw,Pe
U":vXVd03k2VHaNjr,&\9V<,ORdqQk8-PD^XFIhzF=zlgJ&rwSu:o$T;ai^cx#'46
U"GRn0s\$l&aZK:7\'ifJGLX.2;2KMcwfWrrvd=L;B8\14NiIZqFJ$5R,<,UVutR6
U"V]YF*e4W33Ywvp%iK;)_N$QQV')E=$+hp1ZP[aD#iJLJiQlc+/Uf:II*ekJ*^Nd
U"'MS>tG&etT[qq>SQ*%AAd_)#[U&=[_rwE&U16CzM*O7qf_)Ud4Q.tmdG_A9TFYA
U"D4fx0=Z>9;#d8:OEmlj-SulNGrGnL02hC.8',7D=[kcrC:7fs2Yxg$A=Gi]kEGB
U"^Nx49[yA^LBKlEF;$=Ic(wb56NLVdZW/,TbM3ZX=DBvyounD#+(w(u%p()9%%%%
U"-F%g+1%LrxT)T9&%(%i?%%%.%%%%hwz%xmSqUj%f(<J=<Ep1K(MEhfAod3k(-nD
U"D2<V_;1*nzqd<jITqqSCZqOTo&a$bTF_]\5$QcOd,Af$6b$GEt:$ngCM4_0g2A.
U"?cUREm8aee7y7SLqjA3<t]2\AZ\5Hb619SW%n2%vAXuG08\<;S16kZg*ePu)J3+
U"c9u-oW+4[P[aZGtU,.A3<CQUK4?D2b1MpMf$:F4^g1*G'Pq[O?v]6/GqvKV&iG]
U"^nHDhi+J=B8?[u)+?q*0fwe#iO'[*Bv?Zq\g&*'_$44gk1'Ux+-f&V^kUKf[PQV
U"\ra7(e8-wW9\VrVl7$.c5K3W%-.%hgvBP:p32(b:lN7hFwgo:-0qiz6mkEqow1l
U"BXS9JJ3iGfa7,JqpCXaSJJ3:ifa7D,qpC8XSJJgc(q7j$MZLcooU\RW\p%]ZGpg
U"of#ohJAl:>a)nS1B8;5,p.F)q2StcO&+PiAOgS(OB0+hR?($L,%up()%9%%%.-%
U"*aSMQf.(B\a<.%%]r%%%/%%%%rh%wzxm%SgfxKfa:FlT1AX;L]xepd0.3n\zD24
U")9VM-RWoK3n77^bt>]75JL%nW-X4X36&E[s\v)8-6l%M)_a7$P80^B/BGb%d+XR
U":J/+gP'mmYseeD=XWWK1:nW\DrUT>(-rVYrnY:jk5$7KRWaQ'<DurVFk?jgGHuZ
U"ut1Z534*M+ZfnpiMncFR;c(W5JpxgR-M1YIps%?AY(Wn/Q0Q)FC[$I8wJmcqq;s
U"NvCDLkDtEjMIF6FXLF=$ui3[JKRysHDMeX?*eHC[Q$v8A8E_rxgO5bLOYhY3nAO
U"+_t-e.StqXUlU(Kw0=Ti)G>JOUxA#0$m5n]8_I:v*G-u8PsN+B;PD--0Wd[sqW1
U"EfRiinA(A&+KOxUHhtT+4hf;#IW4Z/?MbU+0ZbO^GKDB=QE^u9_On0]N#9+tFKb
U"^h->_BR&yY*[F,>8A4cba'+Gv%r#>7&$At*C7>MpR%?xv=8o+*T5hvg$bzWuo;u
U"O7u?90GYA[FMQcUZ#W^$(,W0\GUV$=(1h0KPs,jJb4KI(-hF.wzC7Q=[^QNE61Y
U"kXBm^[$x]_9*I'qA,6_;5uIc8L5\Tj/oGp/G/OBB0am4I1.J1k634brquxQ<$R:
U"Be+nN;wZ.S;>>Z:gs,apTi_2?OTc+P5t)Qu:^^c9Y3F<\nemg:+Wua;DJb3sI6_
U";ETK28Qgt<+BJ:+:u&aS4-q4N)\O;AD*zbG+E$OEa/#[LBRc<%6'6B^(MyNC-71
U"FAFKhO%$ac>]$%B.55\COhgH5Q=19+RdbizF>cAWYSPd2]7lWLvXG6WXMU1v_KW
U"-v+2VwlW5O3o%s5ql2g\m?XA/4[/t^O*t#4gC'<N,#R*P#l49;BSzr6]4,)]*b-
U"MF3Sqm[Ep8YdjGRC=^DSa$WQi(]dj);_'KnI%Jl:[.J:$,;IyL9:7KpOIH]&Awy
U"KMGuJq9]8-x_R/pAs9*sW;M(LP5l]IS7YXJ&Jg7d*-'oFi(=GS2dFv.kc(6orjL
U"]%Sw2W$b3:0e1nDG(K0Mu\hdSEvt[+K<d4eLp4g5bMQGEAK=x,.AQmGQUtCQ_,V
U"$Y-(a3My_HO]\s_6IfC/^[=E$I+HCYz4k686Mr:[phJ_8aJp/lxMU#qaI2*/[/J
U"L048LGm)&-kWh+&l?hFGanR^6xSs&x)E%^\#_FO:SKw6pJtELip$wBg2/\CRO?w
U"_aRCC+ijE'SwpJ4((hi#[.+4[mLVua%?de=6c)M$:dO'%cMq<a5r4b?29$fV_?i
U"58VUziz$1ypB#\wwn,bK=^Lex7io7g\7C+xIz(nZ1$mv4v##--3R2+]Rgnu&mK;
U"*zn(b9\,MM=0q%;:SRV9U8=5#Ek%$s'=1eE0x[M4e&Me?&U;i66S?DEx-/iHA*q
U"C:fN#kLfHfj9Bg&9NP9T)M<WV7AH6Wtr63[eqVVG7Z+UIx9WENb_o=[:D5&$yV;
U"N#5j<DtM6R]ibqu+JP'66??i,f4s=h->cHf2:b>i[w8k7JeJl$VwX4pFqxky=fq
U".]J7P7kUi9q&<rEh#_zfc4hWb_AvPQeof$^()Eo&6s&r+[BKg,WXYe%+[L?+erZ
U"iUOq>XnSz=#dgN,S2TK>S7MXu&UK]T7v6Vb4]As3:BcR:wgbb=Jf8iXSP#,1;Ap
U"T</Q/E7AR#Phw4*4hBBVg<t9'%&2imH/M/YQ0rH4-(YtmI68S56+yoL1olT:5?Z
U"NLJfA_a)6iR8ldtxA2[$G5y+6,7i(\M/CTPVs<i2X0Lu[Q*>wsU7LG]%*8dK^8l
U"5WG.wBk48kS<gH#+5'#;uROa/'GX=Um.QM[g?77=-ff6D^RV3Bd5=6?[A[YQ&,P
U"Zv%%yMkxmt5+UBoS_NS=fMIs6Va$.(AA=vt9=ub[1V1nbb/sc%gy3ct/Ce4>Yd%
U"BasZvX&i*;b&fN)uEF/M/HS_C.BS?G):.dx7]rA.Yc?O9q=ZC1bZNEYeEqxjJ^N
U"3Kb$E&0XA<[B:?((,+Br;-ZR*>];%FCaiG&xLKy(6ekhudH+EoZ49'81#]ek1ow
U"(=H[=+#q]E_(jjC3+nx#n1?:X'hrtY'A[tAmN.G4/=gLaX;eTZ*&2D3$qP:x6Zx
U"4o.tVOwLB%q8(Pin34fe82xDbdpoe&('gRPYR2rHtr2ml>es*[RaTF7aaWr9RbM
U"-B>4LFl+=mE^1K]&S;=-j24Q[^cJXS\'Y).^C1P?hNK^[Xx.ifaTTgcNHUv5B&,
U"+c\KtqL0$Xfhd>6ZjL((7N.Z4:16=AO/d2(ODKOGiaY3Y029X2u>ae^XY6LlCK$
U"o350djA25A<*6;GUa=WS2IOn%KYJ;WV53.Cb'=)KP3'TC]/BW<l(syUmerm'P[7
U"lMPV<[#:G4El;pHLBBQD9?.[+'I6=W2CRHmV+_Q'?B/c$p3,r<b>Dq.w_GC_81;
U"&kSXu[o=u7543SMH_Fpgy/#Bjst3rH?w4RGtH6;6HS:+K-Dxq+.SIE7wZGXs<B(
U")EexSSoPsL7s]YhGz'=/%6MNE;dvviesr=ec<qJ0cp>&9Qk-46OLv(Y=ACg4nQ+
U"%v7;btR>*UVV\/Oe)Z?rVajk/+G:dXd4Eh.SeQV?o&rGxPooiMPQO,[(B2>OEFh
U"<M(%F9dKha'x7&BCeAYlQ\h;(Vp9r9sj+m.V22If^^a3ngI,*raG'-hEFm_,bbq
U"Y1Se&YgZ4ea6nu=S<g==tb&h;[mITG#G^Lv.paMu1.fIs]&J/)?A4xho$7n:,bv
U">qmZH>paJfauN2so[t8f(oU?w%N:Yr,l1:Eshf.bP[*rp76==+582'uI$$CtPsx
U"pBf$,*mcjE1b0fD/0xO2Jbl3_$H6UaC6mGRc/I=$)6SIk&47xM%kt1qEoyWaUQl
U"glC[*kZ9Gtos#Ln890SG:0-R+2k&vKhvk<#tkM2R6_-iDRe^T+EHA5HsqO+:B&t
U")n.'GV#i/ppZ>CGex^?=NT[7+D&(MTg0b2C>n[\fJZc6]?Ksh4lGiCo-_$,u52p
U"5L*>\EY(7=A;UZ%PYm<IW2d_\.L?V($stf=AHxV8B8GQ020se<?hErF[9n?tacs
U"nst?pdmdAq?)[3\9.Cm5=7fpHOP^_uL>QC[IZ\-8,s&,\emkT1:D]TIJTPG=]by
U"UUd.4-di==GArVdIT?S8Cr2BT'nbtao0C+Ug+(Tf0(N;D.+$zMOQYd-)f$=tU)D
U"Hj<OA*:Wx-/pV=F#aXss,MVRQxI1MBhj1Hh2C(FUw)<H7A^m'1uZ8Xop]_+XlIV
U"UGml0:UthUnQJHI8]s3Ts<DC1qpo^(kwVWXN#kM>4Ln#\xwAnbB(UA%kNKa#)we
U",A2SJfdM+wI5g<Pw^ft]j(0S'ulauLR$RRw,Fwsht6mp4.I8kX+L.i1\63IX'8]
U"y'U'gmV=qXpH5;RV8'C^Lyqq_Ga=-QkuWLYMUcPlAp&BG^'h1x=:iMB*SRCQ5aJ
U"RJCE_d?543h?F<I'jl>wA[K\7S)P:p0_1rq,]<y3c<*sn4MC4?,]^M)WAN)_SG<
U"9Y:ZqY3eX70o#p=N(52&[oC;K%JtDlwvAK(_74_QY&I?D>1IFEd.u::i[UCt:??
U"+*TDfVV19Y<A%o%;r8D1Oao9.#o*vdK,Rt\gq#l^,Un:)LG.Wawi9I99L;AUB_j
U"%IX'3OJt=O1$=pk_m/%?+%v3%Rn&(>5%%PKW%r^dbP-x/%+tK.C(n^&\>q>ABW,
U"lZKny7&[C*d(34OlgSnnm5PVP2$ckkbV0Xt;nIVUVoG#qhj+Ref4Y;6dDmuH].E
U"Gb]4'%_b/(-K+ifKr+RhpgTKp8UOJHa*-y*awv=X4^&gn2(oY*OSrG7/e>L_^HT
U"p#sj^$KksSWFAgE6.HA+&S5p.^^(*_1xS5A^q2xLc$[se7N-2KH[D9e6lN+,sCY
U"w$)S$PL_dLQi0:Q;Wx2b^0mC?Hi/58->knCG#wi^8u2A$[Yjd8%o6o?b)MJ8,S0
U"Ci?*lnSIyb#Z5K7mjz8Q57z^7%]RNygh2Y7%pmXD>%sG*amdy)wMrRdegvyG_58
U"StX[wn8dn0>sn7rdd5*%9]XIxyD;0&1'+NggO;LCvy'ehzm(BQ>L\\hl+VFtcqC
U"_UkG#%tUG,*:Y%-bqM_:VOLa'&56En/+I3O7y6]Fi5SgbUHMIwes:1Z:+WZ\n[+
U"\XH]/qU%7\He4F#4^/yveW/pJu^QwH:F5+J2E]$Lw_=cL>p+5eCKCJ^Vha$MBE4
U"%[?58vlObV1Rh\pyU1x/xK6EatdH&8L/2W;)rN,URV[hiZ^,YA5;OntQ.mB)U(F
U"FJ6Z-Uhc0ufL+E%rj%ig5_HY;jH-WfqD1j32[Qe29(rNDtkE/4Z);'U%QvmF/$C
U"sh-=v6*Zh8;LxZrwuqf&vs=&2EX1#w^kdQDV4pSVOho\L&)Jh'(6Y<Q(#PX:'Be
U"?QH'3A=HH?5-jGF0)eIenY$,E*#;9mKv'%&%W*VUp5^%;p+24>akR</ABY1#*(%
U"i%jA*Mn/u*ugdoJJ_mo.L8*3Vo^O1e%G[A'*39?&.MSd0L2OMbaQI?&:gUkb9e#
U"?(\g\qL\iHU[3/]ucRvJ_qKO6,hg;Y3]KdT?-n+3+>h'0SC]>]6b%wGx[+MW%cw
U"+ON6wc$wtwsoPobXrCh?-1n;Ln2k$opdt7rNN-]3-2#:s%)aDq>_6qO3;u9GiVd
U":^tdhbX/PgX7zUXH.Xj6PpaB&3j&=ACd_UG27Kf\WK#S4QOWI+#oM>IQAMZD?dr
U"I\mq<>=^F+<Sae.(^MyR<Ox0Pse#4=h]BXBi0+LW$0CAPfKVm^'X\-Bp^o%TS5L
U"l4Z$+NxQu545mIOh4X2%%km0FjO>kDtr&lo,hTMvJXIZIA,mb7Oe(^mc72L.Js<
U"0hmkULBlh4j.0Vgf^.wm0>l0CU5A\lUe7wr[m'79AWs?>>VPQiVdqQ3P_v&7[[q
U">azlXC'q>=r?FDU_#7Rb\#lofY,K$oalS[<Q5P%J#B-?D+:)Pj]G3Zp^a81C$HP
U"s9riP$tPk0v*lI_Dl-hsv258&b=p:)(UphtVm#OhHRR$wzp<FLh8_nheh\D6GH<
U"_4N5vPv3c_Ep$tvgW)7AV5Y:vR9OZ4Di$_[6)lNu1c;F,9L0[naoJeJ^DkIbe?Y
U"m5u8n]Ju:>#<b2Eh$1rJ\5B\:s3mJiWr/I#qrcqWIYK^)_>%w</(?]m6#QR&s8H
U"+m>vS8KL)2euaM1VxeU2]tbZ9b\P8=ToDbXzsmQ7BVR(6V,69jggYls0_B?'F,^
U"dX\$nE_F;Oh1'rzc#aTVl%/Acl^ip336[kQWr%'$:QT>BGe$=Z6eO[y2f-n=Ng;
U"yD)F<c--E59%jFwY/j+V^m>?iS0lOgu5V#lR;0/w$</5\DIDrBsi*HW9qCra\+K
U"1;*+[W?[)2f4VGR-(O;v'N&2u#Wo8+NhgOB\)sT$h%c]>o7m4[/a*Jo#?loAq?%
U"E7D:coOG()2L4gEe^1%ksF(U.WmT)>#uc?VBgNbd\U>NbP^\#wR^MSjHE/6C.S(
U"T':J8z+u^4e^2ElBB.chI8)12f8h1l*#p)qx%X<WmyB[VG<aSR.(E^toA\/7=]D
U"e:74bV>4HI^/_QT0uE%Q:/-uMjP<A34'HUXe.xh8&(MjI-9D0L2]7GspgW)0[\^
U"g+IpWhGo3UyeM\B9<QdpV8GK]uuR.-pBdPT>4TS2J_(=&:DNZ'eVlPJ].Wpb%(p
U"k=OU(LpBetgN]p2,>KbrJ#-tX%&S8H.rLJ<kyN&)]sJ7aJDp&<QqVzbBLSX-=RN
U".TYs_Ue2>A,OW]AM9I0zMh;ZJDrl1hVC$(p_%;rYU&4BP*$b=dv67zzQUV+7<T1
U"[+C[X1aYzXVN#B%v:Q%oSs*B[BohX4JY&*huRyeaBuDh>TX8d>Mw/F=#)k0hTRu
U"jkG15iRc<&fj0e1&/tQm?:bvD):Ws4)Gwx/)gOe9FC3e=$ZXGg]TJns&Cfypshu
U"#RVo%G,e24Z.<QhCTgpb2^H)mXhFe\r2LTKieqM0go1gn-e]g.lwJQxU/mmS<00
U"H[#D-MWn=eu[f[V1T^TUYdbfzp<G2]mTD'g=CP^xLo)FzSF]-lBI>tIMw2#OnXw
U"fLLp8UHkfKn+3blirK=->Rc*^+]rq,F$Amz#^2'v>?HTTYpP&2*2/E['Pm-Xu*J
U"M'-^?fV7/WNx214itgcI:mbpu7e9e]jrE%p[f)sku35w=tRudl+0^qkaK8,#F?b
U"B2jW>AH+L'E3nyiW]#Cr$hbU:c6JxpLjf,MCu7I38bZ$z9eL69HXggL5n7(sL4?
U"sL,Q6\,^e#H&\f<fN)X2vQotF50hDE1$^hi-TT[<o_ES*L4$H?L?\qLV?wPY?#X
U"5tGah*c/#N]uOJXjI*U#pMn2QFj9l\5Z?(smTDr+F&(<+CS-.b_*gJ<&7t?AB-F
U"]n*^JtwKMECsO8]A1;=xKvN=[eO.pb,VF?0)p7T>PRZ0<:)VV]L=3T]^?ba'umD
U"jVl\5grkAObd6G1.QOKUko99;\O&ZY/^U)q]&f^?[I-]jK6XPp$<Yh^?gZ;,r(Q
U"6MFp$g^K<_*lI53bV?5Pna^BuvU%<^8f,w)&Lyc1*Pw9>DiF(7Ie30qqW/W.DZi
U"=Lg;:jI5H.b':fp0]Gt2pt0YlQXEG1xtEt1poLr5g-j1J3Dv2<njxVk,WG>;\nj
END SUB
SUB V3
U"tV..neDtId0#EqT(b#[ZH7V?>a4prqsuuIu]iPJ>$VtMhi:D&v^(=y;=^#P#in9
U"V26WafLEa/h:Z)Z_k&&\=yQJHj5M&;M.mhaFs2fq#_X*-$6B>Y6):j0M;;^Ld&g
U"3^T6uH5+*Y-2(Y*f%/T/3dq<HsN0VbU:h/tPVG*Y7=^uOkZciRB_n&X4e(;tN+R
U"1<FF;ysA-ck<.Cmr2R5:R3;TrUlDYKwodg5<ufj&Qutjk><[%UQ<>^L<+\&D?;5
U"V%_5;d4=#^,(FITRFFXOPb^>ldmmCr=?p64LZ6sj8mnT^1eZl?^vb/D(NrPVF=n
U"a\Ms0C2rlt/E+\_=#DCH>]F<-(iIA3Ly*1]<NzZ)>)XZPPJ$jRD]=IAZ<&h9?iJ
U"ZIWo%txE.woH?VKV8iR*fNt:;1F#xkx%'0S,rj#g)Vc3=_$';Lkse&Q?)a::uL]
U"/Xy2rx(8)l5[3.XlbLT2'frcLPDlh&'ysVcqTpq;<Z[YQ>X0adyH#CZL%uDjKNU
U"8X]N*V<D4<<s/qO6]r'fx/)QepXabF>Q>Fz&gDeZPh^Tg6c63:8:Q>WQQ$hx8Qw
U"k5H[,r2T],Pm#k$[R(BeH4%F#U*Y;[>s/.)*d2$<f\X[.V6(l_P^g9a,(;8GG6h
U",Mj$4u9tbuKLpwKo45((D=N;&K0-HDTFZDzS.6_;9R;h6B'vGE7_UW(s=xV[]NB
U".]Z[fu=6jd1nV'-F>g<<#0ouI'g?=uFAk_8R_$^FJ/Ow7KA2m.N7%dTcFkv(='?
U"h''d.%8\C;O<rSOsPlHGkBTX)tklXPVuR-:8/k/7/eP6HN;o9O+(5aKXTe^b=>t
U"ls4hgS^Phe\ZDrDFPn7BucvT+_L?QYA3LxWQ%uHNs[tTDxQoT>\u3vboejl7_b+
U"tgqVk:TCkOSSA(nm]-mIH)?Tme/]Tsm99?^XvL%up&'%9%9%%%%-%>P'UO4?UCQ
U"%\T%%)>]%%%.%%%%%%%%%&%E%%%%%%%%%hw%zxmS%gfxu%p&'9%%9%%#%-%V,yU
U"O8'v#[K%.%%J%G%%.%%%%%%%%%%%%E%%(%-T%%%hwz%xmSj%lfup%&'9%%9%%%7
U"-%g+&1Lrx1TT9&.%%i?%%%.%%%%%%%%%%%%E%%%&z]%%%hwzx%mSqj&%up&%'9%
U"9%%%%-C%*aM4Qf.B&\a<%(%]r%%%/%%%%%%%%%&%E%%%%a%_%%r%hwzx%mSgf%x
U"up*%+%%%%%)%)+%V%%(%ov%%%%%
END SUB
V2
V3
CLOSE:IF S=142AND B&=21139THEN?" :) 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\21139,219);:END SUB
'>>> Page 1 of CRUSH.ZIP ends here. Last page. TCHK:142
