通达信MACD+KD+RSI+WR副图源码

[复制链接]
查看56 | 回复0 | 2022-7-24 07:56:55 | 显示全部楼层 |阅读模式

MACD+KD+RSI+WR副图
DIFF:=(EMA(C,12)-EMA(C,26))/EMA(C,26)*1000,NODRAW;
DEA:=EMA(DIFF,9),COLOR000000;
DRAWBAND(DIFF+50,RGB(155,50,50),EMA(DIFF+50,9),RGB(0,50,150));
IF(C,EMA(DIFF+50,9),DRAWNULL),COLORFFFFFF,LINETHICK1;
IF(C,DIFF+50,DRAWNULL),COLORRED,LINETHICK1;
IF(DIFF<=REF(DIFF,1),DIFF+50,DRAWNULL),COLORFFF000;
MACD:2*(DIFF-DEA)+50,NODRAW;
STICKLINE(MACD<REF(MACD,1)AND MACD>50,50,MACD,2,1),COLORCYAN;
STICKLINE(MACD<REF(MACD,1)AND MACD<50,50,MACD,2,1),COLORCYAN;
STICKLINE(MACD>REF(MACD,1)AND MACD<50,50,MACD,2,1),COLORLIMAGENTA;
STICKLINE(MACD>REF(MACD,1)AND MACD>50,50,MACD,2,1),COLORLIMAGENTA;
50,DOTLINE,COLORWHITE;20,COLORYELLOW;80,COLORWHITE;
N1:=9;
LC:=REF(CLOSE,1);
RSI短:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORRED,LINETHICK2;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),COLORWHITE;
D:SMA(K,3,1),COLORYELLOW;
DRAWNUMBER(ISLASTBAR,CONST(RSI短),RSI短),COLORRED;
WR:100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)),COLORGREEN,LINETHICK1;
DRAWICON(CROSS(RSI短,WR),WR,1);
DRAWICON(CROSS(WR,RSI短),RSI短,2);
DRAWBAND(K,RGB(220,0,220),D,RGB(180,140,140));

1316244117.png

1316244117.png

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则