'=========================================================================== ' Subject: LB INSTALLER Date: 10-16-99 (19:56) ' Author: Mike Wilson Code: LB ' Origin: mikey177@qnet.com Packet: LIBERTY.ABC '=========================================================================== ' LB Installer ' To extract LBINSTAL.ZIP, run under one of QBasic/QB/PDS/PB DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"LBINSTAL.ZIP",4^6:Z&=13818:?STRING$(50,177); U"%up()%9%%%7-%-i'wIO[+xlr&.%%^'%%%/%#%%w4D03r4LSCGCVDa:9BNZ7,/))3t5Mz\.Uu$Nc^eZuAFM<9(&BUn&VT?+1G6'69F4C4O U"+kS:-ft0YGXJD7-3A?R*pVz[nwbTv%6,d?7mhbUbZac9I_i\gxl)5vbO0:%Yq/i U"#owAq#](++r/G4LK0gBi?&*I.ul9wQS.O<(9/llviN.ER]/;o1U U"%pMb,uFDBs9*[C$YGdAo2*]?#$_%6eorI6k4]GLBdNR8P/h=(66*BUKZ(SD[cbh U"zwgv,dm05w0kWUeLykBT[5iw-ox$Zo>)I2Pml'/M5ERe82X4,=DUl(DY.L-7X].- U"psoUw?v4E8Ll$bIlpP/=>e4gH_'[TVbpM?3gFJ6u=dKmng^lP6HnDThILihA'=H U">/?O93g'q)7l/YnEj5$MZvsF6+snU9e8FB*F92cR2.1uEGb[faF9iV&#Y'RO8(* U"):Z2%b+I0,YV5OCf68bYMgV=0F/e^ U"iVV%;'QH2pP9B;.C1Ohg=).;IZA'Yq]N1&F'ce';2AIn.:(EWX>0sAjfdOWP)?cq::\QI7^LliU\$u;KGj/rx-[8rjG]<6ba:env-moa0L+>fu_Wj_zR=lm1#9SJAm2a\$ODzD)r52%z U"I,&*HW,m^?mj,e:p0uDnl1+yA,o#tp_W+7>1_Gg;\qC2_;XnNtDhC$S0VlB(crj U"E))8(ZG6j1Za3]R5Z_Uo\m&Yv4Rj[et[A0Py2l:rguyKtLY1S-xB8b1D\;hoga. U"/FZv#B.88&Md$_E2IvrvAN5qNcgmkv,EAgq/u&AMh'^%2jh)$;PE4>Z(ZC=#RWR U"p'CuvFKXggl-<:+NUDSGD6P(PvBDP/]x.34So=cZ\'mB_o3v_Ce,B>q\TKwHKw=NCpDG^fkC7XBL$a1DT/w U"I5>)Yw=pw&=f+oj+:K;3Ar]gP$p1)]dh6beNz9qk&RE U".qaInyzrxs+88:tNh[fL5W5W(IO,kPM(E.%\VHJXda; U"oJXK=adX\h.mGHn\YlIfoj%H8uus#XoXQkl_F5dciuba8spXetupuXwrs5xu>/o U"h4,%Jnf*kg]M7R*B4)L0L*jbesEH5<*rKw2_+Y\]SnfkGGLLtStE2326ttE]29,NRnfk U"0,OjLm.C,Ju.o/ap5#il9(I^kAhdeQ]IwYubYQ]JsGbKw_t++,KLw_+YCKEw_SK U"U-btQ]JUGRKw_M+Y5F(w_a?/Ny)/8apjf/Cw_agccbKgw_++H,Kw__+Y4&qbQ]< U"L([r^[dCD_(f8NmjS>VTmnfkq)o^op(fANcBqs/a0#n?w/)/ap2E%)/Jap#aJCw U"_K/gUl9gI^b$,o-9Ikf[3cJsEHkJ'ltt+E29L\)L*B*\s$N7R*BJ%$PR**Bt]N% U"$Nmc+qIs/Ya#BICu)/aUp#kE(w_as<]rKw2_+Y8i4bQ]M#ancVeQ]aMldeQ0]w+ U")&l9IDm;ipgu58xQ(f8Nm,MaKe4CgNPiPxz5'v>CYJ#Q U"72]f-RI#yesr:\NlN962nfmvi/U=N(;Wgd^u>AAEP4PsG3W(;U\LK-dr_jIZ-51 U">UZcpCS.,EP9h*.#ttb-6Prr^x-oZC?\sl-iyakr):WWw,lM$4tTv$F^XC+wo=c U"VN4E-[JdwNJtcUCt#EfX[Z[CC34luLuZL%e$Nt-(ESK-2X;)s_sXT6+WkCNzbpi U"V6+?X<3VVUqTmQPHlDW(D^l*Yi1L_ad0QSss8%-&%%%%%%%%%%%%%%%%%%%%%%% U"%%%%R%%qN$qBXOitI?OgR756l,#5VVPEOJ2J/;$$iyB5Y9$bfcZ3*F'Yz$t?6:# U"&$7:]GN3b-Vi\ri*6+56w79l(S8kZc&rDX5(W=rk96Lm,*(Sr:zTQTe\afuqtY3 U"72rYz=$Ht[=YJ16o.)ZNg#-4Ohl7H#?wu4zs)(S:MzE%kW)P.gYE(e:9wZXHlI$.LltVH4\F1p'Nm6kmINP[o(TDsrD-^YS8dRz_q U"x2RiHzCDs[e5bPA[)4)/yd0Mhl9*kur=,64SOj:\;;wW9dpok%65rlaO?R;^tHA U"2]LC?Y/EBd-C?Krq^\]$HZrzFhJekq$%&PQc;Nw+C6zSFAhu(GZNGPJMD#HKP?V U"3R5;$>Olu1&dq<.Y[&?c]smp+Vfi5)>tQR9zjkg4#V1PJ$4rqeQD2zTL[a[/5rs U"]e^NVKr.t3EV1d9(;Xei6k&P]TpT\#[Yd5rR'Y^BhTz[[2JNP'?ozP-NhVj39Gi U"iS;jeHFx(aN'=^AQ&nKf^4U#'z>kdRgNY1M#rSgf6j?hAsW*5jsZFD9ID?%:.lk U"=fk)6h$uU#AFzunFc+,&.^zE(Z/>K1l3-uoh U"):&QNFzepM+XHObH.im596pHJtXk<%y3UHfUYj4tUVG9_z$7dBKUm.L>^YO&Eh#;qd-0v?nG U",.hz:cM8K73+&ez U"+,P[Qd:>-&Ps41O[#lh]DI^<-3DQ%jIwY2^D8[vW;]u;3Z6QRQzvn5((kgWGA(o U"WLiEZ(ToyWEIi2 U"Z0Y+xHNnN0xvpbSxvdC?%/fAkxir=4/AIktt#M4Z;cpAn2Es;Ra2O)';$J\wa&+ U"S,j[J10>+h5Z;me%_(R7G#N3>&/Ak,xlLSB,j[1gpR(RIG#tP1bBhR0+6*?caC; U"RRM2sdND;$\HQ;#f]RG#*Stn&;;$\c)?L8AkG8+t+h1Z;=neK8+%j[og1aBhR0+ U"6*7M54Z;eciI^1W*3HZ/i?4H/Ak;4n=dRB+v:CM4Z;c<=L[W_*3H/=IoC;]RM.x U"rE4/A:k;bfN%;$\fKhH^1W*3HZ/i?4H/Ak;Wbp&;;$\c(aq,tx7MbEL+S,j[A1p U"4FM4Z;cFCmXf]RG#*nt,8+#j[oZWYdD;q$\Q;:#fRG4#*tj-++j[Jy0542Z;c;f U"H8fRRG#*t?>-+j[[o0dPhD;$>\QKg,*RG#ntjpC>4/Akk;Z\Dh;$\QiKq+R7G#N U"*-3+j[UoZnXND;$\ZQK[,BRG#tYTuE4H/Ak;V80(;;$\KGGN^W*n3H/ir?4/A1k U";88N%;$\icU',WkcxT7LS,jC[IOjM44Z;8c[GX,fRG#gbf\-'+j[okjcdDh;$\Q U"f;#fRRG#6d=r0+j%[O#5%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% U"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% U"%%%%%%%%%%%%%%#%%%np/1G6uor7ann/K0H4rW1q,oN(gMe;/bI.0rnJR00rG.. U"J\Sr4NNNTzrYH4giZj1+SibwL^KZc17LRnsj U"G&L_Gu=m-l.EsF U"&++CkR[=?j%nXRWHO0]TsAahk?x.c(xl.xt,rl$]9toKY+WIv<$-es&pGNA+ima U"hn-\7%hl,dd_:tT3*SZuP_/7Qh5DAYLGV*enyosX[b#Q[i(ra*4ep88pzceWWpn U":5U-Vad4X,&rNp(h=#U6ja*&=keC(J(G%3'wl2ALnjF62oFHV1U&a3G$&i>QlMhS%Qp7MA4$p<67bKN$8<,RMK U"mfav14A1_o&S^\].?#Xr&d%1ZW,U_$8+-JP8gup41k;An2$N&azXs5ejk9'c^gm U"VaFYWeO.fu=I?m^$LBVli>roDL[*%%Pk?jpt8OhuXk#*'$#SdXfjsh9&]c4&o9^ U"H-dgpwn602-AdkVMEjf*3QxUvr2_++t1_FlbgYh1QI2s6r7^.L=ysM0C$U]TE\> U"hk-Y'5%gCc0_gs&*:ukS5p17+sDXmOqC7WK3M4F6QM7iWu/8:>2=>/C1p,Y_8*\ U"MnfX93k7hgB\t<-W3=TWFq=Q4D\l=tgOB02.EiTCHA+Y6pQEnsX8 U"G4J366Vpzbw4PM1s,[DSm_rc*S?H9jKbB&LtBZ%jcOv(.:JE=3-^?(b8SlXhu^u U";Q>-R#bF&e79#h]qZmb&:prbD.BWGml_LOD2s+Ml-PD.iujzj4h3TD/b33kp>u^ U"-T'_VBm33HTA3_^n;2m=Y02BMKO>/1Seyc\Y?=1n:wclfwXD=7iRJ2nCo((HJ4f U"albOTUpFt-OIpsIkvfU'VE,G1&Fk8?Q&EDVc4>]Zpqz*j*d9:gI=shqa%vH<.ALH U"V9k;J*.9,R-RM+L0P5C0]362WZ78o1HVS-vY_74K?7GcRkLPR(sD#It-0&,S/=% U"6?6d$nFM;Ha(Gd^T6vn U"y20'n&R^QpnNfAD+m^DUE=ja;[\EYh>wF>5x/bi_xb)3a.4UdBGgZRKHKPhSV3k4U)Zkc1(\cpljj U"F4O^qvs:I$bOF>6wq*%4%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% U"%%%%%[%%%YX=T_^$E-1K1Cv%F:1z5+KDii[8+..Z$$18<&[mw9hSyu2zo U"S<&%5n&SvSMS\g:SpgKX\r75QSciV/cy6u)5kKITDOAkVzo[=F\b:YOo[-iFpL; U"3;pL8sA$dhq6Gf\qzE2'so\5'Ye:6l3A^$PQOTK]N;exndY.GT6WqDvND)$%\Q U"?%Fg\NPo:UWC;dQ**H_2reEL9Di^KZVW;0.3GX%T(\8ZduXVSQZUd/l[u6DdCcS+YbPETeaf^v6u[yP8daS&;JaIVT% U"J*zZAOhac(.Ii9IXYQ*fWkuNe$Ohk U"dtLy^bkXHvTA?6f1jL3J,K1pl97djKl4jTrao$><6J/yxHM8*cfDDvdmtb)2t,awrBvW7T\hBb^u:uvYTCx>%RxCAXVuNNwN4'ji%JG0pB;t6P=v U"65^::j+,dO2qFqNmW8ZwyeGZ].BC#3)jRkCv'7)L/NEi6M).Q8.+KF8T[%%%Y6LjNu%p()9%%%%-m%) U"4x.IEK;+?W>%.%%s%%%4%%%%qgnM=BC0M;;4ALS3>2Ef,.gIIzLNaX4Q472([C= U"KYj=uOe'e43%A?6JWR*k3(^Rgm[13huv54ZVg'phyi0=brqqmfXxBszNVN-V,(nV51v6qN,ncsBxd6P& U"(.DZvpZV[s-4UtM[\%;\-F;6*<1>;*a1[SoFbHn[2cme0FS2.QW)uompY)r?1qh U"LMOKMFY)9'4+]O:?9*95e?A?59c'e)ZYr9A8/6)78'*5%oqZYPJP8Pb&O<'T^'- U"15s)Y9B09U?/0)?GN9i#9?8/R)3/G>?O9)CQ%/[%v&Av(#P8f((%9G%G)9G'G+9 U"G&G*8-.uK9iOYagkLj*KP%H/a8)>Q^';*G+,/&<%%<'<+&(*S++/($;Ol9Stusv U"ZlW_lpeC.Bic$<<$0,?]S)j5lg5zI2qM*A='7[M(\Xzo/3cRiL#gC-#pTV(4#OC U"a:ftQ4D?20JV:D(lzh4R^gR,lA+,MWr$p8>*IV$9Y#M]r%ah,OdIas_?WU*,-?b U"jD,/K5mv:M8IxxGr,u2ip\3_h_[MZBNnZDN6n3pFhmo<^YY6LyzOP^PiFLVp<,TkM<+kSb3'znWq-Px+tk.= U"q\ydDCHKtxQejxAJt7&peEKkCu1fC[>MB_kV.^4EU*t?Xj,S#\\USw&k[RKCP#p U"d:,J2xxYG[(^8i#+1(T>s,u7i2Jy]no)BdVoHbHJ1zE2gDQz<:B+=ZEThIP;y%*) U"C8Gu1S7pVDq8 U"XOaTIM]eva41oO.??14_89:r U"b2u%X(/ArZo/'kM*HDQl]b:6#_hh)hA'TMl?7-%:z&5C-%%f*0m%(&E/)y1C-.% U"f\Y&_+'ea%-IC#(&Ei&YnC-=)V::'C-[%fB2 U"&OY5%L'o]l%,'eu(L>E2C)O%'(88E%.)eREd4)OI%(GTRaT]D\%m(&EB1?QH%E% U")28k'Ke1%WQ?(mHE%.)2y+'Ke%-/OZ$+['eYN,oD(&gE]KZ&kvk>q4cJ,;vh2x? U"x?$6NFSBu&Czj=WKfq_WwTm^ha0w,j9b1_2+&s/j'b>UG3,xi]D;X6mW[m,Of?= U"(4:hbJZbG^luPSbN0t>zIk]v7>>M.#at:S(oVtBs7ca_f.j\4E83SVmPsBW(7\1 U"ANVh[IJa$]UHMg,:nl9RvkPdrk8-SZR$C9UVCl:RKhC?.Vk)C$%cVU?l']R^:/a U"8mm)b9^O7#lh-vqRJsNyYD23,VL$^jg\\-->TdV;VK^61Z]e,U5U/^JISr(mfWE U"$TF(q7.2le*(i_jI-X4+Br6(WKtkxgI\lOmIwNSI4iu8[mntK\2$km,-f()gB2_ U"k]$-\xVz+bKSg*k9=peVRXWjmVj^_af>NKUC\Ug61-+#VFu5BZH]\4TPSs].$r* U"SjW(32r\KU>N0A1WVu8pp,34[Z?V2T8s\)OeP5&:2M.u,]eab-(.i;W[XvM_Uk< U"hRo<.820.gK#KlNgWRio_Q9O[-Nq[\Vy\jzTTJocc^1'o-D?SIB'o[SD^tKeiDj U":[&%/o8g$;q-=R0H^WszXwjWalU*#dK.?(hti)(-;ZDX?8rQCTHP1:JA>4o[X^. U"3vWo4e3Lp4>L83cAX5(*Yu^CAu2OvXALu7<'NjFGSUY2,5L]U?H6,[9#lfI2uFk U"-L-T2&j:;q<)N5^N'ign,n&1u+>d[5y&UY36#[1CclUtBUmO(Iw(:+[_0K)mOc+ U"Ih88F'0d;bWPOS*aHfAByc]W:Q2]fXT-R.jT*(+PodTrz;+Jd/$BSox+k79OFh3 U"x+m*M=>.LmJeAKI9l#B^TRj2E(1,P;]4#'H]xO:^5TZ/8Un[QY?/;ZS;lC4q.xiBp4/]:yP]>xna/#Y5EN6F0 U"Ycc(So2SYr$K5.Fhw((+[%k=nYhs6pOfc:=u,N1&ngmMKsPfBp4MG)=^\a5J4#W.(+h1.-#4M(qfE.Z^-82[^6.a):EPu\mqLEwk>ifdr9]hU3IM/O'i)y(qv U"\ruwnIdPDPKRt=$+w8enI?#XvxBW=$_#9(c/F,iDHD%E,<8g4AUT;ialnV1ODHq U"TELD2A=J[EG+Xt9gwjRskf/0qY=>/D]>j$un?e/%.FV[PdxwNt%CN+'7$$ZrU#H U"ZBWIK7fS=N\%('%$YfxMi.wo7ZFKtUPlXh6RICdbriDzjn*PV:B=lLgeSDa\7t U"i3#F4cs-)K14dx6ky$dCVbbseZOoMIJBQ$:FtKX(88/r=NVqvzXZ.9$W0;3\Az$ U"1e$3d_gQiJy?Wl]V:o)US3GL4a;?S,?QJ?H#uXomedW]#N)b;UaoJ=6Xu(%H0[d U"d2W$5Pa&,h,v=rpR3#Tj\7#0\-Ul<=UjD)bDD](K34RVtMB9]9?6f>bhfG,A&9W U"LM1m\wPz-83*Gb$o1.iH;Nt+ocA\SFFH)]cf)a%.nV(pB0(_&;mtW%o2DS8gd6O U"SxXi6>umP[rSyMi_J9JlWh,rDSYf/&wB8'RBr/*F,np<;gfat5]N?=U>\8Qs#cU END SUB SUB V2 U"Yu1C%A(FXJ)QCRYnEuN]U:2JEdoxzn=whUyn^WnlFH&m70%TBgY0]O&#qD9$5f[ U"yq%ibyiU?goc]LrXf(Z*Nj$eEzsWbh'7ag2;_2qr.jh1j0?Ci+\=gKp#e;1BBuD U"q50tVWlIBhufm,D?7=nhVX[AA&gnyRB:Dg&_dc2;rY3b,$[a6_^_;ctr$E%Kmqn U"Z%7c.8Ck]AsHUrh3'L,XGm58 U"n6g^tts]qeEDa0BQ[Y1;X=BWcM'Ubwe73#2XNC,]L3bh*V<03UMIkXw#E(ZDYKY U"5g'eYgl3OQM6#Rp0Kb=E_[+#*7/x_HpNDGICqKr,HgEz(UGqwIjk$$1%^x^YiST U"$d>a&=Bl*.*0lmgwN&WzyR1f8I?Rjxn3H,KXf3Lko7EvZXsIiBaW]]1:?=<\W?U U"k6KnD#myZFso,OyTA1Ou+zGyV&&qz;14B9T2c60 U"S2[kfXqtA34(/p,h'Miio(DAe4LbDEi;m8p:LO:+wMV^;R0wgHb*gt^X[VjsH&8 U"VnFjH)3(TSH4xe1^r)(Ss1?EChN,Ltr5sV61OdU_Dp6-cvxOkyG30YTEC%J)kx& U"[3t\F2R U"X^bR2f;r9r5+bxLUg5MKhEIY]DLtb&6W22bi4N*B7>j$WLi^5IGe:o9KQt7ay]$gvll U"Agn_6K;BL&:viRs*3_GM7)W9K__8u;JEQga0$\iUXBPBP5Z78lgsjhMluumeGkAlmsLmnel;%=WxaDjx+Ixo4c#vk>4dYb;Z1,RJ4 U",&T8Z82(Zmr:pJv+>(kCDq-Ts9#21>2ZspcXWvr3n;ElB1D#U1i,2=,<>,e&BTm U"[tNQV2Oyd,d'ewIABaT2.auk&;hd#,<>DA0j>TR[/*u[,AYXEz#vq0Y'd5->WTR U"[*Cu[,Y7XeZ7aM7*>)Go](*kvk9%fV;Mo5+>o,oq;9/2fi*9uN7*i>'oiR89TRE[*u[%*/,f9* U"bkW3?T_K?EDqCVP[*OE_OiC74sZp8_+x'BqpxR/N&[/8wqZa4/1'%9x'qp1\ON& U"9u0Yt]ZS/Y8.%x'TqxqXa'q<9o8%w]9+'qfaeL U"W'X.>oo'q79c5S[iu/;4YTa&/W'X.>ooBq79-5R[iu/;4YT+fZSMo'.>o,oq7&\ U"D>>T:I_jJ%uAmiHpY9mU*8i>/Odi'8_+x+Tqx1aa+q\9T8&w/[(E2w[2YsZda?w U"M[ek(u+N5k(ou#YXF%x+DOvi>O\Nh-N^b(G31,v?U1mRN8'uv:ej?ujYFtZvicY U"X)xOKqr(U%8i>/QdT428QN83uj/kKZai72sXQrWi>K_a%xKqg\T[_N:)qJSOd>c U",p1O9'Th3:_Yzg*+b]U'2NYzgB*bM+O.>cp]1O9T5R;VuIq> U"Yzag*bMJ^Y_eB*z)*41w61Jy-d6fC>2D$jkbA[MO5>g+1[_d0_5J)QG;RDWUDU# U"e;RwA$j0955JQWKCMr[f_.DXbqdpvC#nlcMGaDs5c'yU+dC\d<3v]6dj01_>vsE U"9C\4hu=tE6v>,FW;LXsJ/=gioP>x26CRs0F,ian?#Eg3k-&<1xa1cpNqM87YVTs U"%x36Ck$j]TNr&TOp6BTLDTy1Dq7jLg2Lh[8/H0W71soGW59&S4Gcp U"sGK9-Mvk=i>8(RoUN10zoKtHe,<*Uc#48>$3(Say.$OeV1FNK?Ik:DJ4G>HG[CF U"RMOlHh(/ZnphIxJ;xhm?EK:1pKbJ=E[++#*/xB_HNDBT4O[tm2-0J U"ZyeWkw8mJeHI=mY:kI77'uo/Q,_oGAatUtOahssmRNT19u U"IZ0VTW%6s?PZm[AF<7dBabv>^V5IG:po9Kt<7a6R0/5wjq$+o/Vgq)Tu+0>_4>F U"swZ8uGAWlksWVnmV(,=7xD?jL,$lDFJcLHL)E5)2HtbL=tB.sNdvIk>4cpvFS9l U"M4)c]xq0m(lot'Dl7[j6%r\KWtbtn,5[&X+T7h#r/#)m%^kfW/a, U"1+1a;qUia6YkYaKY;Yt%YL98n(0&00(F%/F'n&%c0A)9g'w'oqAi0N9fOJAPT(V U"kOtOt/P,O,,P8(CU*Mwbt67x]+8X/DZv?8KofD8s$i&C5uxI6pcunGb$h*= U"W*'p(D%'o(\%8n,g&9g(g,% U"C%3(1''LAA2T*-F,5.?7&4169121,8G-q^Ti0YT9#XoG?Y>9>39zOp8OvYo8/?q U"=ri#Y,99fYSno.Uosa?wdS6dr^qvNi(ptM$jsl8wAUdLnps,h4pYm_VNPHP6=lx U"mvw$mudsl=#=qWiDPKuY6hwW6zXM#R);&kbbx$&V U"Ds/nMjnnL$DBPR9&laPV;SeGjTi4Y^5?Di+Mi=5d'p?l7_?Q)\;+a9a,w11=>qM U"Ocnx)rci4*c?mB3g%V$lMZbcfiVD1S%BWt U"g3&xsPb$rnIu6eIB=O_%M,^Px(4PZ U"nuSH-$Q-?7x);rq&,>9xVxTLrMV:*nBk0qb]AxYRmv^hKn6_reKRCYlDbb5M*xc U"CdA92&n&3'qv,HQWk&'/jPR#e,G/92_,[HJ;X7a>UVW\ahl]*.#Oqb-*)eRsM$C U"g<-CxmAi9#dwU4nr=uD.o3NO3X>MB9M*tHL?kG0_W>INU2FAcd4oP#nt%rj2hF+mC1KrH U"o'x2up%&'W0%9%%%7-%-i'wIO[+xlr&.%%^'%%%/%%%%%%%%%&%RE%/P%%%%%Lw U"403Cr4SC)GCup%&'9%%9%%%m-%E1%vL2F=VSm(%%%=5%%%/%%%%%%%%%&%RE%/P U"&D&%%M;18=DBCS1)0Bup%&'W0%9%%%7-%C%0tIu9=,h7,d%%U:%&%/%%%%%%%%% U"%%RE%/P&$*%%M58=8DB7S1)%% U"%&s%%4%%%%%%%%%%[%E%/,P4?%%%qgnM=BC0M;;4ALS3>2%up*+%%%%%%*%*%%C U"&%%'?Y%%%%% END SUB V2 CLOSE:IF S=47AND 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