'===========================================================================
' Subject: BCX Menu Maker                     Date: 11-01-01 (  :  )       
'  Author: Doyle Whisenant                    Code: BASICTOC               
'  Origin: mechanic@sonet.net               Packet: BCX.ABC
'===========================================================================
'>>> Page 1 of MAKEMENU.ZIP begins here. TYPE:BINAA TLEN:19620
'-------------------------------------------------------------
'                  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,"MAKEMENU.ZIP",4^6:?STRING$(50,177);
U"%up()%9%'%R-%NWBFMrO*ruDD.%%Ur%%%-%%%%gf%hpSgIru4kXpAh&qDUPWMJ<
U"2jDO%J'h)wl=.;iSg;TqQIV-$Q/Rp,>P-IKsQCLUwY:-5KK,CIm#5?[o<.RB3E^
U"Z/,CShY<O#X6AW,CIgl%;^n2OrpImcntlmsI$kvQ8X4.lO^,htIppAV2Nn'-id\
U"Xu[PGXWHkXNMLM^G^Hndwr*GvPZi((Ko^PjuZlH#ZaT7=XusO0[JT<-Whf-IbtE
U"R$gMJF[vrhZ0P%RtdBU4l(nT1d[$HH5TmMmnXJG>vf[4TU\LQHpnIrc$lQtv[lx
U"^vFc=Ev.D^Z?sg[uhG(#mxt%qTDt8hhFNnhE7hd.qM*=8W#l1JrhpqJ'(cDtmib
U"(7OcHzVrFWpMDTFCWlQX[tsc$lHsH\GsY=5p&$Gftxt:uFtFGWb9Z'p>ftMmt$f
U"h\kX<8MWDXdldfYGWD#u$Wp\L(>XG-igbcu8pi6PGgZFr\d4(>mp89o(cp>ZlbV
U"G:x.HZlX]Ziqr.YhaDMzprWI_oVTGDZg6nw$uVrerlm:Gqmx6h[rd&[Gt^8#nY>
U"\_&c[WD7m=T8bQg2ynupC4qqjzguTq[WN\xdcsV3Kg\eNAnso&4?#scw4j/p4MG
U"Fcn$^*>r4dX78jm>^##c?kg1<pD]v.Q4j$n>gdDT:iK$a*xhLd)(j=TWx-&-u&h
U"TVJTdWG#Ec9Fk.r/UQt>NZ>6woSfo8FwsTg6vjt\bXi2J[b=n'vk?vvILZrpu?r
U"=Nl(G6G_K7$Cuw<=JDscg5X7k#wM$&Jd>dpAF[vbNwq]tRXYC?n_x_kNw+uri+u
U"wYN't-cYl?hiwiN5]ZB6(qmN7o$S:d,e>DLk>TqXLsGW;qXdYsmYtv[(?X4(cO<
U"p-IGTv$.r1m6Wad6dxN9MNeuhvJ2r]JeHq^>7j?^sthddDF_YNwMM]5HcvEbWdJ
U"ojzoh5PxHGQgxZWq.]#2cjWdvXbok+gA6Kuj&7.8(CwdCr\N'xt<'pPZwo^]ota
U"kD?jN#>mQ<Xtrcni5hVrlt3uzMbSZhXN8JkOD/^cJcnI[wjs1oljs.7xq*vN<t5
U"m^GRgcI*Hh6nytsD^t2uH(*P<UJ^]>N%U>p^FGll(61$kg$rU3$Y,D8^bP=W$q.
U"BT&VHfl$xDwr(J$%a4Hr<r#\s_D]BpkaPp=2<cJ4ChAmnn33h#c_-6=niwBBOa#
U"Hz$TWX9daPGBnqOBvEs^#rl)+ESb+(C]TiVK?gPg4ULXcYbrT?[GRrHScjM[m>l
U"mTkvt11r-u/RbR]YBS$TZn#2D>mvQbc'l$GVdjP^9Ez(c=8T._QnskDeB2ywe]?
U"+Vb%l_\4^lxvT&q_Jp;v7'#<tCE85]H)cH[B0s_H%$rFiIrQ(Owu2?-EkeJCDeA
U"3XHuenZx*,'OvDVl0+$XPdXDYJf:(=fOnqpLb*NjyGRdqDRN\o<>\507[nR56qJ
U"UK.vr6^^&>Et(T3.Z/_50oMKEion0TQY'<2gHR4>ZkNfPnuMVeUZ%bNlM(.mV,l
U"*DH($2P#O]t,jhBm&xen,2&\;pRwCVO:Zh<6hGCkk$9G4#Vn<,XQz$63UZ8p&Oj
U"06_6akDR(RPpVmhGmhLU8O^);ZnbR'lp8espapw:$lBUJD(*Y9bBGyHgQ:Bd^B6
U"#HlECQ(t6f+$G)BXqll9)FK+TMfph0WBRwWI,ut2Q#;A]:XrCB2LINiLItE(om7
U"ad+1*%===pD5=(t)0\Tejzy$.LS(Pj?neSqy(PHiSDkuW+PfMV0K$Lg(*j._R[8
U"0*%4bTB&]vnW*%4kQ1?T^&f*6o2uEEkCx^R&gdE-D(U1$S.[0jco/^2oMKE5j?4
U"pYWi\g'j<;Td3:+&D=86XH7>fNN;4qUEV'<vTA-em>WEdLS.-'NIS]NkjrP.r=H
U"-F%F3b&o12rUN*_26+Z-1v$rgNB(cPHrMu95ynSWj6%DM*s]3FQ$WAW_i#7G)9T
U"\VuqqD9eF-^^4(<vt,MPrZngX8=iF&(9l;8F(q>(t=j.RAEhB<RokyZkdV\AeN)
U"%+??onISMd$O[,qf:2u\ff1K(h(+0p\??3LUXH4Lji*\q<#fBFW1t<VD(p/L2:P
U"Q1U)Etpqh.A?\n0]\sC:R,PB1H^z4#\#y^H*5vr^/HQ.Ujh7nS;QlcX>>cxM[/e
U"./tdZ<MNUC=/fA_v(0Y)nIY+3n2QMao>m6Ug=^qLHdrT.O17>lfZi21[j:3UdC.
U"Jjvz-A5^1jC:*3?/)Z%\W&m1e<buekW(g=REe4D'M76FBSJjd(sFJto01WMjZ%S
U"i]ae^1=DR(N^EAHc\*+emHmg7QdDLd\2q7l,+rS16SK$L8z9k\pr25%Es+G%l5j
U"Mcq3>RI;15DqY4G6k=H$29>o83<Cg&&/F_d#q,72=x$R+[.5iCrB7W#Pk7la,wx
U"7DDacOSq1M3IZ15D[FNPAp)4#ntls-E/wQO%f'r2vr^1nVa/(#,nmIr\AW*9W0v
U"=CLKhbJR<-hGI$9VPl3k=Prf^Y1d85lGLLZ/%o/UpqGF4M1Xh2))iG+eY(H8.ms
U"-9.bSC\,IqKC$SE-[NQuta1-bP5gm:)6Z84Owxxd:2_DMB-l=*G1(rS>(qAEeWy
U"MThIeX'Jq.op7'xrA3?T2VFXXPWSz9.9;Up8TV;t/u4ETyE5'J3%2?CaoT<KvIt
U"bR/eJWAVhgQLtKsA)'71NikBc9Bv.bTgBZDC9Yba*R)ZG)6/kebUHl7XXtE0,'Z
U"7rE)B0Eei)%(DQV.LT3aIGNR?#dH$EMKfK_ie,yoH'CX:n3.wILR.i(/*4:Z/YV
U"M^[J^VOyu?.O=/1+M;DACo++K0?1?bs%Uf\rF-*&Ri,%mUX8E)9lW&=IrenDrDU
U"[zf.45l[#qtCWKBZ9TQA/a-utLm(omsWxs;]Id?Kh1cT&WCqFM\TZn&6%8m;U:d
U"H6mf2I',bUi=_CDnD0_=Ag:fz=OoCz;3+'I)5RZpM'?41RS>b)*7AZv=Og1C1n%
U"V?E.o4aBh#=>^v2ue\)(P.zB0M=#;-oNJ+5:2O[&4yZs0EKI.X2xMJ3#]Xob/(/
U">2:#(>cxa&22m80mMP$5qR?uf<[1Fq2?(nW%9799Nd(3f.p1oO3'?O+Eb[,35Ne
U"'=Ws0t?VBQc*Y;,=%Nu_Ws-hB*,A<N6.s+ZkFK8.I4WErp,OMgve-ZL;aO(fS%7
U"jU/,BqTd:7P%-J]/QcGJ8.,j/8g%Q61*Qdn#cZFzdb\ZV+*_1[p2r;#N2oEFk41
U"3e6Z/wKC#QgI<BeXoN&=gQt+^W*CE%wMVt:Hw[\3>Y>UZ3'A7#w(TX8n'QWeqZ\
U"/a16]g(DEj0$OJBQ0O$tRc9:8/]WX,uNc5eb%5]=K#M_p\sFVIF=VzFB&JkEs6r
U"vlw()(]OY2-2dl?<7oyc4L0[,dG&V?HEN?K/29];<X\6M++#8/%(;dfLMp4lUVB
U"=C#'<vRC,B[hgB)j6FnkW7dCQ:co]$MT,UYnf$HT3<g7YQ]mTq299\JK.(OA(oB
U"Il#15b<_Yl#:EQ*I:uRrIeCdF6C.(;dfucJ?MP\O?g>7kY5CTU+Uqm4qaA6j5Mf
U"n[+fvsMeRWgOBa(#kblC#38#$Xsi#4ueQa.:2PzAx73I4<'oRN<5K,WJ]skTBxo
U"_Ad6jA'gJ_PG*Mbr5ZGA65+9qmJV_S&e+u).XpOV[zqB,#4*TFq9?f9lhBiRzns
U"25Ve\41q7joU$,M:50SNla]PBeiRh6ag18p$Wg1L2^n]y]\$o5[n7d<KI>Ln2%Z
U"ViGaR1TAr<RiY+N)SD1ZkXdOSAG*??J7NiM4VHO;AZd[N36A1)q'q<ED*RU3<le
U"N&b5fJUx+j+<HuTb2</P:%[9GPdZx^2U:u:#y9+GLvwtJa8P$#O?PZT%8=tv/B5
U">IesJgP+&CdM*xf*rl4O-f-V)0UMg4k1[\//IVL+G#2HtZk/gH0IEM5VFB%yR)G
U"OCmeT?%CqQS7Aq(O'kRR]9K_KV)]E*C:mq5,RM1nnn67JqByhhRLT5$IZG36mT\
U"#2wDY;.N]B:0P%3EP9+Jz1PZDf[Z.OB4;uK5<iU4f[:amXCgeXVQCe#/Ul0*yRM
U"MWP4NT88G.:U_RU%8U1uhA=>3,N1jL4jf('R]h7BCiR_/p/DA;Pfjq)KbY-JZAW
U"CXuzsY4$[M*e#(_K*da'-Z4&)[JVR9)ycQt%B?mxh2c:RTW)Ni;\WYfJGktY1O?
U"h$<p[&\DmV**k<^-rSraE?t'X^Cp.(W]_9('_jK.\TXm)N6au5p=AT,T85?[lV5
U"Bh]3$i[_c-c)lC/-kNX%$agh+g:Scth[.Rou/NnrCzA&&/_RlB,6iA_f(,]dUYo
U"&Adu#1Dp*+tuqh\H$#s'08hwFI'Co-;P8k<Rr&fD&rdppQ%Z'2mI356HI/SRu8g
U"WYyN(q=mL&s+atYLb9B7%E(XBqGc1?q%>-P35BCk6/Ka6Mutja+6BDrwvi++C3f
U"qC1if&u6llBrnb%Vm&5VEIc>fgD3#9Gz6-csURb[dnPm9K^Z26%*xs2B:VSo4G8
U"1\botDo#lijaS[nIrg]b_910ZMDb/bS&\ZgGN1Jl^2?R?VF'p(ACG*EK\Ci7T6a
U"qJ+n:Jt\W)XtzVWXsIsssK%6LCMN(]ck:/;ca+G:r69=s.5)1U1Xe(^3t\DIj.g
U"8J?m<l%Aue>1CSyaf=$o:+%GZ_cR+A>Rsw'/=*LW/32m58#k+Eu+h)EK-;/x&l&
U"-h;nq1rJf?[TCiU1WZlQFL+)yGUAAa&/cIhl:5#xv'0J'i&[*YbrC.ZLhG*N2_h
U"CG>$T\xlZZCmvsc%q2kSJfodUKB0KE8^pwoCu>$P0m7Sv#^-WKJtqXRFRU39sH*
U"S>$3(UrC'o^K<;c53-1BC<AOL?E?(V5S6X,\&T+7a;u+d5nuV3b*M<',KgC7?Dr
U"Hg4iqKeFNi-7UH]FKvC)UyK,-qRcI[Nx=P=:+w8IM-fq>XUc]Fug;aK:w)Ci'0P
U"Cee(bbm15'%,C+H1B&Vm9B[Dykf&-7^Z,T2JML(&(j5AS]0+jM6YLW35b,UR#jq
U"GTfea56Na'd;4$<R(H]]K/Dp*>6WS[F?\UcskvnVa3rc+/&:qm5;_M0oGR8*X]P
U"fCB&0SWQieou(_N*Ikj9JJsVd(;g2%DxS%-g7DQSMSJaJppAm/]DUq9&EFj=6?O
U"i+T-sCN?\Z*T47-r)Cs:J>/cn#LE_d<:/9w\Kki0+ACUzy+Z,C+8dyt^R^p^P+?
U"Z>N#6+l9)PUq;-$F/?wWJ=?D[I?BXh-O,It1c,\<p;A<I%KY^pK+4.7$$jZEN*X
U"yE19t7#\^ckQ\+$6+k.P'Z24^HF;wGhk;vdF=jHgqP_\\^BI?f.Vz8O9*pdZtGH
U"9/ODO%=>Q<MeZH)+CSSP()t-T/r:KdE7vHGxpCgJ=.WFIb/0+iQK^XSQ]<RTqS$
U"Ag]$3mYCX3nG:(D/Sq]z[(%;c3]1rZDHZFGuSd)92)3^O92E51+0<_;u(JMkoOO
U"5/J_3I'CY<r3Ju/SoL*6oVjfQE)4KNru$;c??YYS)SFT.BOU?Tw<&TmQGk%h4'#
U"3'qrALfWiB1o<HjNN?%$FFfpcEP$,%rjIbg<O%n3f<Qf[(2V;-/Ym&(a5f+:+CI
U"XT_VNy^H?xmqtD9g$qNr,V:6EfF)\M<_RWfoS99MEm#;CJq7EdeSxhInYiG)G=&
U"sUx%O\J9upe73ATBm_YUBQ&Uy.f2_3W=?2^i'[PRNSIc91w9o;]IW0=7z>/PIw'
U"13Mqs<#E<;l')0=&bkQy&)^T4C=Uym)49%&jxev_=ae;yAX<IVuQKIF_[2MJNbj
U";'fgB]XT/(v0EQ,DeoYNTa(]2:]k,V*4bD.0_H:F.cKkk[]*o9\Em;=Pe-8%T__
U"Y]SlKa'5E20LTXisLrt<0S(jA,E)o7M9onMZ/Y2N3mH24HU#;<7(sJLr3VacoRE
U">u;*AV6dXd^KK;2*f6.C&V*RKH^StreN0GJ-5k',dsGG>)-jXYsP^gqDtNQGV8m
U"W5k?VN6IND^+e[xri%HDDl2CZ9&[;=ZN?0swNt0^Sl#ncoBL#mjn\=;Y(Zl%ice
U"l5i=cJ2z;1)[8z]hTNeSr:*\?k7tA0g_Ez+2;I:0Hq-$gEK(_o3(gAfU[#9Ur=h
U"JvYi[Y/8#,6/Y9CZQnC$N_32DKOl)SfEl]ngJ_q$j#GoV?WM85g/%U*>7B.p&ib
U"D:wF1k,,4+0=\w82ZVuS_\mGT)4sdM;DWTn4*;-Cj:pOTC(i%Y+&^6]+6ShNcu^
U"ii2zqJF3LOq%/a:<[5k[A9FoO6(xT1Nj3PoDV#:;&8kpITmei>?i-?bsiF5nf2Q
U"]%=k\gAActLW,S*%3aoh>4J4'CwYu<3ZoI=++L4\^4r6O-r';)jQ'N)aIm7opmf
U"'\j.-7bU4G_ENWohtXp1VaA,(NU<+d)SQchkTmH2IgohskA%<x83N+Ir)ak4/ji
U"(pju0=b9g^wnF1U+%Ne$5J1k):OLo+cb_BDj.%QRNYsklYs.a8voED7/g?g:5Ye
U"N]7chKXt>s5*RD378$q*H?-(JLy&>LG#64h./DZoR;+p35/=zpWeDf1(hq#7E)6
U"v\CH\j,^=]g^P.xQ5KR_DY<R^,/gl9V.xcrJO:o;L3#S9t]RJVrAakLYNGD$Lif
U"4,bdV'PPN51ax/m:Xfo5.t9oM3\OCi.w*W^IJ<Z(V+V'GAuUD9cUt$g+hRlF_P&
U"klj?Qjl/S+C)atXVR32tOppnC(7$P.dc#5badVm7%ivh^1LaZBr6W4*-T]^/%9_
U"i'Usek7)DlmW^9MrU%m]jnkFB*^S%'W8f%3hV:SU.DbLBJS;;5v7rf=snF>CzA8
U"xoF#<\]84BB/Gd;:6he9f#IJnd7h_i&VSVtot>a2wE$G.wLqi>+VI##=IJ+f0yf
U"[L(Ig;(-,B[+/tz_a]4u7\s-ePE7:Gdi/Tjt%L/]P%1Z=kC^4\R1EK$xUp%Qlq'
U"\a4+N#lu]iusf*ByH,8)>=C0kUY%Ddluw/==Bw+KHi2jSLyQAii,'R)[*Ai/g*q
U"de4An40q]7'oxnZ)#?Zs%z;/29A,<J]/.)2dp&3Xu,4Oktl4n#]AJqAoop)G1fl
U"VE6G7s:0#Yi'H,(g&\kuh/Y^8NLnxZKA47JJ*P8eK8Jm(7gmrtQfGr:]/1'Rg$:
U"5+1eb(J1'??O[[?'0u9s60mtKN2]E#Q^=S7z.'<^Vd&a]SBzMC[+'u5xaNO&Ahl
U"QAB.8S_wMZ8>P#O_quA0o4Tas=-&(x4RSRF=EVczSqPsB4I5t184:(s:DozLW.,
U"yQCPlQiE7MVV:iRY2NF+'?z;f\0zNdf'6h-d(0_J&#kuS&tMo#6D0L[Rd;r44.N
U":s3#He*q_x5/C<m$f+hLkRD6pm+N;Q:_seh3LnKNOp<.w^aFH?27]P7rd9$:E>6
U"xhB<'kko,?'jlwEj5Rr#/xaW;=+kjuj,7#9<]5%hURMh9&StgVfXO/R'NG8]skN
U"LoxiCMK+&Bk4:ehwR?_Mp_&E&hBkFJy#rsbcE?V+Vg;KEevEhL]uA5/H3Ss1gBc
U"Ihb5eS)$*VfOebm.9>e^B'Zo-x$?DA=3+^YkUKx?\g/Nj0Fhnz:#Rw>d:_aN2uE
U"O<<&#1>0b?g7vKTc*r4V[;)+dP2l=YnWLh=%ZvQiKXekok,FjHVx5t7US<Z;M\9
U">H&v_oD3,R;6IO2#Jx<g1mv+1quA.;a6Xqb<<oFjLMXzwMsL5t9'W:ynN063Ly^
U"1E6&)i<b'RW6C?<5AnoH#1kW\PG#rNyIB]h:kdr=$jgr+-:;/C<<DeGmdMR-o2Q
U"K+yBqo,H_teP7.,+&hS;YV9)3Rn90Qm=Db>$T:,]dJ4-.Zm&bUTTRgMabKsJO$s
U"VcRkc_NYhYzf5u-E2Mt<k1hB#ac=ouFKRL=U6k[zBK$v[0N<4I37qjdKSN\7,5&
U"VH.2c*?R?VY:Nj7#7-bg&TGM*VsYE:)<Xose83YSv\9Ec0H72-/?#3tGW'LIHXy
U"$A2htH)2)LS;7e\HU/j[>Tac63FUOJF?hhQ_FJ;X4DoK#51FL2?\nLbh&&G0)/o
U"P>iQq879+RAe=fq=&eJN8XX959;.:vEx#::OJ:])sc%5d[$Sc7pmQ1af%V4uwqa
U"zF'9g;G$IglZFQLv4IcH'\O6D>qAr)L)vh<8'Asjv_7ZrJceCpc0NV/-m_+e0=O
U"i3EwNjL?s/k:Ka\h\sEZamF4YwUJklsWI=>-a/H:U(siDQ8IM.:j%iUS.WOBI+U
U"PNGqZjgTA/UK.ieXI83nKx=/Bp%x28[%HLQN*40-mb'1_ioE4Q-WD*N8B;O#Vrc
U"2$,YX/vblKE(vL$&c3RVeGOcB4cW_S\>Of0)[64#:-*nOUNV)Og9kfGCl)en[CC
U")25'bH.s?sa:dW-[53Uz^h$/MW(8Efii&0whGXtp5MLKC)BYWbtS;$9cco7KUU7
U"h.[JFeca1;?jo;R^%_xr8eG^q;4#-j.*sk?'-e9VB+=1#\GO$tw40i3jGv'b14C
U"dDy:f\o%kEOG]'p&d.2r'_N7WA7tfO_2YQ)Os;,.=KxtkincREO3m4ZgI-7#\D+
U"jT,u9+%U3,^E;<aoCmPQ_),_&QK9D)lEe8iVN+QZ*yD%$.\S5(wDAMDHyEY(vED
U"M8s<<+tn-jXEIPdB3v<%j.&JXa/S7_D<,NZ1tKM:*?#BggF<d&U,\,g#RHlWYlC
U"XhXi'd'Nn;\Vao?.#6*4,$QT,)e?R^8pELVDf-vLk&[Ba+&J&XOc_h;B#-YYIQs
U"DaiHKOM.(AO3,LQTRIH_J1gc8)qC'b9-_(F4x=c+1,tx?TEBca6fN;3faw\u\Q]
U"-ebU>V]n_s/Yc]QOd+$GagjNjVVptKlZg4b/^Zf$(\?5Ah(f?&xG<OJul$arC$R
U"6*MoD:DaA8At?aM(oT-HoI^Jh9&f%fNIS4c3p'qApe1%u>)y'o6e^%QImHa$+VO
U"XW<NV*4S2A-)j->/*dr0^&WJ.*DZ7o1CCTy;Cq'.4pk%TcVa[HI,P._V-8I+L\#
U"=lA41zyHCJ-^'0HYudHQQg:Q[*t,bwM%fuP>K<T<RWgS9pHJ]RJ;?YY^tm5=)^M
U"r4Rk;x$pzs9Y*696TK,jV3;57Gh315lLf,$*FPru2;I+CaCW>oi/CrF_cp$NWZj
U"z^XvO++W>=[h[8+(2*exwEGmP504qz^i?DCf)1'#aeVBcA&%P%8a,;VN_#LgFJr
U"d7)L9[w$sLhmBXud:i($7wR#-;Yt\KvlEHev6<--w\S.bF[mupQa>iWMg<Pc[&u
U"Q?<4P]&S##:t;'#QCe,+05z%j0Gf&'J5xKCE%Wj&_&AHsP_Jrzb=lL\BKY4tcSo
U"M/evNUn]%.l,h_gs?mhZ8s<i0d'*A?BkUyM-so8$fF,N0/z0XfBV9seY[Ph;NVM
U"6d*46*skF[lt^LFoXK<?i.sbNK]k,'9nrjpZ^-OLK4Ss+XEy8iJlX4O:Uq$iN6[
U"blq4_dHS^cnuVf_W4mQ$RG)VO5;5-f7bCHhKGPLbr)N)'v1TdVsEK]dI)OqaEdx
U"yL)WBLKhr$h4enRpxHHgvxPaY'x<PSFz_Ql9&2&$c+#MeGqEdYekPZHg7F^n4b?
U"A0l45bIgVOmJ\D?l%/.sfE7lWMek'(TD5Dyj5qPhftG/'nbNC8EC\S)Rd#9y]#U
U"fF\e-ll$7z4U3=7N>6wE$.fL6w6br.].e1AYc[HjZXN1q2vZoRU5]-cz[^Zc=4;
U"[sbP=;GRGg7N_?<kWL1;7,q#r,E0:HrrGk?(>gj_(_)<jK:9.h_sRue*YNX>T$m
U"En?[#L4n0d3<9?J1u$/^rarDu?ER(Bxk5hmRg-<O$&mufOK+n7)/QQ4FFC1uQ*e
U"ZhqPM3T]k2S'=YUK_'L0,,W<&iKssdrF>H\I[-Dj&rv:]Dmtf3mN%7rDB=BPVxj
U"nCxpUqLoLKDKJGLmNk6G.*3NKFrPq9Eht$dih'_:Ae8ucG\/7D*W]kQSq;iM\GO
U"ys4+auWJjW+<s221B&X.3lK8U<UIJd25e+2W&*)Ws3l5]yWH5#3hc*wSrRa)eHq
U":vPB=>^-xXu)t3ZKnL#kOXmlN+?(LWs,BZpEIn*)Y#NL-t$BMn&+G#dWXzlt%LW
U"P^-wxokIppERpO-*kmUC8u3HJ.Zuoaxd2%l6CJMpTMSPzNue>Ax%,up(%)9%'%%
U"-%1DmAP34,pE_%%%%W%&%%-%%%%i(t&sS#gruBKkZ13%%(XE0O%1sLM53_:%Zx&
U"0[HK5#1(,?%(9^Y8t1A7A7KVo%nEpXS/o9t/XUb'7^Qw(%%up(%)9%'[%-%YDlA
U"PZ/iPk^%%%%W%&%%-%%%%q%jkyS#gruBKkZ13%%(XE0O%1sLM53_:%Zx&0[HK5#
U"1(,?%(9^Y8t1A7-Q^=U.%y]&%#EgDa&t-1:8Zx%%up()%9%'%R-%o'8BMn%-8w?
U"'7%%7-%%%+%I%%<3LS82>HVLfABMU5TM0tay&3f:$<O1#R3ajo#2?TF9IT^UO5b
U")njJey0GZufo_&S?W5S'F$juE,e*jJ.)4uYa6jtHLWVl-oq.Ko/k96JcK[5,.bR
U"o(6UcquOYvd,'Qlf;fUY%v\+)E$^Q3I-kj3U-mn_YOYvPX&:r?[+75UEd4'Q-l>
U"+>SQl67pe?7mggU/-UnUY(\R/-Wg,gVY(A;Lf>?(:,+)$i1IW)^iVgOYk_sT1:_
U"7b1:',KVEVGnIO<YkUsPUY-b.B5k8+dA5aA9F'Q&Bv;W()rrWj)H)-5OYL&5BmH
U"]4<,bF?1P[++)$g4IW)^)<qOYQ_QT1:_7b1:*,YIEJGTgO0YQmskUY->I95kT+Z
U"A5aGyI'Q-,a;W()rrWa)HOC>OY6eU(Q,'I$>QJC:>e?+;kEh<iw;3F-GG.0A5[[
U"BB5a:[8))hR#G/h<pE-sPUY-j%JE]\]GEhi)w\952kj9F7hUSI=hi%r.<5+#Zip
U"TI?utn*Wd2V+uY#3Phd&)PWnxpntJwRpSNo\T#44cBC)*$k-b(0s-nTZ6VVExmr
U"<^hp/=am$Zq$wVl8r&vrplgXu7u4wV;F\*8^<'4u$h'xd]Fv_cP#_XT7Bcnux1q
U"xcH/r=tf0oPs\o0Puo$dsnn^HhZf\,MJ\p+K<1Ir.T0l,0jAnZFP<8KN<Tntq't
U"3up%()9%%'%-%1^<XPUk7m%&LF%%+*#%%%1%%%M<4=D2<:AWLS10BTebv&o\[/8
U"SB3xR_ifXQ->IIU-,L\pSF8#PtkBP?YpE->%ssm1SGK*Bh;v_w<nJ(I*Tadgm'.
U"Eo#RRRetC(7gYf''ss(k\O>Mop3amuxLRd6L,hG2Zacg=G$Me2HrN9i_TS>$0sh
U"=^ugFR]^NM'-/H2sKKG)2/d2fPHf7sj'eYA]GBGOH#n]m'mxNWkKTD=m^1yR^iY
U"<2E5Nt<hEE&9Jll%OOb[5b%2mG[m&#J*/k*VmK[/[nIncg\A/r5<,LD>#^fFQMl
U"]Kn#h73Z>ofJ\EDZo0%oy-p<68QxAzem'ho(^,M8P5LBQ[_fRJ>>1ME<H'./ocp
U"&g>H=ZOS60DhPh-CGr75&c8>LA0kJ$J#?5k[->rq2Z%Q>ev.W04F=*Fq2/9xS(k
U"^<7W(4m4XW0tWG*V)T.jg93,Hhy^rAvfNM*Uc,-Bnd'Bnd:QL\ku'\,H,1-f5\S
U"pjN]%Se3QCdwt>s.D8cuM\%oEAEM<TIQeO5OqI;mvZ]OhiRE.CL3(<=1H&%s=\K
U"*d(NHuRu#r%L_Hhh);]lx]dx_bf,uhx_62_3mR/X.l>F\^AXNmTgmG#SlU,=ebV
U"q#4$SCKOqRO2bMnJrt[Z67m:$:urpoxTw*aIOI2,jrdBixg,Bn%x$?uw/y9s7x,
U"[02cp41K-3?*MwCO#L_\e_rG::]R*u.VX2VCP5e+H1:l:&h&f,sS'<a'M.[,tjN
U"1eiaR50=(KCfmwuMvN6%&Vig+\bns(*aN&y8U<B<x;tbT_rEw-qF)6[+6,2,f?f
U"/X8QemDSr/YE%y+W1U_?=qMAP_)ES]4?Dtd&/tqr$[a_iiq>MctNPKuf\P(rK&6
U"O*K*Drd/alXU]&Gs6$223?E8CY;JK&tbL\Fi7kFg71tV1>]b'tjGCWhi%\+>SZ/
U",^].KvqgU_f&e6O'MY_ilfXOU4fLBVuG#Jr7dp0J<m4*['kH(KAqEk-m0.QXh-T
U"P_P-<jYwEd0206g^FP2F>t(4x3PzH0oxsJ4N&=N'(#C?z9Vur-3rNUIc#che(v%
U"Yl>;]\>ZTXd*-0/4OA^KO>c'?OGd=u^d?F)FiDpR(xU6N*PZ]e#C*9?])X.HrgI
U"JvXn/t*NL+(Irec67d30.m>VVjbcCZcWt3=U37kGLuJ*1,-,Y/*+]l1-z_\+e-?
U"D9C7Jo^]Y)ac-L*B9f(^t*UJ*fty\9w-<[.U.rm5h9?n%Q],&]_d15\O.j=\H;/
U"wtR92Z-*n/vql7vU70Hl=q3$K5(3q2o-W$/x5*]v>WmijL>])\5qW&Wa.1$Xyzn
U"&^I;8)kvusNMj<QZ5A^8Kq.B->[8Spnweq'a_wbQ(s#gU5HIWBbNdeLDP_bjCl1
U"WdNC43%:_WAyIW<_xkC'';Cy/*FbEfkcmJq0*YtF9i20Hplpj\MY;&VX_Bu?jQ;
U"2VR)O9jox78Wp*[bom(:/Q:A9mTnfkqY,FL35rHb'iGMf2wpdB)1Pc5(_=WU;:5
U"wHdb'<):ez%im)rp]HyD?s4sM/Q;2Xb>fRB4EEesd0GqMm\KTx<8QgF1CkPbuSU
U"o&N)8-I/YP]mo(FuZr53Q7<+e+Z3kg?5r]_j:-U.hFM:,Rf0NN9pM^36>qJrv<h
END SUB
SUB V2
U".yzik?DI:g*'i+WR2K*^bzouh4#NPfDVjP-%v\Oobz#o)U^&BcgWkImCp+QST\)
U"9cF&xuq81?Bu4PM'z'N5*mYtgn&9aQ9Vm)?jfRdRpU1M[%u#sVGYYO;rQqY(GjZ
U"neCm'97KQ])q<1u)eT4:E=3U(nofaO0]->U9O[?;7%MC&dh-H/7[NXggjT.)V$:
U"3jipyT0(8T41?$YR_r1<F&3V&b'^]65lr\[M+e*^bi)J?%se/:1<EL2+KGL0Nde
U"YOEc/:9%'d%X>EDt>dFj<t0$.?w^&q2uSIpyb3WI\t0g3[m9=JK;7#%CGO7,.YF
U"#0%iRjBMu%[F?&bQ.Mqq/)yZki;Eeai85.PZ46HA&:f(?Sn+Aw_XcJx75XcU%/f
U"]eDO(k4&O3n3H2ErR.;Z.=3xYo[gXDg35<2/*RM/'6pg]KAfrz:QW%zKkL-[:ZI
U">Yt+scNC^?0itsbR>Fu?7PC:Umz5d.$*B#-M7v8p0:&dXO2$ddOe+cIHKgidCKU
U"*9fs%)o7f8SCVJEl+%&)E3a<t*=GY+*9;i]$D8kfjcl7p<D:M[83LC'm&m#>8.<
U"p^=)#QN[D0DU-3w6JdgWtCTBfO\_$/),d4RQWqTqMp+_wkv$B9G-+,vE;Wr]OEU
U"[dQW.&='ciJp&;)9GI-:,DP.a;F)Jm&z[a\4+s4Do_+r&[9sVMo?Exw[0;Ws/LU
U"QR7L?pzTa+9Ym?(P[,t*?r)'S)OYX+*q:gP9%HKO<d[Ml$:<'UO$f/gqUa=<>bY
U"*Qvq.7L9FSom4oq48d7jA#zW(X#6T%Ujs\9deDy\T[$$(v.p7>0_;[:$uJDUI/\
U"#&au)2>F5iH_GDBu/5arvB<)]9'Mck6ZVDGO$B/6-g_hC%&JAYJ6m\792l'W^1H
U"1:jS_%1W//D13[=UZp_P_g#b4'f-VGWH<AsD/)c:iaPnRdAb]t5&#Rkd\^9&XpH
U"hK&$r]Gh8]OT>G_T2;$TGTW-xux^1x>AUO^ogi_1r>KdeqUk9KSMflesWX:JNoM
U"1%r7yo+.]hZ7b^CgkRO]gK#mhk-VXd)Z\([Mn$faz9NU\$UR3B9z;Ox(HO2CKA9
U"4?ma's%0;-2)XU7GcUz:#?j9Uqq^b])45*sYI^M&A9=?#MM5PIO5t3c5(JrDwNP
U"\[xeJBO17yQuK;i^ZC#.t0\v(7JAte]Y:A?sY3U>CT+F\;ikIQjdy;[)[K2n]SX
U"(5hRiJdXuM8,OLAd.&B)Cc(B)Cc,')CcpB)Cc,T)Cw&?)w85*%VTED'FW>8h+%U
U",1(Lz]Xkw.BtV9v3N%Z=.X$oQ<.??=iYqw(6UIFvphDmF1t20Qa4'q[A;l1Fadb
U";$8\b.-6uX#(9[HM4eC,UQm&IVx&r5x-'T^$0.\j0Z)ps\EpNE&I)j)HD1(hk#<
U"Tjv(R;:<s;>GntT4[u;DglS=tP;X1>Bv(p\'/[4dBz+Ljk&9OMpKah)tl<AX3q]
U"##y/N:G1A+$1alO^R.$a.1?80f03bg'#64/sQg^oF+^9RBN/jd?GspeQ11Gek=/
U"HVtIRaU-JYVrZ%d?tj)=r5X2sQ2wQhKL5brWAuoiMKnq:4gR4.?LJR?5?r)d]P#
U";oB$p$cDFC/'Jdw)xkBvo/K3Qh00\h^k]bwGvh_%ko:>Zkd$<dU*mZdWYyO]mzR
U"0cMaKl7C)7m*EK_#c142_[#(fh:L(W7&_M<-7V.nSkB+L4X3Z=DfNs5XO.meryL
U"n=iO*iXB_=M8>'abP4wu.)<iI7jmsCi'xm8&m)h,&YpF_ZfbZV.S5UQ[t*sfqkb
U"BQ/fbRM;TC:)PM1eS]6pU(qGYC1>2oCE2EDE83J:URM7,1MLoHPh*:<Cf&<Uw4v
U"<wGIzr9v(]9UrS7eH$8xQ'909Q7\PUnu(Q&.[I(Fn5J*](sm'k?8Xh5PbjE5_<m
U"5gkI8'<(a\/l<Y9qu4>%W=g8jjn2tZZ&4\dRlL^3K6n00r1jGBYH8sHEnciGD.B
U"kKTP0IwdDrv=S,)42VZcM0$'o)B.LlNb/Hi&(D(;E=7yaK3h8enNY[ME6o/GJhJ
U"6\QFPMT</G8BFJ>EDql&suw2JLV#CR,0U>]OwHo[2>^D%BVeAL)g<5Q8PWm]dkJ
U"R.51ozV2J6##2?v)r698Sn%V9H+Amz^ACYkjYm0It)Ge/\GL*.hoZ_I:_O>dit;
U"$/q('-o;-&>l;,Cnz$oWi(5;Lf2hkk*BwCM*a8l44)(>VG>w/5ps2_,0p0gB\sf
U"(8:[4teRt2n(s#+$sIQR6%,%D.B6MeHdLs7(Ef's\El&ZBSZcK/%E>-X5s%wF%6
U"<dPwu0($FZ]A,7%>[9/I,d<stN\c2fu8#X7-,ItEYX4r0XAeI?^UB1C>,34N'T.
U"p.v$/t)CnR%Fu+.Obf-(sno)9I)n$#9(cC/c)FEE2k#fR)SvJt9t:guOMTQMEH+
U"8_ri\PswlKC'J1<NCY1*,.A06A/m++&_,H;muBSIFt]WHQ;3JB2ivsd4:_)hB(4
U"1$ElO=M:deb%viHC/n2%b\O*gR/d(,3g(DmH=eBf_tr.i7T%t[g%JkS1].8qrhD
U"q8bfq+;%:BTdc,,s^E,.J/X8It.W0qackRkb#Q6BfuLh3A3#6f7G3jyh,ud5R#B
U"-m,T.*H%ecDMfouYB=rQlNOMJAcTF*ndjlcCt4H>;I;8oO#LQ=+d+pd1xS]?T#h
U"7Y/_lZG(q#Lb$d'QfpjkcIbC%QZ$[[Y.:L/^1d1P.COr#Vo>?0mY:3G'en_':wf
U"p=n9qAB/1=UUQt;5AEWn(>0cQK#ni.3&g>P;Jft<(55>V6\xarA#ND4=Kk1#5$j
U"Gm^>r>x>,Em0#Y$4+(k-S1rO^+'gFZroV[vCb%C6Zh%mfs-We96GqdI6Gqdi6Gq
U"IY6gW3T+*'dofj+p%[7cak_'eqJ[=?%EO,9i+aH/Cfr<AP3#/5d'-Vve%Fc;l1[
U"BmiKm-;U?G=;YMMTaD=ZOn95o-Hn<y$obgo.e>iN#h?]'']j7mKp,1Ov8MD,R#k
U"2eaP]cTQ<BDJVs(*)alrhwd6fAnva5;X/[JvYFC)3U2]I_O;V.r=EZYr/;5$7Y(
U"+9iRgWSs0m:J)7LVU]C:lufhKNbfd[vIca2Ng:Uw=Q#TvG9<8VQ]=MzWiAd$6tt
U"eAWLZQIHVG2?=9:?$#Qk\Pj[BC3UDl*srU<Xwzp$[7g]1&ViJE9ejN5xp4d$;_[
U"JK6??J\yZz<l:>zu2sCUQsC+rFMcZEkI1)M=OmQUC+k/v_Y:^b*3cC,bU#JcL^_
U"UckmWH*iL52.u12hC]_l$eEUrB(1vy6U9eI81R\Qn1Us$QWH%$:X'fjhQ.gJ^=e
U"KOxupPZWJI;xc7PeRbDk\+[;K+feROO?_<J[n<LK'Fe;eROEs[VHQ4DVQ&5N$I/
U"At[(nskE+#XU75PBJ\SJa;2A^u./d9K.+I5uKE_J+>47HI'hWn?Ke^*4cKqdWAh
U"Mm8cFWy/WLjC=bI<H<uOeDBkEsAku=7ilVHECL3Ai^?dEXjc:'t\_he)GMUt$Sc
U"GtqIrjPZ3WDC6\fcZlQES30QXL&u;nhFc&5U.bX8Mg:%ulu^(#18Sb.Kj^Of7Y1
U"<s7l#3vbg9Sv\,NL?eUS[Np3[h#hL$8aY;]3'?f1qCTU;4C;)34Q2Aw6b+2sABN
U"3)c<gAAaUUcJ-*VzCbBl-b)vYye'.<r)n^VID&-Jlar&cR4o23CBtYn4?)JTeiJ
U"yPw;apEAhZys#cO-4(_h/^_H;gi4?D=:\YZ&iesz\gN6gPs_75R?B^VBYMVoHK^
U"zv/E0FoHJJ,cn8J[rJY6_rH4toVcPIsGRPR#jls^Wa1BjkL\KPc3kL_.kHT-]X;
U"efi+sG7hSS)-ClO]/98Q%(3[zaxoi7#mGA_oQ>Agi_dM[oEgN,6AK,5PNZ(GN4S
U"cX$#hnH_B>fKWw_A+G#()b&mM_L*jL7M>gd)qckUJ4<\QV?1qZu+jVgC4_J8?fu
U"g(-\=,J'&Cc'u%i0Nn7_'DBp6Y4n.ohqmqRoQtt0wizepZ-RJ]#&C2/Y\hTKUUl
U"LAsaV)ujf9KeB%DdbU.0(*r6<Y$\TGuh51M05Est%Ql+eHmd0W,dC+cv=mW[$gc
U"gCLr+kTY2]LC<Cf>6g]e177LvQ^c<=fjhEoK6W-pi#3)NYJourNoj(o=FJ$rQ0T
U"fg7>f:t+q4e)d_KnqR1]78%/k*79ydEjDb2'%C:4lehuiX\MDmqTP'JVv/)o-ia
U",1.nXd7_DjiHjUJzb&VyHCh.^KsSckQ=2%7Zv.k9JaL'(ja*mx<E1OBoiT&j4Y'
U"XXkc([*RGn3V'TQc*2=+f>hJJ*u\-,h*K<uli&jBfsN4>Z&CgPm-twPp\IQMha2
U"qQ]\)8SlA<>R?Y(4E6$D'PCPe[cjRXT^.+9f(ChX.RskGS>[jQWZgrW?0_K^ZaS
U"S3_#+ZjmUeL5M4X\np;c8xpUB8EZ#+W.GUeLZH(rviwpY9R6XXbWR]BAc4ktK6-
U"Q3V%P-J^&b&TL16I:L*4#770y_\[cSX$R[ZL5T%n<MJo5d?NKA+U_c91uOKm1#=
U"WL+[&CD&2vwLWCU(?PThhTiHht$kX=T;YzdbC7V/s?]gddO2J_M(MI_[<V\uE,f
U"fidgAAkDI0?J+1:lI,8[fJ6EUANmS6AUlTc_=3%nhAvIm8RMq=b+XVZvDhw,47-
U"cQI5i0GWW-MiI'Nng]Q;EcBNl?qSt+<e(PKAQ?rp_,mDY7fk=K?LY608EKG;)(M
U"s5m?xin(uQ)f?Z)Pf,<[9ch.aG.4-D53q4DXHjc^]yv8_?L]&zEytc$ePtGch2'
U">Z/[#Q9\6yrOq%,UY0B<tqoAOF.b^G;w:we$7%&pK%G_5hAdv?($&P/r&A:^]/\
U"L\s2IIxd*)lgLP9+HIxi=dKr8eq6[cKs\tau*Umy6g#DMZj++s0,]Vc:rO'j5a,
U"9cw:]JvP(Mhhne'2K0OU8nB*ct[B#C)?sHQ/B$W9<]Do8KHOS0ZmGSm\iCh-JAi
U"Q)JJX7&mUhyS*KSP;AwiFl>c8/1.F'=.eYp^dWW:;T>S=N;ZysEG.IDsHNqfsJ'
U"4%:NOR6wiOR<doO(kC5Y[OIay>f[*IhaL(#gpY9K:(3]>$%I9sqSn#*7c$M7)P;
U"3G9$&]>C_E1%dmO/q#Z>)T'TWdW)'mDstoW0W,KvYgs[q0NCFS<If<?GY)csl+0
U">IQ0Z1v()J?rKJTyL%:c:3VM'_^A+K;h.w]pc6.$0]J0Ge_S4n*S[g]DD#:(.B,
U"qr)v==8u6cwn+ZoX56Xe99b5gOTl:191\ZGF]rW%GA89D+OJ\I>pCpnE\kB'.*q
U"f$(s2h#*=(]P:=#+9I/Ix_J;F>WPUV^\9]2%56tJ2HH+mCN%cIj1S:;i$J(I0)7
U"/buR4&lgP/<TFM]Hq.6==%4=iiwCPNockstVdJ(9.+BX8^uq4xP)k2VrrXlaq1:
U"8e$wkSWgvVJW5B7HZvb%QYKh1^6%'<sem)D>S3J1-5Ujm8RIW8&iuD*pHgs?2_=
U"'xsIsMnRR>;ONOjZ:kM7ID00a'Xj$iX8$1uWEEXE*p8r4\+I9ELCT,%VBP&X>ca
U"1R8%)C6-=L5gObPN,2?oO&KxB&=BGlh\hr4#HlVX[<6t219T>DdvE&AmBuF7g6S
U"VY6.Kf4wLyL(jI_-aiD86ZBJskZn[7^[czmdF#Z(lj4q(#mBio6497r,?bsE:TD
U"C.r_.O5NYk;WUqRu/&?9,#c:vWRC$cnq6\>=BnLmpt^Sx\aW<v\;egzNyeKhR&/
U"0qA1-f&']bBS2'F]?v*g]uU.(pu76S\r\_,>YE)HabP4tUf.FL3Ie).TwV(IB<s
U"<nJ9iBWGLv+2t/mN=[]0c^Wm:I/9xq<5s5?U[sIehJ'(X/=BGw)q_0RycqJs>;)
U"VE8O+H5Fz<k<l%VfshiRvjueUVJ4b/O)37X-n?EK00aUU/LekKir4K+BVL(#<wb
U"cl9mJt.#;pp&J_td2Cz$vmKLehoBt7,fP=(4W<VVL;c?k8HiJ#m&Y1C;\+/*R:P
U"mR*oRXjUdnS&j$Lxu]*,'IgZwLt,6et?,4+V'7/d;JA94A2Ciq5^iQ%/u^c_an^
U"Y.A9DtBQgObz&k8ESuQEJ4W2alxv:LP;O)0g36-w_4M[J#jgMqYArv^ijW8]o]I
U"wuf%NdKS*zE&*C>4nQ^-qY\t54^bMsDCm8Flf&;=n=%]L3J'pQ/FSW]%sV+qome
U"_I]-&P+2N%=8$%V*TVND^2+y)xmCrq1g<c3^oJ&Z[-TQ)E/?98xvZ;/L3yZtBIf
U"*uDmXwRr?[ARn?5nXt]UYja-SL/VKCOa^?>GfSMo)fJj.f&_ODXL%bT<I)ODr4v
U"6;2kU$fF^Fevb+XmQY:mpk4N(-LP.>a(b/RL;+eN;5il].6)6kghXuqho'0p\<A
U"g1Nn-Qx:ju34A28J#1sFBS,MC&\3-'N3DFjky'T:E'c/wu/vp$?P(f]IF]XOTWG
U"Vfe\K]lr_LuquptQF;Oo4d.)4]F<,2A)MU]:/6Aw:1A(9JfQ_>_4r9_vuaQMv&o
U"B-cTSOE&Wneb5-5PYB1-j]5[>=qIjiFjs[%>,Pkex='jF/N'eFWO+eXsll&hh9R
U"bs[7bt)Q?Zf4]\i*+TM=sg*yX=I8#*j]:jWNYqYN2jql;&M0c8IOd&\9WZuTq]9
U"lxYer-.NqS^SZpxAIt1&_(6;3dU-]KQ-KT[Eas:EWvs)Vh-_8E)^cbsv%a'f#eL
U"^0O*atC[?1k<ix4bqDN34PZdrra%[W&B^#OU,88>#']A-NoQ$NosF2Z\J$-G^J;
U"s%X<[Q/6l/rKQ&/0uJa9tR51hnEY1EamQQBer^hqmP9mlVkn1($=a-]yl&Et[,Q
U"FtkXnl[$pfY4g-6;VnlBqc'b-H]-53nJrf/J=k4FsSl/k&0NbJc%'-(C3v5<RcN
U"O4-3ryOK8KU;<m_$'u^9UtK>O5rDM0ju/&5stHwslZuve5[bR8j*t;1Xtk^GYUw
U"e9beo(*og+S.cC)\;NNC<XZK<ws3#8>>uA+Ph#?=dCINk%AC#Kdhgt.S0\484hj
U"80A.WF34MdG9A]Isu?JC&MNl4It^inJAYPABMk^iqlAm*7Ml,x\]c/^\7vM$A)N
U"L6$;9F^HU<[AcnvwGmba^U3ucB8=M$SMN$5vkNt'cB9,xGb5OdbmK$;TCBEo_k?
U"3%MhQK*Ra?'Copg_EGKQ*us21.s2[ZK*es)2^j_helCeFvS^%bcZ\.j384PfK0V
U"XsY<iTb>fYkeuv1J33<DEbD]rLjlWTbtcM&n\2BL3Y[s*mK3S_veYiCcTo&0*$B
U"(PO$Lf(csj:#,-[\FcM-W^6f#,F%r_-)Z=h:vg$]th]I:*q27Pi#-$J#-Jk#C+8
U"=-aF4.voVcm\i#b#5B<57#'.TG0DkX7?pQY8H.4XP*&jZWh(3QMlu=nl/%/8JZR
U"?*beRAcjk4Y#t#1VMLZ<i0+r4U2t&NC3XO+G'ZJ'S(O<uhnn#zP/?I;kS;2&L.&
U"&R/_%ZP_Zai#.JVxt%mr:MJTel6Yf6eB\uIRBp)e0KOf&:S9<2,wP6Lr(DP=6UG
U"5l>oQ]_UW_bs=J[E$KvqLG24jx7&wCimbMLem1wNT.6Ii&>s;-i<M-Rv6%fwVB,
U"pxyF$ULfL<sI4B8Bei5p3rdq#LpxE?OG>:1_lM*'LW.&&rMX25b+$Y7<b1Q27M'
U"0h[ny\Zew,.WRLcHBFUp'];+W_5V1$WU8NOb[RFl)*sL3btW2,.MO[j(V2^VA2>
U"U2AT>DJZoj*g_61z#Y[-ia+,ALfB0>YR%0bgK^LKAUR?)v%ui7Pj(F6.3_Qw,<j
U"72c:+Vu.^/mZU=ASdIXO$92LbcqSw41<4Ti<?H(SbyjD.%-]Js\\BNc<f?;e?LZ
U"^ngQg#>F,4T]]#k=)(e5iAGb,X.ziGb,zPEeogo'.PoGi)iHhd<I%U#[qwWNUYy
U"cS7>8FRILV5ld4]pp\-w7KX2:MjO6*a$zoa%+_]RiVAYz*&qTdB-:ILN:cM%?-c
U"OQr3$B&;[XcCFvKD7GO_4---0lPVXXNCIHMH/OW[MIp3FUv*QrFAv/2NT2Adrt,
U"E[#jV?75ZSZG/I<>5Iu'Rzh3P.3.7&^t;n7BiOzJ/SLFe(g.6m)I)Sr4pP4]AwG
U"w16lAZ.yGQ'IJ'3FSo>>',_4ea#[<eck#kBF\g2Dd?dU$#U&44T6A=PAdG-tIMe
U"L=L$p\K3S\G>Xx5CJb,#j%QK)IcQ'6Jj:073'qKDGcc,AqPoO;D;NJnhbKHZ1q^
U"NU,UmG';.(;b$\#Iw89V$n$if-rT8]*g?4g#b2)p2:Ra_Y*k9opq\mI?FO(GU$y
U"mxAFh3r\DIiGc.V1mfcM+GU]&#N99I9itBIeu<r++)6V6oFPsc2/ac[L6^2Gq7?
U"S4Be\k6?VlZm'a='an?65*t#jE$bO.#&YoProc'.Ts;l/ICCid$tb(G;,MOC85X
U"*hSRfp(NMKg4Q=P.T_7]&WGBauLUqH&v0UuuoslnKSWxrPG2ak]$Z^M^r.GbxIp
U"oG5JMde1N\[\oDU'h0ImTrd*W]Ua+(V^aX1EOrC-tR3jlcIAK6?((coyg1<gjWv
U"96S4<cskHr:IF<VzhkI/5>9&+-dg2Y65SD:KJW;<E4'j#GCZYrK#Ylqx2^>2^rD
U"1_:K+PTSd=G6EUPg_$qZ,y)lRJbn1e<b+u$e-$,VE/5pwd2Deu*#Zm'un5uw0ap
U"oy$&[el(\YckX+&js$F*#r*f'I[*QtyoG_e-Y[]Jj;+RCrN,-UGqamCga:L>F'J
U"nUzl7\vpo$>jU;b.Njj(5NJn.#^L*/)=x^pumBL&&yRXPNYTI'stCfoQ^:D+x&S
U"Mdtzb[bDcS87(o)#qFNN0]tEfmT0xZX?;Ta/K4Izp8-]<DL'TX0&beg/%50\=Wp
U"Slv,*=68IJF6G\+M'DJL+LXCRipg,U4YV%ryB2c]svrTb&-m][wtiVq+cWZam(n
U"d9.qXet3+I8isLu6MbzN<as+NSR*ZRR[:8*BlXGQtLa&&N3=?5ASb*G=AGP0Q>=
U"sL*(ktn1/>p7;.+E2h.s^?VPq8#C;]y;l\qT3/I%uj.dt41Tx?SGnQzT.9KQXH.
U"lCk=;df,Mj-J;ise7fcJ4i:)q$xa?T>]I)D-X_q>H.=9DssykP[CuaIIJq:O?NV
U"\0OX?E)7hmZq<q^-8DJl'3#j1E;?A.?=hsvoZq=M0T>pq7Z>hrr>eXa)S>D^DY*
U"mRvEQ:d_#&/h4;S%?4+ZRj>%-P%z07YyM_0FMx(-0M&f7v_)boj$ccCLLx%'up(
U"%)9%'[%-%a)<PPwEV5fs[&%%q%.%%/#%%%<M4=D<):AWSq7<N4%o(v9jkZ-i7B'
U"7ecG7K&.<ITvXq%LwY/\tf+;wlXn3r4QjA_2GVmjp^ZH(h^ZNgwC6tmA?kzr[nZ
U"ssc5Y(f%]kZc6N1S9kzt.MVVulwxYi*]ZRpajFd&zjdcLA]NH_4h<n<b0x[/:Rv
U"4Yv<jDi0N+xro'7l<%2OfEN5ZyCczx\h(R9Geiy:O>qS,[?NF%#kyT(05wjZ:5R
U"&UO&)2xjPzZy7[Zg:&gkyqN7Mz-?N&Y%2MrY%22zY%K#PhPb5djFJ#PhPbhdpdB
U"ZCIC3h474+FW-W(g>)h%F1&q%)U%SPIlPfdqrdDCor3CClJC4^Y7^+A3-A(^>)2
U"%AN&+%]&%SPlDz_zoazAOICO3:7a:+/Wb&+/-C/(*)bT%'&Lg%P%CFzez/_zoz9
U"COJOM4d7d9+o-oJ(J)ti%aF49%7&w2%X%NJzizc^zqzCOOJy3^z7z+FO-O(g:)d
U"%F/&o%DT%Jzl[xo%F/&o%DT%Jz1gzazSpzDyiJy4NY7N+93-9(Z>).%?N&)%\e%
U"Rz'%Dup(%)9%'#%-%4DAXP_0-/e/%)%%W%3%%0#%%%<M4=D<):AWSMA2\f2*>jm
U":9OXRfrd[a?D'Swlg/zNJ9VfcbUT?e(Izo6aF=k:&/&vBtDlXpb/)>ti)9$*rjK
U"$E-^\E2chKaG\-C8kH#pYNjQ7&eu_HjalV*dRsKrDo929Q2.XC\lDeMdFiuJmEH
U"&IvL<;3BxKFc;F*EX.Lq%udF[*9tiD4Fssg8P(]]$qc*eVMMgNQP)iQ$;;iOD+L
U"3?L1ae\7)FJsRNo'kWqPi(AK./U,&KGg9SF/sfmYW<jCN[L<y2_GNBr?rhJwKJ>
U"T&%t/Ff'n,xvIAQF3N>Q49VQU^GCV;4;sDyX(uh/)u$VU3sP#UseQFM(m_Gcb8O
U"i2#42r\$ZcKF9R?P02&pTS1ZGOP\?0O^wA0F5TxDcHNyTAU:)iH3I#IWcP90?:]
U"TS//n?UH82jm6uG+wN7t),,5hzi:*YG6.:NyF%OvylLyuwP&wgv8]J.j(^5lwmC
U"0qXY>)Q?fS%p81?Cpm?1xpv[)u1tBgqtm3bgCbndUzIcn2_bbEXgsJl39CO9L%P
U"+T^O=cYA.=cYA.;c2ADRN-^c;xHCNBu2czNU2<,ha+K&LxN9sD3YYqb7*vg7K]&
U"#x?5sn1Obg-sE7.K&4_BYndN;k0q8CP^U7_o9;H=G'^CZWyxO1qbw/)>_MFv>W/
U"Lwqy4CevidEDOxX_yf&*%7zU(JEJy1[+9pMT\ZY(5iK)+i5k8<Y1]O*f)nnc+F(
U"WtNlPKP?_Q%QKKAzdgJi200+qBQM&%7]HfC8iY26kc?_Q(a4$lR*aN$'*^FT[q5
U"N^z-1M7oLd6*0ZhYSQ)&DjkfP'6qoOEe.h/oEK8\cN/;JFghp(EK$KLAeX<Is+c
U"2Sl8cpH0k/B5)p/e)z)tWV[7:R4&&+ZYzXHn_z5XRHfCE_.LP26Z9/GACr^eRb8
U"RkPgi/8i%&2A%>NZbp.RA3rAa<5=iH#kM;kEP=cWrkTfUAKLou(G2<f8PUc^3ql
U"N.h5X\dd:EL^S]5;k3-*QN-bdA9T2_M';0j_-&1e=_$SRg6T^lQ-V_aM4l58-vs
U"2+G2GxE=vwckWTsBA,adMt3pJqLXz3Gz6Di5kbO[WV3N8$\pN,#=1TZD>G<4fVC
U"7&n(\DnADT,AD,Lk(Hl2cHcBJv(Z?iUtB6T11-bhDc8>Zgni9iJSmwh_>QEI8&k
U"aYn&?RJS9U:1Kf.3oBKt]mW&Oqoq7PMumc;1CZMjC5fsB,=\B<Sn)DsXuMngl8v
U"tTIHW9_12eZr_lW)#*'6qWc._viZs^#Y8COG4w\(]t*t>inO,fJOOmT0eQ;,';0
U"dp;D0bgTh:[fv0+uIniO7aFx&%up()%9%'%#-%Fm8AP8P,y%^%%%%W&%%%.%%%%
U"wn%lmyS#gruBKkZ13%%(XE0O%1sLM53_:%Zx&0[HK5#1(,?%(9^YktaAA0K1?F)
U"3Ot3%GrmDOctWA=L3x%%up()%9%'%#-%UmnAP1d*4f[%%%%W&%%%+%%%%zu%Sgr
U"uGBkZ1&3%(XFEO%1IsM53e_%ZxF&[HK%51(,/?(SA_u9o]F=)&S#cq.qEfRm2]p
U"(;x%&%up%&';0%9%'%R-%NWBFMrO*ruDD.%%Ur%%%-%%%%%%%%%%%IE%OP%%%%%
U"%gfhp%Sgru%up&'%;09%%'%-%11mAPS3,pE%_%%%%W&%%%-%%%%%%%%%%%E%)OP
U"jD%%%it&&sSg%ruup%&';0%9%'%R-%YlJAPZi(Pk^%%%%W&%%%-%%%%%%%%%%%I
U"E%OP&tD%%%qjky%Sgru%up&'%;09%%'%-%3o'BMon%8w%?'%%'7-%%%+%%%%%%%
U"%%%%E%)OP)EI%%<3LS82>%up&'%;09%%'%-%1^<XPUk7m%&LF%%+*#%%%1%%%%%
U"%%%%&%E%)OPgGI%%<4M=D<:AAWS1)0Bup%&';0%9%'%R-%a<\PPwV/5fs&7%%q.
U"%%%/%%%%%%%%%&%IE%OP'bh%%M<4=D2<:AW(S7up%&';0%9%'%I-%4AeXP_-(/e
U"/)%%%W3%%%0%%%%%%%%%&%IE%OP'.j%%M<4=D2<:AW1SA2u%p&';%09%'%%-%F_
U"mAP8:Py%^%%%%W%&%%.%%%%%%%%%%#%E%O,Pan%%%wnl%mySg%ruup%&';0%9%'
U"%#-%UmnAP1d*4f[%%%%W&%%%+%%%%%%%%%%%IE%OP%mo%%%zuSg%ruup%*+%%%%
U"%.%7.%e&.%%qo%%%%%
END SUB
V2
CLOSE:IF S=249AND B&=19620THEN?" :) 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\19620,219);:END SUB
'>>> Page 1 of MAKEMENU.ZIP ends here. Last page. TCHK:249
