求老师改为通达信公式，感谢！！！

yuanhskkk

求老师改为通达信公式，感谢！！！

来自：MACD论坛(bbs.shudaoyoufang.com) 作者：yuanhskkk 浏览：5891 回复：2

LC:=REF(CLOSE,1);
ee:=sysparam(1);
cc:=sysparam(2);
dd:=ee-cc;
rsi:SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100-50 LINETHICK0 ;
FILLRGN(c,rsi,50),Color302020;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100-50;
K:SMA(RSV,3,1)colorwhite LINETHICK0;
D:SMA(K,3,1)coloryellow LINETHICK0;
J:=3*k-2*d  colorblue;
FILLRGN(k>d,k,d)ColorAAAAAA;
FILLRGN(k<d,k,d)colorFF820C;



DIFF1:=EMA(CLOSE,12)-EMA(CLOSE,26),linethick0,COLOR0099FF;
DEA1:=EMA(DIFF1,9),linethick0,COLORFF9999;
MACDA:=2*(DIFF1-DEA1),linethick0;
KX:=SYSPARAM(3)-SYSPARAM(2)+1;
KH:=HHV(K,KX);
DH:=HHV(D,KX);
JH:=HHV(J,KX);
KL:=LLV(K,KX);
DL:=LLV(D,KX);
JL:=LLV(J,KX);
HKMAX:=MAX(KH[datacount],MAX(DH[datacount],JH[datacount]));
LKMIN:=MIN(KL[datacount],MIN(DL[datacount],JL[datacount]));
KHLB:=(HKMAX+LKMIN)/2;
KHLC:=HKMAX-LKMIN;
MHF:=HHV(DIFF1,KX);
MHD:=HHV(DEA1,KX);
MHM:=HHV(MACDA,KX);
MLF:=LLV(DIFF1,KX);
MLD:=LLV(DEA1,KX);
MLM:=LLV(MACDA,KX);
HMAX:=MAX(MHF[datacount],MAX(MHD[datacount],MHM[datacount]));
LMIN:=MIN(MLF[datacount],MIN(MLD[datacount],MLM[datacount]));
FHLB:=(HMAX-LMIN)/100;
FHLC:=HMAX-LMIN;
SH:=(0-FHLB)*(KHLC/FHLC)+KHLB;
DIFF:(DIFF1-FHLB)*(KHLC/FHLC)+KHLB-sh COLORwhite;
DEA:(DEA1-FHLB)*(KHLC/FHLC)+KHLB-sh COLOR0099ff;
MACD:(macdA-FHLB)*(KHLC/FHLC)+KHLB-sh colorSTICK;

yuanhskkk

自己顶起！！