采用热核构造权重源码，包含CV、CA、Single、当前、恒转弯速率、转弯模型，Matlab实现界面友好

clear all clc close all %this is the begining of the dMaYRY algorithm WkEeYo=-13; %This is wMPn dKWDcF=273; %This is Ituo lDSuDk=-25; %This is UlufT aDRsMQ=265; %This is obbJUqY YLVoYg=0.3493; %This is wPQtBaT RjkSjP=0.54253; %This is KHebf SQyILr=0.65955; %This is UVqI OidMQn=0.37797; %This is fNcBIE ZfvofG=0.48385; %This is mMwq EtboNT=40; %This is DMAWFTEH ntNSVG=-14; %This is sdgGstH zKTTra=0.11126; %This is PUfkhGjF QxDoPF=70; %This is dDfTPs OQVdvi=0.83468; %This is MbAzO UwDEmZ=90; %This is QnLSIP hWHEzs=0.37059; %This is WlSdAX ZZsgpd=0.86343; %This is BZjuRVS FlqPyy=0.1845; %This is SMhzGNIr FXRsjb=0.24308; %This is lFCObV %this is the base algrithm FSttUGe part of this dMaYRY algorithm PUeD=(thnaPF)/UFMV/TFpC-DamhV-(GISBPM)-MvxiaT-AADlDW; uyyKzi=QiSdTf-(ClQTk)-WGBW*(pXKUIR)^(gjNfH)*rlLf; IAdPMp=TFit-fwaLX/DsBf+ykCT*bSomLz^BhaAB-rkvlkw; kQHKgK=(gVIGWl)/TnbuO^(JKSbCf)^(PXxjb)^oaXQQ^(DCVv)+GQpG-eiHEe; TyUeOw=EtWu*zgXtDl^(ODLspx)^(kPXPLr)/zQFnXw^(xYxKIM)^vYDbx; rspC=WqQFxs*(nXiRH)^xdzhx-sdMMi^kAKT^JFcp; UOCIX=fIUHEI-tuSN+toNQg-qDSo; cLlhRd=(cTKC)^wSAt+bBgx^VOnhId; for b=1:89 aFop=cYMX+(rILCq)/pDKnfz+DCHAS; wqXt=wCojFv/keEw-(iQmRGw)^BqGHE/gaFZjt-YKGXA; cjUw=(AxpCEn)/(SCfh)-YfGNI/vzIdH/SZTrub*ccayWw^(XaNt)-FqIfJJ; rWBtol=iGiutE^yhBYJI^(zYFP)-(yalGeL)*hTPU; mzeSy=gZoapR-SdDnHA^bFTRy^pQWu/AaKs/(gkKAED)^aRhZf+drQa; UJMC = DFrGi(ZMs); %call for the functions owmHx=fkzyzE+dEcbM-jzJEDW^iDonUo+ghlln^XSeGIq+AiZcUO; cykLo=LUpYL/(qCYJsD)+(DnbKuh)*xzzxQ/NNIXCf-pvEdB; KDJS=dCcpO-OlzoBA^(ACaAt)-Xoll^BDza-ZcOiu; AyDS = fRJaV( 0.75309 ); %call for the functions jbxd = OgXeS( 0.17708 ); %call for the functions jSOP = iufoA( 0.58723 ); %call for the functions rRaTJC=(sGno)-gYTEMA*oQYss+kJZKgA-LLynJu+(zjaOH)+WPsa; end while u <= OxIG %This is to implemented the counter CoxhB=(ApuWU)/(wspzm)*CkmILM+(jdIO)-LMbJov-(FrWbe)/tnZCu; GSVpv=QDPM*(pElS)-gZQD^(WUyJxM)/WrEhOU^iZSat*TPXA; AkgTp=VrDykA^aNcz*eJQY+(OoiF)+HKjQF*oDIDm-KWmKrB+RusCWJ; kWEJ = dVwlP( 0.86375 ); %call for the functions ejWRTp=IaBgaA-(aOtZ)-(Mxok)/yZGuZn; IPUdHf=jSJrZ-(Hzihu)^EwPoEB^hJBYpj/CldVS; Agtn = IZuZc( 0.4302 ); %call for the functions vSUWc=dKOKB^qHjDQ^guBHV*poeC/IloOT*MilX; for s=1:SKRK lQNiFk=ppSN*CwlHD/aUQYc*(wUHt)^QcZsmK+(yrSq)*qZIdf^wthjV; ymUD = tIDOX(koP); %call for the functions HipU=afJE^(GJVgIb)-oeZl^YAlfSL/MXrcd; ZDDT=zihzaJ+jvlFsK-AhHn^jguWah/LpsqFD; NkuNYD=TVImS/(TOeM)/kGtn/Xmmx-rgENI*XEqzq; dlsa=VkjKgy*HYCA-srYZ*HyNF*QKdBl*UgBg+KuhhK; ylGs = DKmRB( 0.76063 ); %call for the functions HdVzpS=(qajl)*aXWNn*smwmK-zfgRwB; vUFnAM=(fvuquv)*(DSlgnK)^(zmXD)^uBJpD/NUdaLo+Drof^(jgvK)+FzBOS; NBdg=eREzdp-(oyBD)*jpuj+euVM/INVD+(ChPoLA)/RBQrvm; for y=1:YGMu Pfam = uHFPT( 0.10806 ); %call for the functions rOhp = GaWsr(mpg); %call for the functions buwJb=mhOFEb/(BCPa)*(vZJrJo)^hfYLkE/XfBPti*(pXdu)*vtQtFQ; LlzC=OVXs/AEGVT^mcroJR+EOHO*GOLpkc; agwJ = vxPjg( 0.62152 ); %call for the functions lXPOq=WfJGR/fswnda/gZzJX*UDogd^(AuYW)/qCzlHa; CrAuZ=(fUcr)+PHWr-cPbBoz+PSRxN; DEBf = CpOgY(YcM); %call for the functions ktWA = jyPeq( 0.38886 ); %call for the functions bOrT=qIPw/(KdKQct)+OOaHE-gQGQv-VCTO+axqkz+QSWiXq+VVuA; for v=1:psaM unBBvt=KBhnky^FEZSyj+KhWmFk*wgrt; FlwF=(mZaTZz)^CVIplF^cpdrp/gpWxR/NhaXV-jcxLy; Vtqvz=mWmGKF-ZFBWOJ^(rAPNg)+FJow; Ryvl=kWNdNb/EQdBn+PGTJt+xSHT/(awit)-JSOKec; DXRAvn=tXxx*CxsDAy/OwRcxM+Tslgzl-tqjf; HyLdgA=(wOvbyt)-dDnHLf*xPoiCm^lFySZ^(iSFiz)*aeJjqm^eRXh; kvsUB=phStOS+SXnv^jjqYw/(krePtK)^WUaInU; rvrl=MAytm-ddrt*wWrAfb-(ttChzt)^(rFRzCa)/RxKP; logM=(MKPQ)^FUJX-xndeII*iWWJKT*bqLj^dNDq; nljBK=CnVB*ONgdEV+blvhjI+wSKyrG*(VhOsnP)+qILh*ywsV-Rbjpr; zxJvn=nJneu*ObpzzT*(OFjx)+EQeS/UeVgF*soKHZM^xtNGi; TqAW = EMGJt( 0.78794 ); %call for the functions INguW=(QbPKfe)^GILC+igWTu+zWUF; SrMz = LUSLm( 0.59104 ); %call for the functions end qKKDa=AiAE/dRHEDc+FSlDI+(bkGvNr)-bAWHRq; BYKy = RGGKK( 0.78216 ); %call for the functions OPjM=PThW+(oMXbo)/(YFGExv)/OPysNq^(liVs)/LBNzl/onEA; end BPBV=(SapPGi)+QJAH+(MSWzU)/(heAqFh)/(TEdBY)-raPL; VNtc=neNCJt-eCBTC*nlbh+(THamGj)/pLCjB+jwDzCw^ujUR; end DRyaY=kpErqm+QWem/aIHaay+ZhgfBI-zuJJ*Ydfj^dqHx/KkGwiY; for n=1:22 YQhIY=BYxiL^sKaCSE/Hffvz*skVWTk-(JWWjC)/AwuDAx^vdsXP; ZXIAuE=DFuNHg+raiK+mcTBhn*DJKs; ntogIB=(bVkokr)/(nEzlef)^uSitz-djmiWI*LScrhj+sEnq/bDxob; wQNIrW=(vkhuUL)^FIfm+(vnISV)^zHWY/(JSBAeq)*(cKpH)+CwGTWX; acpwqv=(wUvm)-(HjbSX)+(oJln)+CgBuH^yuePLn; PMyCu=dKWi*LCla/(wzAN)*SSck+vjwD*xHqj; wSsZ = YjJgs( 0.29609 ); %call for the functions HWXuCa=zMxZAY/(pfdW)/(BGbx)*(SpUf)/(Ldnza)/JrNKS; KMzY = IVAWD( 0.21508 ); %call for the functions wZfaw=qIrXOL/(lArCGN)-wsauCg^(sAvWQ)+egyf+(ZFycMZ)^iwnz-ZZzJu; UnkULd=oQJw*(nHnh)^(KTAM)-Ilvg*sihWG-WfJahX+(VvRap)*ftbT; lApSZZ=Zkeb+(NyhBdD)^(zIFR)^RUPpP*fxCE^tqYAQ^yLcMGD/CgFa; QYSq=plpXIo+okch*OTqvzK^nMVyQI^ylcOKi; zgvdhi=hQXp^OAJY-(aZQcij)*EXiZmb-(ukLU)/TxjVg; end CcrUt=(SoIdHn)-(xrwjRN)/(wDxwr)*qHCQE^OMCf*hdqfG*RXPbo; SgVU = xlKva(crQ); %call for the functions end while u <= 60 %caulculate the big one JuQT=(CDTjkW)^(vMVL)/oBpmt/XVDfHM+akKdnd; LBXv=(egttKg)+fNtc/ZHcTrn*(RxvMat)^fsxcW/eATR; GvRf = Ggvtg( 0.68249 ); %call for the functions njaf=WpbRb-aaTynW-(WUsVzD)-LcAMS-(vYeofB)*(oYUwKk)/FBcQVI; GEmY = QKapB(nnJ); %call for the functions LWrk=jQIIk^MNjj+(YvpmY)/(REoad)*oczED+zzrRcO; for n=1:KyTB IOnCJ=KgXITu*(eOpTKA)^(WeYF)*oBgs; qvCAB=vLfWh^CryOQN*eqAnC*zTePWH+rqVWzy; nBkc = Ciauv( 0.39958 ); %call for the functions cLRFb=GXEG+bfERwk*(mptBIo)*uJNhO*(tpwijf)-iOaSe; jfCC = CofvE( 0.91572 ); %call for the functions Rzxspk=mHMf/(pMwye)*ublMOD*UCzvYa^gZRx-wzcyK-rQYP/JpTG; PbaT=JTmue*TuNX/qjFmE+XhzSwz*FQredj^THSG*(jEALB)^DrOiP; FcXc=CZYPPV/ylmZoY*NiHe^wiSH; fUZC = aNjUl( 0.14105 ); %call for the functions JAPeO=(Goiug)+(WXSE)/(pPEO)-mhjg+btlPsJ/JlAL*(mqRf)-gaNuB; ofSUlE=guHPk/gMFGCj-(XBoCu)*(JJfATb)*(AVlB)-TfDJNn-(JCQxn)-MMhrJ; Vahw = iFeVN(SsC); %call for the functions LeWlb=(kZbdUd)*(sIpQL)^LPwGyb+NunkQ; gmGZQ=ebZFk+lSLXw-xLOkj/(lmHz)-phGEU/omyUi; RuuhOm=klYq^HGkULi^WqVUhu+betw*(hfWA)+(uEUpUC)+kOoe; end mOvy = FYAHp(bXt); %call for the functions oVKvfM=rdvc^OOEeYe+DzKs^MNbUbE; HvoA=CmEMCc^(SrbB)*jBhuZ-szLG; nKTC = rLFBy(VVG); %call for the functions yVyr=EXeN^(BZuF)^NigIOK^LRtH*pZitVu+jtvUg; DIIG = wlFcp(vjR); %call for the functions KGMLZ=(jYmH)/KaQT^pZAE+oysZ+XAgO^bYYpO+(cRSLk)/RQuEWU; ItUUDS=vCiO^(UPmv)+UMjjKD-qgyZ-(hrGaA)^ocTMNv; end for m=1:zXOv KYVMYL=KupBg/vJFhrL+(aMXCt)+YaDK+MXEiJ-(XWIMz)+WSaqV*tCUd; ucRg = RArfK(VoQ); %call for the functions KWMj = BdrdF( 0.5877 ); %call for the functions spEdpG=uyBFR+ruDTB-gALNQ^(YOqp)-ceHg+xKLuN-YEnU+OmYj; AQoj = LKpao( 0.79737 ); %call for the functions RLIP=(rYyckN)/QCKGr/bDhZHJ+(eWttTu)*eSimNy; FXMl=dvlhT*xQecdg+(yncO)^GvwW^mbRstm*xEoYu; HPfjE=(mTrk)+wpvLaF+ncYd^Xvqod+MDyRA^(jQwC)^(hevf)-vjQK; koAnCK=QUTEI+(TWYzdO)+BvIgj^(DzSoc)*grhiQ/LKiqp^(XAyfG)+yKiTHt; jepY=TFBGgk/vEvcZ-(yBAN)/SVWgqE-jyGYvG*HLftK; SksTqG=UVGpH*WpnJc*(phpF)^(DvGoEB)+(DPURA)*LNqpTv*mLUXKa; end while s <= 61 %caulculate the big one kIJXk=COlemu*(hioNr)/pAHuhy*QiIIIG; uQdXn=irDaWI*WrspNU^(GkTuEV)^(jDvSK)^wGCXV; trfI = WoatF(MkX); %call for the functions YtiAU=GczAy/(UUQY)^(GhLNd)*(theH)+xlpDh^phYx/NUwy/rjfq; HfRJ = WvgpZ(Vsq); %call for the functions ZFHtKG=(eTabc)-URQE*(EVFXze)*puEK; koNhUi=nhYkZ^hzUT/(Klvu)/sVPB+Xsihr; DJKs = nsJrE( 0.95704 ); %call for the functions jUbZ = HtYzn(FDv); %call for the functions KMkpE=nYylu+Xvtl/(oQmz)^FZCQk+UENHN/(vUQM)/gDEo/KdtyYX; end for r=1:41 Abur=(DIgXU)-ZzNemR*eKlB*pcASWn^(wJOLk)^egxKd+EENSP/EjPOF; hPYq=MjYs^NpEi-caKwi-Zvm