通达信2指标——顶底背离(主图)

{顶底背离主图}

MA5:MA(C,5),COLORYELLOW,LINETHICK2;

MA10:MA(C,10),COLORFF00FF,LINETHICK2;

MA20:MA(C,20),COLORFFCC66,LINETHICK2;

MA120:MA(C,120),COLORFF0066,LINETHICK2;

MA250:MA(C,250),COLORFFCCFF,LINETHICK1;

MA450:MA(C,450),COLOR00CCFF,CIRCLEDOT,LINETHICK1;

TRI:=

SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14); HD := HIGH-REF(HIGH,1);

LD := REF(LOW,1)-LOW;

PDM:= SUM(IF(HD> 0 AND HD> LD,HD,0),14);

MDM:= SUM(IF(LD> 0 AND LD> HD,LD,0),14);

PDI:= PDM*100/TRI;

MDI:= MDM*100/TRI;

A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));

B2:=REF(C,A2+1)> C AND REF("KDJ.K"(9,3,3),A2+1)< "KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));

A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));

B3:=REF(C,A3+1)> C AND REF("RSI.RSI1"(6,12,24),A3+1)< "RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));

C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));

D2:=REF(C,C2+1)"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));

C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));

D3:=REF(C,C3+1)"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));

C4:=BARSLAST(REF(CROSS(MDI,PDI),1));

D4:=REF(C,C4+1)MDI AND CROSS(MDI,PDI);

A4:=BARSLAST(REF(CROSS(PDI,MDI),1));

B4:=REF(C,A4+1)> C AND REF(PDI,A4+1)< PDI AND CROSS(PDI,MDI);

STICKLINE(B4,L,L-0.04,6,0),COLORFFCCFF;

DRAWTEXT(B4,L-0.19,'DMI底背'),COLOR00FF66;

DRAWTEXT(D4,H+0.08,'DMI顶背'),COLORWHITE;

DRAWTEXT(B2,L-0.09,'KDJ底背'),COLORYELLOW;

STICKLINE(B3,L,L-0.04,6,0),COLORRED;

DRAWTEXT(B3,L-0.16,'RSI底背'),COLORRED;

DRAWTEXT(D2,H+0.08,'KDJ顶背'),COLORC0A8FF;

STICKLINE(D3,H,H+0.04,6,0),COLORFFCCCC;

DRAWTEXT(D3,H+0.08,'RSI顶背'),COLOR00FF66;