通达信强势背离（源码 主图 贴图）

{强势背离}

{顶底探测-第一版}

Y1:=SMA(ABS(L-REF(L,1)),34,1);

Y2:=SMA(MAX(L-REF(L,1),0),34,2);

W:-(EMA(IF(L<= LLV(L,34),Y1/Y2,-3),9)),COLORRED,LINETHICK1;

STICKLINE(W<0,0,W,3,0),COLORRED;

A:-(EMA(IF(L<= LLV(L,8),Y1/Y2,-3),9)),COLOR000066,LINETHICK1;

STICKLINE(W>A,W,A,3,0),COLOR00FFFF,LINETHICK1;

Y3:=SMA(ABS(H-REF(H,1)),34,1);

Y4:=-SMA(MIN(H-REF(H,1),0),34,2);

X:6-(EMA(IF(H>= HHV(H,34),-Y3/Y4,3),9)),COLORRED,LINETHICK1;

STICKLINE(X>6, X, 6,3,0),COLORBLUE;

B:6-(EMA(IF(H>= HHV(H,8),-Y3/Y4, 3),9)),COLORBLUE,LINETHICK1;

STICKLINE(X< B, B, X ,3,0),COLOR66CC33,LINETHICK1;

0,COLORRED,LINETHICK2;

6,COLORGREEN,LINETHICK2;

Q:6,STICK,COLORRED,LINETHICK1;

DIFL:=EMA(V,12)-EMA(V,26);

DIF:=EMA(C,12)-EMA(C,26);

底BL:=DIFL>REF(DIFL,1) AND DIF<REF(DIF,1);

顶BL:=DIFL<REF(DIFL,1) AND DIF>REF(DIF,1);

DRAWICON(((W<3 AND W<REF(W,1)) OR (A<3 AND A<REF(A,1))) AND 底BL,-2,1);

DRAWICON(((X>3 AND X>REF(X,1)) OR (B>3 AND B>REF(B,1))) AND 顶BL,8,2);

K:="SKDJ.K";

DRAWICON(((W<3 AND W<REF(W,1)) OR (A<3 AND A<REF(A,1))) AND 底BL AND K<20,-3,13);

DRAWICON(((X>3 AND X>REF(X,1)) OR (B>3 AND B>REF(B,1))) AND 顶BL AND K>80,9,14);