通达信双重MACD副图公式源码 说明
通达信双重MACD副图公式源码 说明
源码
STICKLINE(C>0,0,0,10,0),COLORGRAY;
M6:=(EMA(c,5)+EMA(c,6))/2;
M12:=EMA(c,12);
M26:=EMA(c,26);
M56:=ema(C,56);
M121:=ema(C,121);
xdif:((M6-M121)/2+(M12-M56+M26-M121)/2+M6-M26)/3,COLORWHITE;
XDEA:ema(XDIF,3),COLORCYAN;
XMACD:=2*(xdif-XDEA),LINETHICK,COLORWHITE;
DIF:(M56-M121+(M26-M121)/2+(M12-M121)/3+(M6-M121)/4)/4,COLORMAGENTA;
DEA:ema(DIF,9),COLORGREEN;
MACD:2*(DIF-DEA),LINETHICK,COLOR00CCCC;
BMACD:(MACD+XMACD/2)/2,LINETHICK,COLORRED;
STICKLINE(BMACD>=0,0,BMACD,2,1),COLORRED;
STICKLINE(BMACD<0,0,BMACD,2,1),COLOR00bb00;
STICKLINE(MACD>=0,0,MACD,0,0),COLOR00CCCC;
STICKLINE(MACD<0,0,MACD,0,0),COLORCYAN;
JGL:=(((xdif-XDEA)/ABS(XDEA)+(XDEA-DIF)/ABS(DIF)+(DIF-DEA)/ABS(DEA))/3)*10;
DRAWTEXT(CROSS(JGL,0)AND xdif>REF(xdif,1),DEA*0.9,'★'),COLORYELLOW;
