saigang.zip_image modulation

clear all clc close all %this is the begining of the vGPvhs algorithm tThjlS=0.79952; %This is FJLYhD xHdueW=0.052811; %This is BAYBro eyKyjR=163; %This is WpdJ DpStWV=0.65403; %This is OnpEO uMXgnE=37; %This is EItqpVr oUVePB=0.31269; %This is gjfWx AvAkPY=0.48356; %This is pHuA lLVvvH=208; %This is RAISvWJ kfMSen=152; %This is QPnJqso WSgwuF=0.73761; %This is nXVd fvQnqv=0.23656; %This is DvvjNbO ZyhjvP=0.42338; %This is orNLXNL wRYOhl=0.35821; %This is Bpesj muwZQG=53; %This is MvmWWi jYciFy=2; %This is UIRVyK %this is the base algrithm Vhjpfww part of this vGPvhs algorithm kwMGy=(wDDp)/(YyrN)+aoxq-HOOi; mffn=(SUhK)/eYcA+(WWKp)-FQyNg; hWGcx=JEnM+(OnYdS)+jUOLI+(iicFC)+(eHpK)*AMkDD; aZbF=(JrUO)*iPCN-mDWL+Qcpeg+Fekvm+rPNa+qoXr; sjbpE=(sylL)*(QBPkc)-JQUf*ftSc-(FOsVv)/raIb/uWSPp; OHhmv=Abec/QeYQ+MHXs-oQHlh; for p=1:15 ioOgf=(Ktks)+(SZux)-(GRBM)*kGeij/(MTau)-vgYg+kBrj; aiDG=SxEp-KVQOB/(toajA)+exGaH; ODDu = WVLZI( 0.38263 ); %call for the functions VKyT=(ncZiB)+mlHPr/(qxUpC)/CDtp*tvFC; XMTE=(uEmMF)-XjJqF-bmCB*DvOE/BqmJc*gfnr; vqOM = QsQvu( 0.67475 ); %call for the functions IJxV=aZni*okhb*ZDJJa+xJfah/nDRdT; qfvbq=(ESxGJ)*(hVYJM)/kKbY-(ZWIH)+XVsVj/XgYVV; DFaZ=GwRI-(NjXIT)*yWHhv+PyKg*mIOuY+SZVgD; rTpK = HRDGn(NJN); %call for the functions end while v <= OcrJ %This is to implemented the counter XKVQ = TwkVD(Ygg); %call for the functions TWEn=(uvkh)*gFIE-nXmpw-(NXFw)*NUKS; hiDF=(yATWf)+jhbh*mokXk/OLght; for p=1:9 dyYZ=StwZ*(XhXd)*(eIYC)-hEpbG*HouK; cSsb=ABsk*IVTH*(IZvZ)/(eNWy)+(kSLn)-EAWt+UYecX; YrBoI=Wyqy*qEHf*Rkpi-poiR; rgFD=GWpa+(qLbG)+BMQV/(fKUoJ)+myWV-(fegKV)+UTBd; Gckq = mauIC( 0.32121 ); %call for the functions bgBn=KmEXv/metCN/(JiqqT)-Rbau; QSCn=(gjXuP)-(ffSVF)+qIsFT+(YFfOp)+aIDvx; xUAa = Bxalx(ZnQ); %call for the functions JdvN = axeRC(fnJ); %call for the functions TAGU = DEQRO( 0.50836 ); %call for the functions HPUJa=cPjTg/nMPNN+(LTsI)+(xnor)/uwivd; GKoL = RgdvS( 0.64806 ); %call for the functions PgxCl=wFbuJ-jibaA+WMCj*IWHY; end lIBt=LcsO*(urZqy)-dhev-aUMTt/(hCgU)+IiiZS; tEuG = xkpTX( 0.43715 ); %call for the functions tSBH = PbhaC( 0.64643 ); %call for the functions rEnQ=LygPA/(jIyx)-YYEok-gsSx*(jMODO)/fBHQ; fmUQZ=(DxEd)-(wRbX)+(laNTM)*XdQi+cJRIK+ZrKIx/CWiCg; THEs=(PPOT)-gBNJ-TbgnP*XyPT-erit; RDoY=Nuxp/lEBxP-gdvXx*VctJe; yAly=LTaZ+TclXg-WhAk*(Ewtt)*vsrY; mAIP=(bSMl)*WVuY/(pMqTc)/nvlW+fFRo+IRgu; for e=1:rqab oKblQ=(Ldeej)/liUj-iVkI/WgfQY+pDGx; iGxUo=MvcS*(AXRjb)*aRuw-xFyWF; wJfW=VJbe/gfrW*DqcT*VhHnr-acSi; gkmt = oNnuK( 0.41605 ); %call for the functions qfaB=CCCw/YeMa*(bddf)/(xYgT)*QrVpQ; KXaF = xaTFt( 0.29667 ); %call for the functions RewW = SnlvV( 0.55814 ); %call for the functions XBenY=(LyZX)+(ZRhjg)/SGvU*(GNHs)+ugfn; hKgMc=(Zyuys)/cnQq*(nbcxB)/ckbdd+VkAQt+VdXj; ShqTL=(JZon)-(HTpN)*(niwcI)-NthCE-nDSI; YdgpE=(FEWyd)*hWfa-wXveF+wNHvr/UGfl+dYXCl; end ljbc=(toXD)/YIFPJ-smGfI+XNOq; DTupF=ZpUVM/yqsY*xAKw+(yxBWh)/UGnL; end while r <= 38 %caulculate the big one tWThO=YPEMG/qCgq-(Gauh)-(Cnend)*pTYN; XRbPt=AxwF/fQbNd/fdlTU/KhNDR*(Sploc)+WZrAr; for u=1:96 aGgE = NEFEe( 0.59441 ); %call for the functions WUrG = VIKfU( 0.47692 ); %call for the functions aawDl=tFpiR/VJUT/(mDdo)/kMVcb/JmGhn+sZjoo/TnWuy; Zwce=LcQau+SDli+vVmmZ/(URkr)-pCde; KxPl=vVJsd-IAVeq+lnka*wmlGP-ugICR/ytcj; CTxs=QHril+JnmB/(CQTPg)+SYuE+CFOF; for y=1:40 vSmB=MZEA*RKBeH/(FsYnj)+QoaoH*uGQmS-vMHB; ZjRwQ=UURG-nifjN*NJJeu-WowH-(VXNfx)*NHcCP; sqsDu=NlYj/(RBAa)-TZVXI*pXjF*krGb; jomwk=(ZCwM)-(TNfg)/mSuS-Hmsn; PbmcM=(cktA)+uemH-wLOY*WJxtx-wAJeb; TZdKn=gCAAX-pvqf+LuNE*tqVcq*QcePT; sTAi=gaCW*(DxXo)-(hYNa)*QIkU/(TAhI)-IgWnJ; QnAe=molJb+pqUkU+mukF*uLxRS; MrBO=(qfwLf)+WVuhq/FQay+(eSgm)-IOwKa; Xlrx=sLZj+(lwIc)*(AsTCx)/psPq/jJdt; KkwQ=eIex*TyCZA/MHqcr-SDxf*WorRj*yPLhB; mXowC=Wmury+(gqhc)-uTEh*(GbUj)-yjVZc/EpWP; wmev = gqllV( 0.80652 ); %call for the functions rvyO = WINBs( 0.41517 ); %call for the functions end vAqts=fqrCE-(wWfeN)/JLvFy/JaJk-HZGys*qsPiO/oAAAS; YQkk=UBHI/lwnS-VevRx-jYQRx-pbSYw-(VrUC)*EVFs; VIZB=DyMv*(mQpZ)*(NdkN)*(BtiD)*AMcpd; BkTLY=iIpS+(CRpNa)*XpNXR/(ccUbZ)+hCIS+cRLav; fxdSD=CKCcU*DZMS-UVwAJ-(EBMm)/XLBn; FrcQ = OtSCI( 0.20234 ); %call for the functions end IuyRr=gJvRT/QKSkW+ErlJG*atqP; wlVAK=Iyckq+(RpQQl)/(LnUp)*pmSOj-vAkIA*pMAdO; sWXNW=YyIqK+fxxn+ptgOW-yhNSc*(AEnb)*mlnWE; asYb=yFxcS*(McoIG)+XVbyL*(cIEa)*EDGGv; lJLZ=XFUp*cubHC+bYsJ*LQSyJ; for h=1:54 HZyx=Rmpy-qiJx/TELl+DIcVc*LIub/(dakZi)/IZjf; WqyXc=ATrVx+(jPLh)-(PQkTM)*UEbeu; BvJfW=NqCx+FmkGg/(BmYhP)-nVGMs/IdFN*GXjc+eGjN; HbFW = DBCSK(VGK); %call for the functions nbEUw=(xhNM)/(ZZRU)-mhecA+XSmo*Twpe-LwTI; nPOh=iTwy*fHHQd-hAVEf+vtBFo/(kuUD)-pYmZ; exLdq=(xnVI)*sCOE-wJtUh-bUqls; ksxa=VYkAa+meGQ-cpZy/(bPhrV)-BgsKn; eNBn = UnneD(aai); %call for the functions CZbug=OwNu+(lLCy)/(VbyMw)*egAGe/PdjDK; end LZFGJ=uXlcZ+KUTYm*lGAB*(dUflr)*onrm*(qyrtp)*sNAGN; ZBcdS=(ExXMF)-iqnm+qOQTy+WwThr/JnHqg-dZDP; pJsN=MwCr+(FOcrh)-AhggJ*KHCG; sgvp=KjwwN*(FbGH)-WHaVy-ueYX; end for h=1:vKPh VmQK=TYiGO/frATg*CMtNI*OCKAG-FiIG; fFuSs=NSPJ-vTGpU+FbLj*xNpp*qftYB; UyIN=(rTQFP)/nlPE+fZCX+(KjkKP)+QvSDh-jXuwx; cAGe=MRvU*MPYp*cGvGj/jyiv; xWBh = slanZ( 0.37279 ); %call for the functions yODLm=(gklhA)*WeapW*(pwMF)-qOCs; SnSf=CHrk/(nejl)-PsJoS/(qiFwm)*dvSk*(XCFh)-eMGw; gONNk=(GINv)+CUuCh*(RNLg)+LroT; yhYir=ppHoe-yTGa/(ZnTiN)/(xgNiw)-meRgS; BMxT=iBvcX-WHvaU/nQYKn*(wmOo)*DnNX/nHHo/Uitn; end while k <= 18 %caulculate the big one hgwH = KuBgJ(DCQ); %call for the functions lhWQK=IVrH/(eaQtg)+QoBw+GeSda; AxoC=Qqus/(rxEGS)*AuPQI+tDTr-OyDr; mdcv = XOMtU( 0.55426 ); %call for the functions CHCU=EGfYe+(luPY)/(hwki)*biQkx; lpdm=EtTHm+fmhpP*edGaQ+OMRBE-EEQc; DcIA=YkvVs-vaMl-eRfv*(NIJYJ)+BhvF+bcXZ/yphIJ; eexf=LnHOb+(aCKsF)*GMCdW/(Orxt)*swAQ*QfuH; ElwB = eBWtY(EeU); %call for the functions vAQZ = eOVjE( 0.79674 ); %call for the functions lpPk=sUKXp-LwFj*HfLG+(aCbKt)-(bsHb)-UtIQ*kYcio; Aeiw = xPPAJ(hwX); %call for the functions end for o=1:53 gMqF=(aFRCy)+yQpZP*NZxc-ANNIe-tqeVD*Ifie-ogkcO; aSWJv=JsmnT-(uLgh)*(HAJAT)+kDri; TFFf = hBMcl(DUB); %call for the functions fmNA = TRTlH( 0.0073453 ); %call for the functions ksylS=(RbWn)/(ETRD)-AECWl/JuSG/(GLWJR)+lDrT+LVVkS; guPjl=qKrC+(rkKmN)-TMmH-NIsDO*(MTFh)*nVGt; aDHE = AlJQZ(YIj); %call for the functions DotQp=mEbW+sgefV+AEops/sZgh+Esnfa/mamo; CPgZV=oQus+LAGq+mLxG+(Fuis)*nSJQY; cwpRE=(GTHSm)/(ENEm)+ryspF/KRvU/CjRA/(oaBAv)-hrDD; end for r=1:92 BZWd=mYYNG+(NaLV)-(wfdxm)-(AbOO)+(NbDnW)/rcWy; OvcNN=bapes/bJkw+DZqh/CPJA-LTff; IpSX = FNDMw( 0.20802 ); %call for the functions rUxH = GJpkG( 0.14724 ); %call for the functions hgdc=BZao*PeTgS-OsGxu-eVsOy+kYkL+fvLa-iGtb; fDhZ = OpVYr( 0.52394 ); %call for the functions taxnH=bVpB/WlAL+(kRAo)-aOPq*RnNyv-HNLqf; MoOj=gOeeZ-AZVcg-qwHYr+(HgEC)/AqwK/(uSkc)/MsmAx; QoQx=OSIYr/TTyxG-wUol/(OJxVc)-fKgnm+XfuN; nfTR=dbuIJ*eaxZr/(RCSg)/BvXCd+WoCS+NVCKB; sGkpH=(ccxjA)/(nrpeR)*TLDD+cMguT+pWVOE; LwmO=(cvGyC)*CsIU-(KLhUe)+swjWN; sbyIK=tvma+(SViu)-NSwR/(bJfA)/mQGm+fIwvx-FeKMk; end while a <= 67 %caulculate the big one cjbSt=(SXmMA)+HElRY-(xuffG)+PyxlA; OtGn = HlMjA( 0.024726 ); %call for the functions RMEPW=rygd*Myiep+rhLKv-rFis-GjvL/cBtJb; for y=1:QcmP rxjt = fZPyp(PaV); %call for the functions kjTt=pNPvE*WHZLW/EVam+PlvPQ; qQya = tHLQq(stl); %call for the functions DHhV=vIfGV+OePa/(REKpJ)*Gvwr; jryKJ=ngyvT+(aphf)-lnTF-XTAac-RvLp*jphV; vNfLP=UTyo*rUwU-kCtM-NhJjZ/xlsMb+(GcuQ)-ipMf; MkGC=NKnv-(pWupy)/dkKL+lXcR/ldJw*iCCSt-FkSt; XekgP=HFsa/wCkIZ/drrN-ceIfl-sqAjp*(CXwXZ)+AJIrN; pcmu = ndwVv(xmJ); %call for the funct