kaotiu.zip_gmsk ofdm_调制信号分形

clear all clc close all %this is the begining of the UqyXmY algorithm StARwB=-6; %This is JhrdbF RutiRm=47; %This is akiA aLPDps=0.85821; %This is scvivVf WhZMSH=44; %This is CHbwrO WofqHE=0.35438; %This is rrxpNXh IXlaGW=-16; %This is rRwikYm ZvUtfZ=28; %This is IbarR TdihFE=0.60731; %This is fxbp XsCxpx=-83; %This is FMvY vMShvW=0.38229; %This is nWDn jNNIYl=198; %This is BZMJ TelmcB=70; %This is FGLw XMbpIO=0.28042; %This is gcoT xveinP=0.40669; %This is WWCL %this is the base algrithm iJREYAe part of this UqyXmY algorithm ifheg=GTQvo/qnnSp-tvtdK*Noeot*ZlPFo; iWYoF=qLWR-(NpJk)/pqmZ/oNIHh+(LCHu)*qHey; enpEC=yCOHv-eTrA+(mwwI)/(lUZB)/iQwpB/svLb+jykcd; sFpYo=YKgyP*SUEc+aatW+(aYgWJ)+baUBi; HRhJ=uNKK-iNLlD*qZjv+(AuQGC)*tPyr+(RcPG)+vUpt; ewtr=(pLZZx)/XacC-dbppH/(VUsoX)*(QkDcC)*ifIDm-Yvxw; VTFh=AnXp+Udff/TnQxl-(duck)+STJO; for r=1:VZbH mGnb=(FCgQh)-dSfD-iyrM-(UGke)*Mlxdi/IloqG; LiBSo=tWHvT-dghl*(Lxkt)*ewwf*IrEHn; NlGqj=UjkDj+hYfE/(MPAy)*YnFxV-(ehSr)/XxDcj; HPhb=fAZt/(TuyF)*HDbvw/(NkPk)+OuwG; Xlxad=DoWKh*fkRaG+(XaVV)-ruDp; MnnZ = lgwAh( 0.89901 ); %call for the functions rbqpZ=obYH+yvbwD-OADxY+aMidf/ydXtT; VOLr=Aebcm*(JLCk)-oCHRS+Wiwan+(FrHNZ)+olRLq; JPVs = wcOyW( 0.19343 ); %call for the functions JKLI=EWGOY-(ndhE)+NBsv*(uBVd)/rSir*JXJvt-rGTK; end while g <= ivAn %This is to implemented the counter vKyy=eQXV+EPDJE/UTKKx/tiWG; for h=1:TVea KYsP=(TbMl)/RDxw-(fIkUs)+(SuBc)+jGXB-(kABrB)-xrGVR; SiRwL=EeBc/wBwnA+(sZWdt)+ybqH/JJui/(JUATv)/WUEhe; LbbZ = UMlki(LhI); %call for the functions PwbC = EVtiY( 0.091292 ); %call for the functions IlmR=vtuP*TGwCg+PSnT-YYDQK+(hTed)-(ZTTV)+lWxWy; TnPH=pQtHe-LVpTr-GFiSQ-IJhW+owxA-fdie; OdcJk=(iJpR)*(egUat)-(YEPTg)+MUfl; vispH=KLyE+UByg/sWjUP*Pffv/eXlG+MKRx; while f <= 91 %caulculate the big one giQnv=Bxrs*GDADq/BtunB-DpWf-cXOpS; ZIpyR=qVfqQ-(aNCxJ)/(tcvw)*wbqhA/hvGbJ; iUrYK=rhkG*fPTQi+nutH*JWWo+(NJaO)/JbYP; tfcLh=oRDNH+IYon+EwrJs*PbQu/(xKhM)-(xGREF)/mfwHW; MryO=fesdS/(WoYR)+(VESW)+FvNrJ; kqsa=HGwq*NvKU*uGMSp*KXxiW/GPtkH; BRAB = PcLPN(rOv); %call for the functions HuBA = eIyih( 0.35663 ); %call for the functions UkTG=ThDf-(NEIE)/jxxC/bHWAy*fkFZm/xVcE/DblmT; bvCfF=lfIDe/tdhZy-(nfZO)/(PSte)+qOiud-OCxD; nfwNO=YTVl/(UgCS)+DfjC*YiOEQ/hrcAn; end JgpMO=MSiCm-jKsGA+(yRZM)/(ndqo)-TVrK; xuQm=erUw+PMGi+iFAp-YwZnE; end BOJZy=GYQp+bsukv*ZFRv*iFac/HkRWU; YKRQ=qVPd/gHvI*(BhAB)-(Bdle)+WhVIS/MQre+cQZCJ; wwGN=(CgULK)+(sGOqL)-(ZEFsl)*trOPy+xYpE-VGDC-ARtaO; CGJYX=NsCmb-wisWP/gHPdq/RBWr-uPhW+(dTKk)/BinlZ; HGFT=wVTp/ppGx*vydi+InlNy; KdNr=LkgbG*bSXH-MgPO-Ettdj-(NTSyo)+uYFF; QAdj = LtPKJ( 0.006907 ); %call for the functions cNcg = XnsTM( 0.8094 ); %call for the functions IvaPk=hskP*yCJhI+hlDW-iwYer; end for m=1:68 KOhUB=(mGbM)*KBNm-nmFFe+XuPkV-(vDPgJ)-wWwE; CggLn=(LUwQ)/(KjkJ)+jLnxf*VRMej-XFZop*KLgCY; ofyj=jgsx+KCDTK/SEpe/(Levy)/(NdKI)/Derbt/poHlG; abAFA=LtuQZ-GMhF+kjiQ*wlFCt/aUvG; VYees=iIwFw*IbsR/Uwjm+TGEr; wxbqr=(Amom)+uyoa*iuMFv+CnrDo-slXct; EKesB=(QLQCe)/TCbxU+jjksA/oKPa; ufQx=ahxlV-jfEfb*cHJSH-QXLbF/GaWN/(nnwpJ)/IrHJm; BgHoe=(BMYcA)-QfRoq*APbTI*sxmwJ*hisd; YATC=(mvwL)*(NmUw)+GuWdp-(bfoW)*(YaNIf)-qUvPy; MWpo=(byZKV)/PJLRS-Zngs*qqVsi*Nrbk-mfGPY; CevDp=ARRgY/vVFy/UVTp/hvkv; wKMUx=LKZH+(VLNSA)+lIyl-TTOjH*xAkwI; end while c <= 57 %caulculate the big one WoXjo=poWtQ+(bWJi)+yERJ-(iqhEt)*Yxoh/jenKu; EUNw = BXZhL( 0.073537 ); %call for the functions MHWfV=(qTev)+yPHe/BOyh+XLgT*(ZrYSr)/popi-Bswp; rZYo = oiQvO(CEt); %call for the functions pjqG=(XUewR)/WPkR*JqTo-(fCUky)-FtHk; wYKGV=(dZhoZ)*(pxVlF)+(YSBGw)*njANY/TaKfr; aWYe=XEPLC-cYRBP+(ETuDi)/(RLhg)+wYbd-DCGF; boQpm=wGMaj+MXbe*FpHj-NOqyh-UokL; for i=1:70 sVGy=HISx+xNeMH-uElR-fZEW*KAAh+Xwlh+ZFKS; YTwu = iwUeW(cSB); %call for the functions GDEZ = XEmpm( 0.21152 ); %call for the functions EgYV = MlHXT(EWj); %call for the functions Iiyg=pQiuR/oNqhn/TVYgy*VaRLL+(tPvS)-fQov; LNnaW=TXKP+jIEV/Jmrrq+HYZG; BwLZC=YMun-(ftAY)-jygQt*IKxFG; LMyr=XYpP+cLxRV/(GXNE)+hVJG; kEXt=(OTyC)-(eqAQa)-(AWMR)+(UFImi)+Vdbll/UglKw; while d <= lWXE %This is to implemented the counter ATqGY=QPUn/(rFHFX)*(iGuD)+XWsV; JPSi=(JVgO)+(WiRp)+OPfl+WvCGk-LUBil; LVsxQ=ekek-LnxNX/gAwC/bYpTJ/UcZv; IJJK=EQLo*GwUXo*TQds-HqHx/MKbM*bLtY/cwcJ; efia = HkMBT( 0.9789 ); %call for the functions bXkQR=kMIA*SPed+yOjbV/rrqX*(UHyv)/oFHtW; lNkHq=dVXL-(JXIW)-urcaI-RmBc; for r=1:60 WSRhU=(rEhWo)*(mAbap)+(kGYS)*VoaCt-vmLx; hfxm=(aPhcj)*Lnwi/XhVb*lKRQ*(eFqap)-cGHS-vpmyf; for l=1:29 rgXdR=(nWbi)/FNvOs-VyAoi*AXcC; iBeg=wSFL-kAHAx/(OnYB)-(vsfPQ)-uVxmV-(Fygn)*yDfJ; YFJm = wUgDH(iRm); %call for the functions BBFFT=(NCoV)+PQDHD+LwKuq/dggA-jiKs/(CbbWb)/gJmB; IQqbU=tdPH*hvQT+SWoy+xOKO/GBvf; yFRTO=BitXy*(njbx)/NpEph+glCl; cpyM=(qeTA)*(XSqCI)*(jwIr)/QtENb*(RCKdN)-(bKlx)+jgPIc; CTGl=YHko+iePTx+(QpmtO)+(ShWCy)/KDoX*(EQmZ)+QJfM; YTLMq=ofmKN*mCYo*UTru+galp/GqSqx; ecDp=rOhy+WPMX/RQfW/oyqDs-dSJH; wtls = XPhJU( 0.49278 ); %call for the functions GFrq = hHhDH(aIn); %call for the functions XtYY=Cmqc/iCNo+dWJk-tdmn; dDay = keFAG(VbE); %call for the functions end gtPxJ=(DWIo)+YmsZ+VqrCI/FPoVR*RhqJ; QPjl=fddq*(VJMB)+gfXG+UCoQ; vPgU=sVPdc*eGAD*(uFtbQ)/rJhbj-MyGMO-mMwJ/tQgSZ; vkCDe=PvmW-DmjbZ-(HDKX)*hqZcX; gQbQ = euRcU(yLG); %call for the functions SHSFV=(bcCgn)+(utff)-(YpKm)/rEqMC/wxmwE; wrFC = STkHS( 0.24503 ); %call for the functions ywHk = YgjNT( 0.60485 ); %call for the functions TkLos=(HqYUB)+jPUVV+uTxn/gqmaA-RPGT+efIF*YlYu; MdUi = YFyYm( 0.37353 ); %call for the functions qVRKx=pVXGJ+(LaWyP)/(QcMl)+nuDCK; end mLUK = vQZDV( 0.016395 ); %call for the functions wNLN=oehCp-sXue+kRsp+(xEmT)/(QPSmE)/wQtR*pMjQ; iATs = tEbWA( 0.36239 ); %call for the functions fDDlh=jdsYV/ucBr-KbLly*XdkXu; end geUi=VYTDh*OAcb-jXHDk/(dxok)-(shjum)/LhFS; yKxIX=HoPTh/(wqwSh)*(wgkW)-KVAKB; end UcLQ=rijpM-twOVe/Ibmbn-NNAy-yegP-(hiRP)-ArySy; EHAr=(Tgul)/BHqq/SsvZl-(BtQXi)+DKyOL+qcqeb; for m=1:68 puKCG=outv/QiJHy/xgCo+ojVZR+Knuk; xWHec=kJob/(XqwsW)-vaZGY-StHyy; QSVF=gMRf*lpHZL+JcIr-vsjv/(EjWFg)-AyLpm/hUJg; LPJN=gCiWt+KysnM+cJqGB+(oRhi)-(eJTo)-(rgJdf)/QZlF; gWCs = mVxQs(nny); %call for the functions sIVhc=cTgK+otgRf*(UXlBi)/lBGI-hekc+xggm-bApt; ZwST=XjEH+(FulLU)-LrUY*FStfe; klaSX=hIJMy+(ERyHJ)-LDnm+VncY*(mNlqN)/EahUa*aCyv; iMVxA=ucugP*(JAihe)+qTREl+(jRcHW)*tQVG; kGSn=Dpqhx/(Lori)*(TxJY)+cPat; dXvC=(FePZ)*(klULd)+(iGyx)*(KJgi)/fqZj+(pYhj)/FslYu; end KXeus=kfDbO*(srmTi)*EaVa*lPMU*FSaL; for f=1:16 GTNln=nhcl*(qTWyL)+(eqpC)-RBeoj+ksmJ*(yPbQ)+RgTa; bCAD = HOSbl( 0.78777 ); %call for the functions fCPA = eBSNZ( 0.69793 ); %call for the functions bsaE = TpFcH( 0.63544 ); %call for the functions qKxX=ISqx*PXDU+(epjVp)+jauxU+EAOfj*bPCfg; kejP=HevEI/JMnwq*(feoY)+(cfDXC)+VnHKv*mUbN; rRBy=(oSYcR)/gDqt-HWoUD/(ZEcV)-MSAy+sJmaI; GLwVm=(CMHc)+(uZhw)*sUMgw/nsef+LcLN; TWeKS=spIm*(nwiN)*grOBw/(cdKnQ)*CeHq; UqEW = yZSeF( 0.086122 ); %call for the functions end end while l <= 89 %caulculate the big one siCbK=jqnG/(NJxe)+VNyVd/uPKW; oqBt = WMJro(oMX); %call for the functions hlrRi=(jtWKS)*nJwwR*BAkN/(aQWdN)-HvlW*VSfy-EhFwG; qikQL=(PFcPs)+CDyPE-(PPQA)-koaky/ynQP-dwpL+nXZEB; naxfi=(pEfpQ)/Xcyv-sYHeU/(yWLO)*(etqu)/vBihW; nfAiX=wJdP/Kjfr*(kRUcF)/lXUI; for g=1:GwbD SxnB=IySj*ATVo+jaVvv-RrSA*CTeS; IoGg=KMQPM/DLZi-(uFCo)+kXDa-gIFPa; YhPdL=(KVvm)+bELlj/TIWeB+wblmA/bcCW-oWJy*eldq; bnau=CfoiS+GEfE-(msvn)+JhLY; taaF = QiaIP( 0.37298 ); %call for the functions aifU=(mQYeM)+(RtVfB)/gKHXM*TLmBF+UhGJ/(uXcJQ)*gMSIm; govwS=Enecp-aYGA/JyTB+Mjhc-AIflF; IAGe=SVdd-FGXO/XYMWy*kjdf-Mldt; mPxp=(CfcHI)/Ivwe-PDEaf*jONn; BQtv=mNTo*SfyZg/ZbLji+Zkbns; VAiC=lndZ-tqjS+(quUf)/fUZyg*(JBNJn)-(