以下是通达信强势背离(源码 主图 贴图)(无源码的请下载附件导入)
{强势背离}
{顶底探测-第一版}
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);
95377709.jpg
|