'===========================================================================
' Subject: QUICKBASIC 2 POWERBASIC            Date: 06/21/93 (00:00)       
'  Author: Anton Monroe                       Code: PB                     
'  Origin: QUICKBASIC,POWERBASIC            Packet: PB.ABC
'===========================================================================
' Save to file QB2PBAS.BAS and run under QBasic to extract QB2PB.ZIP

DEFINT A-Z  ' Created by BIN2QB 3.3 freeware 7/92
f$="QB2PB.ZIP":LSBs=3
CLS : PRINT "Creating ";f$
OPEN f$ FOR BINARY AS #1 :FSize&= 21356 
ON ERROR GOTO Done:LOCATE 2,1:PRINT STRING$(78,176)
DO
  READ Lyne$:LynLen=LEN(Lyne$)
  FOR i=1 TO LynLen 
    Power=((i-1)MOD 4)*6
    B&=(ASC(MID$(Lyne$,i,1))-59)*2^Power:C&=C&+B&
    IF i MOD 4=0 THEN
      Stored&=Stored&+3:XCk&=XCk& XOR C&:LOCATE 2,1
      PRINT STRING$(CINT(Stored&/FSize&*78),219);
      IF Stored&>FSize& THEN LSBs=3+(FSize&-Stored&)
      Bin$=LEFT$(MKL$(C&),LSBs):PUT #1,,Bin$:C&=0
    ENDIF
  NEXT i:LOOP
