通达信 高灵敏MACD+KDJ

{高灵敏MACD+KDJ}
S2:=SMA(C,3,1);
S6:=SMA(C,5,1);
DK:=100*(S2-S6);
{STICKLINE(DK>0,0,DK,0,1),COLORRED;
STICKLINE(DK<0,0,DK,0,1),COLORBLUE;}
0,COLOR00FF00;
均衡:=EMA(EMA(EMA(C,3),2),2),COLORWHITE;
TYP:=(HIGH + LOW + CLOSE)/3;
CCI:=((TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)))/4;
DI:=(均衡 - REF(均衡,2));
DE:=EMA(DI,7);
MACD:=EMA((DI-DE)+CCI,1);
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,4,0),COLOR0000AA;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,3.5,0),COLOR0000BB;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,3,0),COLOR0000CC;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,2.5,0),COLOR0000CC;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,2,0),COLOR0000DD;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,1.5,0),COLOR0000EE;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,1,0),COLOR0000FF;
STICKLINE(MACD>0  AND  DK>REF(DK,1),DK/2,0,0.5,0),COLORRED;
{黄柱}
{STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,4,0),COLOR0090FF;
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,3.5,0),COLOR009FFF;
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,3,0),COLOR00A6FF;
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,2.5,0),COLOR00B5FF;}
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,2.0,0),COLOR00C4FF;
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,1.5,0),COLOR00D3FF;
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,0.8,0),COLOR00E2FF;
STICKLINE(MACD>0  AND  DK<REF(DK,1),DK/2,0,0.3,0),COLOR00FFFF;
{蓝柱}

STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,2.0,0),COLORFF0000;
STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,1.5,0),COLORFF3300;
STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,0.8,0),COLORFF5500;
STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,0.3,0),COLORFF7700;
{STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,2.0,0),COLORFF9900;
STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,1.5,0),COLORFFBB00;
STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,0.8,0),COLORFFDD00;
STICKLINE(MACD<0  AND  DK<REF(DK,1),DK/2,0,0.3,0),COLORFFFF00;}
{粉柱}
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,4,0),COLORFF88FF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,3.5,0),COLORFF99FF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,3,0),COLORFFAAFF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,2.5,0),COLORFFBBFF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,2,0),COLORFFCCFF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,1.5,0),COLORFFDDFF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,1,0),COLORFFEEFF;
STICKLINE(MACD<0  AND  DK>REF(DK,1),DK/2,0,0.5,0),COLORFFFFFF;
VAR2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100;
VAR3:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;
VAR4:=SMA(VAR3, 9, 1);
VAR5:=SMA(VAR4, 3, 1);
J:EMA(3*VAR4-2*VAR5,2)-50,LINETHICK2,COLORWHITE;
A2:EMA(VAR4,2)-50, COLORFF55CC;
A3:EMA(A2,2), COLORFF33CC;
A4:EMA(A3,2), COLORFF11CC;
A5:EMA(A4,2), COLORFFFF00;
A6:EMA(A5,2), COLORGREEN;
A7:EMA(A6,2), COLORGREEN;
AA:EMA(A5,10),LINETHICK2, COLORRED;