'=========================================================================== ' Subject: MASTER CASTER V.040 (3D ENGINE) Date: 07-06-97 (21:32) ' Author: Jon Olick Code: QB, QBasic, PDS ' Origin: jariot1234@aol.com Packet: GRAPHICS.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"MCV039.ZIP",4^6:Z&=19469:?STRING$(50,177); U"%up()%9%%%[-%v'oIGk+7lGP)%%%d5%%%0%%%%hz%wwjs%ySxyOx.&<,BSk5QwQ U"X6TuD/y/61u[aT/L/&Qak'#A7>JXI\-$nOf[))dW8HI.L8v6x6JL[.py;qs8FYl U"4VLoR2N#75hMBXm/i.CO#N U"udV%_YsGHtEfjVoW_#G*8#CZ4_.1HWPs?H1(BnFDBR,geV2m2wnne3v4^#rrl9I U"fe8Vu#%2KlEjW+p:t]hvqe:((2wRElo+jL+2.jeh4RMyb=^J13Xx5fwl0VmS9J8 U"nHn#24vEt:P&pRB5)0WwKkh<]ps1+GdoBM U"SOSj#5257O6DDZK$b=RKIDwj(5)Fg*]]jDm11W*P2TBkTSdh??viRg^Qc?j_(:h6=LKMK?3^rQHH0s)ebH?b=vhj_ U"P^ILmk5G_/\nOtaCd.E-gsSKcC?NR;iCf(I:5(:4qzSfZ6;$K5XTM]SUnm(Q1GD U"G%Lw:1;?^PsFM\3-.R*re.#*L46#vEQ8Nvi4jtm&XpK&&(vLR^j1zdEki7.sY*k U"-l4j\u#seNGP\:zu5$^HjuD8RjtsoCpkhfc>RoN.;3j,v7D U"E]JiPN=)r(WrD#PaX?wXjZHlbSSe\J1,>&%t.3<-; U";S2b(EYnP3.h_+i#FLlD0PAwjSSkDD6gsQ/k^e_ixJ,\9VZ$<.N=G/ROlkbFgl7 U"TV(rUnJ[-vUYkO<1Gu0rOvjfE3l-)Cwn)m0tiueW7U=v.8\];_In.v;]??mCB% U"yr'W]>km1*7u)yg+7o>^v:)AYo[LkR04/_o:x=#rV(0+sTVB>j;X; U"i8kRBkoS)M*T_Juvo/B']Z%YV4Z&RMo7z;LfmMMo*58'aPQkQ,=(#d.243*E=;y U"F.gDe1XE0mmu+4,4,2iDD]w[AV8gJ:;6F\85CS6XB_=jt.d8AmQnzLrCcW;1tS8 U"=6G++ZII7w2cuJR+Mb#tB?v^L[5lS[UuLf1+6.=9cm>kN?VAFNw>c5ee&[4JLIR U"mJ*n-)?g7aN4ae5+>b]H7*Mv2%up()%9%%%[-%z7IS5x?;nXG..%%K/%%%1%%%% U"lw(f(gw%npSl#nkJb_L+4OFC#tm%Kjoy(/dxNLbx.H+='gA38q%L+bAzv]-s9*Z U"?-KR?;Kbfbt/MBMpzpr>E*rN4O[WeJY(%?1](( U"+'&,O9eU4E]O7&_=m+/sAc)#='+PAS5eW(F35o&W%i=IG+$S.)eQF)0_mm(&s=w U"1+xSACe]F6&_pM%%9=/+/TA?,1JUaf.N,<'&[%he[G-5=%-W)J#g%F[%5hmGR'5 U":W#UiIq.%v[M%hyG345#WX'=J7%(.[)h%g3IkR7HB_;cRJ&(KO6E#.))1I'>Pa% U"Ee5K&W6I.1&S/g.=Fau#eMKc%6O.,;S2;>*Za-e.)KQ67F,'m.IKa67N,H..U*[ U"'.nFo5FxAMc.9&YU(j[Gn(.o)xK;M$c#'oVt&[wn^\oAxG(Mfy%#OU:[#/^eU#o U"qJr%w3G'Sg(?PK]5?W(^3AoA]%lgjH?$]1)?Q^)0kms1&vgxD?2:Pu.BlkGKkSLkDu^[UtW7,IA&?,lN9YXa0 U"ew1K?CQ0;+Ml-V-1v3/q<2=]2MEH._o--;&$cORDV^BSwf U"]olZhGkd-)-RD[vmfDLEG_&j??^iM84;jnwPXhIG;lT58c9wjT4m\K4fc5RF85w U"mZsmr?79%8Z??'t1>Dk_cOECx=kLXuZRcwOn7VI0TW%c6+S)w3qytL%OE]Q;x4l.n+<)RG U"wfmZM&_u8GA:un7\?[X9sr*hGl;UF8rCRG*o=tnBM.[<6)I.7Nsd&m/Vx/zQ#kb U"=qY]Y$k(,*7(Y8xl4,w/$rECRIO^k)(*+A9Y=0kdBeE]xp1fJVW>><<,oarL+-8FpNRbcG1X66=d/4mO$u6qkoEV1vr=l+TLKpwN6M1rh/BT^dqxX:0 U"&^qqWIYmMp(C>jAAYDDDN)it=XvWI;qH%3dqx&]0-.jH$]kG?-J9[6yL;x1vn:YTBbohvF6e&ZR%,S1\FEqJkYK.C?cX8Nsp[o[XS(rwM(M?+HSdBLm80l)j'NNEqkrG>&h.gqo;hl,08]dXv_1Ag6/Kx+F*Fgah_$ZK3ngGi/; U":co?XzV,.Y^sO^-;X,=\kQTxLHs:^2mC;QTeP.\ZW/DC^8?ZvapDKukR>S9c;jO U"^hHeI,k3;9VnpJ#[CX7=sJ?D4>BiKP=It U"H;1Zwu?g)$-+]Zfol4/nhU4UxNe0.Fko:J*eL%j5ic5NglZw7>X(v*b:miwNKTl U"=haCWIg?H*gdN-_)*N^f2[:KE=88Z./c.t:(*+Rr_PRHY488nzjt6HPhKFJ-lh# U"4Np'<0%*_07z4dG3'p%W0JF[r*/v)'k6zLH0w9nZvYdDSHjpJ8ZlS>7<$kXO,De U"iox?5s&b2fzZg:OE$Vx-?C*kNz1c9f>0%n.9JtXB;b2c]SiSINbEMpTm_)M\#Nm U"b6HGagDlB&;BE]rP=I\,dw$L[Zt8WExV,Ms4qB0s\X<:2FA.G&k+Tl1R]bKeaypDH8S*Rf/LPCD=MGU&P*FZc-:w$P6$ U"g=ATZ\\LQ>_NLb1aFd05g2otd$bvXPS:2r_>uui8PxTVuM3Bq^6GDN^EN;d0WMV U"=Ak\$4$e4bcGLWV979bB9pzRRt]0*/jOh')M9RR\.gC):Pi6GVLt#MOe:TjNvsxHmWr.X,k%Sq[#c[iS6t/_;CZYOBnBSqw^Sh#j U"CfC32\ZkwkjiD],VJFV18tr3W>'h)RfL_ U"_A3J9%5U-I&S%g1(FRug7)E;5(VWII%%71.&Rig/4E>_W7mJ]%AA1^RA+g&o'9u U"UM-])_M(Vc1o#^G8/%)='7(fOEk&_FM6I'-0S%=g76AO-kS%FG6*)W1i>Jq7#O. U"]kkF(S$%m&/I=7GAQVaI=nUs+A*3U(&[%n%EE580A-c)(&QUf&[En-[E)8;1-$S U"'IgVp[%un]E7A8G-&fi%G.U6[-(^KjG1V$[mC^AsO(N/9mI/&TgIgkps.-uSN&1 U"9no.%Jg71kXs9CuYN48coC&3^gAk*2s'u2Px/y*A0WyA1O>d\A)69%AU3I_VOhE U"FF\uA7)];A(V]IL8O8E.0\iA/4]>kWRsJ$ObBE^\_+A&1*9+US0]Ui?3F'rEVjJd%1,K4opS)#8Ec8^7N1QT*4O%L:)B?eru>6.P6k&\_T<2dnbF_ U")Pb>TWCP:?FvmwTkiR/((zeHOKjr.pP7:%SC9hLhj$cUMSG-cm$A.v:'Yrj%gq) U"#\zF?Ar=[Y4MtB2_EqS=:'IIow'pGWHjVM25K&lbA5tbXg$\,>),I%>RetTtK.1 U"Gh6,H28,I1Y)N5nyciZ_07l*XymL^3#hQeY)T>0NY(r.TuYlXdgCs)C*[HT>+u? U"qqfnQL=Zp4,pEid\f?MF'[JQL%VP7.SX?o3D608sl)M\5Tx>Yf0=tRw=7i U"KCj&snL/:fwd%:-nC-raiYGTUNypRcYmW0uq:bW#8c1.\dbJWe9d)A=aWtpkrJ8tk%$x-*0GR.xWZlib5.L^Z)v1$,ok3ek>DC.y_Re>jp(QiTj&reIq1C/pG765-]cCQ'c9pVI[p9=pT_fgvhFVq>_M?+-r)uOwn\2gVPCKC U"Sj=$f&,_ecs%O(a)#UWudVF,I4#_2S3u]$?zDOZsFT>Ar>akpXD#7QM+aAbOK>%I>r]Yjc'_CDp#DoV&.Qxf, U"=C/_NIW9by&k4*vGllzi]i6LpZ>c7T5D&^KrEBmkX6,=V/YJn U"^zuzr#.\w5K$yzo[TT=MhI%CWV+&+=g$9Z,Ns4e$X/d%jOXNuwZJEA\GtSmj[7Ub0oHfJqKZ)jEJTnJkZ*4w U"MFu+f#W>J62SxcSk]=YUPljlchFLXC=>a\&PW:tR\4DoE3sAsfK:)avaDs-$3PM U"udZuv?[dnwl*iOgX]Q\.X[u6mce7-&,nqkS0(D2sdN#8G:FQDJHjp3Tg;mQFGTUZ?nOtQ$;Wk; U"u]-2^^p?6^r_lJQgH&v[Qpm2tTMN^#..rtmV:w4]#d1Vp7gb(T4[SDQ;6oN>P.p U"#Jahfj;z\tdqWgbpH,D<&GjkzLMr)rd18+;c^VXB;r?Zw;j[xDbjzTx&ComB*jD U"*pIiK*0m>#bn*Q7nPy]#3,l\kWsvkrwOB3q2vc89Cf>adnP>6D'J^t>gcUQ7okm U"n,$X;Nt+o:XmSC#og.0hP;H*Nip0*Sor,DG6P1xtdlD,tpfHn2gpB+Lbqhd4bql U"1,;D?8Ji[LJ;7OzW.8xd$##<1RASl]INF_CI5reP[Cu>B/7Ud;lOkrP.oC+cNe868Fx\6q.3/cCG]*>TLJbmfm*A8 U"2t&=v_64w;nkl[s2S/6IHt=]QL]q?S*_q(mC%Y%W0 U"9%Pf('r-1#6]E?FmY9P(HQ%).&.QGI-i_O%EFfw()X-?#5YI7_Yo6:1%QP)#h61 U"I&Nj'f%'v)gGB$)_%)9.5AX&7R.Ik$=^G#e[,_=N7%lI&m('a)j(7WI&Ingas.m U"7$Y^E8mK#9nHa%&I(n\UG>m/m1XEAXM7p[^i%KDOq&qIVe2_'?M?h.Y37A]K]j\ U"&WK%rLeio7F'JIo.nmb9.rGi+IY28i)q8iX_O5EFduYRWELu6s%6jHY&VBe+%u1 U"e1%+=1WO=>/W0:&Rh(+v=A.V)/-'A59h(EU)1I.>a1Xm=IO&pFhx(1\=+.U13=q U"Y0It%+V-WDW15i/z7O-Fuahh%5+6k8p4Y6#36sp(4_5&.6fp4%,jIiCITcS%lYi U"Y&Tc=j#1i1T(cWG)U6qW>Yqx0.Rh=/L^>dketColjBj6^6sTplo)($1ai$-2g%r U"g^-s=g./;NlPsq[j/W4oF'OiLE[$O^HS&sn[%$N>fxCq)tOWWpiB=]Cj6#/=xjR U"C$:zi;0LWu,uA0[g*3xSM)YV1t+MeZASrJ$FV;eXc\Vnnju.zOua,ZH^EMv\ZbY U"PI2<]n]9XUS]=Z%EP^y8dne\\6>,G=[RYpO/D.kD84q/>G6O=i1+)r<>QK)b)kP U"F-H;o8W6mq/miiM7KO7)5,hee1vJH_&I4FkxlGYH15P+kiMe;'->l]cxfUqN1Y' U"JG*%y5d^r#0:SLr_jqDMj6%q]#\fzTo+W+p(R*#q\%s\k8bw(HoK:1DKMQ.*20% U"dB.tHvwp$_,LQO2b)qf%i*U:6K+wFGqIpSvHv?EOu$r*F$?;xruBTW391/ U"7gf._\8Pootsq)qxV/k9=Y%MOc\I3n1Zc+2HjQU$fDCaD:wmA/g\_l+tIf^jrd& U"eQu;?ef3x5*_x=J8da'4zp?wk,.7,lSl.c6S>Y:lB/eZ-e&2]LtL7;cQDHg_qtg U"6c\.[7-tD5#u&0xePI(^ZCB9ttGUa;B5w8Ykq^U0QuNc^bIv.ieE-c#J\ey[X\W U":sj:>TwtgYuAu<4ygeY1PAbeaoYcubPoZ2w5?SHs3,c?J%mitrpo0YdrQsh7LXN+8QM*J* U"$Xd0pal]vjZjX,>HYt\+t2_0Z#W6UVrrI?BK#^eq3wbWH\^l.Xf$Vh5%AY&DsmW U"fd?T?WComteUQ2A=ecdi)#A-piGuLtoiH*PdbBsdWP#$n;tfaMGE5QoPY)Z2F6nRgqlZ4'Kmg^KnRl U"'h#LzW(VH8*a1aB*+6pWmK)S=8C,4(uz<(;W_iqh&HhK-/JffMk U"SafqrsgGv5TN8dnH<tNg(j/D6teEYDvM%awG_3c_D>%'DLP(qEVPp3mOX>O7 U"xZHcS>9%9l2nZK]>-XTz9eu->$Y+xduNGWk4^gn'NHrZ.ZEU^gS=Rts(YUr'1n8 U"tI'e-&F1l5iS[kJfq7rJC-xL<:bJ>L5b#7#0g)o$rrHi[$BSQV[paFw$Cm]vWxA U"VUR?5-b\*,: U"S;D#k01rKqrb/r=:;V:)^Fu1nHvWs&TJcv<'%^#=ar]5u]*tly,IRIL\%>4CjmIt#I.\ik:^bFR=k26v=\LW2 U"t=5$7O'5EeOlOeMp*jqFxaF.RmgD=t8LYS#G'G4#1Q;6XiN:/8R8pu[5\HXQ?6H U"Syk$k80$VZs'0qj9N\ReK[2_MjA.Yd5A?F\].qZ83^ldF:(J#tpJhOkcsyA'\6&$lCfsm1d9Er3U&0fg4<]L>vd4;5(]s][/5?e%s0T7H0)rL1.8&32S;;,)&tVZa5hCTJ:DskiQ U")=P6+M>?#&?]T6jG2qp_rMD6/+?WB;T]/$Ib+pS1^USp:Fm,/5Rd$X1jeC6=/AHYVb:um$AfC)unilPI0:a12r9us U"(uv2xr#gQOZ^GUFZ6pMHX*e0m-'>R[W\#$E7^qAQP+86lPNR6BYwcosXExgM/(^ U"2Ht$'Hk8DwB3d2YChkgHelrfFX$Klg&v--)zSip6.RF>RJSI\PN\i-d6v(G2zlu U"B13Rig_sKeoaFd;)pG=RVH)C;8nrFXYVW=b1drw*;B,1i*j[4loVCwDS*kBo/ba U"Pkj((D4_G]?Z0RL=(F]U4E(?pB,KJdRM4E^6h&J+G/W[fM1]$XlIxQ&UdP(Jngd U"w9,c*/BU>S(:vXr\>P#$4xeGuUxIpB:5=GHt/,WJjDi03h]o:/Z)Rk-)#l9e.V* U"7dJGLr4rs#+_Nw3/+V,aU>-6_iu?oS.hPr5ZxaAIcRq2$TCl4+;Zs\b_;2\cdMC U"n>KwYv;H%mM)0T8ml+$kvW+cp1:wOdH_;)83[uHY<_v:'Oa\x\*]TBDU:uSjedYg6G#$ZJ*xHE4:rTL&b U"j($P2EMf9mtxXsnH^vi\9\kM3boGK&at('2JSfE.y#x0FQJbm(DNBYU's*e8wBS U"c*EYXTJA0Vfk/.&7XPwdRb,7i)hC]%cmwo.rR;ZAc<\2ep8

.>p5t85rN*54V U"[M^bEO_ic,&XNs,%ys=DC=t$TCx:]$n.?.Nn8kfxe^Kwj+H)Pf=ycrf42tfBOHh U"A:uneMht'J]hTt4:V]d-75>6kLCca7B7b$+T,nU?KgttoUl>o]D$\f$4np\kWOitB'l_sJmMUlPXMn]zgn<4 U"%LQb#ND[[MRo(rB>WFpR*i0LHj:k[_<74?xVGzY-i&A=DqGr'QX]pFyU;uERn[g U"_-x\I\bz\VtB/tWZYIeJr3dsrIX3>BHqdufTXoV.A+>$_AfW+e+r4]c[Z<4->Sr U"_$]vMmG*Ga13s$.rkG('Op>]tB=qN9k,T8wr==G#*aVpE=5N/1x.PWRuQSSX(f/ U"I>fT7TI$K1c4QO&J6(zEah0b(jj#*-IHrld+HKN#%H)V U"Kt^#re?aA=m6/0Bw0%BxE_CYm/=xp>:f4$%$2gj,=9odaGf.5(snuRO8p5mR5k& U"n+cuL,k\+OWWijG1qv1G/2O:N[j?qYrF3iWr U".[s^U.2fXn<+HE4YT[WHVo+Lg>4?FGQ&^2pqVu0OlvSggbJ-GUNfS5rQo]W8m4- U"IW=QH*'dmXH),FWW*#[K+Knv9oNV2;;Jc&>5=c20_AU U"+(>[5\0iTh&2898d'NlddoFLye4.F8R$gBEzUvHn$l#6p/gGZ*_Vj^nx?IdNZb(:*u;)(.Cpg+2DS&&c U"I?G2(OFgMAPMGbo?Zdwj>H3$Hb=4Ml3SJt6yE#=fuMvvvvPv4v6tu\OBocc2.<& U"NKw]v;ZsG+f9F>^Yf4=wtrHbGN U"a]k87-HH.B9#36nMC?Gf6beMSU4/NlHc9Nd[VAVn7[*#+LX.'t6-l8j>bY]ToDL U"_>96W=RY_f9m8?fliGJGtmN?K1:(J3e1*'GXEi5FSp4]h9>Rveu0Fd6sAO_7O^\ U"T,h^*+=2eweZiW:lWR]$8Z%#.b=HMy5661,Mn*LF'Teif]0;raTi4Qf4-'sOhgv U"Pff\F5UW3^2>lVBRIWkuS*FUHHw681:DEi-'03P$H=lQ?0]5c3_NOo:4qRQ(Apr U"iQ%j5_8jIBj)'x[a^6LIlrt-L7xHFqqAi8Gt?hWV[^c=op+zQSYwX-z]&kR0qe*doJ'0'. U"BgWhy$SjFNVNW4IGv6ZOTlshj(ZOf,;I%.3/R0ZC5)O U"V4aDwoRC&CV=>P\?No&MgmNGb:4ZaZkc<.su)?gUb+Yk9sI+*'T?.r0qWqN9-8\ U"*\#%G8Wfq00tcpE(])38hfR.7 U"vh42M*ZvJGIC'>dP)F:4D#6Vm1&e3-XGkrx]p^Eg;49K0'eXG(=fS77dH#NxgiQ U"^q40IC^BUd]iZ&]5qW+Us7H0=jXFL)hSMGsJYAO7fs_rw&d-5)NEBVi\/d6%Mi; U"cG.3g?_\3-\b.H7/v5n'k**1T(M4**aEKK$PIW%kxm3TY9Ca]vxMv,(o0.Ko0z/Z8RbCL U"vtA:H;]so)c*8ko=0UQEb$2zHJg4IYU)b\sacr3#nH(XM'+QG#S6z&'DU$7LX1S U"p.+t-e_Icih<(j2Zj#$oN2w>7z$M1#C&HMHk2h0+zAjaC1.B8OtC0NS#svY8N6> U"-[;Yh(N.ORN)v]VDedkQjL)qvYP*e1DZ4*^qOHkE2wC*$lPAoosji\Z)rUSxb66 U"su%tEmMMKN=DFDf6t+TR'7AM?B7b7=qWf(cA'QPQ/fbF?=_L92Uv#DVQ2.z=Aby U"?n)Ikfw&(Q4mZ2jb[B,oO[D43Bp:*[q67uH9%'/&Pd8r^M#FR1BJu<#9v5fN\iE*->2Z[K8PtY\o0uqdVZ+XOW+NOvf(D[GALbo3nM$T2sp U"Ht$%p[^--?\#^fGZ(kam?c$cG/Y#1OZ=A<0h$PZ.:PmW^l.IFNyUsQUtSa9n>5W U"lE6*k=+bC+Tt72Tigl&[c_Z+x\8.;eZ>9Ax$ie\dAY-b(\w3px^i)#Ow,F._qyf U"71I?Hc.RtO#a+kH>NXEh#U94rm>b]ON'sh-8.mdETv6OxFNb.&f%twdQ%;luWZR U"Ui(wAf[mBW]O.+\,0Ub71G2AA:53E2bS)qmjAs]*x^FIi5cW9I2D9<]]F^*H>r' U"op'Na2;.,&vhL3nDLo6/Rf*1cse+gKf]]Y0d=]xA[[=Y9:K?50$d9IXQaoF]HD^ U"7-*Hzo'B1Ph,6k9(H'u1z,DRAY'3r0\Eu7+fl$$zg?\5L(/VTEB(Mp4k(BDq+JA U"Owtrm'C&H.&DRa-6ywnQ2Ct*tI(Mn/jM%(Mjrd&qcDB[CWg\&*QU-%+eDT&?m4) U"7W=eXLHH/9pzG;j3j1>\QH7F:;y+E()rr*v_D(lm0YD3co<=VUZsA7uY*J;M,Nr^Xb'>[J9$4u-APYTq9- U"wk(2McKY/fKLh/iS,oUdF(=#1A0>z,4\Q^01hq#E245Fn5]xZ$Nj_-yVWNafCo& U"[%\bseqe)vDaSSQk4Jd^eFn907gr>wm0w4Cpnd+Koa.f4F'&ZRbD?5Rt'h'YPIx U"GHCE,kfkh%LGZQ3&hfo6ND6\EE.FHHFkAgI+O>FF9GZ)=p1mjK,'k9kRE)t5'6S U"q6]eHANbRH[xd;(%U)cN?\IIU16IlR9#$7C97*sm%SZl4^[Oo]4$7zndTd4*1i. U"<2mFhPnp$X(O:4rH)67*L9aVP)PH7;,g*:M,kCBiF1Tn?=M.SBI.J6E'DRoLU3o U"=VV$\17h5dn,yJUJ657W\rX/$W'07>pUQ U"Up=nNT6CZNLQ-3qNaJ*c3>t&YPCoueO7]LV=$t&r\pPP^si\\><(a/FSJZZUoi? U"R(cwkrq^H?&bb[Ufiwt+aM7p]NQ)xo.-<2WeM\dZJ:yqokoA2Hp(U9H-1UaAa9F U"'w7C;FaB1v#D?.I+DWjk.:D^lUCtEO8_WOUW'Jm[4_+;f-8e243I7ZzMFX#lX<) U"=kwZ(3X,%hn]t3(+x0NE\L/A)jQ5X>4BF&/TU[&7D/i*D1$4DCe?O)=rmV-7l77 U"TInAAoLI1K05.7>Oh)Y[%QZq+U)ol37,Xt1cV?'pN;S^tqIcIhFij#j:m,/loP^ U"i#j$BVIl[+DyI:AVM*TOC'E0cN7hD29DI\\zKsWq+gg2Zf<=hkGwq+Tw:GJ8ev U"9x7BvT4QfZryUMZi-9%+SriB0CVrZJp7(bh]HEEwux+5dP3;e)Nk:#IN#Cq*)MX U"38K7(nl-:qB:VG/F0[wk80;KY[to1u]s[)S.TaV=wHq9,65xN#?(8NN6gDam?G/S#DuiI7eN6[h$*=aHb6u>r59&2m3i/FpVM/QCmTGc U"or0jGHG6n71Ln+mY:/$UHd8ggR2YU*rv3+a#:^5nI/FXBcHrk#AEB>5Rf;EM=6, U"CxB6L+N7xi&T\iy&Gxi>[97GCPojfYV7ZD7b>Hy'^n-zNAS?kGfhPSkKjoPXbd=: U"gP%qj_XV'o#I=5mFC2dtKM#M7l;#[RI.W\Q(p\:u<$',4uDe2F\1MM:QB(Lesk%DUa-f U"NJ*a%fC>5skRVMmcwDm9Ov]4L9oNVPKSe?P#])+ImytBWGn(.d?c;fH>r%ugE7/ U"LH2b2R1N\b0,rKWm=B1Zh8CWr8a1p,9$F(3m8e$&0ZbTGE38'd[U.t<.vb&ppnx^TC%#7uOgPSNe2b'%q;MHCU#sN U"el9TtxlC+0g2Gc2n?E+dF$V^NF%,HLt U"]5Ri=ph\h9fhD*4Uqx\8emQ>YUqx\8=[mk^Uj4V#xnu#jV7g(V206V()YxqVzFO U"7Z[4F8=4q#R$VXIY^'o>P?'6F8IQJWo=FpNB)ekLDX6L)MTtd3TA<6Fe*_X7wVw?hYM(.H.34ujCXQ?4>4tHXqG U"^j:HbgI.olsu1a/tX01GtF-AMbC2_?46:K^3c0HlP]3SLkWt<./2>L\cE2X6oj% U"n;Y6s>vebkpva7>e.VtS,z'IIK$6N]#\3^FBiO8,BBv[pbF^L'R)j>h,[y2dK([ U"f,ODWX=P7xz1mRV:N6o-iL#F)]gYeP1il7]x:acWeJWM[vqY0RV2r#*wYB'kn+[QJFxI U"'K:;t&ri0Va2:0gR)/Qi*#HAecL&b?&=CJ.m>)k2W^;4i)W]ZU)Awzjmoeb.%L_ U"&6IHkO'7Z6Cg[fgAG'rs/iC)Aa7)c/^S\NJWE&NU2(dce-hu0h_8,CK U"lb$CF2b\;Ks\[9L0nI%R0[sRoc%X?k,km,pmwDca)#tb=lguJ_$oSZU4(ips\Ol U"TGLhJTI7aTMBmw(3K8e$V[MRb;q,i<'k0#bQKN%7Ql2:N_b^;I]7m];h&SErr&Z U"S=yb)hLWBF[,YJRlXI?%j[#J=8XRGe#1lIsAcNj?&jXk0XS8hkkN^o(,SmzU9uZGG-h0q$BsKj[.ya U"u(gf4fUMuD*u]\6iNuU7/lGa50GH-&q;aQN=Nm;W6:ayC5Zs-/v+0/]rqq2JGe2 U",vsKb#=yIY^/hsmS-q?T/xTGD5>bDp*UEvG6-(tesZ%Y?JoKa_gS\#Y1xk[N[^> U"\NlBzVPNfuJkHO;MtoW:E&Q4Dcb?P7tdH%7HY,X2Bl$?-ja-Xub?Hg-w\6;w7&S U"Q,4rg,aFT;r\ZM7LB:7,s]-bm5<#s454+av[TRt?i.$=dOiTodMp9YL&6x)ABO_ U"8#M)Olm[4qG>oypP#+V3JzwxqPD2sX_LZf0u6:Xjr\>?ktH]2HQdX?6id]lnl(% U"ig271'Y?4c6i^#.VUS(\.&d*^HQh5?m+:mX=1\asE_kS2M&G&-)0h3>Zp)KKoQ8 U"L^-*I(GJp3fT/(K(FMF.=*1S7GXig,JuhL(q_#+ubIX9,?;Xo:j=HK4ZUa*Lg1U U"0;>anDPi-s%PofXs.^1Mi;4xujrUA=A=zYECscWtW);Y\/+Mmib_];XC*Xfh_T, U"lk<EUgk'B22_#jPSor^dN\I<8j9]lWLhWV%4VI3uC&v)&7S^>NQ]?>kG>\%] U"1vi[4H\Q8e)8jnhi\NGQa:m]f?3[6&pb+_:CgQtmfYrL?Ij#[?w:&8jna/((',$ U"-uS,B&-\lRZPetpROFWfSZS^O9t2#oBTjm8_G*,_Lg&X9BU6n4MC55ydjPIE_f+ U"k0^]Om'qcQ$TWmVS0j[Gm(>IuiZe4bP'W8GPU_E)uvlq]YgkfE2R?Mc^(N$T^:H U"u)Qni/+kkooE\NMUz/*x_uzGu]n.'j:9yqVcj0++n.BE-Xi'5)Wg:*q#LE;rNNm U"Ccketg:t%m5i*oL/Oi/QJHa,y5B(AN['af>rub5?\TKgBk;SA\U#RbIWB* U"vDAy>Lo*u%q%[p3)wO5#99ceF1jKx.jaJj*Ae[N^ONpdU6[-J:70#5xM$*F&rfB U"aw7HeX67G.wb5OYcGex*k\=%gM>YRB&pk_?i3cVr,z1ledtg?;kX',>A(:7L3'B U"J4?+MGpIQ23p\DG#0ob-\PZo1Hl;I5I2Pu2d:$,X#T[)#rZ>n]U>q;nXT:\)FJWZ7N=rP=u:+ U"L?-1XQ9CaWk7oa*8./,QaUDVET61E,MP(Y0beL8FE2+Wn'*JR78)N6.PW>6xb_% U"7b%&ftV-7:xg(cNG)&WKS/^2DDJtBeJRm1\tGDWz.8<^RfxMw)Xi4.RxrfsnSrb U"j/P$rquU,cA^mS*PxE=PXY,Kjia)xZc*LZK)d8*]v=Tq(vR64*TAyGB\L(t4%j/ U"QTR\^D'Amq/IdZi7a;mMupyZJ\pk$QaTS2MIgU+\ U"nrR+f6w#Y[F7Uv2.O4(eREaMpj:&/JMwM+K9W'[-NM#3Gs+.eDMWmnqAN9S=d3( U"kayBr=CAQf*+4:/uYpV?N//qgh4kTn)CV8co(X$YkX2x;mcr0'k8E&=C9xD.&UO U"%%'E&W)oO'u()Yf.A7%ro4>-O&dU)U:(-'%pS/>%OC(?)]?:B)7C-PUW.)IP5%= U"f5&&$5>v%u&Og*>w)ZSoKM[,)I%?4g<7)^RoJ-;[%I&m_g#a,3QB//pUY)A;'N/ U"(*q59/ag%MCoPws%9PJo5RKsYRPRCO(Ws1PjHCQ+&sQPPNCPAs[APL<2Xd_7e%G U"PaIe?'RJ7)\sJ$ZY%eo:8>V)XOoUZ8F)/Z[o2Y8>k5XJ/YF>FkZ(V/1>lDN?Y#/mA># U"?'BU>H23S\m.%6_*]/E;:LG(3Z/1:'jG%*z1CZ'r%6,N12n'hO)CZ1R'spO+./1 U"B'l6O*DWFqT/(\0P7943]OB/Wh?m43Rp].*s$x*ec]2psbLe]-](GS_Xe[R]0Ga U"?,e%]O,G$B*ek1TBA.^0.L7g7n_%DAAg)n_84)5M+7>W'InYX5%>Ny1)X0>.pTe U"=+&[=:l*['kiIjmSV8Nxx$V0X(3-W:HsM4.YmnHu?Y#8JDVX U"Z2[WWu1#+jb2PRaJQB?(pcpOl\&lh.iFp4ewYXNd>VV^smuKW4JDiJ,zZwj#cg4FKR)B5x=daMM_Uf1PZ,rSUL%LW:/.P0(IM.fvcLTr.hPcY U"qjadR3xh?s:dxeQc'7mQVsI?*3lLh*JfwFYjeNq(EHUT<.8LSFkQalj\8sZ?YYk U"TTn7jfZ7gGELUV:v\h*yMWofttNar8TxalVt(q+&8v1Py U"Y-ofRTai(,DYN6aB.OYhg#s?[=*($VLf U"]n8_1Q>.*kt4ZQHOY9Vd2d[qz7NK)LINvzl&GCveCk;B(1dDAdwq+-VZBl4aFO3 U"hKpa[wmOrjl0XV=zA*t#x;bri]-/-8V]^j$d0n=QX#:pfc+x U"4LVj0OTq*5s/+2P$gn=C3.9kLx?3vDRLZgQnd\:O+80GV&dZwt7qTU=xuMfa-G6 U"PP-:cu\r272VXKd;+Lsik$cgJg^lzt*d(mkGC^0Z73(tADpwJZ>.;rZDT0FZ(Kh U"JE_lMw8*asu?\.V,mp$Po*VKOH6uB\*K2xuF;MB4W[Hc'__eKcMt+,qw;:FSF-MGv2R2Y&]1?,'qdu%p()/%%%%%g%Z'3aGO^>%?,%%%%,%% U"%%-%%#%xn)%jSrf%uZVQ%ZU2/%up()%9%%%#-%Lz9_G%-3A:w)7%%>9%%%/%%%% U"wj%firj(S%YU3N'16*- U"dL0KgBMK.o+haF\$)31=^:Y)gn^%Hac4Prhfv:X)MB(0ZSBW/:=n:fWl'K=heOT U"ot&-*64&Dj,PJolstjw:-hq>wvaP)SkkBn=-G_,8Y?p4w.-#;:yw^p81(i:dYh:vyQ$nqMEGr:9PR;x1C84JN=+cHW[g*A3V<,gM=%jG0 U"NHfm6/AxMvZXt9&[JEd6rAQmd[9-;%Yo^xI/g/65G'TFFUH_xrLbpm/(X$zmNT19g'twq5DsTvOSZ?q_e3:#/6nlT2lRN U"'bp6L(pr>Ffq-..Z+*d]=GMb(V&RX:+3In\D2_=:r''A]f$_d/Fj[/jwY9S?e$E U"TPSWta:?=>PFLds]:JL#?Jz)<1[05$iRn2WIdXdVh<-aCNVrV%b9]p%/oLW#1.8 U"G$cr/;K#3?Y%.\;w.OP(U2y60oiGBu730_ZPoh'qL$BC't6;AC[Iw\/mE)i.<,7 U"&ntgE#eR#^^dGg,uo30j,QkS0m.[,1a/$b9q1Tr=*0H/gekYPJ'7Q1KQBZ?,m\c U"F53&\4?DQ\#;3Ck5n?6f#'61wd8Q:^f?1?2hn#%$2Cf$>s,_$#(]/Xo3UcD1GnR U"=;+Pc[[?.;C'>>jt]S;lSd>4k.C+4o34l4<=8$0F1V0WvN*EDmHn\DlEM6m'C]) U"(0#e67$Rh]<,v<.:Fv?^I6?g0+^6/9K1?BhetET#6j6+C_2F-Rd6+OlK<(1g9)a U"VrUI,v)zoGo_x+5aC-etgX;EM'aQ$^Fuxw8K>dr8vPb?5##BG_kP82]VWX<9?Y[$*Q/*e5cZAk[gHP9R0hMZSrM26My%oT3l5ZrhN%?,%%%%,%%%%-%%%%%%%%%&%E[%%%H%i%%x(n)jS%rfuu%p&'9%%9%%%%-%L U"bz_G%O-A:w[)%%>%9%%/%%%%%%%%%&%%E%%+%ui%%%wjf%irjS&%YUu%p*+%%%% U"%/%%/%P['%%E%n%%%%% END SUB V2 CLOSE:IF S=80AND 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