[通达信指标]新三色线操盘线

SHORT:=12;

LONG:=26;

M:=9;

DIF:=EMA(CLOSE,SHORT) – EMA(CLOSE,LONG);

DEA:=EMA(DIF,M);

MACD:=2*(DIF-DEA),STICK;

DUOKONG:=MA(C,50),LINETHICK1,COLORCYAN,POINTDOT;

TOZ:=MA(C,50),COLORYELLOW,DOTLINE;

TMACD:=MA(C,50)+(MACD.MACD)*3;

HD0:=CROSS(DIF,DEA);

JINSHOU:=REF(L,BARSLAST(HD0)),COLORYELLOW,DOTLINE;

LD0:=CROSS(DEA,DIF);

SISHOU:=REF(H,BARSLAST(LD0)),COLOR00FF00,DOTLINE;

JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));

DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));

DIFGUTOUJIA:=(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1)))COLORYELLOW,LINETHICK1;

ZHUBIANXJ:=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORWHITE,LINETHICK1;

HJXSJD:=IF(ZHUBIANXJ>=DIFGUTOUJIA,DIFGUTOUJIA,DRAWNULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;

JINGCHA:=IF(ZHUBIANXJ>=DIFGUTOUJIA,DUOKONG,DRAWNULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;

JINGCHAJIA:=(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1)))COLORCYAN,NODRAW;

ES:=REF(EMA(C,26),1);

EP:=REF(EMA(C,12),1);

DI:=REF(DIF,1);

ZJ:=DIF>DEA;

HY:=DIF<DEA;

XG1:=ZJ AND C>SISHOU AND C>DUOKONG;

STICKLINE(XG1,L,H,0,0),COLOR0000AA; 

STICKLINE(XG1,CLOSE,OPEN,3,0),COLOR000055;

STICKLINE(XG1,CLOSE,OPEN,2.8,0),COLOR000066;

STICKLINE(XG1,CLOSE,OPEN,2.5,0),COLOR000077;

STICKLINE(XG1,CLOSE,OPEN,2.2,0),COLOR000088;

STICKLINE(XG1,CLOSE,OPEN,1.7,0),COLOR000099;

STICKLINE(XG1,CLOSE,OPEN,1.2,0),COLOR0000AA;

STICKLINE(XG1,CLOSE,OPEN,0.7,0),COLOR0000CC;

STICKLINE(XG1,CLOSE,OPEN,0.2,0),COLOR0000FF;

W1:= C<SISHOU AND ZJ;

STICKLINE(W1,H,L,0,1),COLORFF55FF;

STICKLINE(W1,C,O,3.2,0),COLOR880088;

STICKLINE(W1,C,O,2.6,0),COLORAA00AA;

STICKLINE(W1,C,O,1.9,0),COLORCC00CC;

STICKLINE(W1,C,O,1.1,0),COLOREE00EE;

STICKLINE(W1,C,O,0.3,0),COLORFF44FF;

W2:= C<DUOKONG AND ZJ;

STICKLINE(W2,H,L,0,1),COLORFF55FF;

STICKLINE(W2,C,O,3.2,0),COLOR880088;

STICKLINE(W2,C,O,2.6,0),COLORAA00AA;

STICKLINE(W2,C,O,1.9,0),COLORCC00CC;

STICKLINE(W2,C,O,1.1,0),COLOREE00EE;

STICKLINE(W2,C,O,0.3,0),COLORFF44FF;

XG2:=C<DIFGUTOUJIA AND HY;

STICKLINE(XG2,H,L,0,0),COLOR00FF00;

STICKLINE(XG2,C,O,3,0),COLOR009900;

STICKLINE(XG2,C,O,2,0),COLOR00BB00;

STICKLINE(XG2,C,O,1,0),COLOR00DD00;

STICKLINE(XG2,C,O,0.3,0),COLOR00FF00;

XG3:=C>DIFGUTOUJIA AND HY;

STICKLINE(XG3,H,L,0,0),COLOR00FF00;

STICKLINE(XG3,C,O,3,0),COLOR009900;

STICKLINE(XG3,C,O,2,0),COLOR00BB00;

STICKLINE(XG3,C,O,1,0),COLOR00DD00;

STICKLINE(XG3,C,O,0.3,0),COLOR00FF00;