以下是通达信MACD+KDJ副图指标
通达信MACD+KDJ副图指标
源码
DIFF := EMA(CLOSE,12) – EMA(CLOSE,26),LINETHICK0;
DEA : EMA(DIFF,9);
MACD : 2*(DIFF-DEA)*200,LINETHICK0;
IF(DIFF>=REF(DIFF,1),DIFF,DRAWNULL),COLORRED;
IF(DIFF<REF(DIFF,1),DIFF,DRAWNULL),COLORGREEN;
{STICKLINE(MACD>REF(MACD,1) AND MACD>0,MACD,0,8,0),COLOR0000AA;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,MACD,0,8,0),COLORBB7100;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,MACD,0,8,0),COLOR0052D1;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,MACD,0,8,0),COLOR007400;}
{
STICKLINE(MACD>REF(MACD,1) AND MACD>0,MACD,0,5,0),COLOR0000CC;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,MACD,0,5,0),COLORFF7100;
}
STICKLINE(MACD>REF(MACD,1) AND MACD<0,MACD,0,5,0),COLOR006EFF;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,MACD,0,5,0),COLOR009F00;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,MACD,0,2.3,0),COLOR0000DD;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,MACD,0,3,0),COLORFF9000;
{
STICKLINE(MACD>REF(MACD,1) AND MACD<0,MACD,0,3,0),COLOR00A6FF;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,MACD,0,3,0),COLOR00C000;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,MACD,0,2.1,0),COLOR0000FF;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,MACD,0,1,0),COLORFFBE00;
}
STICKLINE(MACD>REF(MACD,1) AND MACD<0,MACD,0,1,0),COLOR00C0FF;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,MACD,0,1,0),COLOR00E700;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(H,9)-LLV(LOW,9))*100-50;
K:SMA(RSV,3,1);
D:SMA(K,3,1),COLORFF00FF,LINETHICK1;
J:3*K-2*D,COLOR5200FF,LINETHICK2;
{PARTLINE(J<=REF(J,1),J);}
IF(J<=REF(J,1),J,DRAWNULL),COLORFFFFFF,LINETHICK2;
DRAWICON(CROSS(J,K),K,10);
评论(0)