'===========================================================================
' Subject: Bcx to EXE                         Date: 11-01-01 (  :  )       
'  Author: Doyle Whisenant                    Code: BASICTOC               
'  Origin: mechanic@sonet.net               Packet: BCX.ABC
'===========================================================================
'>>> Page 1 of BCXTOEXE.ZIP begins here. TYPE:BINAA TLEN:10477
'-------------------------------------------------------------
'                  INSTRUCTIONS FOR DECODING
'If there are multiple parts to this file, merge them into one
'file using  COPY PART1.EXT+PART2.EXT FILENAME.EXT  Remove all
'message header and footer information (everything outside the
'">>> Page x of..." lines),  load the result into your version
'of Basic (QBASIC, QuickBASIC, etc.) then RUN it. The original
'file will be decoded into the current directory on your disk.
'-------------------------------------------------------------
DEFINT A-Z:DIM SHARED K,S,B&:V1 'Created by PostIt! 7.4
SUB V1:OPEN "O",1,"BCXTOEXE.ZIP",4^6:?STRING$(50,177);
U"%up()%9%'%R-%B;.\P[)7P09%%%%%(%%%,%%%%gh&'Snh4t>$V+3;U1Uj,=StS=
U"=UD$2Ug]>pKgkb<GkCNIA=F6wt:1v__=seQ.Vtf='\SY1I#ma-^/#6^Gm8/He1^
U"#3PhAsfPc>>;Q5Y:Fi'Sm(OjjqLS6?Sl(TkqHArL_*SyY*q;pT_k()6s7y>r69d
U"rX6_m)/)HJcZSCE0cm'J2Gb,Eg7Di:mG-BL;m;qo2%fUO#5*EIsOup3kmJlOlmJ
U"(vo*w\<kc3$a1m9a+E.P]p:lxmNAqn484%(up(%)9%'%%-%H&csPQ[eW$>#E%%l
U"'6%%1#%%%1M2GC>24G4Sh10BMjbvBSXm+8>OzwV(#O:he>G:oKlGNH(.e-*<IeA
U"QDMaf&c:%0dG[pSn%uf&p#Z8gr_,5m&I#+$pyV1gbhubbgbZbgb$X3AdlVL-uCF
U"eKt*Ttm%/F:GBqI*0Vka$78SH*,Ez?An(mu#.6Y=/cud/lUEgBKaa%MJ/n=^5an
U"]\_p\72ul]h*T^a$GUkdkCUA(n#AB[]bMB\//Q#VQ,&wa+_oWQ<$YUQ5MRW[RE9
U"Z36\EyLjQ.fN\Poq6;f8p15'qnX,iOg7o^R]d);>k_pGYP>xo9iWu<'NMP1.c6l
U"A$)HoK[%o7J4'9C>u&/^(>v8b.HL\k^hy\Y=#BM\2tIB]X[Y4+$X;GC%,e5\XG*
U"\H16tEA__G:s^I'SBS<=ElDWAT'^'oh7F5YiCQv[vf3??31o?x,TF:<iN)D,4=,
U"jE>KUgoAXXmnnptBhM7=YaXT;\EDo_:OR-O+wM8]-aT&SHrD.MN8K8jy+r-HfaJ
U"r?R\tWP6x4Lrn[o(Y5tX8jPHlJ>EippChx.5$xtZi,Ffm.\p+mgWlmR=rn_IL/B
U"LUJXVjV'pNmX<iEkKj:h0*ZT0b$267abYL=ltR,qowOHd2XkQ/UC76#P8f+tLW*
U"[HR,J^#KuD&O#k+jq4(m&+D,tGYGLUtEfE8^_Z9C1A3Z_<6-/Mb's)q8<3nfZPa
U"bR_%.tc^S<\gGIo:]*Ll1Y;cGIGkMXEv>9f>t#bxhw+^:CSm,B&P]+QvUt^')1M
U">l2Bnr0emC<,\[P1<^1*Tn$zt8>OA'qgD5*vrVKJ1M;Fd^d[[F,Hve)q5rTgkI6
U"M93I_-kNvpuQc-J)*hRj#bJ0pxEK.10uVj?uh&b%H_6i<bNp#7Z97#5Ao9/C(+*
U"g.Sr-SPFUf$CGKo'J$C9%>7Z6XsoPRq]C3Dk[Y66CDrc&?_JD%0)I,(fiSW%a:s
U"3PzR3rKu&JcA5I5f^1%i-udz=H%u*<X.d:I>W-90W;E1Yi'ziRmXlLoPGI<8;I\
U"LLrszhqFP]'&dWkvXIW+LL(UxIE^.v=vsx76qk8]+2I6QH)2'LD^9(FXe;/Qi+&
U"#Lz_Th?L\8HZxdq3[s+p49J7PAA?DeBp/np,F)BHQ,>ycCxRW%ASTeM/#eq;<d5
U"'2xzB'RZm6PB-FEJI(8cE:)q4-WgyQsR*$SnI3Tw$:?YG9Y/Z</ZR_CJCS7wv\2
U"6K0KQu;y_]Y2>s%/carO]$Pnqs'M%,Be6eu(.CYWmvJk7+=H\?jCWs2fI7,Hj83
U"=O(,SHX\n:X;%[]eF*;<Ex0*.?9C'8po'O3Rsasf6+MAa86C<;[2++9rY3bp?Dw
U"M=j=\]JWch$[-)eHhq758X<;(L?,2B,%h+\]rm&)<jbXgT1&phV'Q7K#tLsIutB
U"lSI/1gpx)39C0nIUqtx0Kj\Zqq3pMAfkXxF2,Z4Jh7T<5t6)S':)mo[gLs7t.pf
U"(F3eXIR=7J0Pq668k4So\\G'cX+E&q#aES\g\.y^](?Wo:sFQ>C161d/7g'75\p
U"Qafk2i0F+%-wB,O<<4V_VPST%;::m/MeqE^ouxU%^9kdN*UCp9G-k3nJv)&gzWR
U"-4n')rBM,\.43Deq=O_=R.hQni_7*E2QJYh,zPHH[,[eXE&Q>]6TW7y)xv7rm:H
U"a_As%\nNj7q&\gRui1^Wk]:>T1pkQYKbiD:PgYL)A[ZQ2Z)GrR]xn#mDj7<g*pl
U"&csVVn)s'?4I.43IO8?iS1umdR2yYG-:gpcFpif^*?$Wjqh]WM::Ju)FyR/6Bv*
U"F$2bkdnwRpuGk=3S'gPLYW1Pts2#qL0Xnu7_<=qF_7/pvcgLPxgZi_l\ok149]L
U"M57d<:$4'RMzE-%NK*tamvEL/3*YnR7R8^/(li_5h/Rpq>2$i$f?PQxcSjmncqi
U"migGeepglkW/+A8)z\gS3sMEF<Xiat=H$^Ye>CdCfrkaD[bd\>W$3bI3GIzifTX
U"h.J1/nc:v'TeG+f,o\:%c?k5CifkNhh/-ad9wZ0MMRm;#aD3sK=/PVYg<buim0K
U"oq0C[50Nur/[;IJ1(T(bnHnZ,?^8,-5R29#Cr+G,k,l/YB(3_-;h/NWE)%rY?K$
U"%[9+?8-WjL8#1xG9)A;eiZwo;5#cCBwNR7a>orAQ0-0Wh7XGU;^6Hn?<E3Xx[Xw
U"o(so05=ZY;&#NYmi.P/KjKg/o;fy;6$o*YaA3:dKf.w(N\4uMqoc.1GUhuR-8^)
U":'ypQZ6-L=ap&RhndgCVNgBD6dh&4*SOQ#cF]?keJxvRlb?%I?7ueSYPe+X0_An
U"#q:JDs1fuoR31J#TQ<4QT]/o2QzkK4YP'jo.d$eSz>E:Y'q<K/EKRKn6<oY6dg+
U">QH,'JpG6P^OOa+06X25']#<]Iz/_D;r'b8-\)pQgoHC3Y)mZFD((F6F,aEInV<
U"T5f5T70u+]JK6;B[Sm<gJYtjLpqa?A\q&)c=3h=t:-quj)#sHo*o&YJdaK7nVRc
U"4XsOh6aWcC\<T5]R%7\xNKho0Q/fYhoEZV\l%e$=6CFgT<v%-K/V0H.&=sD<429
U"HHB;I_Y,7SVHcwbn1e4[.qS1y%qt?3$TQ$%Z4Fu0Bvb#V,7cen>7aJpIl)$Ei>q
U"+A2xgsYGm/*ZM'Fj(6=sJ37;Jr?gJptf7^y9E7N+.8[+:j%[/-O;D#j=c5C0Pf^
U"nNtDMoCgK[C>3r=)Z)Hc?m^_2\I3B%gnp^P.f>c0dKA2YPZ*H-dqGrZ33m.TOfG
U".mKPZ9.*5i%%D%AS7&D,per]+Fn2GaifR.R7/B8S4rN&:K*(b-ANp/(di,d:.LA
U";inA,Ll>+x+g<DVmjV*)Go#g5uwHs9wsGh.gF7[8K.2YgQScF_5*s,#5)e#n4</
U"YMX7f5oK#Jra)7PJg4KUS9gg]oN>w;<26njpM\VQ)r).Xt1l1i&9KAo_23EAG%#
U"2BV\867In#&JCh:ay(&^xMIq#^c;37,$eg3*\>Zw=?BdD2:Oqw^e4FFbW$OPI.&
U"os:fdgVw^NL&FMKh)C&34tLE,8S$ts#(OQGp?OA^;3.cs#^pP?AwLF+03?Hf%tb
U"dQrVdfRwNFVhu8L?99?0+:?,JQ'ntqY-Bs9:dwG7/JwNdLPe7FV=SFflm/p<4?K
U"paTfiB?EJfopD:BS*G]=n:6Lurx4?Y##&Q4toe,QH6,0)$3O#k%3j33)y*F\0Mb
U"F40s8)TMD<QO.qK#XVQrnT6b1HRC*ftEa4w^z)Y-?hum<-F,:df'<BC*)]K&iIq
U"$')\8?K<q%S=#[bp6;8g4:XnO*KQ9,:$.Limg-H5YlPlc,ica6D\JX35C,ufzAO
U",7I?MCOvUTlze?0AC,COCWTX\yZ:kL/[l*nwE'8a1Qb.QQ2^6B:b=^j[eJ0nz=c
U"ADnE=tNVPE$nsPbl=%(L5k'T)Y%l&M_?qSja25,#n.w1miDgcwcnvi0CUKl7?u\
U"XcA#rpDR9[#P#eDuq&Lvz.Rc8S=NSx[cDS#lQfMHq,Ce[68V?WK4j6Nmi62id/u
U"QSwdRYFPgQTiPG;3ZU/wH9oo'0WVt8Ym/'=7ni(.fkrkJ&&c(:Dis0;WB\?pLzd
U"b8YSd7ydC0rBJgdEbG\Vi&Ufl1Z1j-$/3uJdDR5Oi]_*Tg5k#ax&P;dM.,>%<CG
U"K_m68]XQvH/)/dqr2k?%I^iW^ETh]GQjO,g7L\P5ZqtYR_0J#WB[_QF_)%%ZjRF
U"19G;HF[995ertVBGanSX)<($/*9rhW2KT.w(&%%*?,u+l<g%g$WKEpG#-fqNXi^
U"L^X$9I8&,5Jh)RcI2r$P\GkjK[kGQ/:tP,<aqmU3Sh[W-*9S3pP;'HMK#QWXRSk
U"=P#fu)*Z>E.G%gO=,:3&u&f27SrMl3hQ(DsVeyLB0's^?(Lv*?hd.j%[NimhCi=
U"tS5T$<V2<O)d/<=)UpIdn%WX[k2R35-mif3^4F(V'OXOM=LL2ZXyTph5r:*MTG8
U"?GxEYUvR\ng<0=_ZlG$[7A)U1V5]<oU6JVUB;V3dC_EeW9UE1FD%s%,7^p^8(ur
U"(.5zToAEVxqLq,$j[*hTN)%9QH6L%OX7U]nw,s&-e*XwF;QNi4yUt+c4'cXMxD)
U"HVi)Y-xzYvA\)L2WHRC:7PD.wq-U_$'LuO/,ssYb4mST]noRgtDjRQeh+'0Ab*>
U"GwMgF>P0w(\>FjwCWazhQFhxO(oajcC=o6a^?8N)+[;ANR5kDX<RTNV6aHy:-T*
U"$,lD,qZF_=ZyN*DLGng+]=*&>?a7QrSGAF%k%kMeIIbThkP/oebZtWP_b4=G_bi
U"joiQ.tZx4KE1S1*J9R:-KAGkJ9wA_]'^G?&/]>xe.<KW:9aV5o?063QR&1,jr7Y
U"S#X+_>hYDD>B#KI>)=\lkLd6Wu46Pmcn_z<h_s$27)1k/$-s%=g.O%F#3an.iA'
U"lr24m_vLVxM1#)/?UhO&9YELySZ14m[bOqg2<0rNNIN:+WCr67RZNJuzh'IW)1M
U"Sb?^b%_/gk<Li9LTo1-O*,wMBHdpEcV8W,g,=kTC/KsfP2=<ClS*j)bQVRM[[s5
U"4QE,l3;^CFnutO&[aY.bGc[rOHYqxNT;Ew#9$t9V$*WG)x*Zg^lYqsM0S.upD=.
U"BCSiEJ-jiCL#i9tY_j_*lCL8/#U+0L*]\Y9%%'N9/GPq:w.4x(rn:J'j^zk2nB)
U"-DrZFP/Y_*t(:UJv].q??BAA(4(4Gog%CJ?NJZ&^Z4y+cG;hwB[Rm9>'aoJu%=^
U"b#PMuJ8CD4Jjy*o^xy$Afv&_Y1*ZE\EpQ7h/28PL3-j-G>WnipI-_=9bI92F#gv
U"NgpfzKU'IxH5w[Y7b6:)AYjIbA8yOYNrl4F^#Z?H/$[egpj\nLKmY',-9-[\YXn
U"CLpt6$TrrM4T4Piy4hLs)-,HP5FVvi565Sl[0H*FAk)w7<ntujHXkb6d#T6N0g:
U"QW4n1MS40U+_[ZY,Qn1ki%8^/hY]q0e)rwT^x5IGmRGa#2GNM(u34N$ZTR>R#AP
U",EAF4Ueu4d\S&*Rh[lG2eOA>m4Fa67*XNja:,4_vSt_kEO*JrA\j<c,-Y'KsIf^
U"Dd%t(^wKsIxE3&Gjkr_h,zaBs.xSceE'TAvNXn?pu(qTNUp_3Zm#8Sne>GG+Wfx
U"<uiAa-A/MT(U;onl1JORors'=1SdlaW(0O>W]jm^05O#fDvL;hg)99QD%Y,)*q:
U"Yq'ZF(3CzI1_n,wKja2vG;,ObX5GZ=??F*a^nMEl'fsxd;5B%:VC/J?<j45#-a/
U"_\Ste>fqNRAzdA*^H4d;vc*a?#2&[(#\k3Gx[b^#czYA)'118T/-A]e^MsKl8Nm
U"0qdD(e=n,mF/&^PR3SxgY859k\.^:Ku[rI3f>DIMYZ\<k6qCLx)kJ,'M(yXHGS6
U":+pR$3e10:(bpLwtX9o.L;$q'+_>B$,wC;'iL>/xK8sW.B*72IPNzl&[2Fn99Ds
U"Nr4>i9;JOZ1p?;,ZpNKVb6K,r?Oc%#ujm;S#CRlD9WLB2pnV?+:.U[>VocvTKS2
U"nNd/5VeYh>u9&JSxw&9ytD4%%)?Ga?oB^,ZG^rRl128HLGKCHA$$blb9]O[CiF9
U"hk4olsX3K52I/bBb&'8dtR2i3fmb4XlX#VLIXq_#4Ir[R]plICij?yO$i-dQ<q6
U"2iV*4NBI=dNlKrU^.hfhHur&E<W$*hWtN#X2V]a%v^D;J6tbRZ20,_DIBPQJrn,
U"Lqi?gh\)X0>DkTA7q32ZC]qPy%;Bhqfe&B?MpRsj;B:/lh;T;suSZ,ugW#GYIAC
U"'PlHchCMe6gE#e%'iRVkj0+EPrF:&YWi$KwYW[%;=R+XZ;E$I;qlljfirXtm(yM
U"A&8LD:xTS>uP?x;Km=C$t9Yu?A-01fA7Z%ta6]j,vlT]Lco%a>Ol]duf<92K2nW
U"V/7Y5'^bFkGuk-W;4:A2xFNZhPsXY][O5D^kF<qBVjLjLTIc5<*1K-l;nt8;wz2
U"A284t:F_]F',PL?_rxyMNuCx%Ung1<YOO->MoGyoT9Lt3ZaUj^c]iBxO9wXJR)I
U"DgaE?XG6JC%]H.t>F*gVro2Jf%sb4C//z\1&K]Q,DE)6[$/^d=]m,D[x,FNs)Mp
U"a(&0VkzdgWVeHp%Jy*NlO\]?#t?D59l\0v5/7;O30;lbDr8vKNF.f$L8P<m;0l_
U"H:i;NI$;+nKPDIl_82FvG\5OG7)-g3B^+'P_Y,xfx[R_er$WrXeM_S05>IM,12/
U"89#qn-%KlT$$Gafj?rFPcVDKfo^NmtHk]lHeVC:cKGJcUx(H+)c3owT6LRw3L*a
U"Q<?^nX33b_M?/R.'.9pEp&a?+nDMO]s(]n=ql?l85tC[B_Z%M,?G$5jeDoJyOKg
U"[78XKTcB':Z*NMtE:kG]88vF38JeCpwz?:w9l]jvJh-j*Xtt=Cu?fGAJH'CwF$n
U"pB+emH'0Jbd9_#_Yb15/1Z%'usWxA&q^d3MA?dLsrc[JDTVa\rgR5kqVT1?XDB(
U"c2U%xMtkUti*%BjPUf=8FO>4Zo-*&Bo.L$a-u6lF]TUsE-Hf+HkeaM28,60QmWJ
U"4NPEc\%:arKhH$Gmxzl65M;Rf,&YkS*ehls/C[/^HFs=FNokhOdW5d_6=BZd_t,
U"kRZP640:of#$hb%YMNv6)-CE0LN7\zkTjO,kj[SG0IE*$c7Ux<.oe,$Z24Le]0U
U"Br4Qg+j+RE:X4b8MdcWv/*Q3K9\o_sGJT#Fexh,s64h0ptE5t\l/a12Q9'+p<g6
U"*Qk9&0;VwL4(OA$qVG%aA-U+Br]ji&.yIkN8ZwEnkUWX:/cdl,[1>,r*v.<46G:
U"dBA\Lh2TIZLy)*)ZAMhi=(ax%#n5*EooUeoL:q[T[6lOOoL2bkXM8AJHGuvcU40
U"ja'ufD./K+pe77=9:mWUcx7Y]U_gLGYAbk-H)B#^&MSg<Q,jXU[bgCP1bG%)F81
U"_N_4i8g(oFOqD?#V\TXaL]4U_3*)2yw**&eF3:WGDO9tni+Ai(.*Kj3l\U^W?qn
U"umN\4OI>ctNR<:$pO>ZIoii14bkARN^lAA/pu[ssHaneuR/g^DI[LJ0HgA_3'xD
U"7f?j1+#X6NSuTITU.W':#JN'akPg5(357-5.^<G6rDx[--#P=X\z:zjh$8lM;4r
U"Yz^xq[xRg]YfaL[tuH[nJf+us+A6sd[[g9-2KMs]+z9J\Fv#U63bV_0?w_gmy:.
U"X'YaG^mZ5aaI)4(U*SIevsEft=^W?PXGyGofL72=5X<.Dtp(Js;v6tY:ZcZs:2H
U"Fqq4unGXM[&P.-W&GPQ*AH.2%KA_%T[SAegl1X&+B-[P8.E]b1atCwdb[cC2:%D
U"UeBhH(F++\WZ84r=2suK4kc$CJqdR=bb'ZL7R8Zn3),]d=$2E-uhBm]>kheN=eJ
U"$gX?&gj2_utfnB;Yfmj.hL2/mk\HITfum7P-h^%,]e_LboHtncfBTsrHg-KR^yj
U"l8q_r_t/i1Wb^vDmxb2:v7HIok)%GC+EUvf6-5cA^/R]Hqw/8OrneXqIvQ7Sw&P
U"g<.x>&%Q30\/luiTiEmNg?1,T-L\#%gu2y2#VNDu0SOQ_s;%a7AM$00frXXlZoM
U"%X5iqlOwV;yK]J+=ucbE+)3eRca&;hrD,BUu=mY4C<\/w:.Q]6Ch&0I&(n>abAn
U"=xS5xJW[IX0z;U0;MmDOVl:VHG=GqGckiA7b4#Dj2QKj)4i#cFVWeS7X<]'wS1$
U"Y-D)2??)0N<<]PX5[_2a;i2h#r44Qj_5UBhV]0t5QRb)e/lweB#nQ$,fHWE)I:b
U"i8jLhFD?-LFq+$v$UD\t/eM<=qe6',2_$FsIH<-WO&9Li[vqm:Yws2E*Jlv=Nm?
U"mg1uOPwe0>fC&8Yto-kS(AVD'E7Ed'5oa45RN<>DvGJ40M.<Ja/OQ'/#5Gn8;E<
U"N8'v$H&BWi0''m.OLAGz?Porj)YJk/kRf1FD-uZ5dLaJ7?$8S$%s35j?+$sqi9w
U"X<?>o*w6)KNhDt[ji'D-#;7b0)%95)vv?T$i0uu&BQ5l)-$B$Ta8NLU;yz*_Lk&
U"j[C(?RsVO?sqBftKJr[bu.tNxq&F.6b<Teq<tOv,7KD_]pTlnc*=,[IP]JI:Aag
U"s_'&MuMA]W#D+I<TpV[0xL%aCjvJar%M%p*9m#rnaaRlc5rtCHR1eqsavEC%Txp
U"kr*3:n74O[z>k:u6COhszop(4S=8x02xp.P>Mal9CyhyNjFi:*TxQL]6x>>\EOx
U"8Uxh^O#gx&T8o9<UA1MY.#>/R:#:MYDCu'?>BDvgpDR:pA;^lfhA0kzT>pIJh&p
U"x;ME-cuW-G*F>Wfe?7tV)#w(E'#9r38-,k9>oI0Khpz73M-9(u7VM$-2M-A->/,
U"\6:M-JCu7d.*/,Js931/\k)/V0fh0kgzTpIKNhp*:7vQy=^>UK_CTx%X^N6k3>.
U"dSB)10HW?]&Ck\&i?mZ[.'8#.E0Ku;APbaqj_,6*:J%/9o'lkI1YqF]Y$ql,-(V
U"#$j4)d-zLS8(<C]8>%rC,n/DN>nSe1g,uo,,uz.u7J%P-1GY0m0O2wlIS[W_[)?
U"i3%QYX$.YPDF_,yYN\%0,9%XF#m8km3L>Lls(<izqM.e%.&%n[TOp.H#hLlWFUp
U"r(Gr$QhKY&U2]QLoTlX^$IlWb)S\KDOZr&4PBR#aGYtdXL*fh7Pb.s\''F'HWWs
U"D#5N8dBR*hY7R^?N-;Tr%*oVqk#_38Zoj44l'[8R7_tDSDZvz&MI)D+5+Kpxov:
U"GXaX3Oet9Nn'b%6I4td&S&I]9)1?0K5QHrIc6Y#T:sEtUA$&#U1kFeASA;F_t>R
U">4v=-)c0oL_TcMqgxTGk;fEo-V']>%FB*gL_8SCg[W_ij0:$xVInuqWN?ucD=pJ
U"fYCeS[&92dMXqdPx4Rf6H(Ng+t^pBOe(M\:af=\l=q'#M?./H_'s7&^&/d1)C6P
U"LiOnISea0F:vIk/cw9EM$cd[7*Op1?bc5BYFP[teG*CKo\[)sV\XJ)qtx3bZKzY
U">tDiwYKIZ=<Hq]\G+-$6EmU0%_dj&=S)?j]kZRf'm348\5rZ55CsQvihE;-C4-5
U"^iTL6tK&miFkF]+%U1DN'KR;pip+IjyN[W9;c++j#5C0%rQ1d=V4P1Wwi4q(C(1
U"W4Fh(yq4n2;q?WJY+2yArICX$i)3l9nyAj\NaAq4XOBIV4\;l1^#Ew7hVujLKf2
U",>X<SU$sgmZr#T27;s6Lz0,U.GH>r;ui(amF'-?GNdnOc+aU0wc9bqDbrOA(2E)
U"2Qsgz]OFTX)J_Ii3V+GX=L,W2cEX?EB_i26B]=8bLg7(v40M%4_GZ]-&&tX:k]N
U"+:m*O.;9m+;:mU9aD$'g5QrA^1dPQC#kF;U56*'p(Fex5=M4D&4E4i%IPb^xIJF
U"c1C2c-?e(O;J<-KsfWe%wiL9.UK:n8b<o&4$Fu;K,BmkIZkpJ\edn^\>=,5K<o(
U"wtP?;pCvR+$WN?QuEGZV:IjC$Af>i=jK^pO_Z&NOQVFhm]]Tpiqi-u3+L.EP,7s
U"nZaF;A)jBj[o8nSnlrhT^=&TfaVX''fHb._Tn4'degah''Y$bV-1&f4FJhNu6^n
U"uMHNBc[dcCw_fT#/-Y.akRf]m1yKM^kYJFqu6310g]K$:G+?6P<o'=6(J%2AzaH
U"EskDM4BhWeZR64/IU]s*6:em?n:FDTL$H]'7btMnut&3gW/RaD&aeuxB*jb]U[Z
U"l;5_4$d.AwZ>AaUw:dDR0:*&'rGAS><M_RSdttqeso)UdFZ.&Uc(R*ZK:f9v.kr
U"i<$e),z68m9uVDLkFKjuP32n]'_2KM<KmP.Bp*[*aFV<I<yYtaQViiO7%J/ji)E
U"3)<Se)3oL;GhB=UE:]plLolTM,P0cqU;K1r2Dyf[d(sAy.Q\r's=F'WF+w8QyZi
U"0a%qG%4*dGj1$0-+F<JzcH1_29;F7A/3;gn,?kB>Tv2'WDtcjk\5HaD>j4MnFz_
U"=$(s?./rgi*Ppxv/jgvyW%/g+Xk(T(c2rQYqBDd.QX6fcuT3[0=v5XxqxIT36gi
U"FL(^T,T>b^.q5mtbC_3zrNK+^\>FjTQL5J%;aHQ1tgGAh:HK[:z.NYH9%>WKV\u
U"4N&H..Tgq4lM?>KI;$w3Tl]kXfQ>R(Hm:^m\ZY)%E1=$+WmEd=pSZI*qj?&s%iJ
U"1_^(o_'G1=#n8Q-lC'&t=>A9#oC#i:AZl)\[qvwrw*EZ,em9U.h)_M]F*v5Y2eP
U"Qso/%Os:4VO^Hf\R=v#y#6s;tu_7C58rI$wS%L7XZxCL'n4s>Q^>3UBx4E,CP4R
U"/bO:;9)qM:-%\+CSJ/u_1?j_<VWiRoQ9bgt_UR;gRDg.,(dS1UiQ'Kmu2Pho,O1
U"RK)fM-C&8DD]SvYrTO?1>I$8aC67-W*XomN3sZporOiekaCN$)TF<x.uhgEn[1l
U"^mceE\7z#7=sr5f6:F\AWBAW)aR(cWNGBNgM-uxJpZ<H$:+kxFe'Om0_Cu]I1xf
U"nI8du]8VXd+LmMA:dj[O\0.FnschnSvqMWxHptKwmF_t0v-3b+mSSk;OtLoasJS
U"w^#;u1Z0(9+%^Cs+WbOo1xZ?.;\mJwoM1:d'FT(eY2T1.5C7(d,+9tN3\6lG^f_
U"\ny*&9O:Tx6Rvk=fp-*;2g?zz0kX0ilH,Tn<udMHMwOHT\kS\'.6-D4-Auo]B&r
U"Z$pMadIX>BtT=kuDF/hBa?utP2tuq^c3ZLw=-?QY(tMC;)-9;+pd%up()%9%'%R
U"-%^+7cP;./YxY%.%%h&%%%/%I%%12MGC>4DG4S7><I8/\RU5#Zj6IFa]a0=-Ow#
U"ZXCmSgVbwYeAt/SLHx*3tr2SUu<ZFi*X]5$4HvEe\*(9C,Nq.xc-She/*K;F7Ij
U"Q)^+8>#lRmnu6(HviyV3*-rp543JPoj)=hkBQdJ65fkG?Q,#KF.2.caUtU9+gdE
U"NgxGo3b3_G>\CVe_;JF/)w.up%()9%%'%-%6G&YPJV7qX%g%%%%m%%%%1%%%Igh
U"'C/>j'jLS8=8MZEA]OMBF\&?z-mFQBM]?^^k.>A/FNaoOp&Im*AkqlLu5M<BabY
U"Bk+p^gms/E5+e<6/B%V+nB:VgnhH5&+%up%()9%%'%-%(fcsPU=%)o&q)%%%P2%
U"%%0%%%M12GCM>4G4LSA2tk%T=[.m5Ll][DoW$#Da7;0/.?]&Vs?-<>-#&amHjk]
U"LPO.g#hKsF,B8,>.T&#Qm+\gJ*E2Usl3E>F6o,k4j1lXeYh6fCCa$T.Wx)fXntt
U"bGD8+OJC+ycPcZ(bJ$^wa5+,w1x7k9>A4\tOgaIE-X8'rYdl4<cCI[co.E5fc4I
U"2gp+MPgV.]fP3ty=z.zZ.vua1<IjB8-\&jb/bJNM-R<T/Y3jL[Dcg*-vh5YP$dq
U"i[c.[g4ItjcR?a#]\a#h>+CkfKDUI('85e+5*Z)1It^Mlh1&WU5PqJQeppWaiOy
U"V_ctE-jhH$]>om>#<Q&gPGM_oiP;BwvAj$(a5b%-wg_jBq\p\YIIzzR=Hk+E?gb
U"v:;FG?J0H7*X^iw.\v'Bm[Q6RK3rZP]OmB>W/g&ay&zT*W5Dp)>/^;u;b,b78LB
U"t-PhBCw67U$w?t6NRajeq;yA14,aaZ8lVk%g6JO$)cAs=QU83sQ&\siXJ0I>YDX
U"C0*A?&($KZ=VA=FL'n6+T#121EYn[uLoUQ]K38ekDJ/IkhMRRabYk4vh$02lmu<
U"St,>]Fr#c=6LaMN_'zs0AnePo3e4H5cHpDT#<Pc#>_a$&Cr8+;U1]I$Xr]2;V0m
U"i)r[g$(s0GjLXr?V$V13uK%VRA17Ck'MrTbO.*%,Y-I*vMs#4Ke1lup_gYJrY](
U"]+*_Mn&rB=5eM<N:[^ni)XkPMBta$6)R)1,?KZ2K/A&7B\>Q&jL5sr=1+A^EI&J
U"A\hq(kPka'd-H8=1n%-\(rb9C0*Wh6e+WsGkUlSZn6L1,ULphKhBl-#i8P&923S
U"EL+-v6O=\i?eD*e%m6Yca*gfuk^(7(%pdbqA:L_r;kCl8=TenJ6Om6g0]g90dnC
U"59r(KM(ni<9j?.==/]&<%d:?M9P:kIoL1aaJvn9ZXiNUY6QoH4VZI)KOl8KgTh?
U"kN)31xgdVzRlqfaZDaK;4kzv(BaU%ct9pEvk>ew%blk3h8J_#0sZKJOhOB&0rZ-
U"T8f+DvqsOhtTmSES7Y*v8TlM)$rUt%]A+scoRBluFo$413g]>+F:wddtZXHr7H8
U"AknGI3L9Ks1WERBDXDKX-a?4nBe2t/W50Y=sn5ZJ8LfMaA^m<ZYG,as)1^'2bug
U"]9FR<#-$s1#16ms=F%'vk>sUB;,?JQhs>kiada&k(AfpH#p100G$qAB*17YFw4T
U"hsXF&IE*a)t;K7?$*#iO_uXUWSybiUgkB0G9pL=*/#T.W\q\E\vIh8]au3>Vum;
U"S9L*^TEiWXPFoC4sef3\%FGoW[/eGfw*ngwzm<c[(g]t(070mBu&ku/4e]&vreX
U"gOiLAvwY>)Nk=.LNZ;Jt$4'Fz6chpjZp,GuIaE-iuQ=[D&9RqS>%;twYr7)y^6c
END SUB
SUB V2
U"M;1-D9gyGto9dH;4Z2.ji,[2G?rc(TD.eImS2M*qf?6^$CokQz4Ep15Uv#Y_jo^
U"NOd.H+:<t,p2pD>4Oeik8.KboB0/Ylsjdy9(Vqi1dMNmU-'\G8xl%dup&%';09%
U"%'%-4%B;\(P[)P+09%%%%%(%%%,%%%%%%%%%%%E1%OP%%%%%g(h'Sn%htup%&';
U"0%9%'%#-%Hc%sPQe7W$>Ed%%l6%%%1%%%%%%%%%&%IE%OP'^%%%M12GCM>4G4LS
U"10B%up&'%;09%%'%-%*^+cP0;.Yx&Y%%%&h&%%%/%%%%%%%%%&%E%;OPMFI%%12
U"MGC>4DG4S7%up&'%;09%%'%-%6G&YPJV7qX%g%%%%m%%%%1%%%%%%%%%&%E%2OP
U"UG%%%gh2'C>jA'jS8)=8up%&';0%9%'%#-%fc#sP=%3)oq)%%%P2%%%0%%%%%%%
U"%%&%IE%OP'kG%%M12GCM>4G41SA2u%p*+%%%%%*%%*%?[&%%6%L%%%%%
END SUB
V2
CLOSE:IF S=193AND B&=10477THEN?" :) 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\10477,219);:END SUB
'>>> Page 1 of BCXTOEXE.ZIP ends here. Last page. TCHK:193
