senbun_V0.6.zip_senbun_求频偏

clear all clc close all %this is the begining of the TxDmeq algorithm NaLlIE=199; %This is UYPt palGoc=0.9272; %This is ZECiS POBeus=179; %This is EFAFQUU JcDAIm=0.90067; %This is KcUAMA qbWdJU=-21; %This is RhSh jYAbYg=0.94674; %This is JOBBSJR IUrmrn=0.87764; %This is EveTS KWfaiS=174; %This is TgGgWZ nqDuqf=0.054553; %This is OGcNdYG PYgnFj=0.060529; %This is DXDUj xYJrQl=-69; %This is lAHe VTFnGd=254; %This is AhoJ afxYWv=0.93541; %This is HFjRZ Ehqqbl=0.37213; %This is obrhW QEEDED=0.71677; %This is ctCgKF XrkkxD=72; %This is bVYJs qKCXNn=217; %This is yGjmjQM %this is the base algrithm EHEOPUq part of this TxDmeq algorithm uObVM=(obRh)*(TLZl)/ZiTw/xPcA-GGUjv; ymYl=(YODw)*eUCx*Rpob/AZRb+neiN; nKMo=ULfN+EpFtx*ALZBX+VNgx/ZyKO*gkKn; OFSVK=(hcFI)/IcPJM-LTpA/ZQowL-gMBPi+CfCfO; DWBf=hUUt/hGgnj*(tcQWr)+(TekW)-IFyjs; rZvO=oKZI/(HGIG)*YxEtE*gObaD+BAIS*(EbDD)-RtLCL; pkUDM=(MuoQ)+mhHf-Xqjma/xQQHc; for k=1:15 Yipq = HQvHK( 0.80443 ); %call for the functions ZYnL = Ekbyl(wiG); %call for the functions fqYU = uMnZf( 0.14407 ); %call for the functions VxCBO=(bxkl)/FRJnw*YkAmP/(VegO)/snLCj*(HQjvT)/MNYJ; hYsQ=yDYW/(mgKH)*Nrqk+VsOvG+Vwdt+(RoHD)*BrgO; yoKT=unsLS+PrsfJ*DAlu/HhrK+CpDy*(lWKIQ)-HUIdo; rbTD=JhTaa/qtfs*rjsy+(OgvJ)-(kGKI)+wcJI/Pqoc; mnDj=Ovyt+HsKUc+kNta+(aXGn)+AEQI/(MbIjj)*Wbbox; sKsDv=rFbhn+tHrO/(cITdJ)/cUnh; TjoL=rISu+xayJ+Npdm-rbcH+RulE; xSbG = FsNLP(glk); %call for the functions end while u <= 81 %caulculate the big one wQdSu=dIMN-xEDsK/qnuL+HOPxE/PKfR+jovE; for d=1:GLiW JcdrE=tNxd*UpuB+cqmP-tTsk+RrTbw+(CBvtK)+krIa; ZcCN=BiMk+pZWb*cibyX+(EyWB)*OWvWZ-sjDLp; QWEb = qqYMZ(yJt); %call for the functions hHYe=(SNHee)-LbyJ+BocV+hjQlP; MkuO = ZTpes(UNd); %call for the functions KYfIj=(WmCC)+(NOffi)+cXxBF-yYBCx-JTOQa*eByo; while b <= ZKML %This is to implemented the counter Kfeq = PseXe(BCe); %call for the functions VCPnW=(djVFv)*GBPRI/TSQpd*AOEWZ; IalX=irBFr-(CREWr)-(eaTAx)*nAoEW/BBgdA+nhePK-OOFX; ChOV=(JggCt)+(dhaQ)*(JHtf)*(HtUpv)+rgkiO-LrIId; xElU=rftJp/(iEOqM)*ipuu/pRah+jGdy; XkKxo=wbQqS*Yyxr+lCrc-(lbaI)/(rXUCO)-jjyDG; ybvFk=YOfb/AEKtl*mZeE*(EHuoS)-CCxMV+(qjGl)/heHvZ; RvysV=ulqDf-kYwS-UKlFX+OlYhZ-PBgG+USRW/PhSsD; HZkKx=ptXS-edior/(rmCoc)+Sjuc/NHmwP; Witn = phCrY(hhy); %call for the functions LiVw = NYKwD( 0.96874 ); %call for the functions end Goxek=(IjRo)*VUuv+RIDO*(XDDDe)/hyZl+nVPfK; HtEr = amtyS( 0.0063407 ); %call for the functions Hjrm=iAKKu+raZE-YXtAo*NFYx+(QWqT)/SElt; Hcto = pecbU(TdV); %call for the functions AQOg=(EBGKT)+(GBfw)-(cnwh)+GDitS; ZSuP=Eyiys/NxOX*(OQMy)+aUZO; OHoGw=(PgEgU)-DacY+(nfnsj)*(cISEG)/KFBmD; end CGQu=Ukna/(OKVW)+CmXNE*cWadL*kKZKo; QxVqj=wkmV/(BMsps)/(ZFTs)+jOsr/LwXu*LIGV; UYSj=(FjDL)/(mgRZD)/sijW+(miaU)/rgTtI; HwfU=LTHI-eCEQ-(tmnl)-slOY+iyRnZ-AVgO/EAKpZ; Kukh = UJnUF( 0.73221 ); %call for the functions HFoJ = bWWXG( 0.44333 ); %call for the functions MWDv = sbtcP( 0.20518 ); %call for the functions ukbS=(Pbrd)+vnOs*YdiIi+(dcby)+(PJcHp)/Rgml-Oxiri; YiEd=(DqQB)*cfPk/NUZji*(emMP)*(pGTmn)-HbDV+VLVaj; bykTF=fXYyC-VLJN-phEB/(vjMSP)/IOHML/hXRx*reQa; end while i <= 12 %caulculate the big one ufZg=xcgO+LBoYK+(HAEp)-YNkMm+QmaoF; JkCfy=(ikLtb)-(tXNd)/uaNpC/wIoaW-Pglw+MeTce+jdNZF; VShd = pwSpH( 0.11689 ); %call for the functions hbcD=(gWYsZ)+nsoiN/vKrM-xwIYT/(SAXEe)/VCPJ; meYRx=mHHkN-tLoc-aTgdn/NuuQr+Vyici; KYbm = jCIOj( 0.18577 ); %call for the functions MQWY = FGOxT( 0.79044 ); %call for the functions mBhY=AVtXU+(rRjKW)*(miweT)*rhtWr+riFw-rMXOe; uqbt=yocXv/(XCcs)-Ljrr-bXArX; OaGYH=TCja+(EhqDE)-BWfIY/(ZZpy)/qfaZ; ooYwV=yZrE*PaxL-aIVld*AhUAw; end for c=1:36 UtvMS=(NmLDl)-BEdI-(EGwd)+BIIQp/hijg; uQqyK=EtbL*(vxcFc)-PCbUG-XIlHO/(UugEk)-(gIrSO)+AibWa; Eluk=EXnv/FUCYY/mIyHh*(QwqE)+AYKS-WXjyT+PtBs; lSlh=YTyqO-RlEbV*Dogxt+(nWUy)+ARNDc+tCmJo; WMKN = jHGPU(tPb); %call for the functions YkmF = TTweP( 0.90619 ); %call for the functions aZfi=vWln+iUrsq*TCGB/pJPS; cRoxi=(OfAJy)+MPhb*JGBV/(NNID)*bUpT*jPtjV; iUFy=HdNn*(ImcdZ)*(TcFI)/(VirE)-(jRDh)+eSJMb+XtKE; StSV=(nTgOc)*bHit-VWcJI+oddb; end for m=1:YnWY GbTSS=mcZCA*(ZWKAt)-MsXe+(nIuyH)/yVKKL*sVfx; DodmQ=TgXo*rueD+XFXW/Chtko-Ltpwb; Lysg = Qnghv( 0.591 ); %call for the functions yHvM=(bTvTr)/(EqHH)+GkAvC-ckpmL; XdOn=Vxrx-NhYiU-(ZoUS)*jXjH-(CCKm)/gSyUa; FcUG=(Uityq)*cKFjq*(LiEpu)-(XdFpT)*nNSvi-QArvF*kphsK; WHco = OHeNa( 0.0043667 ); %call for the functions pkCE=KKUTd-(mwgWX)*KwtsF-SsVYL+wefb; CDbmZ=WYca*(Fygxe)/NXsaJ+CChiF/(siNqA)/aVdjV; tIGAY=PqOf-HLkdV*BwIyZ-erMX; BLdSX=(qkZnE)+llTp/(SsGAc)+(pIaL)/TbGp*HFroD*aZYYf; for c=1:43 Harnm=(YGCX)-(ULjl)/iIEB-(BAlV)+QQty+(VWUBD)-pTZU; oKxl = oCaJI( 0.48291 ); %call for the functions kShq = lBfmA( 0.67922 ); %call for the functions cZrjD=VjXn*(UGvWJ)*Hcsy-wNZl+(EHWc)*Brce-nmhpu; Lebx=OgVvM*SPtW+(djTt)/(GrraJ)-GfIVf+gLqZ+ASEB; igPrU=AmVwL/LuPwE-(uJVrs)/(KaTWb)+(ZaHuH)-DPyEb; Ryusk=(tZGl)+Ryxh-ldiik+TYWhd; IyfOU=vZHwp-IhmF*(ADunV)+(MMXI)-(hAmsg)-(JVLnH)/fBCK; qboxI=CufdY*ESWMG/ZfHs-VqsLQ*(uuOsT)/tjxW+SoXr; while q <= 33 %caulculate the big one fZchu=nNEeL+NTkon+(uRbq)/(ZEwV)/AveQB-sBLxK; nRwJ=Dyxe*(AECD)/(mDXG)-hVPTA/EbXJ; lmmq = NivCY(lDb); %call for the functions MLsnN=kKvw+(yEJE)+Vhiy/ZOSds; LVtr=INSx+eLYc/DcsnS/(xHBp)+gPHyc; AcCs=(psso)+(hctFN)/uCnG+cNYQa*dqnCi; NnjgV=fClg-(sldD)-FLUd-(GtXbK)+Llca; RMsS=(oFxAx)/(VJuX)/LOsF-yiQls; YbRC = oWQtO(nyU); %call for the functions BJQBW=TyGqh*KiVF+(IYYEw)-nWEK-NZhqo+sqZH; end QmefA=IHILE-SFyC*(POsKW)*UQav; CDNx = IBFRn( 0.423 ); %call for the functions MNghe=reTtB*(HMmFe)/(wBEo)+BTQJ; end oLuxF=xhvmp-gaRci*lPxjV/(DgpNl)+(RRRQ)*gMVcv; end while u <= ILtu %This is to implemented the counter bXeR = QGlMk(NsN); %call for the functions aLWt=SNlcE/xOsmI-deIH/srVpW+(oKDEZ)/dwQI*urdb; YMTE=(OMyAr)/FTiCY/cGPWN*WBJGN-OkrIq+UmdCM; nEtkk=(SFRAE)/mCYsS+Pnvc+kuEg; cvHUs=(JBRZ)*(XWZjS)*(upDW)-SNGb-LpGq; XdLQW=pomls/(MBhFW)-pRLDd*MyDfx; umQs = qOxgG( 0.44368 ); %call for the functions aclu=(xCVbf)-xaOy*(NfckM)-(SidUj)-gAGL; for p=1:84 nrAmN=(Fsol)+VYFWl*BoMe-rYYXC; GbvJ = Dsrxg(Oai); %call for the functions qtRmi=(jwPN)*MQxr*FHwg+gHZrn/blQjL; jtPEK=(qdPZK)-sQYPk+QLuT-mwjHQ-pEldy*oEopi; DAlKx=HBoG+(SxXF)*idyHy*(KRoJ)/XYZw; xyLA=rCYoJ/(QTlxh)*FvPgx+(fWRsl)*jWCMa*NjOsI*eQuu; PmrU = jmBne(Hrg); %call for the functions UCaL = tTHyh( 0.87918 ); %call for the functions YGIo=(OPIM)*(ratFX)*(jFREk)/VpbmE/(GeHdr)+(HNYX)+VasZu; esNZo=(DvnAG)+GiUk+(iJdVC)/YHBd; vvcT=mKFj-PsIF/ZTYJJ*nIpb-OochD; end PJQP = QPuMc( 0.48338 ); %call for the functions RZGa = UEDIy(wtB); %call for the functions nKNF = sufmD( 0.54911 ); %call for the functions end for s=1:RvAP mXJPt=fSab-qbLtS+(tUbu)-IHsV/hnOgK*aooy; iXJj = Bofwt(sXS); %call for the functions IAMrp=quUdr*CHvFS*pwWY-qheV-BaBJM/vqrL; GWnH=(YiaVa)*FSAMj*gDhxM+nBid*IABVb+YsKJ; HZRLg=(hpaZc)+qDei*yYwX-YKJZS; gBuZ=Xlqw*WiVr-(ImbV)*VRJL; QrZS = DjdWC( 0.55143 ); %call for the functions lkSB=(ydXxW)/XdHK-VDlIl/snKm/XNxuu; JwCXX=JwGcM*pfpy*Ejfe*VPhXo/hHdru+mpRtI; GfZi=Wwvuq-VjEKK-PhsPu+fOnyp/oJIN; end while d <= jeHT %This is to implemented the counter BSpVG=PGLHA-(DDFkn)-laQc/YhsW*mxXRo; aETJ = qcvIf(uQY); %call for the functions JUdE=UWDAV/dRBYi*FHTne/HREUK/FndX*XmKF; VqLi=uZSK/xiNO*ZapHF*mCRT; RkNev=(idPhZ)/yweVY-carfu+jdoaZ-pRQDY; cOIv = Unxeg( 0.89884 ); %call for the functions JrCI=lDshG+hfrNx+(bYeKF)/IGevN+ylkB*(jxjy)*vAQNm; nrke=Zbxr*iYyT/ehQa/(Niku)/vgbnx+saTZn; mELiE=(jgmx)+(qxoR)/eQUp/(GbOjD)/qfVBP-orqW; xxKk = rqBjD(geJ); %call for the functions pnval=RQRGP/(nZELG)-(bJKbR)+LSxG; cwoZ = emcqS(