'=========================================================================== ' Subject: GAME MAPPING TECHNIQUE Date: 07-04-94 (00:00) ' Author: Eric Blanding Code: QB, QBasic, PDS ' Origin: FidoNet QUIK_BAS Echo Packet: GAMES.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"MAPPING.ZIP",4^6:Z&=22040:?STRING$(50,177); U"%up()%9%%%I-%3n]]AY(80]N27%%[H%%%/%%%%wj%firj.Sy'yW6)x>oT]+xWVO U"xV^nPh[GRf[.W/JF0XvQ*jqG$=2p]0j]cmO'Zg(8hbp]TR0g[(9( U"LorQ>b+/Pnj&$L<)Q,o9l(EI7)+XVqoX5Ad4WVY/jFRo=Tg]9P%$Gbff; U"uNjB?3Ow1d^0CP:_$X*c%ZY?RTcmW_qcU47_Kt,[lLo/wT(n$za6ZpEE*Zt8^#I U"[Tc/eN'(W8e3Q\bSA7VJFKvW&Nv$iHUb4(qHa]DdOdd_P_n1+N$?^4DR+MELTzu U"/a1ANV[VCe)_Z/w%0P:WIu&S>?0ano-r%4UOfg$DKZD_eF-5(\=L5=rS5dYE1Wc U"xEN0x)wmi)M8mL8[R=Cf/eLBG+$hQbxk3:xH>1In6p$U.F8]?p8ir-Po/SZ#0SD U"W*1=snT&:71K,SU8j=b2\T4N\kUf[RNOe:72PdC;/p>/=4oAa6c8a3#a$n<$c9S/]vGF,PDVtb:nvrYEusr_Esr_9? U"2,EbV$IEJ=BF6Yg11M&RjjHBn^[Rd4'=aS#dQ+V88wT8:]fXDp-*Fd8cHHvg)o4 U",8ecDObgzkNDC\3?6w6/$I3/d/8.G,L[y6*OPh>24*UyH^KuIFF05?RY'Zk;wo] U"QTo6.M[b_=Ikz8CxZp3EvqZ$CvrQ(#Fva9?4xId9mRuq$ U"H8h[8Ibl1,#SnUa&-Rr<1+T,oNRTJ4>?f:LK^ppPE U"0D?As\0LJ?]uDNfEkrZHB4F#mWAG?%X]u0mst.LU.38Bd/h6Ln+=,h0ZkZirg7) U"P;RR\\nVBqTWB#hvhn^^w,'d\g/h4]]Zw?,uZno],ZhqVj60Xpz\:f_]HeE_RAk U"D=ARNI*p;DCQ$%c^_FgN>qpTFN;kbs;EKTMvM\DJ&g8GG.x'n.v3_0K&BP5+cx- U"dRM/T]&qa?>)l(wGI'X,>y+2Yp&Nl^;A(8k$4rgl-;RlniXE0bIyF#$U17CE/zS U"00#NZQkG3/w6F0A.Dq74]WJ^2[>b9.sME^+.B_^Ud1?4c5k^2NkDcVCO:Z1K9k4/(Sg^_>r U"%HRCa)ovmbG6af>t]JGtYp=)vTpL=,2OM.5g.jc0i4Sd2gE4doptL%7-&o1)%89 U"n:.9,Ir;cG_ACV[&_c-#BTjavqS6#noD;E;61tb.0N[d(W>82_WDfxOB]M:Sk([fFHP%.I_Y?PlhnA&n$cS&ARgr_ U"Rn46v%=Ql7FTe/= U"ZZ3t[fY>?0Q%-+%M03OiT=#>::+]O.nU>7gxl$;Ap2(tPT%U0&-Gxy$Z_D6Lkbw U"Wc3]vZ(KpI/ARQBENY&*6NG1bodFm$L/HtlA#Z,ll^-XnA%:7JnI=5?I.NrYDE8 U"MO:O;h1gJLj&\?\FXsh;fJ?8DXbM#M)Z(B9d\sf.jTS$rvT U"J_*ryW+M=SJO:0xnNRWMZR&bcH6W8_rI(bIFnUxLq1*DLl>:?cjWFF4corUzEg] U"tBIn+lHd.H&rE+OEf39)hPtW&ca_QYdC$apgR?wKKpv;Kbftw%k:Oys(cUhUbfI U"7^_Rlb\1SY3lc<(&Ll4wv($1DE-fE)Z7QMg1_(5.G>TOKz$d9$DUu&e(a,1Y*EA U"_N4TSf,pZw9A,,oql4IJR<&AkKu4sw]hZ*KY9J#Syg#*n+o,3EpREUXD\$?td=#3ed5g5j2B'(SVJNf%;;#xoV4/ U"$[6vM8)X9_\1]LIohY'[MIiXgl3]#exEBXY=f9amgx?Bi1B,$lVQJPL/DAX%Aml U"L/bdXI1U]ps5pVqW09,_a\kP]Lpi;5+r]qu/JZ[zx'XtSTLHa])UfD)Z$.**'%4 U"1zzW7jqEf+1:)#NRZdnc5:LKmmHuG#:$%1&8jx/Oe(o\i8ro[DJuw:hrDY=Wh[g U"ao82TBvs8R=DIK4(:+NdImD#.3b1VZeC/^7.oS;v8we*mI&lCEu8b[R>BjeMk+0 U"CW8R8l^Ma-&D26&hRi6KMsn:C]pciF#1B0[J3=1,ILi6^TXk8uml/kpV_C4S&=( U"WtjO)D$N6O8GZt8sAEfTb9N9LyEi%%)S-$$6g?])troi/3R)VDrqGoZIo>1QKAX U"EsXQB&^4shKUcD-E#wy54lC25YG[NN+JWyiA3*OB#l*mhNe)SFS?T&Y;NY< U"qS2uerM=uA$&3bd6:Q%IHxi0Vrh[r7p^)w^SVcT&mCakl-OIiB.Kuc&$[[yr U",5InbEP+KqCI_jGbQcqCe$=vpIVKfKshkc;H'ao3%'p#v#9)La8V=jnaKi(<%Rh U"JfO9h.$iZ7&4Z>Ti,TF&nbeY%z=Rj(TUf&3wzZ^ U"N8FGvM0:X^nuLY,GbQBC65<$?Mm]Gm_?c,scV/98,3ZmO/;Y/cLq:G^Wa?h,$mo U"J,ji#X-9Ikqqg-uk/e9d.'R-jR*TnqTD2+D.6'8NpAV4uOoR*i:iETRCc?SL0Yi U"9fP*DHCjrC_eHfGavg-'<71^ng/(dg?v_]WF02'y]w4CqX0/'s\MCN&Na5\dQ;P< U"P%L9G3qTwH9n.0d6Mi:+N=UwChg%5^#txUIMC8,Ms=R-UhrTV&Bj;HCo[xcN/bV U"U[:ifG?BYM10BEPInRB)L(d\5MikTKf,^?L/)Iza#Di<[$Wqin\TwbWYq4NOTx]rVb5gKiRdf U"fi[QIt0.n:3sV9$RTiAuYcL=MXsaQf_1IEXoU$\',rLMfJl-fo4JpGz^OSS1Riu U"=mJ-2:HTo4ZqLbLeq*Yuni,2a%_Bn/wNuV6/):'VyE1EPZX=C4AhJbEws$.pvGs U"9jO.njdql8 U"0w%(up(%)9%%[%-%&bm]A1YH.Q:%l%%Z'l%%0%%%%r%fuun%slSgRfxML)JBH\; U"a6Ur?=uZ-alUL18R]Vv,34Iprcf4T%CDjv)9]JwIpw=8&1[[eR;MOyG'Y;YZF_? U"KsPhx,>#$t534n1d';FX&g9YsMesQJhZE2sj-r2CbmA*^BrO53r'%^FoC>^D2:DR9?/62RgvDnC8 U"_aibZrRaUPRMUC2v#-%QuktQb86tM0NaVn,,Z9REJ\(be8CVvpg?K=;AuO,)/$] U"MDg>2K*S1WrL;[z*fVVm\H.Li?IJYX*9:wBK^WYlj__2d U"iRw^D$KWYZ45u4cOP$_;c0B.j-_%T>LF2#g^(J5hbisP/s64Z'i(UlQs/#;]$;\ U"igg%bvWi5I&qDrjW2W$_aj*6C,GUfD*-rQ$Oc\0[i/#s^AnImj9s&h_-k<-&[au U"Q%L'BB3&2BrKMR*tGi8_\ral:k,VCV&LaF6l_pdE#dH1R]zDFjbEuKb U"+Wo^vhdPbDErZXc-Jn U"'bxr%J8U;vmAt0rikI9uk*O6u2r\l6*kd]*St[qi%Ih8tCTSsc.LeV,52To.wV% U"RFHjcszPvW4>ur=0_tfmfXr^_W'fl;T^Gsx+V_>rdwV,D6d_wZN?1GZuLmmGkHk U"Uka6Td.TLJ,TQPw#FK$bJbNniLEQJfkEud$e18Hw8aoddk'kSJn-iSL%XZv,6:u U"ifggF^8:Y)x(KmjikC:ackQ_SR)]CQG=v8R74l3':)CeXI_rf5.%]'u?pMCEZ8K U">[Wc.Rb\A:D4X:B69*I7:Y?w>8(S=i+r0jl>jCED$X'P]wWW:+R+$t\D_Zc3In[ U"TYEbY=UZR>-c'9xOLEN8z:KbeD.H]\Ftm_75o),L?:nTkiGT6CnL+q9g>L,KhSG U"T&y^Q6\VQIS0/QePu]/^m3xv(Da;S':)l:HfYS12ns8[1tDGG\#yy4'c8<3pe:Q U"uT'9>cxXUd'XrwDh0k/FI0k*85A%YRaJk'6L%adp?VfO*L*NkI;eff[0QHh^qX8 U"Bc&CWeVe/?8?cbWO9pjkvF=:c#4]pK=:2hUiYB(??Gd<(U&iLr/*5s)AX+7:M$A U"Xac5zAHAgW'3eKuQ]2H3#Xhni]?w%bvU)vBKRA4#w08i19Mv:H28dxmpdsf&[R. U"#9#4Y]$u-)P;UasIF\Kv=m:&qWqC(1 U"P6#l%NN&nlD;iBLV:+,rXs$%(G>,6+E6#L7S)ZBh#76OF#G(9:7eX1^8Bj'nPlW9):[ixx2E=nu)+qq2?nJAt;DdMXgGt+D_G(c4%\Df=C:*)pkJ6/l7$qGT*P/ZVj1BOdG4ECP_>OL(Q U"r(L3l2B8mRYKBRQrp2ZAUhC)ZkN%wxc9D=ZeJVBG0]kj)2E^ziC#[r5Lsj;_/X8 U"26jF]M6xkV>3BwBUYW\[PM/Qz'8.2',SgkVnC>?[m^%;Q$UmZ$;-C,aCfG7mRC*68m9?xv2# U"-gyi\?\&,4'0x]C*-7PE7NIGLgKRiQJ>(v.t4hIYe5C;/k1Ln]G)A3AYfi6l^jS%W>cAxE>;/9F>2&O:. U"0#HhdD^S]$6_8]Aax U"YaYoRNFM\u#8SR(4a%IGPPNtQ&\K>t4W:r*\#SDI2eXd6#]E*GG9_KTBJyeoZ/S U"f5MfL7E;N7.thJdiRRHpuE*MNw9rIwMMoBU]\L6bcLjh-hu;X4*]0fW[pui#bN&=u8_ U"C0])'?2XjOz\GZ.I/>EC1AM(_O#-SoE--/IB]Tl)LTOv\O\FKT1eY45p'?bW10; U"dUChC6BJ'k[;j'6hu'3S&2NYx#EsrKDV\.a*eknH4b/YmM4D31GmK(c8QswM%pO U"-xv3,\mXloLDjujTVVldIm'FsOM$=OITdahduLCONhA1B%>EKA'wC.$DI:V%Lw( U"\9,PMi9Jy?VAm[sMoC0nPJvnnZfd8NK+5KSCOM%.:ubqJ^4:a> U"pOL4o%LE6=[K#g23%:b?,7W[J?]ciA2nr1ON']RAAM%P$E8J9OUH]uvIYof-S3i U"8E&m?s&,XkrIG%%30oYU_66iuR8PqKF:;c^6;+M1c2Ci]EKxibQuHej=imH#7wT U"cc9l1G#8H1Igto*&U9Tn_%P8x%*6-R9oqxJ)Xgp4M+l?HDmmyw+F. U"Hvt\gKWH-b]lDX5shC-0Ze(KJfbqb5^AI:+\:-LWo U"5cPt+aS.BHvzjufbH%1Qhj4K?W4eBr4E3nF3IeoV_#2?)4M8uY6#pfZ,l=dx)h< U"l4.Q'vHO8aM68B^HJq;OwYf4K.XL*&%TxHQAP8eR$ZO;hrI?;Qsh*%g\7n+qUM, U"<>yh^yHaGl#.)qmm1*QB&S;.KAY>(/%ij'H&fcQn4o[Cn;=_N_Kna)o?CeWy^.P U"kE=cBeBvuce+1-IwRT_816PNXOm>J;))3N<#y_]v,ZOR:YjGTO]<[Aqv=4>ypdQ U"#,LN,2A'R2j>$/$OM?Vhpy/r.4TH':7 U"N/kzM+Iq8iahggr>0$9b9]f>:?#W1o][S-HMn82d$'aKJ+H8or;:\)lGLoxHrB_ U"y&tR:lmEiY<.#phNVc;&L\>DD_Q2Uqyj-Ie)J#GE?#sa((cd$>Fsnt^Xh0>Syf& U"?Sq3=_MRbe=j/w2[j&I/Y&FcWkV3]6F3-UAW3ZoZh7T+j2Pj?1WmK^sXky1N\qC U"gE9O,OYe+<$Gnb'.ZkCq)J/&ugp>Yc(K9GQ2iADoDg1QYkwBoRc'O,/v U"e9gr6/Y*GH3sPV-?n\-b2(>nO5(Bfj2C*pk#8kwW:-&)90k4hE*hIlJ6IWQr4uq%24HtmfeehKwFT:E.dlblDc*kA(.hj\HjfSM U"txMq^Jf,1[h*l4Id[J&T?1C_G?I$sg^Ol^h%WE6&E11nz1#)[9kcS#Hm53c:%2E U"560(dj$45f#sDs+#EBlQ6\:weZ1:=*%,vfm$Z(q;IFgm(X50Fu^M'U?qCKSfM+- U"_s/r$1$,]_cEg>o$N2&i&r*+#7N6:VTW:djbs.zUAd#%po3g:%LXE51GY_BhF<6 U"P:0[e1X2iax82$=]o;M,_jpbY6NCN5x9p?Q+CNT(\VZ5hI/OUOmQwUX4:2a&W.C U"N*32R[IgdqB;fp1^M=mF'U:F&d\r/]*^j):U2Ob/IYdBTHqmv)knV/2w2o6ub4C U"jiwY?Je+AkZ(e)X8K%:_P[ko:D1mop:3kJF:?D0C1,PA?)Mh2U5r[obUJMK9l0k U"O;n-R=B[.,9wyZnQ1=Go'Lv)6jqc_.B9^7L&[:fOEIHS$VX/o#JVtvh-]6poq$wDUTkSDs U"kkPCKR5cPPM#Y4rx:ijj$fc:F]_1k*hoU:rw U"N?nmlFJUJ9i1uHXVo1eKwZ=hIF]%w&&Z(6mt9wL1haT+OHMe,AYjshqWk7S2Pjk U"%ZwU*w_OZ;ZmjJ1OKD*?\2tNO_sd%b8RV3,vZr\X#A%%En$W6C]c9#%-H&:PLl[ U"9%9sLS$GT9jE%)h#Y-uMM;r1aTv8W22ddxK;,tqO&3,Z\4>%s)#%3h.avhZ5foZ U"LPLx2c_5+u$Lo7C)Ndo*T7%5M<31m4]C-dfm^kL<]:INC[0%=-=#EX+dTI6,%Pc U"-3+Zs+I3Eqk)8%*Q]/Zed8gd+dTEouhhw4HuX*VVia.pV7gSluW:;Qk;_(b9 U"n$vWX.mN;mLy0mm<=Lke.ddsuo=mf74ifrCfk#a+.AmhXKo:_n0DQ)lN U"f.&eQtX'?u)HwkdZZRfL]$x'o)&#wKufN#ZV2U0%z50)V9yvC9HSi9W;NvHtrP8 U"v/5v.wSw$f-?8Wg8=c]P%O6SL[PF[%z(j<.JaYawGmpI,U^%-b]g6Q*>K;%?Q3M U"GT%.?Ehx]>%.24,k#3_E4mCi$#vic:=[YDu*G3[7kOk4FbyR$I+k].HgT5ew=C% U"47B7<+gn-I-.=]5%GB1-n(zT1u>:sLYnLU)[po%7FgIao5P\IhKGY:7XfaAg)[d U"X^B].O((U&:eCWP0E[]'>mqjp?#ki?FB* U",dCD?Z4=-fb0;&n11vt(GV[48m%>1cItasGf(s.xW6c4,z3=m\*&^%P'ArI5#Lc U"u_T>X<\ej57Ug+(Mcr#Y\D6F5JhOs-aF>_QX.jg/'2IKt]._AnV8BeVMp_D/0=c U"nqG>;,0j5RX94AsaB5^4-g/7tkjf50bM_H2Cc2z1V&'8JrR3X*NVR_llMHIidCY U"Fu&iea+Vwro'%tIH)+/k9Q#S]uXPW7qHtMJ8/nSSHGHYfFB^]xc+=]ef'*,R3G= U"uDEGD=uTOE1A364,SI0afw]#D*Vq=5w?/eZFmvJg$gr,bIt,VQv$V:4TJR^.ki& U"iSw4HFk&e_FV>.Yg^whHLJ$4#c*9hnA])^Z=->Um)I]E.P7&r_X#UP3<2B99OPB U".2?\WPAmXhlswaxhC,Xk$ukgeRj+S-ee/0o3?*,IhnFB6:0C(sptw)$B(GFmjl$ U"<;^cRc45-R,#$h#fo67==Fd/s-Xph#g+3XAWJK&a;x^S(9J0BUnlsFPs$.0e[yx U"0R7JudH&XCBOpcQqO_Qp.G#z/w2FuDm#-TdqsM[F-.C^_aZrU=25:%N<\^TmDKs U"M9b)lx[jvj5.JqufFZwB7>8MMKL?7.TcTT3-8V1TC05/(4lX5+ U"8b;4YDk\G#,I,&Q%lt#54lXb-,k%8HWq2f6_Q*walQOHj:FJ?vvg(FIw,k22vmt U"6Fg)QL%x[YAB:Px=(4)vQm,?KNVyZmsn%j<3Jq518_9oekk]pc1x*PeQHv]V)6m U"-uN[BkJ+eOsj,Td]-4Y.D&];9c.pus0vbc3)p.CJ:uQhFZn4.s/]$lS[E4a2&y, U"M6_WND.l8%nt(4lSUrJZ$TOqP&:88F1pnbOpekB-m&tn),skD,JUCaPNJrbG;B8 U"KT[u4KpVJ;AFCZ=,'+30EGL.1wnU-\14nbJs1sJtWNTP>m#9]'qV$/Km>cX*F2] U"O7/,obaSo*%P\en5^;K:P2CCd/XvIQ^\O(YuHNDBTcyIc?M_t-#iDj/FHX U"amfQ_$YQSen^T8atPZRY=oYnbh:U%U>I:J9+.CI%PKHCe[rJ)Fhr(UJ*WBU4,^q U"27B94qNAy9P]U%0Y;BiP0:^>[6Oa/v'hNLf.+IA5PGF]_G0hNa(=uLC+hF)AUOi U"f4IagQNH)Nu'2Evc4S=nP>2'fE65h.o0^>?8?/E[Y8.s^=0At5fuGO]*_;o*pKJ7 U"36bloN4Jh.tEsU/QzCcP9bEDyfZ?8%ztZtmUc8Eh:GP$(JZQu U"QYRm8kre]oG-2l8ezY-jadCRu:D0E\/I47X.R:*PEJTs%SgvdVxQ'Gci_zf>ld$ U"*M[mx0(+W.m12]On?8u;wX.RDLUpt[+tMx[KiZkzhJ>:^-/8WftLRW?C]^AAPSV U"5MGGD$I)T$-Z$UvE4m^&Tw$Jee:4Ll.T+BG=B)=^ZJ^a1mAjoPJCpurQw&Z[HO: U";kB,;)V]%Kjr+9,WPw:e%:;J9qXXUJM,:MYDBu,v>&i>eOpMf$^]*X<&jl0KS3f_$UASK9RB?%E5WCxI>f^DY]wM;Em*deQ U".xdWrm^&_O,LdRp\gHo&aGxMOl>vk;L[>AKUY]zm4h/h?p*Tap+\fa?%Wq&FrO# U"SUTLrTMh>Oni;#;-W3PEB.^VeV>q&MiGOvJbCM3N&*Y?vn4aJNkH,m;N)/2-LKe U"yKq#>?=>L&)M2?])LHpge<'LZ#RK+SRymDWuHy6T^ng_%?K4c$ncGA(BwEApt(#C8vUg'\3UzN$QLG'X_(9TO4 U"F:18n2&o_cEKmas9q2SgzGX.1Ord&PPBBT9(qgA4>jiuTEdS;TE762:NVB[%j+Y U"-mxv-qx\^a>Vk3Qam)cu%u7RHqZv^7k=F.fe:_7V-5.ZgB1).IZA+)%[0sQ*IjO U"QP;e+)Vh.Eil<-'.2df9Z2SWp^l)B[6At[n#&+Dg);ZzsrWqu?yY,\'NpExN1$j U"Uc6.:o3I']as9tHK7uqqD;E3[0O<,RQJA3&Z/h/)GQE+VlOQ7W':p-8SF40SHUX END SUB SUB V2 U"toiQOcZ6?ZYH6NEHrfElUCh$^I$U3z1GT;Dpc)RiUG3(Ytrsc4O/tYlun4&ljLN U"-8itsInW-%L.Uz'^lQ(W'H:\dd;*Qm>PQM'L9qA8rgDWr#1n/]tmAWEzRIUi$y# U"4GYO2VoDw5s%qOh[plp\l452CjjJfHa44XN.q'p,(a-*m]oMAg-\/U#JZ]3^nLi U"6^/p.sV=eoF#96eqk3UgKd7JX,?')=7%>/W9;C+R5S^uFm[m/BS\554T/NM0)f# U".CVuLviC&*uPe4j%#e+83+KRauW8_I>Q?nl%#&\=8BAr4nD*GQS5603R:eM,Sqr U"jfnhv3i[/gZQYk1[pX+;Yl<*SsE9^>fpYdWRkOE\^\:sa05s=I U"ZDu=C#v6d$=to/$VwKto#)F,9h=7(kO3pGI:^OY[u1mtN89Y?O*R=u55GkFM U"t0HEPM,rJJWSc7LHrG=jM:B$HQ=[bb&]q?,sE?C#Rt3jI2BMTyC2Lk/.[IxZQ%V U"_kRH+A%ZD?R:De:o*NTs9O;*SqYrE:?=v.ecq]$.RX:Nj5(aptvB;L*;YXj6Qq0 U"opu/TPg*k8A$ahRK(G]cF=NGG4<>T8(0K'HvC$:OQ U"U/4R_1(g*;-JkpN93M:a2?$:G%6yYTE U"guIW]2h(\Rag)M&4C0.b60E\X9O#(5LwZiEF>_zDDEf8.%VI)Mf2K^s]8HP0HT1 U"3Vetpi-r>Y17'MIAZ8sx7;]^q2O#FaS0,FNWGM=nL[vqOuEI;Dj-lMxBUqt<1&SeoeyW*jG51h+jWB?8WPs.qeIt[-+x)sJ#TF06n?-;gi?;LF U"Y)lz:B'K]i5yswM[Smd&Dlfw.$pl0tERg0QGumNftl%*\**]4YD[l2eNxMes,%S U"(knv?8TC>YQ%7xrj)u7DQOqqsCf-?7LrTaA+&GL9sV:4L)?TYn#LLi[:ZYQagm[ U"G4&dg5gqh(#N<2DOM5EUqDg][04/MrwYbKIDpQU5G0HD]G6:;UGGa5Or9/b'l)i U"Aeh^$ibQxq&n&oIad2=Gh-4\E2IHn[\8zwT?5]6PsT9ZT-NrdYnV(ExBO0uE0Ga U"K*'U7QtAk,K()iMir4hCC%*Jy]4/;.5On^UYrGm03tViPp7K_Pb(AF.fzM6T>qT U"p[V*$6Oz:%Z.j+QoOBLus1c+t:n+Th3g/($ex[ U"Z0LBn;oSHD=)ck4(H(O=kt_+$EEFL0 U"KC4MzfOn&FUEBJvkIL+9]tW,fY3^tK*hD=MV7Mg-+US\g-0Yhb:'N.brUX,*a8AT_KT35^6^Hc*QBDPlC*'/Mpw.;KAh=0D8)XR8*?f0:N<_; U"(T8E'0n_E1LwgJXzSUkJgZ(h],b<;OPZ*mo]:m?aZCH34dO'I,MYyT/zE'q91b. U"0q,*cjg2kfh,gKJ?)OcNH)Og^BDvR]=RE4NDVj$jXR# U"b&g.dtohW(YZ54(TjaeF(K6^9'2MuSAR*K;P/jrAnG7vC^'* U"Z9aw*We*eIQ\(i[y4E>o)']tUhgMLA0?^4cDrdQnU(L2pk'j9n=ugEf0_V\ua](3 U"rD4e,\gEN4uN_?di)#,'M=yue;E\f6W4mu;uK7)^6\'3lM4%QsJGxKpklN]q%uC U"A4yf.#We0+dAcH#7O$%jD4Vew2^6(3SB,SER04?TYk&fXhNf.WDbRLOjwQ(3C8x U"Pzp\I*R/\')W+(e*)q,huwHTFh%]OOOh'3g+9Bc1+LMZG#9-cc^]6U3_.U6zs/C U"ZwN0TYbDY]oH(+m&1$5d2coZli.x2-WeZ%2w/^CQQSXvOC?xZdwx\-5m-43dhm: U"?)I3ye:MXlA^8.6GkX1Gl7eCG+S'GcrdqcYA$9im&9-3I0j#->1?Q.7=3EePRaI U"67D%S,o'ZMVD-OXM:YRE+MZ3D3I8Y)^4cL>]7p^X3nHU0N*Qi+AH/bu_);3'wv; U"eI*4)-j:koDWYl?&UUasY*3:CWxN&;Oa*2aXjtjRQX U".r/75^K#3\o1Av_.wcC=j^P>O8nJ,%71J<8A$ U"X[dT^a3hQMAu%TiRC?sJ7_lEd8===<:g=?r)/(/GImr7N33nY_oA^VkB.yunqx> U"vcu+xW00I7%q^)meF/D+Hm]bhq8k0\[OZ8b+HAC/BCFGAlcNsza2GpisQ)6w(kD U"XRVjY()vmG(tG9kh[xS;o8zQRi%3?OTn^%D,vUu;Zgwc(ns;CyskM#NO*;O%3s( U"g9%6d/3HwVRr'WzE3J%YJSPH3$G%rDfG*K7ipX:=6II3m#Mo7JJQFaeED5T) U"dGc+.0YbyQ;HI%T/iK#ap6d=KXDAgJ&75nm)dBVn^Z3W^$k41.q6m7QR%X&msIjJ%+ U"iACL%D]u\CiPOzTOaS4,fdI%_0:NhU9Eru4-*ANcTKgX5%NqA9lt;InG[\J(2/0 U"kAR\-OX]*cUY4(G=iXOY2l&Iyy-[6JWcE%erR%gNIkeL,(_4y>kYtU4ol)gCP7/ U"4RWXZke*kPmD=1_.T=pFDkwHK]5#;xGSwB??pQ2Q/bEOE&_Yy-(9Fn9g6Vq/:gZ U"d8][a>jY611X$kvPb+.znfKki/L.>c1;kJ_,-Lk(4r35Mb0K(=xY1s933P+]1mG U"O4C(iqjv.%iKiOCV,CVnZ_^6X(^bu-p.\/n*l4D;M32)p'p-Xy\[Xf[^7=u:a_x U":lEmUz9toGY\Ghoe9EG\;^2-F303Hj[uV6V*-=hD)N,t/xU?tjmlVb]L9ZpsVy# U">zn;/dyoZ(5nF;*OP0&4,ka9VXQFZ1_[tZQr*M%En=w2Rfd\xm?>4:Lz5KgQTIV U"2ruQU%,4B'>Si4n2kiV&Sox4C^]AFoO2DM#9NG#P?3Qak0VJiE8qGW^JI=ZIYZ;UB2:OrwEEm7StQnoKU5p8ryD.j4[o19e# U"S)6.8,Fafx05m\eix,D8o_<6Tng=oCNcVcN[&s#l=Mh0#cL:ILm^\nZCFt]Z[H/ U"nUGujmgNhJLJE\u&p'ZV U"xHKFoOf>WVPqg6us_8HsGwIg$PP.I]?Nv]%W(A/\6Xv9TGUSuBsx,LASPZ=[K,t U"]kOO*;w].MK1\aAr$'WsRQ5d:*p=1$?:IM:nCVvoew2ZVfwh U"4[t/\eu*CeKz[vX&e?K9t(daLY[i?<.*x9gPE5-2TAlUu1wswud(bsZ]GdnjbS: U",CWcPjZ0e\STvkn,)fkGo*i;][e4:HcI#fTkP+/Cy5D(pKdlrd$LWu2O5%6U>Ji U"VQKDq4f+u^gA'kT]/:p]PRi>Tkds]qz=(lH0%,EMsa^^f-]R)*8Ic%bjEG2+:>s U"JeHjRD60NNRMUN94vwOt(L3>l_VGc_S7/+qbmf7'SgVSo1^htC#m*4t*Uut;/%M U"/ppOf)O3(j&3kCTV[cpP:D%/07>h5a2*1R1e/YgXMTW U"0p.uDl^ruTBp^Yd7#2ni5u>*W:bJ:rIN-nD3rYJr2ve>ESo/Oc%28d>0vq/icHK U"r'NY,?Y;]jnbQ#g+j*?'mosQ-UZAfFK3#)KOp0Gw(n*w)k_.ZZG=%6eSDh/z[h1s-. U"U]#<1DK63CUnwLd)Ck2-9\B4VFgxMgy+?\CN=;HoU4\7R%kq*UWqFpJ;6#h;uZlB.GmrqL<&f(BE3S\7V?>.h)hsh U"TWoq'>32S36Dgdbr5e2Q#L5f*bPOx_Ln+i$A9U3k4f[,rh'\#>%NM]3tyOtVV;8 U"%\*DDnuOF]3iRWdEL;Mwc[>_O$b(3^0amTXJ^S?' U".A$%D;Z2l(qZV]IW-')S>TE:fj'2G U"B3R(q]co.soo+1Y05/GW\5ekjIc_S?6FVzZ,%brNd4nuE6lh9hL/%DG+)4+4JmS U"Nf+oSWf+7]nU5tGiSdZaq+I7p:>vE0BOAl8jt=xnjd+0C,JuheG*SM386vwdk$* U"=9$a/P;rEE?%?Y7_3I;#KG(=>Q-n/YkqvkjJ9pT?Xu<9fCP$76^Zp+?ytLsRG(t]Xe.q1t?I_V2sY,f9+Lt=l,Uj0j_L83XL U"/%g6-]mE_VVI7)aDH(lE=/G*0 U"DO\)d0+$f94#wW463kn#y+3,#,,VlX>>X6]+X&oj)M$&p;Y\[,c-ALe4+8)3xhv U"Yi+8G.M60tMa*,(i-vf]v3dc4GrEd4xr9;VaA91%jdF5VE%].gvPI0HG;'nn,hQ U"+T->ag[P8+r:4xsNvdeUJj5l=t*cgIDQ\^9I7kO>PpLadb3.0,<7AiVJeXd;^xZ U"KARpsg'(vVh<9<pTJk(NKid:_7$\13u/c U"VN0(;gYb:LOh=Dp,?[+[w*sM,k%o3O/Ha*(w0-ggi5%#QAM9;S/1mO)zqEsa%1J U"vBFg'1FSXQ5o*Y)tRy+$ieq,Pq?gvn_j(OYp.n:/+nmgh*WQVnfbs8CYUt8.>GI?QSaP#_[gtP6mB%\:P_q)Y>l1_e2Z;ur_?pQ.Q=APCb*ImLep U"4AC=8gWlJC,mI/mm.TomxRZEvA%&^j.%r5zbX)[6iTxPi8/mL=^tuG\&?G;*U#[]-aJm(N^kDt4*k\Ya2IZvS U"Q/EKh>R9YWkfa\1odB-F0P[u>xSVQvT6>?-usn6xt&mWBJIDfHDGVfD,-p>Idd U"ciZD>/W7]ZDj9pLAl>x2fhyn_n:+p.I_hxa\l]\oCkELxY=>0/1Ok=0AfNwXW,'49V\.Cu;h:lh?^e.FF$E2U U"A\.y9xeUZqa&Xo9d&QW:a*1B2=cN<0[UFg2cazN]/o1^d;G)jOvU8c==./W&cn7 U"hpy9(;&'v;()^iz_(3_\x1=1J4SCl,CG6&=;B7ZJ&S;==T)<145_2\';F6xOwf) U"pwvYDiFZ*$VF$3gK7hZ[xwZG>ohETOabrrJJ1(LdD*vuhb\dnRhdR(+]%yj=s&I U"UV+KZ1r_-fDOyyK??:WQtyhS49OhG>>k8AKcz%=bl7_;=l,CfW.;h^(W;5s.jHdU?zp;LUGdeO$tK;fm U"wj8Vi4tz[R,wscJvb5uh#$p6vqQ^YTo75sThtjWNLvMDgUqN.Ngi69T\sdLEiT+vM U"IjgYiS)4SH+j;C;f3aM1*?lQ=g;fh6_#DU:npF6OeK(12j/Ud+JBn$TrVx-8P.o U"2#ZH[mXj&xq#4Hpn#z*U?EdufU*BlOG(J?E89%MF'*M'Hc-g*Vz]WDXCWZ5>[cL U"%cTGwovC22>%e*$6^WIgbDQO,R1;JG9T*p_t#Hf0HZcC.5'tS7&JTTAZuN=[]5? U"0K:BI,Yn^8Ku&_=Oz*3VhMEB7/fAcUzs$wLE8XMRm.3*RYRRAi2mMppUI%Akb5] U"(7u:sOCAn&^e5B2pffkmjp$O;p\-+=u>KPTY'f)Tfk0Ho\OP-4Jov4vppB3,cGI-km[t?NkT8;qdG U"bCNb^Um]\k(Jn8:^>NIPP)ILjim4L^_qy6]/0zC,?_?m+1]2'fUMuQR:Q_]e-yElsRVsqD>#g/%)S U"Ca9lB$Go*hm%%AIR^[ex:#9Gs'I(PDY4tLS8E';EATda0VWsgTQDvmE78tj[B0f U"iZ/b+&dZbq/CPHOT+o[6eeBcYs-o26L=k9Bj0dd*p?O)vWQbii:81Ym34BMB:QK U"%;0Up+X:H7\^N5E)?YkWmnU$C:#4d)Z=O0N)+.B('9E=z.\J9U9>C$4>2']ueqI U"'D6LN6:drx.MA<+b%S6Dc6h6d67*o:=0DesUF0L*X2+zM9il.FsP>wnaf/:l,b+ U"2nMAaLS-'8r(]r2[)Tu9p5m&um1DW5>y*[vFS:w U"E\,Nk2u#QJ;HAX*;%JgI/%XtkBOQs3+%6SNgF?r&g*6tyB4<1q?L#($B-_A>tk0 U"Z(ik1(5x^D#-gldHDkW%O-RZlUA<(lYUOnANWG&uG:E=3>P=<2]lbDbb(FOPFSr U",Scu&$:jpd(#pe$/=pL,L5G$0:Oj['tzga]ol=MYs:1-j\eXp56jq7Six:VF;OqGa&4Bi.398R8Qae.16GQ1#-OksfSz'&Cf U"0PMR7iqdeh#LHmBG?9PK*Lu+1:8(*jFm=R./c-:dK\3QZtM$A-YVyA3R4W>ui4R U"+8?Ae44+j\HJvm*/e8C&p9&d.8_bM:M1UoibLH.tPV>EA(n0cP9q];+X&o/&9S&9KFH*)tt*ai>mWsL(g[P'9Z_ U"4#V/]9R2][M\4eyM?*I%,z+N';WIBEm2&H]k<9EIOQl8=?CGoJa6\E4J*r5.+#ZUhJDm?)9A?n U"(+Y*TC._B>dt0v[NluvfTBzVcIB'W')Oz-;2*6'jh?48IuOm1SW/Tae%V2HR4(> U"yUyM)%kI?a0s-tpJ'cxFS-<)S-7*g]FiRlP(^['ug%hC/>(uOviHmYGN]jq6Er[ U"wEf7vn&omzWh+TDqBpSq]uVDE#4C_jfOM0<8(q#fD'i##2A:*TVKC?dNp.U39e) U"&3kF''c9tHox)?Kl5?V.]n;\1KZ-P2NM?2q4COYl_FQ>^8$'E+7z1+FXL7'=T%7 U")D=0xZCn2KF3^q:]D&cYV[MC]P(6&xmA%usV_aJFH+*[CIbm+QmfQ;Q-&AA7:4D U"6;$\r?u_9/TD&+%rD9e+ U"y,I7Rx)l.;cBK6,PXS9U1_OXr7o.fY'c:V U"1Vue?rnZZ7mqij/Vv<)^;RW.)3&NppJ]Y/t?0R_(mxWY#PRsBBLKPVKcgeb4bJ- U"KjBRFJm7=*K$jx1w4mb+Dm:=6s\>;X&owK:a,XP+U)&.5v[jZTDNMQepb?UUTY. U"r[yZHS2?,Ymlp<:3U*M6sr+?'X\t-]L%lw(:CB(,'l%KOnq)Tgk/PooGAr%$2dQ U"vR9[A#bQSpz/ulCN+PLg0&mIW]i/tDYSAMc+[OrXLMeiUMHxr^\kwGY)X9>A(1h U"l1W7.XeOBYT5Sbml%L+7bJPdO5ehWv#2MTmle8]+Tv4&w/RU'RNiJF>t]l=QT8A U"?z-8;J7/e9SLK^O^bj>3#9)l:929_#kwBL1OwZjI>zf?g^:sroNpWJ)I+/m+oK2 U"B2Be,#JgT%d\\iq3:E7(8Km(b&5_Cs+FKO17r/?hr=s9aOC'G U"fSyj--LZU>=MN3OnxVeW\cuFxofDU8B1M\K+)D'H0.tUcQj)/c)VEK(YzO>DuZ1L\o%7 U"L1U#%tVY'EC$qz&,TDMa*D8a0_hF_Fw]#7';]bosaMXisLv)vGr-^gZJm#.[r.( U"X%vpdAf4f5WAB.PG2urL)ZV'JWjeu[VIs*+kwBi8jIt%;+S=3df'pIO&B[tjdtD U"INY-umoKJ_m)_&&Ue$9.HI*-=EK0u&oFuRa](G#zZJD3[p(E?cBW[pBV-%sCQgG U"E#r*Pyl$XLf1Y.'^%%CU;f6u/)oUX'GEhq*,V<.C%.1RNv%%OsV1YS34rthc2*k U"h-Ts5tc[/(Vnc5M>A9dL:lG6H'MI1Sf^05^%rC0-s'NRr&tyx0R%;1E+C.S&u3E U"2Kb\9?dS3k,^1)O[4=G]5n]GhnC_A('9E:3-AsZHm\;5p__dS%&c/Acioowr'$, U"j^DxfSB=3QJQ4Q$X7K(XV_K/EPF[-fc46NJ4uXinRf(VEa2lub$^n:0BhQ0k9tR U"$u0H.S=\E%7rV)7_bde7gigTZRUD_1kYGV*tn?D/JY:ev=)S\7tb6vfx4A+ozZ\ U"=lE#]=7aDOyWwBW2M$K)SXEQ#(zdOi3a6OH.2K+Zo+O%S$3a(fR&EO9xns4>pdg U"AGJ5?TSbFm/pWZEaG4q5CgmO;gCGE)9t'e2KlY5b8k17_NN(S4bQOZsNi1l7^&g U"dMCK-v%k3U$=iBlrn-=YKI2a#1Q=#OQDSp./h>c.:Q\1nXq;l;%q0fcZBdZ6O#- U"MCCV/RR)9)B+LLEc/^E3HSaKrb/5pW#72z(CcQRr0QX;Tg<(DuRUn\ U"OKU/Z1MjiQi7r1s7]1RkwS\ld=3VURV8\x;iL:0l/DlS)Z'Matov445;EZkZ2/# U"Vh?B[Mp$qapT4fI_9AA5XHi'oBYemQ9WE:dBEI9mY*mY]D9#XNiC_+ql04JTdrI U"5u.SF(nls0X9ZO1\(qcyda?k9W7E4'%liUJw+_\#Ecg4aHr,&)90L]rTH(7?(n< U"Daoi#y#w2>1>>Wbq,LHfFW-c]c1w'\W+>N/o=i79n5q]w0+SOJf.3//7s?:'8ZW U"Uw:d.mgZ#/pXgmZ\,,5=aiHNYJ1Q'I5p3p_,7hK>.=r\b1TFw46'fvYKJk+wYV\#WwR U"Q9#yO6PvANvLR+d&C2/dEx&dfeVM=e#b6,Y3w[dMmiH58I6AT?'\b\>Dx2Vr_t9 U":1g7/lI1nu+_4zz?PnsH?N(=Py)B>8SuX0p6aeU'i#499Q2M+,Uco\/*7DH]Cdz U"dzD10IkD.*p->1\I.?W6=4.=f-I]M-Mrp:exeWl:Rr$h$nwKC>[$R2-zq-R+c9Z U"jDm[a[p;>;>.br4rkK(J4ZHF[s_Hx2qLuGxb?XO0q+ U"g*8\b]]c%4i,ak1MemEH?9%)Qh[fJFuE+n0i./zZy-N.WZ'qg:rKj%q.3&9(jCV U"%6Tdf8c3C$%k&D>%o%NO9\3(te_3'h=.[EMRs>J5)cCvXa6i*&BGA+a6Fv/+C*K U"EhN]hqPL3M(+:=4)B[,D'q&nnm;*\$.=?bXYgntp::jvli=Zn/(A\A$VTjL2*Ru U".0f)FL-l&0H5IAitcSDOhPP0-xoZL33,9^S2M'kVrRHSSCrP)a]-2tb]Am5ZB\L U"4Fmg1T7kx9bztf8bQ>;jjgx#]Jq7g-Jw\dsguWXq^1q(>_k*5BNQT?2s7pPa48) U"B7#^L_+HGKvo22NGet^Wnp(o>zhsP\e)*?i)qn^s;7cN7>nC$]jrCpUyGiD_:G4 U"UbP?JQk;]pIDG[m,y,wRB3noAvGseTT3I:+jN[9;&UpVBH%rOYW$.mY5HHi)$7* U"7sr3U8_OqhedXAnA?4,Xxr*/2<82EOg%RMH(BNA6;P&;TY#6]uhiNTn9,S:ZpCJ U"OT^m2-D;I.GV,.z=R*Rw)^m_1a1G*&=5\lTGk?=NU3EJ/'Gr(VzcH1KQl1JnG%; U"IcWy=;uxi,l\kW9Czg&O*,$7h_4G>BM'L3*SD>QyhzOXq-e+k;NdfYASXm]EgK2 U"URTp0Sa*n9K0%Z'/D3+EGZecdMYaVU9=NeQm34KAx2p:f]B3l9hqYb[>A=3F\N. U"8Ep>hk<5)Ok5q_qsJG)AxV)7)[W%3:xKcVbm*USbCA9Mf&&X*SqlnRJ'pGX U"I)iZTPw=f\4_Nlgl1UXJhwLztcQ,r=sKfKn3Zc5X3sufB(+r%&+%U:D'=T,y8wG U"55]xL)\iRu:15FR]&B(Q;ij(k%]0DlJv/QpO>SCC[^pL$WmRmM[FsojVeR^Y<4b U">U.g#s\Gvh9gXheg+f691ecN8rKna$*2('MTiH]]C?1Ev+)Nxf33ii0\N-yA^K# U"$TTq9DFssgf#K\--w;R\BioGQX&O5jYgwEA%sF/9,o6/GBcvU:;.n3mb2Lu7i]% U"C$&HY?Wg9aK$ovO*gjzVffCOd+/#n&=l(=VC&p'f,IT>8'[ManqxI+lTq^fE U"D_iB1pP8-ACNsym4Re.&*h\GQZ.KA=L[tgm\t-TRd[: U"-kS&WDrG:nZP2n)xoatcU'^yYl(_u//'kW,P(y3u&DDb)=tm+c=YvtQWuu-1b7Q U"QAW5I[w^mX=N5NsC)1o(T]LhB$K(KHq'ao]Mux%%up&%'9%9%%%%-g%3n]RAY(0 U"+]N2%+%[H%%%/%%%%%%%%%&%E%%%%%%%%%w%jfir#jSy'%yup&%'9%9%%%%-j%& U"m]jA1H.*Q:l%7%Zl%%%0%%%%%%%%%&%E[%%%v%2%%r%fuun%slSg%fxup%*+%%% U"%%'%.'%#%.%%$z%%%%% END SUB V2 V3 CLOSE:IF S=249AND 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