'=========================================================================== ' Subject: NON EX TERRA (NET) Date: 05-29-97 (01:18) ' Author: Kyle P. Petersen Code: QB, QBasic, PDS ' Origin: kpetersen@juno.com Packet: GAMES.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"NETBETA.ZIP",4^6:Z&=17466:?STRING$(50,177); U"%up()%9%'%7-%.pnQGN33Nqu&%%%1(%%%/%%%%fw%rtzw%SiukE&at:]UU5>NhT U"MVr#Qb>9dhbN%9g[^CY_wa^RPC.'o];PV8;vXZj0h[JFxNPg?R4_#\tt>qCGsuQ U"bZW,NNNL1XcTiUG]$u2*ZQi)PR]\BAWKHe^5cU,b(Ilo0A(Pls/K=*6:*CBs*0e U"w)XyqI+twi6ul)%3-&j)#7Wp8r.m(^20wm0[0g1M<,C&6_1o6k;M,>iPJ2CcDC2 U"M0c6%Le8PXF3B_%ZA/DM.weLOI]W:wc0kY1.+Xb]/b<)5c6KeCMXmgt*;w&a5qS U"0J][J2]kwf1ZD#:lco#(2z99[<.9sZrM7R(?A^TY7rZN7BayQ465,2EerEQ3Znnd+pdBrsk+Y.+(mqN'RC.)a1EU\y;=3[4Qta0EUFiHJ9as;CdZVvc%)ore_Fc6B U"M<2A0fVjXbycn3W(3;'izIJG4bFdCT:Brj\$gVU^T)d U"H3m.xV$9'u0up%()9%%'%-%2IVPGR4vhp&q%%%'Q%%%%0%%%%fyyf%hprS#iukB U"rk#ml6_^A.&%uwr:XYET+zAmQ%pzur:X&Fu=r,I,1VAPWI/>xX#^J>IUo?.yfbe U"t>(/yNmRwuLkAL:AD>cUl:-kl9oIWeu(I^'DcAcIK6dPOP^MRCO5&'*&japl9K* U"kZ9O0lpZ98AWLwAp/aC/cgZx#:7fiUbOCOVE3_t#P9Ie:IR&'#O.(jd6+cE.qRV U"=Lu+a'.w1a+%%up(%)9%'%%-%WDaNG#;sNu&[&%%H%&%%0%%%%f%yyfh%pxSi#f U"yz_]pm U"?.b1J7eZF4Z^b31^XRW&'OMN=5_\<7,W<9JPuL#JTjXa6Z8Q7q/1Y>5/B\ryQ9[ U".*8b2]A>a4Jxx\r$9%<9x6e:?xu%p()9%%'%-L%z[PFG/ZB&V+)%+%g,%%%,%%%%gfi%SiyUA\zr>]Uk16 U"O0IN/:3wo2pTJ3Oj\a4Q%jXJ3wj3=^Ma\Clk0=R0DCotNWb\QJdx6U0ho,b%x-i2Ki U"#0?>x\Efq2gZa6]]d%B$)QR=eoG=VUQ)gKG:or8n8PTos-vwZndodHuu,ROl$AQ U"BW8kanKCUO$gw\ijVXCgFf]6GSIi,5d'B80-^dgrr95w?.WToGOXC8>SK08yA8K U"AOuHJv,&]&Q?oCI'Ip4/KIH9b#Ou([I,ki70#CD0eR#8n'0-5oSw[DpN0ISk1H9 U"Oq&E;LP+J8+$ttOMC])Ubpuq]eh('+arMcGeH(n&%sfB_'y>/fG4pUDJ8yeF%wq U"Yj:Fi)[q+D7ka0Tli=prudS]R,&V6kG>,E[$oCsK1$FB'M5*]YoEh6lkZ-swk6e U"070uRtgl:ycGJF$)QYNd_nAsRiLnctD$1Eu?v&Vv6)F0QoKy1KhlB3)5\G2j2f< U"_BiNGN1pNV:M-uT+-&[wH8:53\kKteojlKSZNN^rC$mm2Xyed(t,6,O#R7Bknl? U"q7W'%PVM)RvgH5FPT:J;Y_O4&G(gcLbHbyB_e#L1QBV*&_BX8PNMu,ONDDuzPhp U"M]m)QsH%)XbFdId\FilaBQf3ghdlK5M$P2H3I;fu2&B=YrBgFA-i4E=3_.rWCSBR&+^>Unfv3d U"tP(BDaQ;oJ3+*]U]WH'aop^mtF/[q'[+98bdguPE\l%)50*c]*gqbc6c.7ATv[A U":(>R[W/7Bycf/ZxRrlRDj(]K>&eTuJ#SMr%:WEQRf)qb#So+][-pCS5egYT%HCT U"\N.VKigM/DT1N/s3Rp#'>R%*O&fl=JREAoFBPH2/EeR39A>V3V#E(z&hW&5^SBS U"#d,(5wQOxl'GKQ5Lm$c]I U"5K'qY7UHCBA1nrF+X1s9qCk(6:/\v9a1bzz#54N#LRrg7gVNvV%_fNW^h6haKtK?kX- U"rfI>3,aA]TYL40.'w+up%()9%%'%-%;Ry4GQm8yw&0'%%''(%%%,%%%%gfiS%iy U"Xjgw*:T.U9M40]dKZV[=YsRnxOdLc[]DA:FBT4;oKG^D*G+h3Cx\5N8rY\4)AtY U"+mVC>#*^\-/1ghYXIsOIBZ,mr[K/7D)lCFG\0Ry>&F10+82/4^K(3luR(eUu-)W U"ht\dI$egm8'r*$&XgAIAQE_]h\NntcyFL<3eYEeGy[JcdiFy\6\GF$.Jf$lC#Jt U"J)BJOngKg3$<4KuWnHiTO1])M6L1i:FPsr7_q/6QB7THA?VcV>S9I:J??ZnKeYG U"c==FO-126336NR_.Al=v%cmc[kfP.(2>4Eedqc]xU$z<9SB0\a65&&:Ew9o6cX^ U"LcC(4Pg1Za'H6EE1Y,9H2kMbcU>8^2$hoKH#-PkHM'(wJM?s/#[KC8Dk0FIPmpD U"g,bm?paRKY#-wGe(SfiAM5.2li[CM2Mc)ZJnb:2QXjV/Gk['9P+E<:Mcgl/^rv0 U"k',<28U7dr2:?j>u7383VF.f8pFokEP45d$aUYzv(+zDdK'/[o)fIKQX\[*N^9, U"p]w%ilgG)OQy?MKA4w^J:JiDl>KWmg&X,t;p^Y:vK]\9R==7h#>oJ7.:b/0Rcfh U"JpLE]BI+TepuWlRhz$UB=bQ.cLM(7BX]>vq+2TKSF+TU1bT U"X2qFd)+Yr7sbO6'<-$T-jLDF<%&U#bW[<28$tyqq9qX9hMBS(';-YZFlj_[<CzUmBmXEQF9B'2qaTj U"F<,#IHZ:sZ'$A-:#IANkXnD.5Yu1NP'0oz44A;?M3Gb$MV_FOlWJ2wdQdc%)$Rxj*--.vF4%B>vLy U"02?mSRak;L,vUJPt7eLI?S;#g](+p;r5kuhws9AG^C#7c5LJzc U"A'=Ak=[OB^4X:i-*li]g+D29oBd#$/iNKO*Jejq,VN\\prh^1)R0o#fl6dZs/mM U"4*+mZR$:OMv&5$rV5s&6.kBJzS7DT)324g8OKc)dboVJH-p*Uwxqa,<4jDasCgg U"P:=oI7USgwt(0tNcLVXVYL2&z'Xup(%)9%'[%-%P*'QG6Em33[%'%%4%)%%,%%% U"%g%fiSi%yWjx:p>MUa57lCDNgiyGIRr$%5RbF(/Ln0dg9P=&<7t7d8dQ#V=iwIB U"?#MVab%WlOb#66(,II(0(f0ica.Fa_LO;ND_%SZrD&T(9N(m=i:I:*FQ'q9S*/9 U"rgKrEi8%k7I$P\c>:B+7NqZRpL:NRJ8#fAZ>Vjo-A8v6_a(0ztEd0r(=:vui.sQ U"3+16xs?9[e$]8UMZdn)(a:7kP&NI/xVOnrbGUH/9XMz&f*?r=3sYRP39XgUV7ql U"du*C*gQ=KafajCo&De;#X&Pf>eLj7:17sH,cUr=PMyUu8a%7.[^koY\%a8+w6N4 U"yQm_1+KP\aC&[;46.IH*lNqsO?)H1Ai8eOJ_Q6W:T=lref%1dj#wLfOP]eU'31\ U"-d.1W==)jn/-srHR%UHMt#QeKkiEXMXr?7,8]sPOJS5R/$=K4pAXE_0c$TzM+2g U"pOX1Wqs0B.7rn-fTpz1/+6M9L;9s,Cf+=(V=Sd5oD)kWMP$2lC$f;kKIb)dSWe&+p5Zmhio27F=]-Z U"d4o3C/9L$UpZ4*V'H_1&A(PYaUY(6f]gJFgKI5>kr0Q9xt[_<%e>h/_;yyc+$Wr U"99cK^TBO3%5e9'kCLHX'2k<1K1TSFpZGe=RPlk/67udT%I-QS%()bYaGEh$Q&Ql U">N;n\'1QF+8?v/\'I>WiKb86:8 U"a&8[GKjAn:hhO#d(&glaDLDk?l91jm(qvHoR>4mR-mbjf3k':l.Ga5yFPN1MOcd U"HDD'[4up%()9%%'%-%2zhMGoE,,i',&%%&/(%%%-%%%%gfsp%SiukE&aV>BUU1T U"9p'v4'=&k<9#hJNdMuo2/p&iFKbFV]Ca*cxAejlqt9187MsK\R,5Frc;$IuCPn7 U"MNk U"bM$.,8pQQSD8:1MQ]QP*RG4bEBX#b$jL28VAFOP7WeN8]n1R?]BU-C^/PS)$msr U"OS1M07W>kJJ9:-Ilj/%sD%dhYoiRT]_^yRG%X[?;Sf9'3[%KaxA+SwB\6iFOpb/ U"l]cXFL?\=gB&:fcQq>61G;VhK/GCD].Q06kQi+(3sR6Jq$*%5,5_&9v[J8>dBcl U"9P/bN/Z(lI5A+]xjY_^k,;;LtNlB)$ckR;cARo92_oy.k_sj6HpWC;B0=yePApJ U"j9to38<>4L6*P:ust4TNLRSN%L_:?8I\6,6jtn&zxr0crNOrs1GFsBedVF6vueS U"s6-c4(Dv_twsd6NiiXa9\Zev(g-9zo'CdVIFlLu_ifZfc)V$CXb#/Zs]87qq'Z4 U"d^lH2Cz(9;:a'v'gh%yY1ZbH2aV+99go\$o/wIfu U"EtJagWVMznQ:2S6W'Im<+d1DayaqwyYAKY5&.A-SDN0x%-S&>tDDd*JwN/INXJg U"ow1oAI*N8.eV-S%%up(%)9%'#%-%e_yQGno07rT[&%%0%(%%/%%%%k%twjx%ySi U"u+k&wb,^TU19V0mdm5&+r.W9l3DlIjJOh3+Z7(_K[4B,6p#cwo_,NXL^:]Feu4( U"+/vqK.m$Q\tF.5MI=d,Kq:Xd2?I3$?;SLde?WB_6mKcUK0L?=_IHvnwzd6kpDwV U"FmRX=_+x#NF;5j;oA]Q6sF,>59[[=Ka9tCp,.,o_157\IIIjp\rvdMBbStPiA(8 U"]8&W+Ss8A;TuJ6b\XjaT1cOwI&#ELIc9C5vYQ0tY1<4QAZ'00qUS9;pu0_tSxV8RM/SPE?&4fXuJb6-88Q U"c+_G7>^]Yn'.#s_Ym_N::%Wq&lvT^sEj=dK?3t(tm&*#<\F_[42>$1slN>M1Idg U"C[.TZs\q$Vnk52,J=DtJNiM,SCw9\hPHE3SL3/TN[Ju<.\2VPPt6#yzSz[j1Krc U"&uyDCtt^470*0%&mV[cY05(h9&gv&%up()%9%'%I-%Wz94G+\;E5#F#%%MN%%%, U"%%%%sj%ySgfOxNL+gP7D&7YrB5DGV;5hm6Mg'r)O75I[f5%R($&n1$VJ=)%Y2[\tEqxW U"?(Y0zc=YXDV(i*'Yco[;16u;1H^YFpQi>fz,=fhs/% U"W;jfI_tYCoTg9C,q5waCQ%CWUj#BQdj7>t&y/u*:GY,op^Z#L5/Go>Q*Y]<*t-] U"/Z[-9f:2vTR8giT3&XzwiaMiZi:JA]&EdF)HgC[=0KPH\5Una*0(Um;Pe]_Xg$U U"&r;KbQ.U*r[87S7m%QR;J:'H96yq4I2lIV8eE(j7,YA6+Y]R;q/>wJ-$['XAERe U",^Xn=)^VQMQkN%T9A]E;ZIERLZg&S.Hm[j$rlIp5O.Q[g08-*XRoGw6sMwiP(l* U"R=p:8/^&YGn>hEYvbh^1mVMV(m*af=]WdGo:JUkFQci1gJt7Z2[V(L?U-q)9ilx1NW>P#yo0ECVKCV*yHg U"mv''*Qsa8iL4b'myhu7T3l4As6-?cJ4?9QbWN=h=?9V;jjd#$q?b1L+eurREDF' U"Q32#BhIDMvPxpn,F=mcD&>[\[7\+Xc;FpA5(/ZY=7V]f(sLNvIf6fL6>B_=EQ2CD\Yj_VVw_0>$*t/W?6[L%L(3iDk87\fV\K9K+IU(C5^6V4_MV8Z?MRWX U"Hn'XE.Bo4g-dyN2QMtW>S+tjucKhW^T'?+b'-ZDuLQ>aK$NZvor1ZlXO;Gv0Yck U"1Mj6GHG;azoAbEf0Oz$o U"T2$1s9KAUxaQ\A^q<7g<:C+*G1tRw21Da31h>0nx$xLUWc>s64t2'5n'E=:NANx U"3S>SQ-[lS%dQ77=*.ins'.D9?*?MBrJDm3]HnAKlhQcP?JCGwCpUe=ntc;?)Yu) U"SpHc1OB5\Sd^,\iC?MOu7_5p+.sDtY>3$s\f54xN/W:K-;8R=Sp3X9jCerguO8& U"cC0)S)T)mN^?hk#w_OiB%XBEnR:zL2=UJ('?uCXD>L]gz1rvB;K%YnR'r-1j0R2 U"Jv&:RG>V&Vf_TCDeQ_14%,i,Y0QYW\#EQGK/Qnu\Z1bd7erbf-tNj;l2s$,Xg[\ U"uMC*2#vSTjX#13pcuD*\_GBh-I/s/NkB\uT6xkx05&VN1F5(Y[V1d\Z4#kdVUuKH^a'H,T,kYCp+Jp[O,L&MHvu\K]O/ U"TB-=Q>0kIk8::Yl:*8qcd[<#5tRp0g4^ptb^W%)%R]C*C8j#flPPn*s*+mD5JVG U"h)G3J[]/LT8$GQA;:1Q\=.G.YCEj,lU;kn>gSJ&)j,uF$jm U"uN8p*\xP-Yx&9G3h'C'Fk(+jD4&IHxODC#d6q(eHrP-AZBL_H-rfG:]pSg=r7JM U"OkZXK75ok^LA;=W1'xMsWY/XabV,d9]f&3/'VwW,$Xa'KCGjfmgQRCEa#mqF:1X U"E0%?epCp6HKQrUg#u2,7E[H>%8+5WnL%<>HNC(o8>4)JkG6+[Co>#pSs?6QK7 U"x&QX)zLHgwWevQbKSr&O=B0R6XL\q?E%^#yIC9c5ang#4463RYNjF-IrPl?2KUB U"3D?\alPAYA/YK'I3c0-#efn.+NrZ/d[K:&hK8hE%mf7GZN$C*.'4O,1NE^J/pWg U"l>;q%[OUQxHBc0/E$kRaOQ=tjlxtKLK4?Wnh)No1,5:BPB>I?[Cpz9f3)c*Y#xA U"Q32)/TVSD4.qZZ5\2i+SH:AjYsw_.fFF(o'9^Q(PU5.,\t5divJP*&JQ0hQHk/qMr+-$ua3,?ii6%Qg[Go-j)Y6%iOfG(ijV(Wb'vhyz32gdmX?^PQ'fduPKY U"e;XJ$=]#7Ms<$:+B?6k&+rl0=lIQ\Cs#s=.m]UNG60K*Dnkf0E>Y;ik\z/#^Xu, U"ToS%PV,l%vdAn[]UDh;k+9&tl';ifG6,;9_^ySkL\/cN_Af&i)D$]_8w= U"Y=\/.Ocdh#qJIAD9Hm=t-:dMk/c[G$\60*=o;>9206s88vKYQTsQAx&N?bL+l49F U"^S50ZA&YVzVwS7?$i^V5-%D'E]s>0Q)1Ka3d/e/A9*ahdt:wiwVt/TlN U"\Qq^bTH'MCK:5vD^]PC7i'0_4=#Q$4<=gi%[fZXiG-#S U"jv-m,U5uD5pO?YEfb*Z/H>])cRJm< U"3jtn^gY$D&8;:0n2oJkt:F08;;=BE2V>=Nanx$_qe3\x-qUw7>HMUOqjs)mt/<2 U"^2BmZ)jCj_4tYt5X-em?MOTwdDfz$eZ?he(HpopUMilg.3k.h50S),E]S U";E\X0vr1TN[O1&wX$%gR?d/OlmX=a^\ U"LolA[a5C_aa[$iX1'%M+6bQrvt-Nq#HB&T,d'fm,*rQ;K2e\Q*[8rAH/vz.^Wj< U"GkP&6+'kB]3O1;bmWMkYGrl+jdxk)5sW,RFPoQN\D1bzmQJ,w3Sf+\/YvLphko5 U"EAZY&Ua-H;xW[LHdszDGrHL=H>E1\%j#J?bFB',.cUiG?4V6mng8 U"P4$K\1mVofSQVUWZ0r5V+.+XH.k=qGbV7wt[^5EzaFjG^Q+Esx]6Q#M^#w-9HJe U"-lLs^;e).2k1lXgWcL-?9]6*J(,&?V4?0#y-o[Z[$i1).:U6rov7.g]9iYGv5+U U"&:oO=JPWpE7j-.7 U"E21*o0q3hpa;f]RkwXLIQ=bc4z%ni0:K(=05Hsr+ECW3?_ZA8Lt-_XKnmuG;o]%*z8^OmN9 U"fNP6vR6'^vbQU0xXKUqZi1m?yw\bHiP*w+i6=?,>'i+(a_W;cF',-?vUD)p1(Km U"7Pb&ZiN%SB:FVRl)lp4?<&vYK^Zq^=REfS8jbs:Z+-W?:W:[iU*E&F(#S+,*F1( U"p%s-F1EB>B;BSOV$_UjFgnb)dPJlsO&jC]o)oK0lCO.Hq()uT0lSvUj--Zfc4]+ U"_VQ(KV5\ba0hN;wYEW[oB;9FO[#F,jh)'E.SL(&L42:DE#j_.sQ$R5TkPAZq5[Yssj.?1qL U"ISlWW/+Ds.A+_aV))(]3p>knW?0N/FQp2uW/*7xmK%#*NCb*kGhSDO=Z58-yf0' U"m5;b]d?CKJPQXeaEnNcnK.e(B%I^X0+U0s,lgndQ;gqWX6Igd,6:I3C[0G:*'J)j=:e6QWkO>/CJ-kKFtiOw?J?vs5/g;5F&=UepmddygZk1uuO5x3U U"x'bJ[MAG\[-g/VJ+goN?Lu4s)N5Kr:0^?J2Ru3<6Ku4rLKPUfR1skgi8L7Hy'N* U"4-DlxeuTf6g*Zk:hKi:6MVltk,D7&;?YSVbOmjF_gl80(gyMTAq]EtIEBWATYgd U"q,b.#XfWQDLq;7+tS5_bh/?IoP*8LM^_O]:*=\GCqrblmZvnFo>FnZn*\'L52bt U"9v6&*%&2c./DTv'(SrF?R4oco]8hD)et,gE2(:GLGzL%5zYPA*TGV:1boG2(4rUQAWqag4O8]ke2)qD$(+WNk9NS&u6Q/)n U"r$EGMF#mxoQn)0krS1p:F.c,8k0b>cgR[o_c;uu90tsS4cL4=i'ez*\$fH#ujTA U"6CKA.ivmULPW8LFU2?ao-+CE,^;4N<2KeMgkMrIvr^s7+D1nX6OmF?\xs%&P=OI U"o;;]Q(Buq1i]],_/dmz9LmhNS.sjbcH_,=AKZympk?Aj?^p?X7WAEvSq1jNDZg> U"9on2/PYZuYHAY]WGn?;2QN9w]$T>]nJ;i0V]nK)^bPyJ,04znI6GPs& U"b1rU?MPQoN&lsWC:9G$]K2HAP*bTgLd:#&k;+yZEcZ\on,$CH6MZaMAgauqL4 U".-tMYO#;om9tt;.l%.dfoSxaaRccTIhFu'8HYi'GjpixV2COnQ1v62q**2tvo]ng\-fU_=BB;UGNbkc>av=4v^xZ09\Y\ U"F)0ABc1;mZ#G2X%Tx3JQ.V9#C.k5r%4aAvA^>LZDo];#NUI4R[&&gNq^=rmNCY4 U"f-&ug$x<%O(O7X*fEdCk;HD7sBRF/J**t3wuO3vU:StU5UfJMRN5ACaE^_YVnL#^Ea U"1&42zs\a_&f=O)55$^uq3&qyf>EtA2hngR>NI?:\8sA8(=(\xA42:\aGhqbLa/e U"T>5%uLuiRKM^jmjnCSoY+:L/UJ#vt&1F^St&Ho9js?3>kA15QJ*#xDPhe(lbG&$ U"'ofDk4.)c?T/qKWFY;Wp(1(_AUf0eFf)bHvuHfB4=:$g^rxZCZ08%Bz\LQN0nsH U")PabA=L/yBBXgNHl8(_4fYb><^^\U3N0+[FH[P=Bb]DGGhmY1JM_%+kVUe)\+bT U"LKr[M4<-J8fCkH-LWaJDl3f>VJ>GLFtJk/4Q[xLDDQqy&ux-*5PndADC*$M.kc U"^7b(u0\SMXwZBnKTga*PMQU]l>D4DzvtnB[SVfSN<[>U\u8UF]WBcA+l8k(xy_l U"Q=coy3ln'BHecTCQnl4_Lsy>NLOyRIQtLv5fnh,vI_Bh>_FyP_Gl0DdeZqFCNVH=uD]v^Bb,.dqCd*RNY'#>)qQI$9^olW)eJRd_k^c7=Rrar=J[KD$^p- U"QulGK?j\;QGJu-VjKFAh'QIm2_zVdW'hdc]I4o%NlZ%akEi#oO[?k4c7=bspcsv U"JWf2l)Ci#wOuoaycufqyI*J=OheN-:4k6GI9e#pHse%=Vz>+2/^jAe>:tZ3E,aQ U"7?4pa*1E9bcx9]'A_M4NUuGs8N>%WP'+7caMDtRay_ok3sLP;#3?Sk0DmiIV3T. U"y'/,>Z>X7%vKWRo8inbeLey;mv6>z.?vG<6?LenpY U"&thYH)[kjs<')aU-YZt8gl5&5NC79k,qtf*t/F4w1WC7l7eZ0df3/=%D]0=KAhLmx5ShI-C U"-WdCiTZR\t$[M'rjm$2(%7_?\A3UqQ7QlNR=\&:A\CSM'=xi6=atj%5Rn>L&&R6 U"RZMQAHH0:W[G&);gybc1mJST'[48(U:p,8i;?u34AR8Xt;.]6Z?DotGEFX[g]#l U"lSR%ngsj;A;Q[=8b5<)o\NOg;-+VHMiv=&lYu08-ZoqUsB=271:0-^WNX/T$TZ( U"S]KL&V$t_WJ>=3f):.Y4R;a4U+4?TbIDYaJDI*Z5u\k/yR<]f0HeO.*CEDxWHDl U";yW]d5P72rc4>bk?PqP\&/_N9J+7=jgQwF]QcN(>;Z$Z4GFIJ7nh&da/*HR^'7. U"4^1yp]]j?sh(m;d\7?OdA)H-B#qdPZaslJMJ2.fi\sIeS[ld/8m[6),W+-R8n&W U"p9R^1V-/[L53eR-L_pOLZs+krVb.Fm$Y>O3MF.r&%jo5[nZlml6M;TE5w5GXCYC U"k4Sw(e7*fAta]PF?pUZ^-7_'jmt9m9tL5JAC#]6OBD]4$IQ(W[o-T[XYuG571ZA U"#lZj7(TajG:ul_c54n$P*J_W?EEPso7DLZ\wh2WJpNJ]1-PU#kQ:R#'.3aSVeLv4.u25$qL>=*>,Ap_nWB;o U"^'4-T#0xF;dTuT)H69WS0f*fFJ;T'T-)6e:bso'$):pOm?f(3;pOrMw5idO_pk, U"yD5T/ U"I6/Y^yu0T=tjh5ZEWt3l%6P:AoJrx\J2JU]xX^&d'jZ_kN.l0>hk[> U"4;6M]YYH3.NH6r.MWu3lrLvhi,N'mTq,FkqP(L U"F8?,KD_S?EiC,pfENZ\N^(pQqpMB\Rs-DfEi#7i1sS(bd$ U"zq5Jg4K.Fud7QKZo])QxHHrAcA'1H5Ez3[UBmPt65RU&W_mEPpqpNi[h=XG%.E&fsXRHIVx[tTKgtM&\DPF2o1oCa\ U"&%7>jR:\LtVS[cUpbJ?PCGm&[DcHXyLW>/Q>&19-80pRLP3YX8^j?<&EdaTn=n[ U"mij$;8WIK0RWMS8w0XcNkJcTPd'>Sw:/dQ22pvNXXaocHC9X_9wC#nrb$H6w_Q_ U"Nv&mctA7+iE['B2IWduo'eg62$IH#ocoF]CglFvQ/H#5[&'Ot4+sJ(wIQU%^HGQ U"oQZGDp;Ci\w&4l_85??][eE^\c#(si U"FS6iED28J2;Xgt3?kEI]p;3F_:?z^T8'?NBCbQUkK1$2nQJVn6ZFcVx.nXXOnnrMV))M,vDlycU: U"yrqof(:T_l#Kts=fAr?f#=6'ip[bjXNl8$:PNe&c7oau,TCT(crw>y,#W/XyLCQ U"CP=#Z&#sR]8IenQ6-V)UQ=o'JN3'[4A27a$M%XG)9mtLF(SAYqLE(7p;RgaKiS5 U"(Y5.S#JfCwSXNhQ([VwrH:9^L?m^F=uG/Th1sW8A__JdcklwUJQQVrq*u&AmC>XjQ\ U"tAVUUX%,4[t>RNmn*9NoC#QOnNHb:=2l17$8Y&?r>GH,&v^E U"[f^IX6%AER7PdM**Wi*udfc3'a^8Yjsw2GwPLTL#.,ELdX%B)b8;*I=r5Gfg*>, U"sZ'Q>K>6>f=\DmZ3D3N0D^f-6,i0%$^DCxPovc(:1v?HNMXDpv>HXhp#L6A2FD[ U"Q]1dx*>?[tWtSL>Xj\BKmr_<9N=#,tzcR,uAsu9Ss?BTL2vOIS^.90$5I[rAfbQ3BPoSXBttJ<%5upEq U"_8k1??/]Bl:=vW?rN#tQGLj**R\CGxG]AEl;5IpW:p==,:uoWwAL^ U"b0TDP\,26RVSXRUT#Cu) U"o(g/<02Z#JEi8NZY&kIoEcuJO3;W?Vsq4+QB U"ht=q8;+kHER';nlnT%8):Q>xj06j%2Q59?&uu(oGPTf2..Yp'\>'*9$?,.[ME%= U"y*GSb#uTfYWc:[KB-Z^8,f&k5+aB:eXtz+1r;E_^sPecvK\uvKFQGOAB8SL9&3% U"ZH[apOB5q78Mx$Rx7X;^^BUQ__r2aj/Qw_8dj7AUu504Y]*n..fJh:bo)e'$.H5 U"&EQ>*7Qme>'6o=>0FU6I);*?H41D.uOgQ/[kkR]0)QDaK'/8SULL5YO[B?0kB-Q U"Va2]M$d?Uq=cI]D$&Aid[I=.2S^Z$srzhml6.bVKxa.Jsi[/C_0lA*U%FR?KJ[uJ43 U"]Zs/-F7-hpapRus;DX*h6R1he%qup7FWJ#-cW^R2r786B5XrjpQL>?)aG>aOyWB U"_eN6xRFD:i7'JZ&5DQ8y('%*A(W%E(ShlF0./*Ti#q9\qMFu%Ft4ZW%NSSHk-u; U"Up?2%A933QDw6fRV(u%NTT'b;*V[dBHlBg;R#,L\xqsm/>okJsUkoJ,nv?+[a3^ U"F1&N*%.fs3HYatSOD6tZ)?eLDkLH2k_%ikM=gd4sVQG%:(:bG==QNjyK5KpH;t3 U"mM:Ak%Zb$p U"K%0Zh$c+3sRN12fec+/dTu%p()9%%'%-I%VgPmG=GL'9/'%+%](%%%0%%(%&jf% U"utsx%SiukB&xr:]Te56+pe%GZmht U"EcfSrHmZ-=Gtjp.kuN0phT7cKyBccaVAX]/8_1>+8Gt:8bj_/e-(42h\6e0H5La U"t-7rGbk=^UHhDMm/D3GK^]S(nXzh.qsKwm/BF;t2iSI4B0QN_%D3JgM(-wS_#Jl U"iOHG[a$3>/3w\XMY[fctBccbx*Ifi-j8bMo9mUa3,zNphuHxs\Crg7tse\IgJ7? U"^#:2>07G8gJ&XU;5,\7$RMm+,#I$UdC)?V>Ys_[Y^.([w=W.FispQ>_UpYOerLq U".5.7Qhb=x9OZ^XV-_/kW2t?B*[Cph*0sGsQ,Pm.PTUorLjJUUhS/QV':#6xIh&a U"='Ki#NlLh0Ganw3W>UB_zLeiuxEOC(V6[Jp.]a1ORM66$oJ+4^r8?QkE=z50b#/ U"]6E=%_eNODhj=UR/rjJWEZPpx]pM:$&&#fs&I#Kwq$l%2?CZ?px/q#]7sL9j'#c U"snE.vag9p3\[+1wCE*xP-5e+'sW63f?eW/,J:MB*#<2)+B=DU U"qD3tj+.Agwyf3HwpHtYubVOt<5?ju(e2(C*,9:o5FuTOE27QqAf6xS3p%>Z(0a(cMaAmO-*I0v941k U"i/lEOzFCAcLg&Ot&i]vmmJ.FYqh#u+gZ15kwzN;vSfiQoxZD)]lK0p>:]hFqpDu U"R^n$*lH&[=1pyu2f]%7)+xacjFi U"ispAT\k/]EsO>lM?rxx&ye?w&hq]*fej+T'9^8GKjmR%\151.2-0n:mZ7dj(lYbhFVUub[u_\27SbVE54]HmmpM*q? U".l]if0,1J1UBWG>BA]'a4dJP^zjf0z)&-lIcim#iST+s1R\Q^eY1H(KQh4?c65I U"&+Jw;A)O/6KhZzt'*Y^;n-vvBXjE6HI_kwg U"W8zbMpV'i?eOjl[mq6r*ail*Y(n)#/AD:gh&+r:9SdT<&=Qo8dbLVfJs^I/C-:sVR55DHu4H^yu4>U)5BmZKe1S%JAALNR>a5K< U"u$:uels:1FyAM%'cT4>.;%7BGNC:\VF_lb,+o=i3gND8$ow#%up&'%9%9%%'%-% U"0.pQGZN3Nq&u&%%%1(%%%/%%%%%%%%%&%E%%%%%%%%%fw%rtzw%Siuk%up&'%9% U"9%%'%-%2IVPGR4vhp&q%%%'Q%%%%0%%%%%%%%%&%E%7%%G&%%%fy%yfhp%rSiu% U"kup&%'9%9%%'%-I%WaNLG#sN'u&&%+%H&%%%0%%%%%%%%%&%E#%%%h%'%%f%yyf U"h%pxSi%fyup%&'9%%9%'%I-%z[8PG/Z)BV+)7%%g,%%%,%%%%%%%%%&%%E%%%'< U"(%%%gfiS%iyUu%p&'9%%9%'#%-%Rby4GmN8yw0['%%'%(%%,%%%%%%%%%&%%E%% U"+%g,%%%gfi%SiyX%up&'%9%9%%'%-%1\iPG^\RDV%m'%%'%(%%%,%%%%%%%%%&% U"E%.%%C/%%%gf%iSiy%Vup&%'9%9%%'%-X%P'QRG6m3(3['%%%4)%%%,%%%%%%%% U"%&%E[%%%Z%1%%g%fiSi%yWup%&'9%%9%'%I-%zh8MGE,?,i,&.%%/(%%%-%%%%% U"%%%%&%%E%%%&a4%%%gfsp%Siuk%up&'%9%9%%'%-%;^z4G5uR)_&d%%%'C%%%%0 U"%%%%%%%%%&%E%.%%:6%%%ij%quqf&(Sgf%xup&%'9%9%%'%-L%eyQ=Gn07-rT&% U"+%0(%%%/%%%%%%%%%&%E%%%%N%7%%k%twjx%ySiu%kup&%'9%9%%'%-g%Wz4FG+ U"\E,5#F%.%MN%%%,%%%%%%%%%&%E%%%%Q%9%%s%jySg%fxup%&'9%%9%'%I-%1x8 U"QG/22-NV&7%%0'%%%.%%%%%%%%%&%%E%%%%=[%%.wn%j%wSif%yup&%'9%9%%'% U"-L%pyQaG2-v)s:'%+%])%%%-%%%%%%%%%&%E[%%%?%\%%y(t&sS%iuku%p&'9%% U"9%'%%-%V)gPG=?GL9/['%%]%(%%0%%%%%%%%%&%%E%%(%&_%(%&jf%utsx%Siuk U"%up&'%9%9%%'%-%?t)4GOWK_y%_)%%%:-%%%/%%%%%%%%%&%E%.%%Ya%%%wj%fi U"rj.Sy'y%up*+%%%%%%4%4%%](%%'ee%%%%% END SUB V2 CLOSE:IF S=59AND 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