'===========================================================================
' Subject: Open Source Editor                 Date: 12-15-02 (  :  )       
'  Author: Alyce Watson                       Code: liberty                
'  Origin: alycewatson@charter.net          Packet: LIBERTY.ABC
'===========================================================================
'>>> Page 1 of OPEN3204.ZIP begins here. TYPE:BINAA TLEN:12506
'-------------------------------------------------------------
'                  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,"OPEN3204.ZIP",4^6:?STRING$(50,177);
U"%up()%9%%%7-%>a.kR7I&Q,^(.%%E,%%%0%I%%>?M4=BAJ2S1<h?DdH&:?f9i#v
U"'[T,gEnNJr/p>TUCwUbsm.7-y/lAB5\t/tcWI9,E3l,fw8&4t>R^j-b0w(-^^m1
U"5)i;s4TpWZEG'_PKV#FqMM_tq55pfBtfzX1+c-wA)x_q]mqb0R:yXyrTC]cB%uS
U"Tq7>u\sGs4232paqgSd4oB?dSqOdvSq6vecwUEfO8fsmJOV=ffmhwI)OO%Umf]l
U"e4\1:.ShH)9P=UwmiC-2EoBDA0^bt&$&)4jpw'T?>=W2CEuLX8LJCJ0qPR.>4#*
U"-K6=Rk7hWP>o)vR+Hcr>Cmmfy=X[.mrFQ02=b0l<RzfuhFe\Qp\KQa'H(0a?WMM
U"n0MxDd6L-fPd?$^FA3(-0E>GW=i_.Hac*v46nG2LF3<%95fY5SrzP.0A-XUqNu]
U"n$-<8-+Lx>eccaDmYH^tmP1/1+TvOno\0?0j+0i?wgg[S3u#wC8tfGCAAa=i3h^
U"S?h+wwSGFjIu%%dvjFloic0,+*-N+kLW?c[Hr?,EBgtl7%^6okRLmGZH6LghvW8
U"nnF#q0NmlOX8:i\O1:S:Q(4P3d^2u-BvjSMFWw.X[)LmE&&*B6m;?iZ%?MTw8-v
U"PVpsRrU.(=(HRaV$h^iv6)BO/jiX[Z.L9Jz)98'c%3X*O[f:8($K3CO4<OLUfES
U"8xs/(0$S>3Oo?EDtH_dGhc%k:4wi84N\cNBOa0Euzij(l]$r$EWN4-Q-dWe:D*.
U"lJN/j<W/R/n$N^V^Zxt74?0o\<:qaC%a')B8<Z(E8ZDZd\W]'nMsQW)voh>j3ai
U"u2Ls,5MU,\Bn?+68dRTt9g:G-mLU[S6c$<?(E?z=7n-.Kw95m8$FCOwocNdo_t?
U"&MvB:C4TY&%XEqzlIjtcn#j0M2t?O^(21Si7=Klw'M]=a&KI(=UB$tS\Rw*88(\
U"]>D;tMB:VrKL&]&H.wQ^s<Ika&Lk,'auD0mPGgvhbu2b0qOo6c(0(d^chCC)<5j
U"[IaOrhX(gG_*tChdPeMqd/\lb/arZiur=OgH^_J7o^NtYkY:7I:=YHiXr9u8;+1
U"lPN+P4X/^'cdup%()9%%%%-%(7=pRUhZOB'<Q%%+3'%%%2%%%M>?4=.XW.UIYS1
U"0GB=a:GB\[afXxdxMO?+M)37l4*H;[8IJJ*CK%B(ALniGA+cP9J9:;P9Yx^<asw
U"p\(%D%.wtc#W6nzUB'(-C\?D\M'oX47x-&Sp>YL#.9v[L8\wEoj(7.?eb=DT8Yd
U"3;hHnL=Xv5i\sECZVP7Cn2NUR(q;%mF)ggYXI]G3pSTh>SX-hT8jKlU_YT#EZ1l
U":J;a[lI,rQ0($ZYYiEwdo#-hr7.SlU]T2I\$3HK54rkT_D63GHDHjNK'GE=3h?q
U"P+>7Iq7o>&Z]9pM1e0v]lUi?0>Y+eSJGv\qgHppCWafa>#9)U)-Px#S5MUvEIj&
U"EM?n1j6[n^UR:0h02mWd0AC5sZo?05=,Bv]8X4.c$l=*mJ0m&6iDRIfk-1:y.>Q
U"*SQ<AnEKJN(zB0\K#=b?D>FJ11OP,o$=kX2v=*&YMq8:T_-7>1c?x,F_*4\1>SL
U";t'AE\4/Bp^.u\slL6^UUEMmOkQhu:&CSKv31Y4I)%-W<_nUb*r(J];*nKkD*B4
U"G<d8%:M/9Z1%%)&p8EBx;?Xq<*U*9Y>agX\N1+fck#Jsu&bR%?A;/c+X,:Wb:(^
U"qTiNg$:WN44)g0_kf4Fn9CZ?s,RE6a==1m\$m92kj\Tts-U>W?;lV-1<yFK>=;a
U"V)mVp7qeafF$jd#:]]Y<#^UTjqIIvG$Fq=YaV=QcJ74W9Dho:z2#,=X>[;AI;<n
U"&gK.;Po20c7P%U7N,b2GTcm+e9EMs5.e=h,So:*W=F(:2gVOHL2]r<m^MT*AH>k
U"F.IFx%Y&oyaa#'&'A2C%<)LV*G#qczEf7SLWX(D8>iA/2W3_UGK:Q+\f^_8T<H_
U"<,,fh/Lc+2'?HTHe6od5GI'HqGu7;Rt:/'5yiB5.7FKv1$J\>2Iu(UKITDTyF'L
U"Z'z-XWtB1C.Z2A/]0Ie49)>>]BLt',3mzc;5$4g7*,%nAiIm\-2AY(QOGNPm)Lg
U"mS#?sO41,1w-pgycC\hUgK:1?WC5Cl([7t'seaMSN*nQ<ttWR>aE:KI=MaOnD)L
U"[4T_uqjEOY98JZYbC+#Ef'g)PN2D>E39tNDhZ9j2Goe13<PK_/b2]D%$$o4+[nh
U"9u-9p)qO<FI)#+gU9X[iA$d*xZ:)j].>.g6.F7ai[SYHH)p7j,*,)CLON=/gaLT
U"Z&7ZRh0Wi6b1B*6svO$O]M(<U;$;]WWg;J)Y<<mBgT)j\qo^<A7^A1_;<G)qjY?
U",;>+MrnS:M-oG:Ef8+U$R<$04++CQr'+)kcHP9(FfY8NefWju-<QW/aUa'T^]$8
U"2qu(An47Q$6l78YG6KnQ)RKAH$BEmGfT\mCZFU;aT*E468iM&7,hPKN[1t+qtZW
U"\T>RW&m0$FC)Fo^/J?6#BO$e4Jm1l4eV.^rT)&55-S=JYMKN;lOOB[qsuDr:lE9
U"QHTk72PG5=Y2W9*<M;QgjKLb(*G(k6U_SA,LS$sF5^W*k3BU%LI-FATjN^X?Q8X
U"MRmI%oBfn4N$pi;haK$K5I:&F[(cQaG%7V?rW#/DGFIFa[QF=v^xO'4L9tm%8,e
U"AYX<AxDUW1C=ik:VoEFpxJiV=]_OEASiLO#jeU=F'p4Suh<6<tIF'P8]YV(CA$R
U"7/\FG_>fL#A(*1;ILsW3o9)Z9_KFhNuReE>i7mdGVaVa:j'/UNSIKCG,((^x(9C
U"1o3AjlzG>5o9XgaGA:<^OBvESXBJ,qiu+(0yfX.*_wR.%nR<(fx.yO3KT4.g/NU
U"1<*^<.PB&?JUuz/I[Cfp0-#&6BC%Dn[z5zsMmRPLZUtgRNBrVx>#%;oA5dufUig
U".#)&0sMITM5o[auwKXVlWRm_*K%NQLo+R0W[t-G69*.zTpZaf_':77wTeLlbhk\
U"s44q&Up.)sElwVM\;?tKbGO.Fe94vMkM1<MS=S:%Y-64Vwn-'mEn2G]rr^A1HZ_
U"lFp+-?GxlD7Wn12C(H&R29/%84uBuX:)U3XomS/SkTHYGz+Pkf5JN..\&E2d2*b
U"1t+e5y4*TtI6snI>QADfW5T#0hOO\vA2qJh1fUo9qPi[fmg&]=4nq=-'ht*uhR-
U"4S_2u.[)<*EIT)PI%O1&C:#^kgw<,Vc^S-d#pwZ8\u9(;2Jy8M%(XK8\c26f#%8
U"5\1uOn=po_:l[G;yPJC^o/%yEG_7Z<MfN6/]8<Y3)VaMHy(^wPOp$)iQ6Bbjna)
U"hUE$]aqUDioaT4Cy:d0apK]Sk[)ZkGZo-he'Q&W7QVv0T8H8i7?%FJXzeRr0Wrw
U"Z[7RcdQUo/3-EU:]oCA;G%7/6meK%H,5\5HV=WY[78O%+,7b;F;0CtA?)=UA0m+
U"kP?G]#9:8kiar?+>OC\.*rGt/0UOC7_o5_[mQ=)IZbc''7fF\DoQs/0'm%<R'2t
U":JjGQ[3GOgJbaXt3h=s'1SzQ[pOSLZ+*Zv6AOeNGG;bXXhXKa]hp?;kC0u\$BB*
U"=]U^;h['cE?BK^7JNpoYie6t_0QC(Qe&=%.XG.S)$R46LM*][(a_3w.Rl%=2dq&
U"RR(N>dRa2MeRt3?X4pABMZ-2CF#x;Kh>w]AV#:0N-HU%LUiVzNlTphl58ou1#x8
U"*#?;:76L_CYOMo8K2dAq2M['#zIU]F0TFkIM33_$\'V2?UO%9I1-dZu.&zf-4$Y
U"GGA90xSZDC..]>rnluLTA,u7S2K*G4AfOtqp]FmwE<eDIwP7fG#IXa$E87tQL_:
U"'27REc/j2nOL$t_9'NpoJ9rJ(Yi;0d16U?]?5cj&+USs/c2SIiEEd#0ZRQFi\2Z
U"_]'%xbAp7$#fT6QSy#I,<so%=R9(Oxia%'j>MiA=v9OB5eOko)CO*>cGP*D1XHG
U"/wp*,\<Uq1oM]x3xOEQ#znM%Ld;d[bOUj*:EE7i#TlCs,X;cpk#xIh4:AH&7(rk
U"F?;+dA=0n6;*-(X\VIkqx:yTK]*Ds1=(D2Ji$%\';n'[F36r*9'uw*apo:qW42x
U"nwR^B3zhYI:;#XALnY;kQ*?_C_y\]V$pv'GmfC[:JOl[x.8=OV.*>KKO_qIow\#
U"f=uB2oWCj[mg4q[a6jDKK&\D*G'tM;ZDw;2k'tL2E+;vKn=(23oDfiQJt1BZVe9
U"9[XERRQB:1MVmf5*X/]0/)l\?Foux]-'LVIfW]VwmHSX^t:B(1H=3xdI+KEcj#=
U"6cO46<^,vLKGe3\X(-,k#3+sgC=UFErWn+uJ_M0iX+4I)iyC+R*Oc4>M*npcv'-
U"NMwS9c2oiduoF7Lt15XBKtUbwOL?X*?(7U]_J'Vc8.x>0%5,2^w8[dor<1*U2nR
U"g[G[=S5t%JM?3npo;VHPtzUiO,\=i.*)^,*k2+:P]S<dP%x6#X(qt/Fj%'n=Y9G
U"h,Nis.S][A3kEiZDet$UucU]q/[PUC)<L=9[yFgFNr76-$+^^iCZ>R56i0_f7#a
U"Ve(7'+f%Mm32.M/i'(<uM/8+:cX=+?MvieF7hf2%[bCF>njMq2>p$_i(,+<:2/>
U"RmQx3b66D'kfh)\gsOQWUY2QlVXW,3owJSb=]Io45d%zQ6l?0LQqRvYD[U\>K*x
U"#<qLbX$v*_?njgtVSeH4S6mE'EdzWzjT1xU1136y9Khmw-.b&[H=J9o)bYuRxW[
U"1dl:>yqU]b+P2uOtLS4tuMnpj*dm'#?h>ejF>cCLXR9lo4ivW7%,j5N(PLK#cd8
U"oK;PU,jFEL?^Fm].dl%$ak1(l[8xc\/b>o/F]++AUfuRPb:/dn2;#K/qRxx>qNz
U")dg?jLt+P*#?>j6wP**jK[N?R&02n9;:^J-\o^$\rgjw5alKp?*HlKP0x1r26S9
U"oZQdk5lExV\Hx,_26cnOZQDtP;2zL+:/w[9L(TTW#%CuWE*5=NWDt;1O,G;j#xp
U"sBIWTnUeu9m3=qsp3NW=1:H7#Uq>,Wmg$V>cU_j<S$.T##,Va'yaPbPtIXaQgEs
U"G4S?r+/E1GXTdA&H67FP6G+nEgYsuwEpl#850ZD1Ene[bl+vpUG)8V[=7+f.dF(
U"Z3x^3A\e3bTB[89MaIGCk)OFc.Y[\a(>L&DFHcZzd/SeBAL]r29d(pc)S#_ft]j
U"u_U)Lq,Px<ll.e6Egk9A,8nTHe;f)\58Ul]pe%sRsy$>B,GcL4<$6uOr/a60B:U
U"A1Z59TO/EKx/qh+m.NJD+d]2WrU\dZAuuZM4d]B6EgeD?[OtFhcKZ6sh,$aFM#u
U"4S+P;?Ru),jd+A[&4f&X#q*Q/-[z(q6oE.Z-V/=>$/Z%z^CKb0>n%?Q,'dlU$\0
U"vUp_Mx<JPg/F+M9-4v4wspO]4zf8H=#hghSgE4N,ZKDZjJ#*i_>tAGKM:SuJ;n*
U"<juVBlLczeel]A6YSSA+s/s]>>&c%il.,06Dx6p,s]wAOJ)aq]F9s/C8&6]Ue4j
U"T=ZKhmIu[F<E:HrdmH5<Zg]uxsl.W&n^M3Nc:88P,*QWSPfF.-o&u&)Lhf)rjlr
U"9RQlXp$urm=4=A8#ipgM+CJ]i1;^=th\m>rNoL60a_lO,RMll$8)djf/,Fa(8vq
U"Q$3p*gR-ofaZSbv'jcIsVSc^1^nX)Bbd6sS9jgh&d/R_lOP729:&(#>PS$PJ1EU
U"VDFpjD9XUh6u8*Q&7vds4tJp#k0#A]=$nN#C^/:U3qwLDFX51r+Fdj$6$17=3'e
U"PWP1?OFGJ,\vd;f>pL'74#fZpdvh;d;R$dBKPd'(g06J#*FI:.=cusz\Jgxs]^8
U"Y&0v]PtfPBk9=r0X>9U9bw+I1,f0EPLT74-EV,H[X#3[Rt>-JO(Wi>3$MYz$-VU
U"oc[KKIDR7Rk[ANr][>hWf00L$OBkHL#)$f^Nc:UuGG;;34AX42)Q-SWhpFyDe4:
U"7N#G*AklUdr(*]Nf6>,1_K;T,))G]bA)[zE:uI*Z]-=+XS<W)XH8BDaSX)0hX9E
U"cMY,ccWt<?G5damGF7axwo2mb9iYO?Ec[Z/VhOG]/$qfT,BGiNcx^V6d&$d_To0
U"Rh?ww%Q\2h\>>q?CXq_GNYNgp-Qr-ljdPFUV)?i55SnE_JVU&>sC6^FDX(M2B3;
U"fFI-s[:F02Y-_A>FM-KXX[e2VR;f/o,KDvX)p0?zMbW#xMlIo(xZ63/TwH1BLrB
U"Mrxr0DUl3UR08L*^oPCbF#b$Q%&%]RT>-yebj06/t.zfr0b.;'Vimu*l[r66?p4
U"7P0Qo3p2-j_.T8Su\akfG#Y<wCs&/v4FXCQ)je9/:3dJK:(+3?/k<U$0PF\9*KR
U"Wd<>2ROTi3mkKdb9Dvkh?oD3Od9z.10*Pl&_;GQqL?WTgBPz&Wy-[AUPQEgy:=.
U"M)%IGSDX9Coe5/#bfG5[9pmm,#*;vtM;'l^?[LA>nY0i;kR7bR<jpCGjn%E6;#3
U"1x_+OHEm?4.I\^owX$6oTmYMue-h%K-2u-qaa>m0es%0pcHPs<U9DvP2Ulu*vY^
U"PE?7&m'^$<=nZ%NO*0g\=FHZmR,.9K*F(gPDj7)Q:i,Fr53\J(Z7MnJW+[S-#N/
U"/g\o#\IL_WT-Walj*H=u=Kudzo](oe/iJ.qX,q)e;9G?2a4nOXzh-xSA?$d&k?\
U"_c:BLM+JF93izRY;#yKSv$lI=tKj+2_)bFS+f\S99fWMx\Y5c\C]1e0XRHXb+J9
U"d6t%_Pl8cul#U%m))d]B5-g]<dzG0n>MRf]Yd%]PMPzG;(x1yxHW&H.KF>n\Sby
U"=>)U8e3<qyv6T+AA;c''^\\Pu^u3MVKllm36GG?u,>0MO<,b[XEB-MWuL^i1Ueu
U"wOfx3#9,?%j,gM(%[/&/BW[#j9NPhpa9575-U4h$Hh5o79m.1H0%$[r=h-4VG\(
U";k:I(Yd,#EQg=P5LOZ'u4QR'YlhGezo<SdPP91h,#p*MJ>gyffu?=r%I/9kr0]9
U"UT5A([)pohRT5(C&V5k=OA,$*XisHpUQAjpJ]WN59f,cpNvCA[jUo=nj&Jq]V[1
U":R](Ema9PZXd)*;V&R0bHxc>EVy6qNsV:e-C5*rTO]$s0lu*^2%.M(BFYc$]U^z
U">e>['Wn*xzj\*wN5?S6A'$5#i&&&Cb=t&=pDJIEmDaG_V68k(LnwP*FwG3pr4>d
U"D4'[9&uZ:5VNb7D0OD_sFkOV/^;/t3b1G(uC#CQ9eRU,j^pf>6YexIpMZEWkkCr
U"Kqd$;W;)M$jeTqr(2Ct4#t/tSCm[1gMF:;O#-AW8>'G90%P*.9L#OW'ZH6&xM(Q
U"\VvND8VHGZ<H*&[S,\Zv:iyuVTO#9$h.cl+BDPRwreOf0m6?Mt^Y-$%LiUuu;>+
U"AF7Tkr?6AQ9C?18>b)bQGw9<NLXcLh^>T0NG\X20,^j.6pN/h%_8:5s5CHZj$,#
U"aJR:MjbJ0MJ>Dmo'>6B1?VRe6NJgel=4s\qF?$Ew,:&#Yc#\K;\V*jt]#Z/t$fG
U"qPcBqIr$e0PaGcD<c4mXtN:f<s?hrK\IKCU\GM4m2c/xAoxd5BIaY;4[iJ6lt#i
U"VVG.?nl[f?E5]HPfqv6R0NUqx7-uL'cb7<I=4T'O'XhSRF:KEG'SmJ[N[ra6P>V
U"_eFbYpSQdrukq0+-6S*tZkN>zF#7I;B(lezHz7M+Xiwc80oYVh?7zp%>MCEYhQE
U"SQX;Dugc&huaC5ol$V13.o\T0YRut(9'KP':_Vsj'f>3F?N6C;PoMxj\:lRd\6_
U"?tUJjB3oVw4TW-(Py'L\**o?pElJSFiH\H9PHhk>C_ALYjWcEkcJCL:)AP3PPv*
U"TyB,SKY\bonvD=hyO+0XKd0tSbRL<oc,2Y+(7z=]F9fYX'QInWMy%'LAGZ41int
U"rL[KRTsT)uNnKgSlbf+=Y25Tv:A7Y=]tBD(R;bDBm:Wj.GVXj_4GjL;<bx(Za6+
U"lB$f1zgc+ySQ-\HLKlFxq&SO<\lMQuqP+BIQ/f81>?CZ'33EUX60s?Gln=%oqz$
U"Z4:eY1d17<It)dJTDs_$tzu7*\5Plq;AMo*2r/6]-1geUH%U)wX<ajBR5n7JkZ$
U"J&,\w14_n):1]sp&.IAQaH?w<&kB-P)R,+3AQS;z20M4<mB5wexv>')PJf?jskW
U"6R&?5;+E^(=[A:S?F\#]mNGNrxff*f1C[3Q\go.su*c6i/+J,h^XC*0(A-+avu?
U"B'A#0B'20S^'6oN>/6>.<\YV>Lq-w2)=Eqe_oMV88)qZ-*cg,QxL'rT7^&REM*&
U"GvB4S+=H^y_<CW2Q7JP0sv%gvI15R:M'zK.0qbN):u7lij)TK*2n<ZrYlDe#8=.
U"HAjV^j]i#s^BgE0$md#VXf;EOavD<Ds$Kg,QgqyLjR'VGrh,$?mv+p+NTYne7p>
U"nE1-NuA?[)<3,$J17#ldY].o=N9IU90B+9?v_)sapmo(tIL*SKKpT0SbW8fSDwk
U"9S;OEeFzXXN[[M,e&sZriIr&osMH9G<giee:4fFZJPB>D8\LC[VqF8rH_0J*jB&
U"$ZT+1U/?fnHh/I[x/NsNItQ+\L0?$gg<vLGk$w8BL.G1*E,/,-.9'%cl-SwLmX4
U"x)ZkDgJL+lw]\r[^iauT6eD8T8Dcu&8,x;UCYdl3FU3L&HylhNWuwR;'_DEKTus
U"0wkQ/2C2MxiX''?R,=s>%N5hn4Bx+*$+\N5k54S5WmQx<3h(j7:pavca6lDG#J_
U";h)u<3M>94ES1-EB(AT*Av;F5;e3:81*j19:t$h>cce$zvG5$O#D*?1q4Iyz54t
U"46++=W,w6#)S8?oN*o2U(.1aE1sq6onF#$j3ku:1cWwKiq_R/OHdFhd.-qGC;+m
U"*)/V4<Q_ivu0rJ\<50&6+D[$P3(nD'fH\b:mR5SsZ*R7C]bTQ[_>//ExsXBr(MK
U"w+%qAVO#[J:g&UmVeo,X[Z#1imOq+=vgCXT76pO%pOiCe++_X?=MUmhydVk3LwD
U"Y.XU$pfZ4%5(_uv\6rqM<[;s0o0yf(D)2HVia=]80J*eY'cb=[AFpbq5<bal2T9
U"<%2>YqLe?(y5k1(vDHFEKo)ib*mS_dx7h+Vp8XNbl^0Ov'=;q3md'm&HHg^Y$1h
U"<sEcGTLuo<VpLZ,sfZO.nu^*OGk9y9UkjC\4#[(Ujs_gK*82>BNr=_Y;AhbgZEl
U"aU^C^Q(+83vfd1>K-I1hr;9mN;YqMGO1M&CAK52.3_y63=&4?LbK3pAUn(Vk)Mx
U"PjM=0&1L$gp(md-N&hPiBu$dj/r,S\XvjWa?5*%2YpUL8fKDcoMeKZcaTu8-UDL
U":toM:;LP+ZUYzUA#E0+O.lg\#9GGA;+'R7Y&?y&7h:CM+N>Gcr#GDGFQI:V#od1
U"'o7U<Q7Ja0&/:(OnKaUKxD'd6RleRHOuApXoSB07Ce->#\Gr.46VA/$-Ac#e:XE
U"5z][EJ-ag\w(8M>A]j(.h:%Xa[*eD:=:vKP]Pk%mbM5FB:^h.8,O#HUYT7j=tPS
U"*OzF3,&^l/_DIhNr/r8W*#jJ-ZMOchL5-xX7\Bj2m=[pd4*T_qN9gIP.BBzBt3o
U"J+)K.Rut=;820CYTao*<nkMKmi;LD]0je[K#_])&+)6B'u8yg*Z\wtd/$OQgU?R
U"*nR+N&rxhe3L>Al;zVr:,6+F_W,+&f1fR=7^3t6?M*o*\..MiUD8PYSU;+]PbwK
U"vO\%FBK,ZQumFU-/jJdP>'^sJ?a]DOn'05w&[dAt1#d-sOlD#gBsts5WKp>TaHm
U"dk7Uecknw/;iSZ7G2[uCV7mxF5c#v%Y52x)F:G.<p<cWC6B9QV300vh:p1gOYLn
U"NR/j^N^$YORg9TMt((XxvJ;xl<h%'j))P&8B3]AV[Re0?9/XMD_&Fg$F]%WaaUt
U"oIXNnGA;D';K5H^b3D_TjUK>\PdPJYH[POq_'V8Yd:&#86)dr2zS>ZBj>/NQ>nM
U">[3v-ANZc*E^tOx(Y#J9HHDvMH5)lMU/45k=qUq;+uXq^E8:KZ[M<ZR=lL0V\(*
U"El,CQ0/=q:Jd>9JnB?eQ0_[W<l33*7b/<l^E;R1lK=d_?Bu]A=B'Kc_nWNN0Htj
U"dLO3njdrKc4D6s3S9<d6[ZWAi+gYY,p)]-C]a,R,3.t)kdvUO4b0L#30_Uz^/ia
U"f$bFG%#Q[TZ[hS':IHAYK^xn)P9:y-FAU&<2<ETkrmD^P68Uooi^8SmePV?7h+8
U".QLAspHF0lp<>_ZnT$RUTEt2Z>VDYg\Kf,-&O=:XU[nJ/qUzUNks_C8nK.pfI=1
U"gB:Cm3x4[Vb^7q7'wK,-?36LR/d+c5:uG6%sUH'Vk1KzS)1E0P2(Zqx8\yE5(9F
U"4z#)7Sv*;cIH/bMh;77&b#;d(iO<nWjPhT;(*p/E[YeVYOXCw(cM^#DE:<Nr4J=
U"*Uv859VOTq'C71AF>^+\[l4r4zmvK7jXq*MR+0p#eZ[(OlPyhd_]eOI/4MXo<'_
U"6TROQC08e=UT:u#zn7Z>QYJ,bGK't$>q0a6R8112:+<D:'7MsYULY,<Un6KC_g/
U"=>ckur2#20Z];,%DZN+KQO<7JM;W%=>OJdH\j6:D^XdT9LpGDp[GW0Zbd0%:''D
U"RYdwFpY^YuI>Dc11_o:1.U%%^/>qz+*3+EsAW-?k/:8[AjvM.m5oH_DK1me6nxu
U"eAJw>kHOyhCqQwVkKgVB.OcdT4huXXXXh>zq)oGt(I4tsLS(OMnEDcPZafaUB6r
U"qOr8cxNlqbf:BrQ/Okb,>1;B2(RBe[)X&P]iwU%awuI[$'0%MR#WWsXH9x;/?Qd
U"Z2?Y2Pszk'67OJ$seOgRI'/k</DGgeS1sN1',Ca>-/hg.eWO3Q\IjooZPh^lviA
U"&o'WG/>]S1=O2U$'5pK=gw0N6KW'Rv&lKCYN-eP&*U6j=AYOgm+MxJ>_m[?<qv%
U"9>MG'uwT4D,jbzYSu5<0uA\B]R+i6Xm.ADj9Av3.m()'%06'-EDS<XU-)5?lYKI
U",V+[(ILhy2Of%cVWam2dw^_N?dJ?jRb6kYI77?W(pd%ld)diXNF%(qQGlkZQgVk
U"y.T^(JDL0[gkcW\XSDOTS+\AU[K1lD'8nv77C\Oh=aHUOKLxGa(JKlAI\HI,5<t
U",qQ&6b-PBr]%0x$g,g[NgtMg'>c'oYJ?[NhQ-<,4a'2W'\9u_Y(k[IXc0??MWB4
U"iNe9+1rs9h?S)Nh:[:P*j3jU6Mx,j0?ugmP)lsgrzVxWT#xQe]xz*Tb^wlWSDqv
U"aRjGH1n)Im_bl=bLMl30i1A<.eeG1?NnjqT$$O>8YY6#qs[X%K*KyQB*;C95Ce<
U"nG56YP/ZU#'lIkKiwtK5xv\iMz,)yT#YI0>rKcLRVvDi'Ji#&lqhsx]9ohk>obG
U"[;^t_1x5%+8>QRcXaE/7j_GvTMR=vVb:sZVD)9;1Lw<R6CZs7S=63__[8p0)7X7
U"GMm<wO1.4*He.d8m:S6lDQcPG=mg=j:n%ARllI:GK02<koi)2sv#9:1$K1u$g1R
U"[XC*edL=QegWDah/3B%r<Md38bI,,V&c^iSRE%_Z']<rf3Tl/M)006n1nJ)u_\-
U"4:uBRhyc($6a=&M'[x?uA5:BR'A2WCFo1]G,01O>#_>ZXjGGSmP4'<xVvNBzbUa
U"-h&uAg?SbvKLJ/EPdhWJ:N[E>)9&xEn(-\'pg9kF5?Po]e4<;t+/JvVP\mLPaER
U"Ve52&r/vPO;9#u>$2.?I9]#wkgMB7Y+TC^f.rwm)o?24s<D*P^Qt=MI20CeJr=3
U"7cuG_6DivC]]3pob2DJ6bivRDBb8emLn,K1';5aH8NvaTg_RJ&GU5w(uT-?<7/:
U"D3QRq80/*/lC./kmv_tcQI--SL$+tgDOQ2i5K$_>Ssv=O],+1Y0563E(my_/:gY
U"rc'<*rOa%g6LM&HLTqxX+.GeFmb$S(_t]q2<AMt-(ZO]Gh4N7?#Ur;X+\9AOokK
U"w2Y9B^Ru:rfeWjD0HH+1wy2*7'YK3k42Vqz,)Gh+m)Va;9dHApmEGrxUg_J$:1l
U"6n>Xm'<:WMd0vJuWc4:SO[2;3;xH6J*r[VmZ>Ma;itO%%fD<h1\sjk/.3rTq>U7
U"u+=so=_L4XmqdCmXeNLrbJAVCdpWPg\XwBA>+E\K2krXdppp7Uu>06127=f8PZ#
U"4O-J)Ms/pwd.ZH.Mp0tI5DbHsB&r'/U40m=:PMe5oBQNJ;jNbqr2#m6kPL74Evz
U"\Z6+ZHUXlrBS1mkq7<.m5Q%qeqzJ>a)o9fVb+tRRfc'ow_P#[jAS1E7nKpn>Za$
U"0vhoerjVCpFx/xk;LhYyKttR/Ume<U(xY%]YNW>G8+u%=>6u+*_n3Jw&::%^[80
U"Yv8c5qVyiCI?MX+6R+0%dW%H&U70FFf>Ot,%f8LNJU(DDfWNP2g_nA.syUIm:zZ
U"a:QA=>.x,\q%vnAD,G.-)Bmy'qC]qTshR2Ro/.]Z1]I6t5[#<x*>7(?H$s1mZ2n
U"igB[IM;-jaTuuNc0sd,s?QABAVt%NIGz/Mddy/<+Z]&Y3g>L7??ec.ghLJ-Jivo
U"OkQe%QYl:0%-cw#K1w&]R%HTEEH%<zTJAwP^&E2k<aMGP[M+I%9H^.07KL*u2kj
U"P+ZBrW3;H\H1>^qIqP1EfX0g$cX'?90T-hPP?nnCB#1R6n&OV;r-L(vTiuAO?)+
U"ew9si)#%VVmuPv4QF<pmq*C)AZAsh%iAd='*A^IDAn>0$Q:TNP)1AtOnL<t54?v
U">_u2#:HCUfgT6kQmnGR]jot]h2,krOQ>\fSD*l\'P)$;v=EI3vdbJ\>l^.;Zr]\
U"R;^gwQ?kapp]]KSy\CDu=cxtaAq#83:e[+92[dVuWclt]\J^J[Vj>X2_50XK<Jy
END SUB
SUB V2
U"G20E^i?])r\Q(TRURjoYKb<j9J34hCoke&A5hkyD;:86m9s\80mJotnq<qxujkk
U"e<'j\8xCt4[vK,MF7o*C_/TAB'oq?rdW#m#1hG?9MH.*l/RIV%J-)\-zH/w/p3a
U"npzR.NAif.UOgi'Ns6:82x-'q*1),,&VmX0GlXPa7s6;8Ph,TP(]9#Nt_$:=^(P
U":d?5G4U+_qYUHO90Eo5/a$K7^W2]Ir:Fb,*x9m?t-SnGZFcRiOF$R[>,OCr92OW
U"Dud\h]h%RFO:=Ob7zZD_b74e2D,a+;&3lUYIfb14.CfbI4ewVonA3T;4;0iL(':
U"Alqb;])2gp_QKn-/QE>t;Yrr(ZY;pwXL)L>L(x=7\?I)&fS5K-LkZEY3'v:vRtL
U")67'b;_P,&u)JD\d0LwTh8V$c5z9^:rpU9c4^f\70Mi%&ZR6NsU3YufrCV\UYZQ
U"rJQ.qzEN&'eoRr,UM&3a[jF8CGy%N5Zkq**[Dv2Pw'wUY\?R?oQb.PXe0fus]$_
U"R)0-aHFm-$4;ONsF2xEb0j1O'.1er33#a?qCM$Vj?8$,6zP[hjrlnAeBS2DZr7;
U"?<wFMcuBt1+29Q)*,>4[2P(LqOp'HSRVhSR;]CO$<E>/oWzJAl^=M?g-/&0oY1m
U"=T$1xLDykAq86XFCY'FB-0C(A]lrEhA),s$DKPZG,Ob$HqHC.^#3#+9S.01a3$q
U"KOPd;$IT$wndm6]YLe&f-jj$WX.c&Rh4&('_dTcE+Guv0n^GkX#o]#f/>VZ^$lV
U"ZE,/FE[qW[]%vG&SM,ECOh5d+%=sKB=s%1.\81\R%vFS\w+Eo7WFo'45th5Kt&W
U"R1qWRuL45FI=Aenlo3bMhq#E##hpm^,f4cEs;mpi7+-&F<N1'jdDSe]cRknJ>(C
U"hl%l6i<LVYvgZ1n;#c,EvxM0=O7u&+n)YAnA9;*1if'$&e;<S]l;3A]49]78e)s
U"e)E>>iCZ4MPOiIiNO%>D%::RxKR8'Ctx[S>urY[aXx4Lso4&qjUxJI=qC)qLn(g
U">g\uo[3Nv5z^VfOwAoCjJ=C<W>o^dBRcOq_*U%yKx2XIl7QiQ/(Jnp[xO>&hWPY
U"CF;FPg7)F3^<-y2%xO^)^=3Q4eiMoWheqX_FaJkZoZ]U&KxU:<Zf?.u7MuG9fnu
U"I;n_9Bt&tQ3t\Le=,qSYHB(*F68=.kh<]'k>\9jTR)1G7&S'2-j$Ve:I1H4dd3l
U"5T:_15K&41X%nC;oAfU+RaPP0<$%I=T.y_oLClQP%6s=n94HrxDqDa.Mc:=QSbR
U"A22+Sb.OieeoRw4-aC$jqMY7A8P:6ZsYRJudEWiIuLl:c\)pz'*NBNPJ9Ah$(k0
U"#HA)wD(Ug26;BC*86jYcaN9,qQOY&?,Qh.gck[xmN8I-Ndv/_wH61wEmgQCGZ_-
U"+t9wME.ScBcxmxB7-NJdtF4hRjmRN7/NtT=gC:x.m^G6Xw[KbuO1KD=5l-*ip4%
U"UBqnp=KuW:=*usj\PMWyjn.t='(oE492YVEyJ8#VPhQ:$8n<8K,q0FIw;JZh&Ef
U"hlWa,Cm>QR4d;\au6bYZc7Goq*XEF8&&xes]*vD=joQ/Co+g4OgZa(%<r]&1d\E
U"A1kkh'<jupgV/2/;2:FOeg(v<CG%x[ugBQ(s=VIxGLjdd>9mAX7I_mO7O>(r67j
U"M0SSnSRX+\wpL;jOe(jxY$j%O=CDplqb#a+$?I#7fqDbQn3U1:R<u1L89:lwif1
U"YIr&(kms$bxpOFhr=vTODArlmMVeP7t,6_l7P_O/7IsbO#Bof6o1ROTC\qZ;<uS
U"L<n^&0A4p3x)Fa0'1oKDRT6yJ?9\2?UHdiToJJz2KYG5V=f/,nGptjqTca:V\p-
U"iXc&RIs>)4jV]e:ADcs(&'M46JULl1-om1Cxkw>HX_Z\*B\hae$2/rdlls<$P'O
U"f/>vVk-8DU0w^aYZibNMD9CK6#Xdaamp]J:'gl:Y+ZTXk<I4T>WZ8Hu>o;$x$tC
U"U=$Io&Hg''yZ<aZPAcO3[&Cs%(?u.&('[^G[0unl>)9T$b3MUpYA0s5DfgbTuMS
U"riQF]ji0,pYOa[Zau[;WI9/]*d6Bv7zokD#%M=9,r0K^.Lf;^[cWogp_z;Yi5F#
U"Ssbbw=m0'x=n<pu%7D2TdrNV&-A]VthBn;P+)ql?B=3Y%oACw9se*+yVXaXn4tV
U"VB-U#B^rV8P&d3Wa;yYqLgHTMbfKt]s&8tl.t&.fy^+lfL^)e73Uv9,H.)H_ZdK
U"0/0LN2,4f7gi?2#_bFV3B3I*RtpdgQHn2<L\Ld<?ibF<jm(rJec(nG]tx<p.?/M
U"^'LiR(_0NYM)3o*o?<f;-bK66'U_n)(VQkasD<K7:[Ffu^<$.i=dl.JqY6oir03
U"L+8;tCd02*j%_hdL:bBAx*4S$r2f]+?d:jSU.B>ZQikPmtO4?G9IaA>]WsIZLO2
U"zeQV?E.^2)+<R%jWU-i>yUIfcvXRnE6#C,uz,Mm.lcI)(D^b;=&buHgT4^/x^A[
U"et523M0=1L=bv.Fc,t#l\aU\C0a1tti:;#+lo',T(E%m8IRkPYQ/Pkt9dOeQpPU
U"j<Lv,Su0L\<-hQK$+(iOUg^jwb+*r&//x>VXia[=T.^0E_E.&,RMC[26ESxcqj(
U"NvZP=%wFs(O5l)%Ii_;eB=N(O4;=\lQ%[$50Ha82:#O$(O,lv4HM82TvQtM>jgf
U"l>%RAJ*1:0[#9#u*%+x)Kezpi(O4<B>dKB\cq\Z/)ZMccPoP()O:]X%t+v4t.QA
U"]uQwG,(^%Szn..#qPW1Y)<cH)qt$%-p5KGd48-.$sZr./;X>/mKPUfe.'Ru$Wjt
U"E4k>=pr,YOkW:R]&1P&YM]wX;Xom&N;MD<5U<%N2.4#?cYrlYOVkNT?>9I)pq_2
U"aD0f-)\Id_0c[*6[kuoF?98x,%up&'%9%9%%%%-%'>akR/7IQ,%^(%%&E,%%%0%
U"%%%%%%%%%%E%*/P%%I%%>?M4=BAJ2S1<&?up&%'9%9%%%%-.%7=pdRhZO,B<Q%7
U"%3'%%%2%%%%%%%%%&%EO%/P1#(%%>2?4=X(W.UYLS10B%up*+%%%%%%'%'%&C%%
U"%%uU%%%%%
END SUB
V2
CLOSE:IF S=194AND B&=12506THEN?" :) 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\12506,219);:END SUB
'>>> Page 1 of OPEN3204.ZIP ends here. Last page. TCHK:194
