源码提供,通过通达信未来函数检测,未发现未来!主图添加提示点,对懒惰人直观,易懂!做出来一个,先放码测试!
HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(HH,90),COLORRED,LINETHICK1;
D90L:=EMA(LL,90),COLORRED,LINETHICK1;
DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90C:=D90H-D90L;
D90D:=D90H+D90C*2,COLORRED,LINETHICK1;
D90T:=D90L-D90C*2,COLORRED,LINETHICK1;
G0:=(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1+REFX1(MA(REFX1(MA(H,25),25/2),25),25/2),LINETHICK1,COLORWHITE;
D0:=REFX1(MA(REFX1(MA(L,25),25/2),25),25/2)-(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1,LINETHICK1,COLORWHITE;
DTD:=D0 =D90T AND G0 =D90D;
KTD:=G0 =D90D AND D0 =D90T;
ZDD:=D0 =D90T AND G0 =D90D;
BDD0:=(REFX1(MA(REFX1(MA(H,60),60/2),60),60/2)-REFX1(MA(REFX1(MA(L,60),60/2),60),60/2))*3+REFX1(MA(REFX1(MA(H,60),60/2),60),60/2),LINETHICK2,COLORGREEN;
BDT0:=REFX1(MA(REFX1(MA(L,60),60/2),60),60/2)-(REFX1(MA(REFX1(MA(H,60),60/2),60),60/2)-REFX1(MA(REFX1(MA(L,60),60/2),60),60/2))*3,LINETHICK2,COLORGREEN;
ZK1:(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1+REFX1(MA(REFX1(MA(H,25),25/2),25),25/2),DOT,COLORWHITE;
ZD1:REFX1(MA(REFX1(MA(L,25),25/2),25),25/2)-(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1,DOT,COLORWHITE;
BS:(REFX1(MA(REFX1(MA(H,60),60/2),60),60/2)-REFX1(MA(REFX1(MA(L,60),60/2),60),60/2))*2.2+REFX1(MA(REFX1(MA(H,60),60/2),60),60/2),DOT,COLORRED;
SS:=REFX1(MA(REFX1(MA(L,25),25/2),25),25/2)-(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1.5,DOT,COLORGREEN;
BD:REFX1(MA(REFX1(MA(L,60),60/2),60),60/2)-(REFX1(MA(REFX1(MA(H,60),60/2),60),60/2)-REFX1(MA(REFX1(MA(L,60),60/2),60),60/2))*2.8,DOT,COLORGREEN;
ZZ:=(ZK1+ZD1)/2,DOT,COLORYELLOW;
多头多定位:=CROSS(ZD1,L) AND DTD=1;
多头平定位:=CROSS(H,ZK1) AND DTD=1 AND ZDD=0;
空头空定位:=CROSS(H,ZK1) AND KTD=1;
空头平定位:=CROSS(ZD1,L) AND KTD=1 AND ZDD=0;
震荡多定位:=CROSS(ZD1,L) AND ZDD=1;
震荡空定位:=CROSS(H,ZK1) AND ZDD=1;
DRAWTEXT(ISLASTBAR,ZK1,'卖'),COLORWHITE;
DRAWTEXT(ISLASTBAR,ZD1,'买'),COLORWHITE;
DRAWTEXT(ISLASTBAR,BS,'顶'),COLORRED;
DRAWTEXT(ISLASTBAR,BD,'底'),COLORGREEN;
DRAWICON(空头平定位=1,L,'ICO116');
DRAWICON(多头平定位=1,H,'ICO117');
DRAWICON(多头多定位=1 OR 震荡多定位=1,L,'ICO134');
DRAWICON(空头空定位=1 OR 震荡空定位=1,H,'ICO135');