DATA Kho;?c;;;;[<;WpXOfLDeZnG<A;;;Sl;;;k=;;;;>xONG`_N@t]K<HP>=?[?^KL@
DATA qW>UDetqwO[<MG<L@Vj`rj\EWePPc[WcjhhgHhihg[?`IhihHcmxgnh_g??AJDDE
DATA NTE;ZZmQq][^][aXKYqmMrt=ml?jih\ph_@?qnKYIRscwuuVs`kVrMrrCxmZ`Mr`
DATA DtxWX\wNcswIGHjdVT`vWpDC<lSn<dIOYEAer[whatx<zVnyqu_g=yIC=IA`Mwy`
DATA wuSXY;r<tXLVUBFU<ltiWeQRRtuAr\kV\mKK;rsvDC\<RbBTY`yUoQa\G]pXI@jJ
DATA ^px\yoaqo[uO]M=beUeYgoHhjphicSyKUjae\Hhg`?Dvm`imHhhdeUqSWpwTjlA_
DATA fO_[O?krNfTaJWSZ[FUfigslGxtQRlopkMrkmQqaROKZggKyR_dswQUiDNue`_Sy
DATA ggfgN`KgBmLR<vlKE@WbdQNHGikuMOhr[]OmJNLxQNRCj>>Up_;Z[zDye;GWn_rJ
DATA goDToiKTgeGwhHh_tSkS`utGgUuCchsGrlcjpitZnjhar@DCp[klUNQHKho;?c;;
DATA A;[<;OoEPf<boqBZFy=;;kOb;;K=;;;;LD_GKD_F=@oO\dkYBSkAAgF>FHK=BgK=
DATA F_k<QW;=AO[<BSK<qW[@Rg[=A[[=FO[<PK[<RO[=CO[<PS[=`S;=B[\=Bc;=FWk=
DATA ?O=<`K[=AKK<OOK=oW[<R_[AfkJzwjzyvnk=gg;FFkn=gg=fG?[C^KL@qW>UDetq
DATA wO[<MG=@`Vj`rBvsriQQiJyH>rZwlmylJtx^hxv]EIqxZQRyljj`kXxzyLoy\SnB
DATA rzWa_zZMo^YqywDsB]aUID`ujlyL?irQQz\cnRHMCpbpfAzpxthArowfZzjWxzNU
DATA JyvHViLtlvzqxNxf^ez`ErQywfXXYbzZTvtSxwT\arf`ztp\QJIwwWOzFqEVRzvn
DATA F`aRyyyZyFr`Fhjxg@IGzMyyVwWYUri`FzOwsBEmvzVPLizEXzb`zlHIZtyHTxjc
DATA tNnveRBBqyiR>_BAZpwRXrktb^XPyVMZurt^rXY\tNjzFljnnnuzTvQnr>Dz`jre
DATA YRJJxUJcqJWvnwwkvzYvYX\lzpljwYxfU\n\pb^khKqUyZrzrlqmzZVZiU@sR<d>
DATA OnSyRTfZtiUs]ahrzzjxWnpZeCrbK]`u^RFDY_wwtmPdnkxVMnvZi_dZEZCYt]lu
DATA pfeBRpiUwWgCtXdBXfTXJy;fxqNs?ZM_rreBEEg[zpuZY@nqPqJfzjZUOLigi`jx
DATA R>RtavbtDtxcEJBPDdpmJG_yuSPjW_ReZZYVV@ryCogWrmwFZZcnqbYUe=lMYSJq
DATA myf@Zu?EiIUWINvBppwPcvj>ot>OtQcezsjIJpJ^_Jf`iVkxyii_r_QdA;v\jd?y
DATA kByzMsEToZ<rYzjPgfsl@tZg;qilt>wxR[wlSOnZNyD\vOaJUKnfuNEVmZxrK^fU
DATA p^uSK]dlyGYxW?vLs]rveUY>yOIbJjMKbhfRRnR]lOw\TH=JVRJHLJRfu<FzevIz
DATA Q\gGSYNRnznxx?CIn]iyZnPTFyIAyewXY]q<fRRY;iYBv?bdiAGliTKfeNSJq`Fl
DATA LZNCxFYy>rZviotN>S^PNjjQecuNMdeUd\gtfCwWUKjsBUrrm?F=ivyBuqroroPZ
DATA jushdhf>\bDlXRz[PVu<YgUQrnSYzgEQYpQiRVs?YJLjT[YLEVT;^P^K`gVBdbdt
DATA VL=pcxm`@ea]OieVyQxgfzMVvCgF>W`pZnbPjX]zYua<qQadgse;QlahJVS]?A]^
DATA ^V?yfNLDcJtX>zcbm^edcZCYO`rOHEZLsGHxot\>ManG^uqfXFVfkrjIty`vLTwI
DATA dhxArff>jE>qHnJ^Ge?;emvX>QrwhmSyOhxm[O]TfcwqNlV@BHZgUC@zX`ArYZQn
DATA [e`Kzq@r[M?NqRuV_XiVIZXQrZrSNwaAr<_Pu>gdHiyxHMkUV@@B^VgMJHPrwW\P
DATA qFXRVywGW@wbJeZjLxEdq]uRNUnkZfXgxMDFYHzysIYPjif]DLinLqCfzp\IO[bU
DATA ]NwwX_WndkdPSWGsQ]wXwwkVjRaOvXmgKtAf^gJQOxg`j;R^A>H`OzKdXXVqwkFQ
DATA ps_cvV?MQ[>njdMVyzbSdMe?jtiPxOAu_WnHJzJi=j^Qq=ARkJUlfyzQMhpmbVGj
DATA htyrEn]xvzIwJ`dzRBkf;dQyY>A>ssVbmySTOyl>URfvLqVAxjqZ;ztSy^B_iRed
DATA PyACCtRs_sPnmVTUx=ZupGnSVwHGJsspoAPNYEtNgXRbrSC^wYjdhTLnwHKB@sdM
DATA uXSsQDmzAHCeyWTiNoGzdwHDPsmUFX\]LR=bRBYRN^RnFIUfFvVW?ourpY[LVBJn
DATA iTQXkCJN>dt\hjKTwiUAweuxLfqtNPgMNZV]hV`VAWxyZhmYwqijKPtbNYXH>USu
DATA G@m>d]bcf_Ut?]HDQYfK[TG]>b^pfkhJOUpfURtEkeXwpVgzpTv[S`fPxRTvSG@P
DATA Q=iqqYTU?h`uvb_UPgqwPZafc@ZEMhY\xH_Bf]ZpHj<GIyQesTGI<b>l]fQdC^jU
DATA KetajcMaprUFQtG?<IGSQTe?BhFLY_cx;[_S^RHK;>xQ;rMPRN]GNuWYGZkHn]Bm
DATA gTl^LzL?jMW^ZGRiDRZSJIoLAWRXuO<IE=@PWL@>QcjdGcRfzsd\C[wAEAoVOz?B
DATA yy^^JPjIE`bPuBBRIiGqF[TWtkxsvmDoyoIE^vwIwJeNzO=@[w?GI`bN]GIhZiWW
DATA rUVQ^rdNssldBIyHeg@EEG_RDr\tzPsJi;WY[wv`yyQaRbLts^reEbr_W@_RMxC\
DATA ]=nm`Nhl^nDA@KoUg^wHKWt?ijFd=bM^lUvdoCOTNBjtX^B?sjCThPKGnimyM>jS
DATA _ENgZejN`OWRctkYqx>hyp?T]^j\NYhkWTgnXiuKaWPiYSFjhFZWw>^vOuqtZ?GA
DATA dyDchaNGKt\XRw>_hIhZW=`lLabYj\YFjycYe==?_^NraWT<Wpe\eXNpfadW^EIU
DATA ?LW[IHAFpgmCv]GHNF^VBQERkrNVGajejjHkXE>^=vRhwYWzyEcPVYEgrWT<Z>Ab
DATA jj`Q;Tpli@ZgrFvWsIVV\ZkvTKEZlisVqjvExrqXjVBIyz\rcBQxxEyfaYJd;Wtr
DATA NBSwxZQJtajXX^Try>vJcrVvs_JmX^mpMkS]j[ekDFQMYzmEVyVNO>H>hptqxV>H
DATA Otj@w@acZvHOqjJ>KpfVbrcqEoMu@c<SXe[qk]Eo;wurO^_iY^BuTtt^HLhANaBM
DATA \GBioM@T\X^PLPbMCz=QfEvyQ\WZn^MmByK]NG^PCYWE[j\t`Uic]LxsCzlTKjkS
DATA Wz<>zDHins_ZVxqDUzs?GuVuD_X=kTGDLCK\ofKSvpnqBuTsoscSSXPcE[Kfi;P;
DATA Q\pTgjCoNSzbSKdxVzEKHyYPLPLgFNbEG>FLSI=<hZWmF_`NdsKv\uIw?vQiHbqd
DATA tNpJI?pGObKlTGJaOh[t_uRVOYaXj?BNBAL`Iut[=bQvmXzhdqffur?\BNu@xjOk
DATA J_CgKx[RcF<^yltzWmGhAIWrsqn<bqpM`<_Spnt`KWmZ@pENmCf=sWHoiR^^>ZNi
DATA aT<<^_xmtY>zenzRSdxpzoZqaQJlaFLIE>uzEeXKFQ<XIUzCFr?<y\TsKfvpL=r\
DATA >qlhZvzIMnwlhZxtP=Zq^RQryZ^wVW=Ham^NsweSOU]thMtHRYk@DK\i@@`gTept
DATA aEOR>]>mrgQwfOiXW`vAD_myaesMvbCWRJ@I`^ptYkUp_bI]frRIpz\cC[Hice_]
DATA ryTdQcNoOLn@hftv_d=RK?L_ULw^CWhhZ?EEGIhYNIdsSN`KQnWEpGjKLcCO?BiI
DATA A]YhqqxHpMQeSNMRvlwOfxeMSPK`QhnCiT_pByEmqtaNXSes[@LxuroKIFv`CMj_
DATA XL;>FRfGGkNP[PSCHv=K@DS]DRsiIqSPeyAqSoaP\<eU<x=g<e[BgMxf>QW\fkqv
DATA tXHuv``OXpzGTv[Ry]qBfkDJIGti?>pURkuvWRAFx@bl\=upEgYXyKUQgn_QbfCd
DATA _ZTaluvdge^NcUJc^yQoxV]\AEc@NWQ\D_vQjcn=l=lxv`jJKGVsG]Kcu@RueSw?
DATA qJc\p]LW?;x[QSYSdTpD;X=[bceVhkbPkquIaKE`Wtl\afY>GMZ[gnGl@\^=ZA;b
DATA Y=i<V;z[rP\JisGkWMc[q[q\r<cyEdHTCeObVnAvuRfALsk\lgdwTr^A?o\JIkc[
DATA KRVCVw>jJLFAlqRQt?NG?eWK=@gNokXk@UvYdDI^BrVBaMR^ARSlyAnYkqwbQhwB
DATA ^EG[rRI[_`C\CZ>cyNTRKjgTobxrKFPHgMYoQSwkIi[JgAtbUFw]Jrzs?hssFU>=
DATA looFMGWscKRYZj?xD>VCu>JdKnEIZrJlYyQAsSQ?=^A=\Bm`QwiIMTkkRRF\JqRh
DATA ?APlRH\Lmrn_YtB]Ee;VIu]nkc=QWXAInRnRKaOIj_JCLUyWun@sKD=PQwjUKRDx
DATA pH<ep?uLWvPcIwm;]uJo=FNzakzNmwDeBd\`Y=O[zyUTbfP>yFlOgq]Xzlc?>@xu
DATA C=vbLsq;?e<f?fGJjwPDqARxa?CAUea@IDYDtOFgyq<GKmczypNGGL=ws=xPa^H;
DATA wQqHWQjMc_K_dE[Wg_LaBS\mP^mLJ_i\FO?LK]O^Oi;=DWp\o\NNCPFZkHmfnH^a
DATA xB\g>l?EF]ciCo^@fg>FLouKtnb^?mRk]pf?aYnN?cOknsI?Tt\idgFiOOuYHrLf
DATA ]ewmqYdEraXGA\=Ir`YTQ_UNumR_?r^CHBrxQVd?E[pqMu[Np\nj;WDzmUcMTSaI
DATA Hu@stHaooc<a`ChRCUeXUH?HpwMXKyIlPsoFXxCqsjQtVoM]RXaFC^^>B[\loKG\
DATA auGGSIqAz?VmG\Ta@CCb`uJLW>S\kCV?<NKM\`Of[IRrrTlBpZpewLsPeQVmYnjG
DATA @OqiQrH@=y>^bvY]x\e[]=qq^NpPx=gfkHwKkaxvL;E`kmd?mQzlaPYPeh;[meIW
DATA GfsIGqGt\a=GQfNlwKUWijuJ[<mJtAgRmpMbMB;QZij=A_aSCYA^IguOL_gFIARW
DATA gb>ATuLe=GGDfMf>UHJSd`<AbBdM;>riANgqKCYXM<x^S>_K@Csfc[XH;LS>VA>K
DATA OZ_nYNIDHm_qQKeVjUTgCCj=VXTA_uC?@dYiEFqBb?Uu`EZS\IPHCwutnU`_qL`U
DATA KEhq@ms?=vBFep<?OnOPwCTH;\KLK^xLMtL]>>Q[^kc[DyKwAu>UxvrhVMiXCc`>
DATA PPZGiY]HqXriT``PlOwrfU\inVfG=M]hrdZSmahComv[cRl<fYU@oP^O[@C\fvWP
DATA PP_aYaRfAYuZokM\Osx[kWGOATETFFnsR^DndGt=Mkk^<?xStyFGktzOpF`HkKgN
DATA dA<bktL;HTs_D=IQ>;SaKAdQ@=p?\HWBY[u=Ppp?Rnau_KWVT[_XL?qXT[WJgS[K
DATA F\[cWJlLDnTjGQuLhBqgJqifFPS`lCLxNd\pa;STKSG>sk@COZnU^`xr[SabmFkO
DATA n_;swgTEZG>SWEJpcVb^xbSjQ>uFbj;M@hcDxveUKT=h[@kGAO<JYjeL]xHNg]`;
DATA B;BjRKdW]dqdV]h_<XlpB=<Is^`wB;OL@vyBiADUXVhNm^XXP<Uo@auGa=NHrwWX
DATA <<ds=[kgd@aamcL?\RkQScK[e?^M?r[pblGAlRpA=kbjiGC=KBbTL^cf;_kCtBeB
DATA m<lgFM?bi;bTt?YIUCvT^U<Ji==FmghEPK\?p<L\OSBEpEiMyu;J]wXMAFZiC\vP
DATA V_lwaZ;_POw^W^^RyhWHNEc<hIq>GIIh`b>`NEF<c@ADGO;Dq>wBGfJVO@hGcM=B
DATA =iGkLuOJJaNC[oRDGCUlV_KdDIsiXG=FW\wgj]CWQP@=VMGPe==kCkdD[=\W;?vv
DATA g>PP`^e_DU@cu=FlqjL>lq]\rLMEC_KPMtu]jOkJMhuyP?T@tWcMpD[YW\plL^Mw
DATA FFAcNealwAGvfvz_q^zY^_bw]^ZBwh`NzAwEOFJj][Ow<qqYo[<mdVsIsw[xp\@u
DATA HGITWFfKKpNcOxE=rBtVol_tBMsoFNj\PY\ct__gBjHY[\lx\@n>JOieh[AIYb=@
DATA CEYWO\[OD=?ARF=]B^Er<`cLwQ>zC\J>Ckei[EKxC\D`fC]IgLFo;LRxE]A<@;]P
DATA ;H_HZKd]TBbdpPEtkfoH\zlu=OF^iNkwAbIMkZEiAu=taPr[jgkhhbV=crGLG>jE
DATA bBv[FOlAI`Z=;_iVtV\B@C>XqmYAtJZT^^GzwzBOvZs^^PQ\==]ghK_OO[S>bro[
DATA ]ZEuBZEOZdnz`sjUkmEAxFM=WfugTXa^^jmP^EIG__MeEv^a\RQEP@mwxsEwMPS@
DATA ]@?CUs[vslTP\txeJ=Dg;NE?qNPAeD_BphRUy?FcELN@TSS=UE;@=\GcR>O?SSR[
DATA fepD_Lm]Q]EwOTkfS``Q?lhmmwiYzgpKJwLM]dd_gvARGdM<GnmOr_ct^qc\h_[@
DATA wkNgmbtefJw@QIicK?WIBM_AI?\azng<EVhu`>@@eLTuiOK<E=exxflSyCfn`EXj
DATA THrk?YA[UitA[n\D=bQYK>xLCNL@Skp^VKGEZ=^QTrtMZgkUStzeuG\i^KRh_UcX
DATA AXQLr^KBE=FBauFEkgcl@UtAoSuRPsPFzGVxJI@AB]^<[TFdvsOKW;OhqEnA[GmL
DATA jSpVH[POfwWAiKeqYlmJuyK>l[ThfLzeE>DXFtfyfUBaX[[^oSLd=@Jzs_MzlLhH
DATA \BUvJKGRsIoeYJIoDx;sNCx[HPMJ;QI_YkI]o>[`HdBg>Dx;STLu<Vv<_Y;wGPU[
DATA \o>[@>YEk_?dB;J>`ASWD=[`IdBgj_Y;gc>r\a=`KXCit>KRCcBUn;FATKmqC_;\
DATA SZc=vrlbQo\P<qWHG^KEHyvZC?b]`]tvuGu;HuJsGlw>nDm[^?vpm]X\[uhVkvCd
DATA xSsxT@M>Js<f^CmqE@eC>WkZktGTqUMGYBIwbc]Aia]koRQA_wrf]p[GMhc\==N[
DATA SCtPAQd@EEoA@TYqOf\]y]f`nf?k=iAV@K@iyCec=jbS\T`Y=q]HZHYnL`>XYt<H
DATA hcAC>tl@wmU@ycXXCJsktKstH<Zw<Y\TxirKfe=]DXS=;eQzilt>O;AQ@mqypM;`
DATA I<oKrZ`HHzaFEGzEPT?xQVkNMdEzdIDRTsN\\jsspSuj;QEyOzyo__Pi?BQkFU_N
DATA ssNRG=?^xzQIABjX;V[lsPySN__jE>R]y=LB]f^NcbPcPMd;VsXHRYHvLhBHsI]J
DATA KfK@OAUe`WFXIOAfS>Peyrs;ImqAaD@PdGcisA<aAB\NnBR]Ac>@\pc=ei]B@PpF
DATA yvS@jml[mdFqbFi>L`FM;AS;b]k@<jC][AVmMQ`ch_TkNOQt]RQlAXXsAPU>lV<Q
DATA kaDH@usoFb[Ub`U\N_Ouv`At`zZy;qzed?hzsvmwq\o;QT;U>F_tDChTAcSdkMEj
DATA ZKQjDz`<wIihvLDIylNeK?XEQoo>TTMtvx_CzrmrHSORKSU?OlkULW`a=rE?iHIM
DATA Z?tLRea_>pKuTFC_SCn\[LlERpg]lgjoZE;WlHQ?Rx?r^C<YXwIjLhPc`of;xOW<
DATA EtAVQ;r_iPpVcsRpUNOPqU_RqmC?>NRDe=FJsvFOSzA[P;SbJiHOl^JiEchtjn`\
DATA rfl\GiCKoBNKZEX\YmYkuBkC[daN<;mHa=Op=sAILTlWVE]KA>CXc_yOs>?=uk[H
DATA pEP?wA[M^lMXOKKnBDTekst<NPqA`^bnNK_Wijo_LTp`uPCg^iJcns\=GjKC=xlQ
DATA Itdi<ZKgUDV\cQ=jmH>ZvXzhuK^vINQx^fjvt>jFMsBkd=Fclm@wcl=<GOTmz]Ws
DATA ENzj_@=p;<MyX<>v][pSkDlIYh<f\nDVVuWXx[C[pPUX^;q[>waAl;G?QyK]nzwi
DATA awOhyADZQU\ra;VfWt<nqA\;Q[MqAroAwA^;a?]KM[HWH;ABCFDbc\=gaLmt\CTW
DATA AXSVH>]eXpPN`BwEUUpC_bXYtaVNigwN^Ar`QCmp]tZcckDt=`po;SXKdgWGxWfq
DATA AeaXdwRTj_VEeOYjMdv\BaUC`UxbktF[YyStmdEW\u@_dOlh@hLbfusLGJMMiq@A
DATA Igd?bkjMB^>S[^fIiJ@IY`M]IiJE<EZsQu;>kF>vUHcEZJ\`E<C?m=BYmeZIKIlJ
DATA bk`@MTw_wPnjGT`T?we@>DsyCsysO]wEYN?\p?@vpcwS]BGA>qKfeKWtPUWAofpV
DATA OZvCpLsrXCrj>oxvqFesXC=`sX[ix[YLhzFZB][DwX[YSr?N`j>iK\yBcUpT;Y>w
DATA jxX@kMWcBW;y=\KzJHr^[buJNBIhyXhbtn@yEePley\HOdVojc[KyThL\gsQJFkQ
DATA ;]tlCFig\A_?Bn>;[d?GM`;QgMKuP=?CF<dUD[>i?_q`;IyMKES=sG_=cWtslYvi
DATA wIV=PFWOAd]KUX_WXVV\`JzgNW=ABm>`<N=@l\FtMFw]u=`wzpCoXv_VwJI^oUzM
DATA h`MlFecBFf\<wd<WLUHkfFj;yU\Uf<Is[b=q_K]k=LoKk^_seiPwkx]=\G>_miiK
DATA >Nv>>zWm]c`YBbbpsk<][Chm`ZZOp<DFyKNEV?Wmacqusq_e;]wN?^Y]suSOxD=W
DATA Q^[mYlJpw;IZ>t=uBk_N<aLH]?dqZ[PqA=v\RK\dmbKCpz[`Yaeu>It>UN]Xxdal
DATA ]TH\fMZD^jt_Qw?IPNkPaMCcK;MU>KKU=fZriD<h=sXb;WO<FmjmfM\^;=E\@U;D
DATA [mmEsOAACveYmuujDsUFryKQymLxwyxqrEV\k>bZ_SFn]Hsl>gUglqR@@RLLqkkc
DATA zUrlz<OhfIK`qkO\xUTxygAPPj>zNTnyEtp@gD@FzCy]jwdKGFSErRVyc<>=EZ\S
DATA \CHBJH]BbaXWmB`GqN@DnovzL>uCQtDc[yseZ`wLlgrrQDgIMgUkdKFin]CGAGm=
DATA cM>X@>;r;nH_o?IZQCYxTlAUez=c_X=CX`pfFkNOB\PzUoyE`KDII`NfCmncXeuk
DATA tQ`vcdDnIeVjqhcY?pILGomPTp]sexSHI_aX]ci<VBSLVpEu`WaBBg?LMJ>BBzk^
DATA m\K;k>IefpIO;lF]sqD;;tXtMdkHi>A^EdClPtk^NpVflhAGubuplnQsM@px_[lo
DATA kHho`Ze<VTMTUIN@WN]iGl@GgglXawoVUvd;QJk\>p>nKc^vrrjiomfu>J`DQ\\s
DATA l\YOZjhHRU\Eihri@WmrK]qiuMvVsh<\sCtf;s?P=htX^B[`ETI<UnuTGk>FF\jk
DATA \SglIe?RR?eZIgGfqt=\QK>RKRWTBQVSOUgdGSJiz>UvjYtyp^voOraEjz?;;??\
DATA \]rrO>SS]@kN?HKUEXKeEQEg^qBECUg>LNpK<`rytmHp?VHXRYjyPhkx<ubJsCab
DATA VTG>ccTBs[f@ECHB;_YZ>DKSa[LPtx^=ArYObrrY[NCyJK[t<Mdjx@CGdJJLuFLh
DATA ns_]m[Lhhyc>;JKSQZIBfjo]HEvw<;TgIIZ@qvsI_BO@Dei[g?\OVWYzgljTbDmc
DATA MBENIrC<WKxiFoec\@Q_hP_lTSUM?whLwhxPC@W<<=s;RqQn;foaT[q[DOuM]NgB
DATA RRNcVc[IrB@awTu@YadBu>dYUoKVZaIjKEAl`[MyMY[rsuYPBBUWKt>vps?G]fLG
DATA v[]aNG=TJ;cu?pZHBB=]w<GSLCBqs^vDQKuaJ;jOAHII]a;m@OC;SD<A;Hwi]NYF
DATA xxzLbjxilAj^NksBGytxNu\KSb^aP>iVgREWSb@UhiZ?v@Hh^Be]HqScc<BAVU<k
DATA =Dvf?=mxAfw_[gUfX@fyh@oe^Ohlefr`?;VxOpfSgMEGPaRa=T@fvLXub=keELMT
DATA zwWJY_Yd;aCa\\u\FXpLS\mO@uICqKs>E[[LBdFfsl><xg\q_dWwJtaCGuXksBHG
DATA BLNGHD>ZN<OUFBGP]ZV?Tg?r>Nhj?RvVmT`TWWw]LUC`YTb=?M>M[AEe[utk@[[n
DATA JOlUzVP<tgUXVfEp<;um^d=zbNGcBwHvEki`ce[NABwBBZwQKSNfYItJYe?[Ywvn
DATA bp`^Z[woDNn]^e<^t<Uere;`vqs]penHLZqrIW`ViZAEcxqf>fHIOLupLeH@eRbp
DATA jfRBGkM\uptyyYK==DeB^q]JMSYX_aN\UGVcN`YKzczx=[pG?er?F=U[QV]AVF=V
DATA Q[FBWOwO\=kYJeVx<mghykX>bXw[bk\F=WKtgjup<Jry@nN@y?y]GHR<XPpaE[JA
DATA YbLkBBBSqIK>?josabnk@MxIqBw=CpGW?qJ^kHrkpnXF\dDlCfEDF`ZRAGaPZSmm
DATA iaz?it@_T?oJKBwXKsJPjxmjGD?doW@gzES^L^Kk<Wrs[BFjZKInf[@nziKmpote
DATA ;G[QfXr^vdQnI>MDaskOraV[_xSlIwNZASyLxN^oa?srVQVgKVEntdFSjlDIm<Nq
DATA ^zY^WYZpkQS?cz_kOkqUuTICfvlZC\P=AL?N`H]qEw^LB<cRo<Rw`dCcM`MtMbRe
DATA qEPsVwvYULD[g`dwcIlgZEIumRkSBZ;ADpFCS?PQX>i;JXBZ`X_djuvKW;kMYUmb
DATA NC_ZpUECXd@RlTAs@pGfVWOvdToz?BCcS\lGJ?Myqc=\KXol=GpT=ax;G\;>spl<
DATA \?[m]WUSNddXsFc<BVWsczVlDhzheugQdPBFiVW;cKN<G_w<p`L>E[nJR?it[G`?
DATA vHep[ixcCQPCYWo\O?>xEPTy[V\P>kFX]jyfi^`TwNwXYD?kb\\Z_hiG=d@bMdDV
DATA pXjdaHA[GFkdO=k^N@XvKpOYIR\ckh\Sht^aXGnA=@U][<My_rQ_jhgC?>NQW``@
DATA @oiQ>vRfyGu@HSC>SlrWDruy?UNFX>Y;^fU>oWhqfVFqNS?m`lt<LiYKvOA^dbX_
DATA F;K^lsUeuBxWui?iKNAkgPLylWMNHxKbOhvDYQw>VY`UDWx]GqwEU?d;=ClKD;AR
DATA O<fDeC@iSVfcb?MuG>@Nc;SEWB\`qEWBbl<BNK?uK]CoBo=oPPK<]eFL]h=qALWq
DATA Js?TC<NBGqhkpqqFv[^MIYPcjIrvVOkjvgVNldwXs`<k<?AEBl@cl>Ds?B\y?\sY
DATA [ljNnB`AT<WINIRGEKV\[j?sPyTAq]^?^K?qpsFgzFyhGReIXTR[nELstWqQK>=D
DATA _>jePN[YXLj>PP@KE=ZJAAsg<@\bSKlMSCupLvA?O`BMTM__q[]z?IWBDumnHkk@
DATA c;Ujh\qITS;S<`R[oIXMGD_t@GIBuUWg=htCF?Ta?J<iy;I`TyVDVbj?uDI>IuWR
DATA XPDG<]Rd\clABaf]eh<fLCfixB[\FAZQdCiUs<zOD[[ld>Ws<bDK\<bG<hfs;HWk
DATA MC\t\iF_C?waf>hQHx>\O;kJpKKTU?^THGGVx]GlqQYceLEGvS=jkvfPODd>K>hS
DATA >I@vqAYPKHmM@M>RpO^cf]LzsgS]nGDklCCKf<AO<AqPNB?IdJ`JOd;>ZYlUm;Uh
DATA IWLK>Us\sZ]xUHcJzB^=[CAlpskRGj\IS?=NktpqsymfSn[x;HNBLSAk\tWcFkEL
DATA ?s?LMjIs@k^oHDUG=MliRMDsQ?TeQ=UN;\H?bRrNzvQ=IC=ekujekqz?PO]OZVOb
DATA QzhsJn[Wt>to;rKyiV`NOfhfw>Yrpo\OFhjYDufNoeOk[^[efXyOpCI?<>`<vQRJ
DATA dcljGn=eDwy[FpVCABE?_;_qd<H?TNXKjlX=HOC<DTZy`PlAMdIoG[<mSrZKjrzs
DATA \>ZBAH@<;Upk;Xr_GPSzWGzNpfeC];^MF@]\N=JcDD\<_ECM=L[fnVOp@d?Bs^RS
DATA s<fVs]>pg@Y<@z^[e=?>eSjzkbjRjWlYNndgQR<@RwqR\LcZW?lLXiUWkreUWU<l
DATA LVR]CJ?>HlYi;PWsuOHX<wEt>sdP>I]ugTBEolT[ISmAcB<yK]><bk>r`]?A>Y^G
DATA `W[kPm[n<c[`OBsCSptlLsmY;q_S_bbxsTL@nd@ACsvaRS;_SAQXPUSl`J`dJx<k
DATA NFg[qfihuEaj?VvApFjjpOcfY@<L[ibn`<rF[>KDn`e<@]jTHBoSp@k>kMgzcxh^
DATA vHogM\Nmrdecm<gyLc\HhQsESMvcslFpG=hVgXGUzWpn>]TttdM>BrUjObxszhuy
DATA NXZTTjGAZiJoSV<C<vc^cJGK@Vm_PQvmuW<NFOpltfON?h\=XTK<kMyz?JHj`kqO
DATA gDgPcCss\<^?kke>_gddi;K;ljZP=L<w<I]xi\Z;RYDhxajqSvyy;Os[?=TsWLBO
DATA aHCLc<AVvI\pYmNwJARLiZh;MJW>UkkFZcx`@Mwp;QeCrwp^G<jyOORvUne^fisR
DATA wcNx_=PPVcTq>O=Lam]<vokhsDlOLThc]\snI_ZrC<>q\cnQ=thL[oplKjigbIP[
DATA ^a[bZJtOFKxAxYyucoGLwfGtykgYtqPwZLod?>yUg;mhpERyLEyX;M?veKEiD@Sv
DATA ZWvL>A[s^p?nmyY=o]eAxjRpNLpPaYVcutvcMRjjFFbYkazD;Cu]xK\[xIh^mS>L
DATA GCp[qHO[mPHixdUHJ=R^uIgwLLgMXLOtK[]uxIS=TRXuduhqKgCRmzJ<=UX@@koL
DATA xvMWIRBnCAlbJrZfl_Wm_=x`q=bGF>z@X>`=E]iHAcslDHTC=`n_[Tqy_Nx_BBa=
DATA acPGwALjjGLK]qZGH[Rmky``oEoCT<>jLPuAiAvEGbp[WcuLB<NA\ab?[jzddagi
DATA yOA<Q^kv>\kV]]OLZH`GDZAdS?TG][RFz=Y`oNL;XJ<zhIajk[KRx`_ggR=xFBgd
DATA ZY\gWElwh@LJmBmjAHFxm;=Q>@?@Lb;cC@M\hbvvK<Wo=Yd=yBkP`B>qegpwIv=W
DATA ]qX<Fv`QgvHrfwtUexBooddDHlsn?Ubw_wBB[]MxFS]Fq@?[>Mas>XgvU>d==rfJ
DATA fJv`i@PqlDS_xb>Ax^>twdCk;NcjhXpTpsaEkS]CiAcBPmS[X]HaEM]EGR;;>AR>
DATA EQYdTafBhgSQSKjcBeYNzhv>gkB;DiIH`t^Aq?eQ?P=hLfSPVYeA?ywMOvfdyPEC
DATA a>G[j;@uxM^wE;KC^@\CeRVyS;qiV;qcikMF<VMKUEF\Ys_X`B>\BmxmGz=mRFcq
DATA ?rXrI\FYnkT`<fc[nlY;HktevEKat=Ls_W;x?f@HNQp@jy;Is`wjv<_ZZdhl==\?
DATA e>P^APQV?ZPTA\ZUKt^JuAYzp>s\Qjt>jieHOstzBlYROY_s<eVDOldrMTpe_dl;
DATA LLLQ@a_W<I@t]KM<raRAvb=iIs\eXfIDpeNWWeMX;;H=kN@Ljs>Pxh=OTjZQ>rrv
DATA alK\hymckcXmda]qBsB@ADracnmXuKtIKMtcmXDtkowrK<XBsNIGNihLbUrd>hv;
DATA l\qX?kEORjZqSGIl]qls=BS^uucuO=_@kifA=PX>OWniRLFO[M@FhxPsWLII`Ont
DATA wdykRbgNye=ZpRC_K<ltNyVOiQw_G=sWPSYh[`O^Ikm>Q^nRj[Wh;okhc\;ZOKkf
DATA >a<GCiIpyRURg[LKtSUfIEG[\tLsFK;js=;LlCBM>GKjlQLOGgo><eFhblAktm^z
DATA >B_WTToG`YUGXsUcv^VeX@YR;Is[OK=gQ^nj>YObqtaj>[kI<^dAP^hVmHWzkXVA
DATA keJpcXMSxnPVCHAkB_XDUU<n^q^kITvUA;RCF;UFoCMmWKxHZkBrgf_QlCfgMIPX
DATA OrYhV@B^ul<ULHyv[Uf=^qG@kD;AfJlPQZ<DabZkS?[\tvnqR<FfqD_TE[SxYwme
DATA t_M@OQjVHf;[<^OPP=Pq]@fe`BiXZbOxoNf[vNTyppqgwViVaXh]pzugR\Ioj]eT
DATA ;BsOBEijM<?p\XyG^RKxfcSQGchU]d<]caAjD;PSzODqejX[LLWYxbnoa\nWSFLH
DATA wwHonWUQt<je>VqL@qzTbNAlC^wPPCNyrJmR\?I>;mWPPMI`KkaRANcYrhUVDROE
DATA __FYXvr=DjlgG=[SgtLPuEBAKldcTRb]CqesgvXgBU`_QkwLGDU_^m[yjOt=^Dle
DATA sfWP@k^>DGA;cC@MkATEtEa;@PDZPLKLuAEN`OHWrrkDHgeYP`[tlffQemevKijO
DATA MS=TnvWkwJwF\=>;MdwN^MYe<b[@c>afc`RSFHhG`YH_HZhCFriZEMwxUYEj=WP=
DATA \c`p_Lhsz[S_mKKkIOIcSi>IIyWBByDpnbhBh_eu;x<S\RpVE`mloU`[;bkzma=_
DATA \GZ_X^bgMqTtDz?E]N<uumwS=rIsgEOP_l=hRyQeGsleAFc_WSc[=gNL@HiPQ_Sj
DATA >Zrsj;pcoVeu^[tr>N=KTKRRGPe?p?BkoSBAJKRl_ZPcecdyisBHwhzqq_jPKgjp
DATA qQAYzISc^;gUyCH?iivvv`zYVaJxzoWB;twSa`eE<ajCMF>?F[Hvbpl]T=AxbFPu
DATA Y^>qtmoBTmK_i\>E@PtjirgRBrCZp<P]w?=rc[KtQ^HRG@pZhw[;rkv[le]Ir`lo
DATA Xksko]Bw=zs?yAGIIKzmfaCrQQ^Uxl\vkbSaESgtpa?rGP?mJ_kd]vsKMEwKJpU=
DATA ?WOLmgBoetdcjM;RpCinco[V=r;fSKwwLmcumCskdfo>hT[`\oCwr`GMgi\`E;>J
DATA AKvV;E?EPa>Rpl?>Fzt@QDZRCp>FJGcS]K>FaWa@>^dKBAS_nq=OKS`=vaF]PjcN
DATA @xCmbYF<Vjmg`eVQKA?=l;W^qFN<kZntFHGK`S;<CehWzaJHjiMze]_[`wyEZeOF
DATA pNNOKwJyhf@Qpa`iYURw;vMvVe<_cKUY;UH[gM]hmXCL_mrHQIh^NW`?IBwfS_fP
DATA ]_kLBc\OPPZAKYl]WvtFGzCfr;dVOAGbJIuVtpKx;]OC]CpNG]IO?Kl;\PR?@>=`
DATA DM\ufCbNKFmsbvpEO^F_?gfLqs><H^LyCgL<D]eqOlYvvranaBSRLV<>_gmHulCz
DATA ZenpeXjlWoWBcnQxEqcCXchP`D<P_sDGBSIzhUgI<SXiZeJsKPpfFOC@UlD\=[t^
DATA E\rjfmTOcj]UmcmO@QFYkBNAX^<ZF^pWVoUeSUwtUmYAyaMs>ZsxpTMTItS]CwFQ
DATA \h]j=_i=v@^ScmLeW^HiTgwW\^DCpkzS`cYPi`XtB;>SSlYplybHT`@GlHuLEyjs
DATA JC>GJRqH=lYSpBRt@XBlSb=[Wc>@rsdopmntPCxiIwAEICFPOGIx\VZa;JBGqYAl
DATA ir>xhE_HPGjEDnKy_mJRBQsdtFmIBxXQApCMgDWgFfR@[gM<=qUjCJmMLMCY`>J>
DATA @]CF<piMqKhAwivoWLfZxtMbRHY?KS`bVwSf^WyAV`pwh?ueuEZIpDPvqXwJ\^@w
DATA kpQn;PCw<jMzvb?Q<z][rR;;LkHU\_NlvgeyAg^[`;=kYs]^xBRPRK>@irSOQ=_B
DATA a;BMuIADacMSa\uoQU>P<FT;jxBmVVXToPjHg>GV^AydIXaTBuMjOw<Ao?Enudds
DATA ;wlBZZirsto?eKnIPMnk\T_kcOSiu`hJmsFQRnlF\cZ\XugTs?nQc\TLrOnnTC[f
DATA >FXsXHGdO=Sh_gx[_tlJxxBXQLLYzdI<meLgeHKBSIWtIrxgIWBwxC^pmWC`vg`k
DATA RWIpXAeIJUhxtF`OFWMitQ[[BUqvQnV_HqmdP^SeqtVTOGXxfJPXqrDWZR=Y_>rJ
DATA U_=>A\qS[CckC\ofeFr?=Qm`X@_lTon\FYPyBpZ^AYkQIJiz]GHGf]QlX@=ZGS_h
DATA regpjrWnNKbxuccQbjdn@L;JzmnbFR`S]mk;b;;Wl>Q?HJ\TLc<>;`Dc@fI@cN;w
DATA ?HueHR_lySa>bd[N@DpK<iXWLZ[cL`[SO@c;fGMGs]\rP\JiwYpOuWUWrOoA=G[_
DATA [X^>=_oSRzU`Hb>bQX<ChHWltbZo?VOaA<u=WQRO\Xfs\EW\KJCqmBuf[u`[Lin>
DATA Dcik]hQM@Kdiujj;L\dUoMVBiFk`jrHRvUNE\RuT^GOOpka?JMAivkL@PVRbwTy_
DATA =WydDdqb[GGbVXPsNXkjvy[IfkY_dEqV]`?pJmYWPxSslm?R]<K^l_bmzHTLQx]e
DATA >Pcc;UWQI<;c<gQ<bK<ApbgUMn[WAb=rUPFoPLK;]Mfwa^?l^HyKmmYxz[qUWO_^
DATA Ab[lJUwUsLUUBAL<NwN\?@s[XCsOy<xUlJvEljXjcElp\dqR]fxHtWVZ\mEkXRDq
DATA urpYWEb?]OWdOaDTAuKC\IfHAN\XDN^yl;aiL?D?]O;UvAWUIM<yU;zh>Rtavb\=
DATA _cUvIsoYpi>w\WvISxdfXBs>`qXkqrx>G<NGV[l[EqXK_=Ck;@Ac@sWe[kexjTQZ
DATA [=tTh\FK=\BsM<@[=`^LQ;Y_uBQNMK?qeMTHGmO;h[Dmo^uiZ[GVrJsh^;=NJOoI
DATA WGUct_GP[VOTRvIstJOSJpw>N<@AcfcjULLtuCX?m;t\Ab=BCit;Xl?bsc?n=<mZ
DATA G>LlkD<^K?XQwKCid<I?BU>WQet][YYRNV]<NBTMiiOIq\]<xApJl\jL>cM]H=ug
DATA twDGZpH<]v@p`vYOx<JVtfuCZGvCKhuKV@I\`^VHEBbZg^>gQaEylzNW^@;jT=J@
DATA UHfeIxoVcfsU@YXaVPqjecfRK;@ETX=PU;F^BuOW;LXwkx`BWvBQ<[lI_erTiscz
DATA besFcama;<ZnuDw=OOpOXdFCeK\s;SxDA@JiO<]lSvJlYhAor=;@mb@Rj]F>FqiE
DATA QBS?<KOCOrH\LKMFHu[NX]fn?kvkd^]dt`?<IOOSdaLcX^h^LvbfU[hK\Es[Hfr`
DATA jK?[Dw>ENiowEI[vAnVfMVhP?T>`O^SeFR=khc`JkmjbG=oAiilMIbG\vHnWD]^;
DATA `kRVkJth>a`IGGo_CgZ<MokEWcHjGhapt`sPdgymgAJcFVNBOg]eiIBG]h>AZ_[V
DATA LclLMmSd_SjLhAohBxIEiPW\_]CTODAY>MzPDg[dyKZB[`Rt??NkaNxtPO@tytMR
DATA qdttnL=upXk=OG[he@tOQGhs]kk`Vw>I?t`RYl<LE<yiGQHJXBE?o^rWzMGWOyj]
DATA lOYVG?Of?PDc_]EIKho;?c;;A;[<;gVDPf\r]i@cTg;;;_oD;;k=;;;;=@oOG`_N
DATA @t]K<HPSEgr<Ag\<vmkM>_k<F_k=DW[@B[[<@Sk<AO[HBSl@Fc[<Cck=@SK@?Sk@
DATA @c;=@SK@AcKDA[k<Sck<E[k=Bg;<`KKD?c[<?O;@@_;HBSk@DclEwnJzvjzyGg;F
DATA Fkm=wg;FfkE><CmCOO\Hr[Q]UiHJ@S[?^KLtqVtx@PWv?NxbuqxN=DQezplX\heW
DATA h=lVcCzz[^urBFKw^wyQxKL\@_zZoYtm_WrVigEjf<^nzrxgISJ@OOllYuO<IU=Y
DATA yBPttcuxuztCWzAsZzFzg`kXxZnkx^Nbr_^nzuSTzjZW>nl^XWkvnumuZioZdmxz
DATA ochPJL^azzztXmJHYYUYyW[pZZvjwo?wz]ErrPjIIiIeyrfdsTzi]LF;Y`bd<^gU
DATA Xd=TjJpQiryJUguufQFqXPoQdvzWwZqqY=BkRiJjTwX`eHsBr]iWiRgcrvQmzBZ`
DATA fAPyRfKxgjXTpyt?utMVrHiffLF\cdAHtj;RlgHxSiWN`quz^b`rZhxt^u[Z^T\q
DATA [czpbCWzRFxosQuANtA^j@Lf@WjYjtpjqyQtb`@YytPOlirXT>jpDSw[SllDIsW^
DATA Ml[WXSRAY?srqxRKnr?fUtFzvhIMKxHzz_=kum[OwuSltNS@=JQ^EV\]=^Y<zQLt
DATA hBVRSHl_sMSvqDKXmpL^HrZGtmVzqjyWmVcJcpjZriDtntY>XTfl>FbDWgrzh`hf
DATA m\]=JTsArLoF?haAqOiF[tTCN\rhKTDYBqYYeRPAwfjZ?v@NeN;sCjuW[CUwwzfv
DATA syTmjzf@semXwwgvpncRpS>VHPyEfLp\JnPnRgrp`fnNNz\vZgNLQk=>XwNijCtj
DATA tX^btpVIJIRjOxFxghSQqbZCVYZl_HJrt\rE]`j?tJviZXsRsW^bpVTU]civmECx
DATA CQS;bS]QD?PrRNY>AbmntuHGR]WOAoz`fvK]oybrBoY=_@dpxu]vD[rdSZvzIepZ
DATA osqjoXeJb;n^kiQ_yhvSjMQ^;cmVmOtsI=rV`jCpj;YQaQeTtei^MKRoNc<z]ZTm
DATA IF_hvPHrePzLxIWz_jwpPfYe`zbJPddYDyvv^ZiobRzJPma@sidNTou<zF?obdgZ
DATA ]>VnjwPpEM_L;VSJCuCSoCu?BDfrWtsAJKt[VFXrs=giY_n\PvLgRJJPEovADCiR
DATA dyv_Vwzflzql@Jh>of]jxCwuwAtl=LJWlA=HjUPg]?`pxm_SjJPHDE[gXfPQRfXh
DATA hisQcVJHOxDY[>zSXc?GaWvMVqdzDOQ<xBQQhVOFQDVOF^IJ@U_KoAmbkuJ<FRsA
DATA XWX=eKLCHSIn=EK=bew>_BG=wHI=ygkvtz^HN@=jX<HIBnYREFB^GB_WI[;AfUgE
DATA tKh;@VWHg\FhJiy>K;mDlyq^sGb>eNRKDsKWWUcPvk\vspGDTrIMoI_[ZGL>Cxm?
DATA RijXiEYBWfseY^@t]QQRC@l;Q_Hx`fA=PJL<``oV@g<@d>WKYSMAC]D^<\zBvlzV
DATA mdOpO=qjo`oEjAHdZUBimHrJ<pclek=]SSJHh[LLFq\?\PylG?Qeoqf[nYV<umh`
DATA aFnzAbrJVYCdHqJQsqcIxGa_rqR\O?GnWN^_V\AEdAJrtXs[_TPMluOhgpBX@htA
DATA eOixFxH>]]iiXvYTYvkH>lMHklQC_@K]ukn`EPQnSd`zyr?NoPJ_dURA[QLt]PA[
DATA cPRXMA<luelqkPmO;RVYoK_zjypuqXpbhus`vjo?AyU@aQZEP]^gRF[TV\H]ajf]
DATA SlgEkQDCBp\lgsySdU]bMpMcUfNjk]OHOzskXGrc@aFJWtVVRnMkj_WS\HM<C?Z^
DATA O^v]ikbiBW?mcMPgccAt[_RH;FaA[D_<X^DgQ@bbewubeIuDnQBK[AR=j@S@m<U_
DATA @\wiq]YB=eGV<?Yctp<WgU<Nzt[LYepwLshK?YF;\rdCwAqCwAF?Y^D=j\kCwAL?
DATA Y^aRHoYQk=D=fjX<pycdtGXBDHDOIPKESKOwKesWC<Gf\@=jd\`OV^iEinE<L\QT
DATA @S]ti_IbzJhK]wz\`>ZDWIhk]r\A^@Y;pJgbkbK??B<U\UkLQ][CZ;OZX<@PAkxF
DATA OxhgEW^<Gel@[Q@<s_CkMQO`wNkC_Wl;uVasFKEx<>tOwHPSViB<Ltl?P;wYvLaE
DATA dAajhzibhyIK=>_vntuKNPzuSBewuy<v=ZxqH\zKG^yR]ZzjmcLQDJ\PC^WgmAUy
DATA c_[aFlk[ra?ViwUaCmi=sCx;ikao^oYRpqTvXFk@=R?\?o?;MERlPNA;N`@iAQNT
DATA XlZyx\XIBj`TKowi?UqsjQ@mw?ijFT^TXiniZg^;PiH^J=ev\RRxTkh_I=\f=jJK
DATA o^GeoQecKD>p;iWkCUQhXVL?SLf<=CBk<_E?z?vpUKZ]FUSdb?oUr`Vtwc@BWVC[
DATA VSorwLKcFea\PKUOFzucDlDIqeLsmkQoE]ZY=qC]Eyg@IH_wL[X[b\FnmRVq]zsD
DATA tl`\dKpMvRcxtvFIStf`Te>jZ?Hf`LSX<wOR<ZTsWeNOd[MbFUX<QLRR<yfAx<e\
DATA Advur?ak;O]UU@Q`EWcW]BDJZiWP]KjLnBjrXsR?g?pl^I=msLp?\;VPOgQXxoCJ
DATA zm?OQ[c`_ZhgF>lNADeG^LFD\MCrEYRvhFYWvEYMpGOuUYcL[HlIkp?mz@K@fn`X
DATA B<jk;\Kln[j@@JPd`nbarbtFjPCUod?HW=t^>y\C_[>J?mmBvRxa=gNsAaIyzuMB
DATA GCVWAsPrjip=^jBfRp<gFIwkoujJRh=fSPKSPdxSaxe<ioBSRRiEZbjBY`N]pWs>
DATA ;?gFv`V;wIyErcvBPUFytMJR_^CccTaglx[@PNXW<kMS`JvJIeTRG;FCd`>;^`m;
DATA MDOCq]B\As;YKk<Ml_[aXglCS^EqsBktxIcl\leilcRBn_c<NXg;w=w`^XW@rG\e
DATA l<I^cvZygiv<NEMVIALpzicqQJDgUIK?G]rg@?>YsPgnYcs\oh<>erzXsDTZijR]
DATA g>nKada[H_Ml@iOS;\`B<=jZkgFfMSp[E=VJE<vgTeCgXtrCJ`T\MhupSnciG_uS
DATA luK[eiGCl_HO_Hvsd;cKkxsoSNPtG`BMXT\A[Zs<Luk=dHEKVAJK;==PCF_S[>Go
DATA vcmN?GUX=eQyl_ose^lfivWrWy=DcgjuSk;?Km<KcMCfMEhhNFcveTrwTY`CVUhh
DATA xmUwCn=seei?dfs@pshwvpnnEz@`BF>gjtAeMCwteGrzCK=kDJP;<h==]C@PPNdV
DATA BmPTHhed=[t]HIRL^LT<d?AhlPrrNxnhEwlZZ>QJ]kDFa=OxnHC>\SgVH<k@qhV[
DATA DYtv`fAzxMEdx]HE>>G`>G@J=jWdeWjeY[iNXjzK=kPK<meLFJkmQqrSLccHsA\d
DATA ;rn][ij`[hXpbZXRCmanFWeVs\lr\jlXD^hxxqm^>jouweuIsAo?HxdcW=XysmFg
DATA M>P<usyuBxuUeRk<ICCySl<HK=DbsJJ?iv^\=gOXl[_z^bN<@SGaGwH`<xUtz@C;
DATA ysZ;ib`fz=BJH?d[skaMiZooJmWubaRmAcc@H=WUWSXLsmkbsT>\FjcXKBqcx[w[
DATA IgLvCXe\_y>r<wNL>jKSy?oCFoeRuBCUy[=]<Ar=qZwoCUDPerolLpKmRNMs\Hd_
DATA gPsKSW?rPk[dS?Sxe;YH^[BnCuAgv<BqeWZ;^ABFgh]Occ;LOKfEqSmsdnBbrfYU
DATA EwnjbiuYxkDa[Mq;Ijx<_aH[Eqa>KCoEC=?=Vd]\iB=Y>[RVHW=d;a[Lgi<Kisfr
DATA NHD^fgA]Yj\YFFSL@q=SXL<r]N<E\apNc\NL\];Dp_JfSPohFSWacsOtB;poc\jD
DATA W=ULITE;K=^PU_=w[ADOFH;<E;;;;S;;?saoUG\VMrsTA;;;pw;;;g;;;;;NDtOL
DATA Dt?OiCOKNp[;<ClCOO\Hr[Q]UiHJ@S[?NKOlqVtxVc=HUPXuKdUMZeN<DNNfVFVM
DATA XFWfFXDDCLdLNFVFfN>VVFFDTDCDuVgYRmO=mdMp[OyYCijJdEPLkLN[nQxc<TUb
DATA FC>FCHVSbFXFfWKYna]ZrAQuaQvQQKMrrcpXMXUL<lkVcQPeuMKWwMxXXbVTSZMn
DATA p=MlQRnUarjlREvmhg\`GPzgxH[jZfT<DTuZhwIGEziXG>fHfWZVVCZ^A_JgUPjX
DATA FTSYuayRmzfDTXU]q\NlVrci_HJxbfFUq?mo[gBtrXnmrp]]Lly@JVV\Ti\>YROX
DATA NAeBHv]HJarB^LPIvb\Tfif[Nsy]hEmh_uOTw?PbP_^epn@IpXJroEAmXnyAieVn
DATA SR\JbVXkYdGsQUum]bvrolih];ivQ<P\oIXuZvajQ`pGvWDoZEPPAA\gZb[iT>sv
DATA n_yEego<JCA]SqyewQsaqHvsTVSJnqwmWh=WsOy=]NtnEd<Lnfbk@VTmNFJbiSWk
DATA I?gSlyJrrCyDAMmW_[VGN\I]qwHVX;>PpFbiSAG_zlhIFlgG>dRa^tr@hj`HkT\T
DATA m?U@\>M?tQIKyXjpxSYl^VkbMuEbabcOcdxgNLtIDN\\FLsvrian[mHAljTeLKZJ
DATA QoERM]mS=nOa=zs`nZo=ugGmZ>iJGJTVlQJaupnTu^uXTqmhWn^OHpBIq<ZosvaI
DATA oigepgsCCW^QM;TQkoyUmMHWbnlkKavtCv^`En>wNlwY\dpJVS;Z<oEWbRrqk@rs
DATA OTtSli`FXGVxK`MobnvoEbj@DVMtYI;f`FT=n^ogL^TyoTpMDwJ_mWXjNBLRHO@u
DATA G<dLFNbTRbpRrf`tHuuIatGbnSR>@=KvdpGWYcJblobNh]=nId=Lr``@jtZ=s[IJ
DATA RYKfJATYWnjIWySm=xWapk\TgIfSpYpPGuy_saNu?ixIDPLULX=qHAv_dJXEkQxC
DATA GOhjOR=fn`m`fUrE\loTGaGcNPuMOxFMLSXyOwhQoLgcSHdO@?<=SOr;uaCQxsmg
DATA KFJHV<`LpmThfN@ntfHzn]Ajfu>hSSf\P=jWIBbWZbW>`XqYH]ah[pm<DhnBStUQ
DATA vqLFodHG\EZICI=LzYvuxpoVqcxnacWJBDBxV\nbpGPSmmEo?zidLKZLXBqwKY`\
DATA YlzURNna<yvgLq@IPsasaDOv`lCLCbkE?AyyONfYUMIH\TIhLX=mhGAqDKnKFF=X
DATA RNBdbRDWzKSmhWkNtKLeOcoHins=GhZ^Ep]QO^aOaQ?hnZEOiuA?>wCHuN`]RRxM
DATA XK`UQ<TKbM`BvDouiHEA^fjDEqmNTVfniQ\m>ToSSZryaSb;RM_aAXU_YUKaBeSP
DATA S?kl<@GYyprJF==exp\lPVwmCu]eG\yktuoA@@QHJ@EiklanbWED;na_fCXxW_>n
DATA CPvghbjMD<ZN<vAGMlXa\bdMNsMYPzXD]b@mDwdckQTsSO\UlROPSsgGrUsFERWP
DATA <cb^dld\NXro<`^YIDhmfBocXl`Jd>yPIFb^xbPjqRhMHVn^cwS`^UbCMcIdaLW]
DATA nvmd_<DESnsx\bjNDF=@eURJbDItXQNvQGoTj<nUIpid\]lFoYuhPSQa<SUXnicm
DATA ag?nQekr_<O;ij`_tUOvLe@fL_cYuXS\?SMSKb=dNMCaKMzohkNSL@dkP\hhd`Gp
DATA BgR<_[eySudXuKkI\^he\@Bud?@FFxaguSl_adNtn]McOODW;@Wims?U]j^kzL_B
DATA yuCpgsL>ipNgU@^dlQsQNMsaqmIAUQga[mFIOyExSCAvnGKWCZCNWggH\pdnAFlH
DATA Z`KCg_jWAa]jc=iyc@`e_kRb_@]HQQ[Q[QP?degY@gBoD^KpmThkDI_MJ=Ta\^Cp
DATA L]]mIkeJ`Lb;pdMmxXSH>SO=EEiGhTEkS@f?REfr]krh[OlEd?Lsw_?o@_QdTPZA
DATA XTgXq`jOqb>RE`NawExJGIfnn[HPM^DdeN<@d>=]iPVhsLTpev>rQAAOVc?xqHn?
DATA Li@tICwvC]^NcFf^ko\Aj^]]`=ON_UJo?ABH>RqCok<l\aHnCSOz^L@PGlE>FWot
DATA ?NNTY][oF^g;PLBbgFPMVJHkO@nubT<<^C<rfIMBi;L?oCCo\qWL?kRoWclmjysO
DATA V=TxSZXWlVKWD?g]J\gQFxWodf_T@boO]JwCLoOuoGGW]hmI[of>CU;I=VM[^F>W
DATA ;oDWC=Qb@i=JNu\DDM;OFH;<E;[<;S;;sfMpUKSBnt;uI;;;fI=;;_;;;;KO=D>O
DATA =t=LJHOSEgr<Ag\<vmkM>_k<F_k=DW[@B[[<@Sk<AO[HBSl@Fc[<Cck=@SK@?Sk@
DATA @c;=@SK@AcKDA[k<Sck<E[k=Bg;<`KKD?c[<?O;@@_;HBSk@DclEwnJzvjzyGg;F
DATA Fkm=wg;FfkE><CmCOO\Hr[Q]UiHJ@S[?^KLtqVtxNbEkLNcc]z\cdaNMdybRZeYB
DATA h]EA_zzVmpChAzpM^Erf\ujk<B`aRypiIjFsBdQXz@qXYL_n\EPbKs@Ki?HIi@sB
DATA n^xhveF\foHBJNfjzJqRyHewWOxyrtiUFUY^knqpNnnvpwyzqrrzarbvlbB]biZQ
DATA zwusY`^vdfPq^zjjXPxustwFnxnujlYtmrBFfzf^zlXwGh_BHNQeWzFXyosacrzY
DATA HKYwUmzU```fm`qrQYIQSvWF`ymjdw@drxMFRvczXUJcqJWvnZKbiQuilPhkxZyB
DATA J`jzpqr;y\\DtNW^Bzptdxxr?GnpVxfhvAFvVyxJeFshbVYYPYWNrvpURL`RGjj>
DATA zmxlEBvZY\ct__C>N^\Gzzpmjwwu]fxzMMzjfZRzrGWzsoeVW_YIImG>XNXfCpqr
DATA nfDBfvzuLF?iOng>\>TtOE?Q`fl<eQ]ZZygI<pBLsYV<yjSXUwWYMxJ`iXnFplhX
DATA dedfHarqKceu^YX[vzLfiSY>qL;pd;GUYqOAsQwzupL^nturCpOzUQwub^k\PAXy
DATA JFUQP\cfbjuXotp\CzfZrswTnixnE_rO@\lNccwRnzfMSCijRU_R<MG@`gWrNwPJ
DATA NYk<DvurV=`<xqojfX<kIO[r?JRpwNP>Yv^nvBnva?aYbohOxlRte<JT;dXnvf^e
DATA [O=_vFW>X;`zxVg^Yyk\xeqlpwEFl<gyTfyeQVkxKVKsZMvlZj`unuP^ZtbkTrUo
DATA ^YkSnwVdb`fa=QPrS>LbjU_[MJtNYGpi=J^fGj[kZvJDSg`zAJBsjWRzUZqp`zqx
DATA ntPCptXtxPZxTxVjmnzsAxSgijwN=QzjrKE@;wNHAnlu]ITew[p>mzmJ_OzOxLsY
DATA amClvodKab[jRxTNmuy\`XprvUVv`TcwyQtzCRiAGanr[lUWDZ@mpvwJIMaIjbkz
DATA N^mzNkss[pVWuwApz_wts@vcDVBj>yVzYjT?[ZxRUb;jRisHIbTZaRqFz;_VzSxU
DATA iR@V@zlJsvzYC_^tuyYYzgX[M\jZ_BKim=LxfO_xAmi[q`mJdhigX@<kZRRafPvj
DATA invR^e]vHpzm\vjWPQ_SPvjdMgFKgRRCgmnU=OPt;nJMPUwgMjNR;llgS@@fRGlt
DATA xmrFPKvp^Zxk<LdO`@qsp>ALyboJTzEJLKkeksqXoYkeySAbhFtazeYkh?DCGYL_
DATA [K]^gmsBUzyBrYo[<eaBy@MnkvF`vnk\ye[\mKR`]LgqHqfvdNrfJrkNBvNrKoOz
DATA T`Ra=ggjlsNxx^SjwNskGnXngYjMcjuZXxNS^=sFgvJgT[f>PqnoEqJOInNTMQSW
DATA uEsyOohHOfvIvcYSG;THrhqvVIv=SqkTtbVJ_YsezLXvpipsYh;kLpGnE^TAyam[
DATA Yhmr\rqhu[hftFo@leTrC[tvF\xCUSDSgmxLabAfgR\_PHAoEr@wkcXs?VqFOwu<
DATA ^fzwMYWSUzgbu]`y^tBK^sUE[dqBEq`=bMjewLpMLncsXVUcIgFZ<]N\c>^A>QBF
DATA zSIasWsuTDUDnDujdf@`UHUO;JYg<xXXQzyHoZ]rVfslOe]tRvT>Y@hH[HFSDHwx
DATA H?HPEMXs[_lreu?F=a]YYDq\]<xApJl\jSf_SB]aUYdICqtVwHelfZZeRQshoL^V
DATA zAhzBjWyh\Mbbz[qzo_MFkSKXSpaboocFBmGwQxwuAbkYynIjWnhDNq`frERE_u[
DATA SfkaSj^[>PiomiHYCRPrSmj\Nn^xFXjR];fQ<tYZywuvtPfv=wf]NuzIiNo;U`mj
DATA s\?]mbLQjHIhavADwRTkUEXtf^P`=ttBEWHyck?^[twMvc\]WsI_eUo^z>y^;sZp
DATA YzXlzwyRgrFqzbf`fQvxeAJhBptxhbbrMPhXOArtXsJGYq=@@IDr=gugHjcwHt<m
DATA Uai=Ts<x]eYrjxDe=Ei\`mJbmefD`UYyWnsIhZNOJj?ziy]IUuwKUN?s;?wyklWr
DATA _YvlZRJwXEXvwNXKjlX=hc<Qb^tmHxeFyYalWEGZx]YfcTSoGRugrpYaJRQTT?Mv
DATA nHZy^PrrzsK\fbcMr[DNsFUsXMr_UHcVJXi_E>lI\mN[hg=TjfLhPGN[?A>Y^wJD
DATA RvVLp]@yFmdOTAyW=z=`UnYz^zeIeqVcb[[trBsnbeQcCYdpVcr]psYa>hkWRNNd
DATA ysrPsrlZftr\Z`vfePQGwsAGm?KtrDtmSgVr_kFOA>kbQs_wbOko=FpG=hVgXGUz
DATA WHZqmnRnNcQqWuDGmbllpmlR>LhFQUxOk^=iqUV?FNaExWZJ<hxGj]ODs`Vqo]VJ
DATA UYE^pQG]=hMyjGNeIWwCF]EgFaD?roBw`Fkut]kSDORlw]HPYwSr[Sh]axMuRFn\
DATA _ZTXdwzI_HvkqTjhuyOEqj=cJ^O^^xv=BfcurbnsZ=rujutYNxs_R@jpqngcz<<P
DATA Zo\fU]W=AN>r]tTiueuAvdseAb_ykY\llQOoxHJwNkcJiG>jzpvMCUO]BISylBRA
DATA XD<kdaO_`Enfqk[@s\\m\YkS_wRsk\a>jtS\Bz>ABuiwU[B[FSWclrfjB>R^ZkWO
DATA Y]R`>tgDxWqt_LGm;Cf;LZg\NDewXVEsypbCiGli[LcI@uNnXSo]nWhCjOqilPXm
DATA hv^B]dyiLWtJPGd``KGUxZQgJj_OJexHRWXTHHqagakvftUEuYse`phjx`dncwaE
DATA Zr]BD?wFtdw`;tjCBXEB^suM=rr`?LUehETYJRmqrgnHRBAW\dTwZ\nB^Zn^;dX[
DATA DqM`OKkml[mXCqaOaSt@wxI?=@fyssD`xcvazjCmb`CQ`hEuyORJ^hV<Q<<\yCka
DATA P?WowpM``\PgpRBLVBldBsZtYw@lqsoepbafvbnyRBIM=haswr]LXy@QXZgZG`xc
DATA [MDKY=A^sqfAFlzcjRkEZaNjMB`LcAVr]GzdqeaPeWWVfKFdrs[VL?NNAHiZzJ>q
DATA zqdN]Dp=s;M_xbieKRfoecgFwGjQhV=S?temaJfl]_g^mO=oWqi\hAi^@GtW>kUq
DATA P<ErBd;Rdb>FHbl`oN>FMY_b^puKzkiZDv]Qr_WdkD@svlMHLZB=>TvFHOU^BsDH
DATA ^gawhbaklp@dXqO`FWC?TjuMeOY_hL[@DqlyeRfU@V?YIb`u>ai\mAlNHcxgT_Hu
DATA e`IB<BwSornZcfogwghx[IrychJIaqXpx^_\UaSqP?]wAM\>Bc?Gatu?UWkV`=BW
DATA ABRSCJEtKLHkOg=j@?BJ]QPILEpsEn;oqcKNPUr]w^abco>egcM_[\JzM<X^h;GZ
DATA DfaW=XBU<dNKk=MVE?cI@KMCE[p>PEmYGci]lVfckiSxukL\hXt?uwT>ucXzqXwV
DATA RFgkJMnh;K^UV[uBl;gnBfboT[OpeSUH_zUVJPdKHm\jeA;F\\UL>GOo@y<\c<NV
DATA [@Z;YV_hLG_UGc@sQjQRbT[LIW]VobQcpP<ZdiIoeeqpF\C\MO;<>LHOq<bWhU^Z
DATA WOmqa`DWkWI[kGREoeji=?fM[e[^n[KfUIbwpU>zoztsqTmPCUAefWr]^HMb=K^^
DATA Vki<fYgczSb]CarnJl^hSJkWtBBRi?BlYUJYsKAP\QgR@tYMhuSmWSoItON<d>tc
DATA kCtq?XXCLBo>DuDtkOlrK<LBe_>n_VBEGuuK^IcBAEGeFSOSnTm@Aiv`=cHId_Mh
DATA nbeELzaVucgvIXRCb]h^EChE<I@lgbRHgbGN[N=RwvI\lyMMl@FA<?fcMhyP>zWE
DATA tGhca@NNd<sMlCWE[=FlSh^I\XMeQfeNmm[cpf>glCTxH_uHT[lMFnu^W_go_sTR
DATA ^XblSr`?ymmTjdNT]ViJqbfeSGYoEjdlGkm`TWehvqJlQjMTUF>DI;T@]p_Z\L]D
DATA fMfnqFGfFtBeQE_TVU<l<@\[rC<=cB\YBL_Eor^g[K`nfxvIUWfRNEfFBEOnqWXv
DATA iAMG^ui^]TtLobn`J_bNhpxFMW=T=;Y`eu=pJ`\`CJl^kx<mQEQ`\NrpLrFUY[Bn
DATA hyKLxwLk<bCRbOeOm@R[>dlNq^JZPRt_`LXGkJn`?\Vif<_Ii;BmAvVBWEU]h^wE
DATA fDI]HGlnna_SpIxSohzKMiqHt_vu^hIgnsCN\zWNMoJfNgnJI\LW=l@AUhnfKjUD
DATA Ajp=;_@bYj@<QHejhEguqNDLhbNrChrjDTq@aI@NUlzz<Lj]Mf=XSDHAYA@k>a_M
DATA ?bBlw^OYeJRpUUb?vxHByk_roNPOwkk_W^e=ziDDvCwW>oZGmEpTs=aqL`S]B<dy
DATA l\NdKzclY;wSCg`OFBV^@pWpPxN^ArQktsk`v`QqEGw_cgFkTn=EWGlPikD\fjCO
DATA K]NrUpW^koDQAJz^qr=Z_AX@Tkt<d?N@oVGpaOhTJkhHfY^;>ndlwmp_hEZSk@?Q
DATA xEVkVcTVcdPjUL[^[ZU\YuZR@DqxsYeqX?zsom@>>iY<ZSgaBU_bZyHT`rDcs\jH
DATA rSTY^=IHwg=ZGr`BrVSyzKjfiCP\R;qJC\gUST]s\WxoTmp`UasLXpY<?ir<kdIv
DATA SFwGBjf_cq\ySqsKiuJ=g=GylUHjwmFIzmrJBQYktpv;nnNwxRcVRF;in=\E=X=K
DATA JKYkLoPpJH?b^QAyIejNSr\YtK\TD@PFa\cfG;BGdRg=OW<I\As]Ac]W=SXGzOSn
DATA =OfC=GvXrsGiRcDDVeaBADmPBSkjKUQ?vjQfkbVL<Q]ta]_PBSFNZ<aLS;rQ<XYk
DATA ]YRfwC>h?JNrulRD>yeVtMMydmteratw^hKAv\ES>d;tjxi>kAghveukdeenHHri
DATA oNUvkQ<^BIHo^JGccgoWqNx@=gUez]DPD<JkoRafyC[@We?OEdOY;Z]EZ\Smj]co
DATA QWEg`Qa\pfAn?NzwHBOTLQIhUsS>G>CgBiKeWs]kiAgHkKMwgbPkRC=xMwkBA^iO
DATA p<LC`amJEa\YCs=CO><Vk\OHwBbPHGZr?j^^>[feciV`llDFcMv_rJqqtTX?TYJr
DATA yYNgyGmHvWnEzg^LGmqUQQIWO_\O`R\_UehXA[>OF@[;E;[=;;;;A;kPrLhA`cyH
DATA n?S;;;[@>;;;F;;;;;;;;;K;;;=;;;;;;;;;>xONG`_N@t]K<H@OF@[;E;[=;S;;
DATA A;KLfOhAWMVZwhsF;;;NX=;;D;;;;;;;;;K;;;=;;;[e<;;;LD_GKD_F=@oOKhO;
DATA =c;;E;[<;S;;vQMpUshcV<UAF;;;DX=;;g;;;;;;;;;;<;;C;;;;W@>;;COKNlOM
DATA IP_F=@oOKhO;=c;;E;;;;S;;?saoUG\VMrsTA;;;pw;;;g;;;;;;;;;;<;;C;;;;
DATA Ym>;;kOMIPOMI<`F=@oOKhO;=c;;E;[<;S;;sfMpUKSBnt;uI;;;fI=;;_;;;;;;
DATA ;;;;<;;C;;;;iG?;;?`Km;`KiKoN><pM@S;;;;;;@;K<;_L;;;KJM<;;;;;;
Done:CLOSE #1: PRINT
IF XCk&<> 4041943  THEN 
  PRINT "DATA corrupt!  File deleted."
  KILL f$
ELSE
  PRINT f$;" created."
END IF:END
