源码提供,通过通达信未来函数检测,未发现未来!主图添加提示点,对懒惰人直观,易懂!做出来一个,先放码测试!
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;
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;
D90H:=EMA(HH,90);
D90L:=EMA(LL,90);
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;
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;
D90C:=D90H-D90L;
D90D:=D90H+D90C*2;
D90T:=D90L-D90C*2;
G0:=(REF(MA(REF(MA(H,25),25/2),25),25/2)-REF(MA(REF(MA(L,25),25/2),25),25/2))*1+REF(MA(REF(MA(H,25),25/2),25),25/2);
D0:=REF(MA(REF(MA(L,25),25/2),25),25/2)-(REF(MA(REF(MA(H,25),25/2),25),25/2)-REF(MA(REF(MA(L,25),25/2),25),25/2))*1;
DTD:=D0>=D90T AND G0>=D90D;
KTD:=G0<=D90D AND D0<=D90T;
ZDD:=D0>=D90T AND G0<=D90D;
BDD0:=(REF(MA(REF(MA(H,60),60/2),60),60/2)-REF(MA(REF(MA(L,60),60/2),60),60/2))*3+REF(MA(REF(MA(H,60),60/2),60),60/2);
BDT0:=REF(MA(REF(MA(L,60),60/2),60),60/2)-(REF(MA(REF(MA(H,60),60/2),60),60/2)-REF(MA(REF(MA(L,60),60/2),60),60/2))*3;
ZK1:=(REF(MA(REF(MA(H,25),25/2),25),25/2)-REF(MA(REF(MA(L,25),25/2),25),25/2))*1+REF(MA(REF(MA(H,25),25/2),25),25/2);
ZD1:=REF(MA(REF(MA(L,25),25/2),25),25/2)-(REF(MA(REF(MA(H,25),25/2),25),25/2)-REF(MA(REF(MA(L,25),25/2),25),25/2))*1;
BS:=(REF(MA(REF(MA(H,60),60/2),60),60/2)-REF(MA(REF(MA(L,60),60/2),60),60/2))*2.2+REF(MA(REF(MA(H,60),60/2),60),60/2);
SS:=REF(MA(REF(MA(L,25),25/2),25),25/2)-(REF(MA(REF(MA(H,25),25/2),25),25/2)-REF(MA(REF(MA(L,25),25/2),25),25/2))*1.5;
BD:=REF(MA(REF(MA(L,60),60/2),60),60/2)-(REF(MA(REF(MA(H,60),60/2),60),60/2)-REF(MA(REF(MA(L,60),60/2),60),60/2))*2.8;
ZZ:=(ZK1+ZD1)/2;
多头多定位:=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,1);
DRAWICON(多头平定位=1,H,2);
DRAWICON(多头多定位=1 OR 震荡多定位=1,L,3);
DRAWICON(空头空定位=1 OR 震荡空定位=1,H,4);