'=========================================================================== ' Subject: ALIENZ Date: 02-08-97 (09:55) ' Author: Carl Elias Holmlid Code: QB, QBasic, PDS ' Origin: holmlid@swipnet.se Packet: GAMES.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"ALIENZ.ZIP",4^6:Z&=15200:?STRING$(50,177); U"%up()%/%%%%%%[%7QGlm($pM%%%%M%%%%/%%%%fq#njs)%Sgfy%ejhm%tEtk#k2 U"/2);B2/M#10B)82ET2AD=EM0;84D=IS1)0B2/%up()%9%%%.-%'%.XG;Z.e5r%7 U"%%]%%%%/%%%%xh%twjx%Sify>BFBqpQ%iAuHBFBXqZ^A'EpQn[Qtr^c^koE#r*o U"sMes4uK_%4QpXBlls9;ll^xYpk,b,foIxwZOIO7BBgxZG2[aoXe+:;X74pMZ:Ro U"0eH$2kwl0+7BXfl5U4W_s_t]]-]2Ox83x9)QtdJfRj(Sg)E)d=r5JHWl4$k46]ASMQE+WO=l+NBcU'f*:,pbf8n U"kDMfeO?%r8Lt_J'9]cH8q6TQ'VBU:cgC<^v?loL5scD2oU#MFfHBR#XAr?iVRf3 U"+MiDT0n;+T&w:II:Z>bOfl<0sm^m;YR[GNsYc'[8Rh9%PQdRq_BW6WTapIi:-,? U"[;QLTq?F1pbEQ?emM[?o U"e)KjLTMsn%G9X/jnuT?AsueH+CjpZ#_uGD+:%j50Hv0kiCMQ*Fr1/etg>1SiH9z U"YF*p)-$.d(Bu43#?v(2;Qz7?mTo:Xo:Y U"b[$U#icyy[u:&7bM/tO$_JbWH#CPFsisC)QIp= U"4e-N[YHWDA)n]./3W39owT/$2;dWv+gK9mMk$S4)K*:C%?]h#Di' U"3qPJ8ke94Jj+b26l;x*6WcmJ^:Y4k2TVMd0wE?CN\M4Jfow U"LHH$[W-PEOUSr.kg?kBo+]/bgJq3K5jGKtx#C2YgHns2<.Z.8u.8UMu%%up()%/ U"%%%R%%#\8gF&u)LE>55I2/#1M0B82 U"IETADJ=EB42CD?S210B2%/2/u%p()9%%%%-%%F%XsGdCV&n\xuWOGPE-0%Ffuc^gG'%8PBoH]/P\EK\l&44Rfa U";P9bpFxQ3u8w+i7E&7iOngms9$WV.#f9/T(gpuM(%t(M1avmpbLqlYjx1.;3ABl U"-mc)WU/BL?].c'B]]eB4t0#%N\s$OgGE:<:t)uhr U"^nMvS[*rqb240<8NW'T5bv[_vdqAP#vsQwcESuxUgg?U74>IJ=V<4mk\[tawruZ U"kecBMaND$?Yg:f7wd=&(]?D+0Hc[([T-8scGU^n7H\i8>1HGdFK2SlkitVV/r[N U"L$tVbrG=fDinUqQtkV/KhBgD3a%Z#oYGHGDH,e9uSa*B7;)ojFB7_'e)i2kWU.[R7DHgS_0Tu+K%l$W1HZ U"FdZH\jG$P;\h8$44$Q:3]u'KUJ,fFFN$5CI8eWIng5+]w$H,3%2vQ$oaULuZB%o U"]*a*,P:d+O'077q/fco\O[P3x5?.,MtFocHjpudi('Gp%q]:dRs?lcdw?H( U"NV+dz,R&kGc9Ie9V\NoNIY^t^*sBsOK]2OnJDn'%OcadQgi)t1TC%6-+UQ-R5O$ U">:PdydzVOE'gPXU(Twqn/1jYOnG**AL?owOK&V6'Md0.z&W?aNgs4gP,yG+4#yd U"n4:T7>>??gGwu7a/V2_NGPmd1t4s$\9wX4R7xc[e-wKN8r U"sq#Ojdnme2I$oAWTRX#C;JdeeWAaGfxLy8q3JqNVzcD\h,PVomP U"Wd527KF0ctD(FK0J^.ygF5BFq$RBOe4/7'^Z7Y;<5B7_rjlZ)%UHR]dT];mTEZ' U"Y]fDDq7I8q*/L=;S(aQPowT*/OCdbgR8P)e>RDv[9o)/K\E-H[.h&1V/;&IJ+*L U"j)k_PQv-K[=YPG&5Gv?8..*Ijt-X2\sah:+CO%Gdw12:%/Tleg/^$6[>.9wt.)0 U"DS*H?Zlk8X0kib)]O]wv?%bXn2'BUhWh[B&,Uup[(WV^S?ZJFIA U",KN4n0JyZae7humOvbx$,F'$-'xLxe++d7hK&OdUU?h$)/S9CAP0\4,tb*PTW?3 U"-&oHi6NLX$xr%NZPrW+tJ7Bo2^(Ln^E05uczXYd*jr.rv;m6&tsm<]/W%(pYHBo U"#'BC#*p/_5qAUS-#J=jhYpfh.F-%Tt.?S<:T)J')YlU-$D4)$.SJx_fOMo\T;qwu\XEC9 U"H=T1HgUo/gPtr(F(/xUag(?(2ps&TLVW$jFT4rfd=2+Getx9>Xi0KdFZEa(-R[e U"A:ixn&X[+u&W1f&d5gOC=Pag%;U[%lHJZJg/*,T3hEYlGyYeKcG+S U"*I91J)?Ze)kQB[WRxH#TZGSfLd*73$_9.=Z0=fdMv_M30(7M0JR+hcpehou#Yqq U"nNAQKD;2x:*.5Z=ibn1lg:aW97hW3ySRfV3guY'E/TpG0LR-_OY;*CjxgU< U"T4^R=(WXIWhjKT.Lng.+/m0XYY%M$V)'DxeRMLFOa_uKpHAabU;P;0Jq^sY^SLp U"t819%&VTQCFXxr=sTBMTaiOGppR>f(/#nKN'+&>6u-0iIzX;9cL_]+l]r]vKe6. U"+Qih6b]5u:c/YO5U9DHT9FWtm5PiO-o-6nD$MGK)[i$e;MNeuCR#/lDDsX[0#v/ U"_,-Kt)-kz?EOq^/.YR(G>$>&J*,1#]-v'RJS\k/tm_0]PgM4])ekh=&1Gu9,D6j U"uYQT(s[59ptc7dxl%4;C_2NCw%0=xSe2YGIVo%qtTxK*rrf$b>uHg+1_'_bioT< U"3)J?lw7)*d9:GFY\l=&/ha:)8+^*Ip#iWN,S,BQ,j?eTibMVL'U_LjCNf)P-BD& U"xF^n-#&T$P_l(=2PPlSnD(EcwR36K/YNLZm3:4kiV=0>vw8JQsUP+ZLgoI=b^xR U"NJ:Zq$]BTpM;X-*FP6cIKVJ_o8Nz_5nNsKKpH U"uT>T\X&t-SiGqQ.rSfhKdU\SRVYtq9>mwHT'#tTkFVFr]l.6S=6o[[=ij)=t9FT U"M.PHmeSkZ7u\82.AxqIU]2Y#l*HMajn4J;?HDzq-0NG6l,PnfQ*&?IEcYG/[',n>1l>-A U"Cuznb.WBW_+mJN>i%_$#hi0-F2'u]wj'S_O/T<_%a3'BPP^r&tlLH> U"W2,[a;SFxv2<[j)E\3NKv*A59,^2gNR710:1qQI.L<^wi41vYu5'%ChN_;r+cqi U"'1-27en;h4l0fQgU-[FkP-*T1S+aS><$f+Hv+l9O_Uw=]1>0=A'xE#fn^7Vy/4K U"3?wafmx<;39c2O(C\CCK&t5ZG-:Y,RR7eW42pLiK=N#$-FXS=# U"&hJlOF0/d)u7htL#-p<82S,Q^-jzOIJwIR[G&_[M(MAlt)iosoFtc<-jC+8DZf* U"TvSoOQw.[f3pm%6a4^lZ*xt7T2gyu#a7(q&??C$\%Fc:-]^hh[Yd2N'lru%=Hd$ U"Wia8(q'0r?MLkhXQqtYRnp9N[FyV8$qYlbnF]Tu;=Nj8lzRjqH&UO5rUL+F U"z'tKT>1tJL8^6H0PKmMOXe)u]u\f5=W<7OKjPm+]dmc/7gX[\>,5O8/.o>r#A-s U"Km9[10T%5'XEWrG8i12hlv[qGK09gh,Vp)=0xt798K[d4E U"jz'H%%#BMt5o>bZ1mucC)SXsWjnPjl7#[k:(9(1D1vcQsGeWm0\vcCy4VERinIY U"dAy,:ny_+5F7mZFH7&_F.PF\\wDlSDhjKjW'A$gN-pf=UA.0MeQ8wSYO.N2^+8>1b8vy6_8*v_Dy U"Hj(Hivtj:uF/&/DI[?vPa)y^;i9$mOngk8aj_]iWmkMK<9YN>,lPFti U":xPe#^NZ_hR;MHG=B3]T1FId_f[,C9rH\:hmYGA6XGrC;)yRz0KbhZGH^2=kQN; U"m.Y)zSf(*Esrp8)v<#8)vQ4x89NJ?\qux6E:$x\\1B7cRGoh\NY:OtLMCM-ZcU; U":q^?LYc?Z.IANJ[V+.\tC]?>;mM[PG,=Hfv+&.m];muc4RW=9&&[^lvAB._f*(DEOW3)'DND7inoqio.Hg%da*#Kfeyu4%Z2>m?$QAi6) U"sSah.6eD?b*R[fcfl_$>A0stbvSuEHD,hg2BH]/wX;4=,x,y#CNoVNf(TWM&]H= U"SR^g,QnspbH44\:JM3g=NO)X#;e=kFKSp6sF0HDDAdHlG+tf0PMhX)eV5L,18P031aTls]85w U"nC,&,^%enRtjJb>0>XMwYT^m.8,Lb;Cxcv6c[=R/rvFnb[3n$6JTdhAGJit5p#5_7*MUQn3 U"mstLn,2mXBDRDAHRSzN5F&ak U"DGs4#:;,j9bjL3TC>P>h7Fs,$YUU)Wl-TS0Si9?WCtYGm%id8CE83cSVz5A;RLd U"o3Ci9=eBE/9+jG6CHKIO%RIU0.J*b'-F0L?pwAz^Y^e)L_^Dsb> U"jZ2,hs2j439BT?Oq,o+zyq3.v'AqGNy<'UCw(uDzyZO7s,Lj4twAI?O*+fNxvZR U"tcFL:dlqic:w3U/y7YYy4(Me&vD.EI$>yMmQ9oYqcfz]Xzy6+9Nuh*N&u2RzyvL U"Qn4Yy6((_X&+(*<;54A+Nt)UYh<_0LOiq?wA1Xz;Ih*jx82#c0&Cjw2g:lIQ+7F U"$RFl:lcg]1i1ZwiC^5'arNPlbX;)3*Nnc&64$W8M1L_FDX33V:tJk]dY]pqtmad U"N;CY%,]ak9(2'RuYL^VorjjaQcg]9KiXlKbGdqYffGU4e?f^1(>QoXBrl^XYfcX U"0Y8A1kY.B/[C[Q>ddgO,,t\x6=t*FEi=fXdFD U"=e.oUM?ReFCS-)b((=d;Si\.aX(i-jQ0;/b-uCALsuSl:[0?#uvdEOhCRCPEY]I U"BWG'^=s\YP(2r1B(EV'>/9Sm^J#?:].j],+/Z3R.&x8JiB\\+T,BTX21NaycL.[ U"W^AY;fp?VGL8\Dg_b*)DFGeO]3/Zufbv>bai;[.c2bkvaW\ilbU2*lvUe2Y?I^b U"m34,_gUBqA[ZIC8S5LMLcmIgB:MqWSlQT[W?_?ZoItCG\Q^riHvhGYiNbF1quk3 U"wpI:N=/lIr66bN1p.xfxe4PkT5:\+>Cj1'uH<;XlC^krZ-k7JG-_]C]OL6*2f?i4qI:3gjb U"1Yu30ReYbS+D\+,s2HIkEfXe$)GeQ,3r#X?ukAhXYyg9J\?JOL]dpD3ymng(GCv7n):ybc[Hoi;X7q])5]UKqEQT6h2B<7H;Xx U"/6CX;+vqmDPkt/M^DxQ9r3gq);pOc&DDi)TCdB,c&cC<::7\[UJ''4r,23=ddCT U"m1/kPG(B';GEFI3(n^G5#H[896nDel3v9wci>:Q:R.B$IhmQA_VSG&8?e=\>J>\9c:*6;7:K==z+IPUx:LYNc50 U"5m$_^KA1$lH5?5]#KGWGL)WB:YEqQ\9nwH%r#,%kLUgO6tTTr)<<&g5x.WYx[OU U"Hxw*LqC<1wE^i6DHq=hjdgmr>8kkcO]tY:^M.?c0NHLum$P5(\7E'e[4ILva4io U"rDgaz\:)z,6L5Z./sfv*.q_l,zHZhU,wuFku-1b+oanYHmUpTyGhsLig[:;a8XO U"d\J_c#fnWN(y6*$r;pDk%VnePj&4FZlRVSA5kQg,?gt(Of,HaD^8OHSDD3Ch9qT U":ENyY\[7%[3<%]BT^/W9:bcAXr8<'osmyM^V6_h[/o_b6kA#=Mf76=j44QswEMl U"wsbFabb\MCqa-UodRS>y4$e2pYcvD4xy()HyqhOHD)ZjQ,a%A(mzEh(4SRLO0Em U"gU*rDUStDwca=o3fW,Z)JtnWxLnWh$h;f$Umzng_.nC7IGFPG(*f0xHNR4B*T.u U"DQ,KpYrPqpR,\Tv?=SB_MN)/J9LWRG=\MXs4?&V+'Orw$xY's9SN8li4$$AS85\ U"zXg(8qbtgGUd]qMr)#;w,:j*/g+xMDF#m3b6B87NBn,L?8EJAV)LdPc1Du1 U"NZ]-Z).7I3''#/7:P_l.*b'*?*LuYh7gP U"Jp4tr*l=jQ1JsuYs.Cbjmx^b,Cf?/mY_,_F?7Ix5dd7] U"hbs)/Msr3Q)(gAi.\g&o<$&D'SI2N U"jp>6?FTH[;=knOW:j'XQ]6*t]k#\;a[I6,r*#I(q6(hEi4\[V+ZDFo,QML-Q6h[ U"=LCpb0R0Hbb>qmF_ia*?]n,aOp_(HAknJUZ%FA$,7C1X.lE$>(IV/XJ['8qKka( U"SJNLHa#mtYb?6a1mT(LlIp*K67ZEd$#^/9Z/ECAb:=Mkij?#R,+gW>_#&82)sro U"q\-Bs'LJiJ#)vbPEPYl-tqfBejT6NpRbr.?N(vz9r67XK>CigsAycsoAwcWl,$LO4>]$5-L*CBIqHEnj'uDH[= U"vVA$GfEX>*7o%CH::JDc;tJx[-T_E-kIC9)/e?1_$Gc3)bXlp0j5XlYRJj'47HJ U"L6]W^WUqe=cMR)e'kF+h2SnzBLo_K&\73H2JgFZqb6 U"wK5;^a=p[>p>e$5]'ya]jBfc6CBKkYQAvh+BnA?^/Ru53uwU3HYxKn.1soDo16F/,<'Ts]8eP)aaL=LVV%O:2k U"l[=C0^yxPSiqaiTdCb?-,>J7ODWMs)$x+CJX'jf7Cr[FPfhE1sxy8A#xx>d*Hbu U"\j.j'lxBYw?hR\.Mlq8$r7C#Xn\aMn.Ds;J$koP8eN$Ha-OCh7i?^Q1*)u'$pq9E.[Zwd46D&fXx?wsso U"6P208E:BiW8$.>/ca]BFibdG4[Qehlk&6Zncc&,BWNG&rUbPpOggaLF_[rluje- U"+)J65CZ*dOq6DR.)O=o7ll]DnTRMT5D'Z7qIxgAcD_IoW)?lIyu1#Ut5 U"_IpzWh*;9hLWQlLeAaeerA,i,ti?pUOFBhyX'q;Eaa_XUc#T+7mstO7?hom8?>> U":_KO$slog4dZwHI+#SK=4\$\WI4Ba/ZMN8Sf>qdN,2#I[8:l01V]^?&]D*3TM7/ U"07y:3;5T]T[,(a21jPDKIfCm1LTdUxcZS/EPnW#N[7G-lEtypHQ#:7aR%J[Zc8N U"]8=j.5G\*<>N9'jPEJVF+iAb#Z7Bgo.ucQXDFK]2kO6h(bBx:R8MwgZ7eFf_-r& U"(9'CB,:rd'hI^du]]pTLYtK$7S9?,[1S%N//-'R6^[SF[-2wHlb)?VfJsD=_)#Z U"f;HKG-9X*R*S4.X8w4o]]:tePNCuA[xCC8To[NDyrTmK^S+]hp_5C*Y^pBe,>YW U"Qt6$8=BjqShY.l:IqfIcB<_&+gHOJ)CC_'/4Pyi;ChVFXS2[HsL>GAu+->r2HBUay';u7vP1i3Pg8=irh,SZ9kDj,.9?9)oat*(G U"M)x;gV4$i0rZJK4$GF\I$ghsZtpu%[&8M?]_\W;t>B#mKFXMOf+e/6Xi9o/[C5c U"DEBk\.N\#)(q*GaR_cEgM3qpeiN3y?&gG?qdI/W]_jxmAPpGsC+ZI>ZUM'&d5jUq\E-4,j5 U"kKDlQ:VFk8*v]QOg^*XM3bQ38b7BKVx3,sO$N;t$g$SOd'kW%%Qiw^mJpg0P6R5 U"(3o^8[lBs-RSDt4-bi,d\)M$'JB_po^M6GxV>p+=NGjE)eD>[?DkvAm.D9tv)#[9+5z9m5t;]#%9Eo>ui^79u,DT_RiBf U"c,Jx*gX)09';HOLP]T/M[)3Cf[EUrmr6-6oHRq(cg-3ZyWP;1j^D*^D)#JAd&M0q>Wz571t2#npDa\ecI&0kFx U"C#dQ^VpzpZ%Jf9zca(DOAnOz'ZB%W26Cz:]z>+ U"7E>w4u)M7ts$d<*N&Jsz'6*%UWn>z*II]+7nDHLl?a6'W6KTm)ibN%+1b U"h1y]#/\:2)7htH6,/A$>*bZ>U1%A]I0>?J+\3sO^Wa;Uq-L;'8:h#9q[CM<<78% U"T7h$=L3Vqe&SNkpL)XNt^Nwf:7[jxwx43p5o2v]=oe%Y=9ZTOh5/EqIBR_pi2U>/a_1^+T:Ue/ug:g2UUe'aY>9u^?9d(q/ZROL2ebb U"KDn7N^3le#\>0(uDfUOQ%5\spI]L2_o?P=VwA>f'H7z#=kr2nTX>cA91:NY?SLJbUdvZRC73Y[sk;f(rr3xH_1xndsfd U"ilsKKn,M.Xv'q8Hj[:X\WCFL(D%D;VU+fnb82X&aG[uDdq_%e$w0X1t-M<>-'3XqHv+KCgW]R:EnNCi1Mtk9lEFBH]U5.(=do6*cLHr+ U"Xpdsaz7D#v.2P4(aiS-JnY>P%azhppZ6<3x>y\//MvjC8T2X'8Q0O8/Y0NOD'dORQXQ U"^k=lVMA(ldO>>YAX7*dPSe$JF%zgPS:Cd/Go)Aa7eVf6s5HgI1ZK#/E;&0[uwwG U"/ySf*>6Afm6Sbh;9Tu>gI^)cX^fD0LVJ*K2[,QwT[N0(n([WG]J\NZmQlb8>Y>( U"a.Ged)\.-f0$D,M9+Z4$2i(3?b9<5[ip^u?Q6 U"_42oML[5zBjLD+3:;x0HIM*>W\7ddal,m2,[s)tDZzP'7XbsLP0WO,C'rSR8d(7 U"o39][$/EC%h>v;k$VnD6fi&#.DAM[_c/EtzXvg6Koj;c U"n7zPUlXM0)j[3_H=Jn5=[3Sk^]6$'rtE$]CT1fGbmMJhI3zg7iu,hTvLkGObbFd U"UJT7XT:4L7sY8:a-&CS^3xqm$]E9gg8?qZKj,4_:*'AMlGw4l?3ieL3OgiRg>.p U"QRcWMyji*4LZESm+00a5%&_1o(QL*Omp\FQxbERHJH92IfZ&HHJb&HLje/RIHmc U"+E=(1f)HmM:(M;ih5Cp-b_736w3gdK:bZmqWp1QCj=>(0x1F$RKS?zYx7&qKC'n U"A,h7cc7qLMJipx38sQ;.34]f_C5#Aza)p__i?=E=U':a)g]g5PnRLa-_p7*Nc*P U"SzeO%4&WPz9bF)v>4RH\aLw71llSWi2P.(uMs]?TH:nsMVhA>w:)ID8;#VXBXxX U"$.u5;GU0N:MsK2-IOC_tHq\1x3Wejj_[(,C(*L1$1IGCw#;$qEEpJ1PtL^,4TvQ U"gkgW6e>^R4&(a[6F8Wj,luZ0/DRklFQ$iAhwj)s%l9JahU#SoQGC8-ei)#[)G1S U"$a,<*00M(3=tP^k)%Z'c7KuUXVI1Z\iq^8oWMXQ_Tp'%\*VvP[)JvG+ztWVCC%fUCT(gE2&Rs3,_bUh<\B#[ U"0KuBxWTfTPS*N$S[Rd.b8.M0CBb1'wb7utGWs9uw4M9vj?x<=W-U;vBurJT]O?' U"ZPvy8*L+Umk:0T-I.w1ew_m;fYFC_7=.nE6_Z>B-wD)GeCH%:AR[G1M[9Xy>xLC U"Y3o[]D<:488,?i:(c#?QW(HQGGd6JG7VW11vQYs2>;$/E5'1G/M=/s=29b=\V3l U"/q,snD73]m^F9[zg-x-XGI=8BV[Q-39D9WB)>Qem]?8;G_>=WF?FM8d%]t(6/+r U"rtO#hM4$4,CdrS%Gg=?a2da,4T$aa8fE$/cW7OD1DDyxH+s1dKsY=:Bj_8TIiCM U"5YlYEl)5(Y&?Kf8iDU:/B+KIpu9g+;A[/V.'6Iaw9w#XY;VGRDeUR U"ek:?8v=h;>rVs9&VsASEamKYc%TXNbqA$-O)XH3\*;UNGF_oC+zJnD_cnqI9?0, U"yEq>&0?:vVB9o4u'^096wwm>pGMgI\1v7RV)Yi\O U"AjbVpoUB7n6JQ()8/u-Nw2\<09dew#W(UG.q8EL=,P;m0h0ZciC[72ht<%XiGzA U"C$RTMg6XXYgLi13[pDqdQ??N&j;cd&%dVVkb,/9eUdaE0*aIT=1&-g16,1AEq2S U"/0MUzWK9L]];p8iEwNUZ:R+m=,U\NUUvkf*p.U)g*]=rYnXfc]g[v2ABIX)+O.\ U"L1bRP6:/VTuwSbq[2^.ui4uS.WAMdJ+8P-,7t+G(8NRT-XKz4>MCX/x^J+Z U"VfQ2>zeb3M-HO4XCdhc1b,\bN(wNA>fCx:<50p\n$^vgt)E:?-FL%(6Ntp/:#Th U"jB:frT;p\,$+*Vt*p.S U"J;NlHCKgDVO:64jB's)BYCH)P:50kNnWGpW7pETR&s_N)[&Sib%aR$tI?#BU4Gs U"sk16I+7&TS.k/OE\8]9.i=c5ZC^40tJ,E&Xnc21o;k=k98FaTIliNAgQ+OiHZ)o U"V2v$Q;>Y=Qa]g&>S9J.\gk6as0n5Y_(Rx9gSR6b7vfxvO'Hy[D5=1ZCLg+0f_4X U"oqc1jETnDIn%(vAaEjMpwt5Dga'B>x[aWK'1CG(aG_x&p)1dqCC3:&YSd2?Ug'M U"rMmNR7LggJD%1k#vLiN0NQx=7*J>5R+sQ013aJ_Fk8 U"7:KA9zrIc_;16O9sn>mtAB%f6_%mx)%IRY1_8iv+1Sq8I[GSxD2P,n.[2:o[-jE U"GBgh\/O/Nab3e)dL7yJ_rUbA0Vi(lk/ZsnXS$LCG$-XgnYSb9,<9i&l4pH_E=Nn U"Z8m_BX\2SX_6skQ=?D*Wc:CVGY_]O^/Qq'$):JB*^k#e?5(mHa0^NMpAP6t3M6i U"UP4ms]Jt#:fDb+ag:h#vrU\f6E1o#P#q0^wj=*gqYQ%\^>weOE#lBHR]Ln\$ftW U")Qb7kiMjQd=LqgBD3sO*]0X\g:U2gi/C*UJs9_BfB#&#Z(d:enq<0_hs8S;\0 U"84=q[tgn5*J.o4p_(/ma,4bHw9T6E9hU+:Zi)#S2wWae3kcb#y6B*vDuL:s=Aq] U"hdua9#(/FLB>BJMX\RRx&XT2R.$[;Wb8H?Oc*li*Jbe4UKJF_Iqc(LLs$;M5g/i U"%wSTB:]l+z+[KHIgLg5LA[Ka[Lo35%gnz,QeR?:4BB,uK%W(,3]#lUk9U)h,HgF U",B+]eB4ct4$4+$x4u%p()9%%%%-(%<%W[GeGN'w[)%(%>-%%%/%%%%fqn.js)S[ U"ith&jzT=U.[5L<)oN=d/t.EzB1-A3FDS]X&bQuLjROvbHjkr-bug U"4>x61j1vo7*Lx-$B+^$1^5+wntt(uF]Q.J;Ns:D-%LL1rdVv-E/eCpfHDn.Rnad U"t\Z'w0__7btaZK?,[&d=d0Uk1U/5u#1<14cu.D0eU.;P4j]\O6[JE7xRfygMumS.M2xP8PV]M%d]PrjdoYnJag]SX/WJe>5%y2T\o6mI/TDCB[kQA]Yi&9 U"XqBS021=hh*eq*<.h1nVyQ3gIukJ)sHN\^_UN<3za2,akLZ)[UnQ?Y99+.L0)d* U"36?9=a;JZCVocEqga+1ZP5#i1/3C-L+?M$O-<7)gEf)N25qe#H#CH9kgVVQ]my( U"c37nw;W=EXdr>ioC^+=8cS-F*qa?U>YS;07Z3eaO1ma-;-63.^'^9os;,0+Q+3o U"-D1rf[BO7f45EFTBSTC*Y]%pzdC+Cku;Xb5myf]Nb9<*(iv/9G>Pn)z5,G73Ng& U"I569=(ykNJHnDgh(fK]JGlJ%jWnXKiVKWTT0iT=Xd:s:iR=$s27ds4\c$2^/%XbhGx0sU9R\\b:x,I1L4+a)#nvwB U"Vi%uA,SX=W-4\.d2WfDtT+CA.QHN7t>p^0.Tp<#cV9$oSL334NP#+y$L'%j[0pQ U"S3,LcCClEqP&4t/FX,#PA3)=9RlZH+AiQ$)N],jbc-ek%n&abvx]$ej9a/k?]s6 U"ScbxgHEz4TayI1-$7wt;6&1Yl[Q&foE[2mQ3dLi&,+z#OcYPtI11O_29=I(Z(Km U"j/71(Ub+JP^X1V]:Q\VK<(ep30hf&4j6676t7MN7\;J=RS3a<9i U"ZV%ae&RWk\A9fds,u$y_8aaJs[\$wW2.++agSZfC3[z8I'Se[3+Z4:b7^cr->*t[]C's,>]&Ql:&a9S;w_S$COs2cZ U"&C[?Zj7iJCb)3d;6y=z9#0rj#TF>&^mn\pi?5&5UC-?4ijfIUce=^gOO3K)m;t8 U"2)IEndM&>kg27*TMgD>-Xo5tjw%%up&%'9%/%%%%%%%[%Q+Glm$&pM%%%%M%%%% U"/%%%%%%%%%&%E%%%%%%%%%f%qnjs&)Sgf%yup&%'9%9%%%%-(%'%X(G;Ze(5r%% U"+%]%%%%/%%%%%%%%%&%E%%%%u%%%%x%htwj%xSif%yup&%'9%/%%%%%+%-%X7GP U"B(%=/%%%%/%%%%.%%%%%%%%%&%E%%%%#%&%%x%jyzu%Snsn%up&'%9%9%%%%-%% U"-TQG;zj-+%f(%%'[-%%%.%%%%%%%%%&%E%%%%q&%%%xj%yzuS%gfxu%p&'9%%/% U"%[%%%#_\gF&1u-%%%/%%%%%%%%%&%%E%%%&6Z%%%fq U"nj(s)Si%thup%*+%%%%%,%.,%T&7%%>^%%%%% END SUB V2 CLOSE:IF S=126AND 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