通达信寻找下影线指标公式源码

{参数}N2:=22;N3:=55;N1:=0.20;NX:=3;NS:=4;
成交额:IF(CURRBARSCOUNT=1 AND PERIOD=5,vol*240/FROMOPEN,DRAWNULL),NODRAW;
stICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,成交额,0,-1,-1),COLOR00C0C0;
虚拟额:VOL,VOLSTICK;
TA:=(C-REF(C,30))/REF(C,30);
STICKLINE(VOL=LLV(VOL,N2),0,V,3,0),COLOR000099;
STICKLINE(VOL=LLV(VOL,N2),0,V,2.5,0),COLOR0000CC;
STICKLINE(VOL=LLV(VOL,N2),0,V,1.5,0),COLORRED;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA>=N1,0,V,3,0),COLOR002933;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA>=N1,0,V,2.5,0),COLOR008433;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA>=N1,0,V,1.5,0),COLOR00B233;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA>=N1,0,V,0.5,0),COLOR00E033;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA<N1,0,V,3,0),COLOR11008B;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA<N1,0,V,2.5,0),COLOR55008B;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA<N1,0,V,1.5,0),COLORAA008B;
STICKLINE(VOL=HHV(V,N3) AND C=HHV(C,N2) AND TA<N1,0,V,0.5,0),COLORBLUE;
昨日换手:REF(V/CAPITAL*100,1),NODRAW,COLORWHITE;
当天换手:V/CAPITAL*100,NODRAW,COLORWHITE;
平均换手:ma(当天换手,180),NODRAW;
月总换手:SUM(当天换手,21),NODRAW,COLORRED;
FJ1:=1;FJ2:=2;FJ3:=3;FJ4:=5;FJ5:=8;FJ6:=15;FJ7:=25;
HS:=DYNAINFO(37)*100;
DRAWTEXT(HS<FJ1 AND ISLASTBAR,V,'地量'),COLORYELLOW;
DRAWTEXT(HS<FJ2 AND HS>=FJ1 AND ISLASTBAR,V,'低靡'),COLORMAGENTA;
DRAWTEXT(HS<FJ3 AND HS>=FJ2 AND ISLASTBAR,V,'温和'),COLORYELLOW;
DRAWTEXT(HS<FJ4 AND HS>=FJ3 AND ISLASTBAR,V,'活跃'),COLORRED;
DRAWTEXT(HS<FJ5 AND HS>=FJ4 AND ISLASTBAR,V,'带量'),COLORGREEN;
DRAWTEXT(HS<FJ6 AND HS>=FJ5 AND ISLASTBAR,V,'放量'),COLORMAGENTA;
DRAWTEXT(HS<FJ7 AND HS>=FJ6 AND ISLASTBAR,V,'巨量'),COLORGREEN;
DRAWTEXT(HS<100 AND HS>=FJ7 AND ISLASTBAR,V,'怪异'),COLORYELLOW;
{寻找下影线战法}
Y1:=(MAX(O,C)-MIN(O,C))/MIN(O,C)*100;{涨幅}
Y2:=(MIN(O,C)-L)/L*100;{下影}
Y3:=(H-MAX(O,C))/MAX(O,C)*100;{上影}
XY:= Y2>Y1*1.5 AND Y2>Y3*2 AND (H-L)/L*100>=3 AND Y2>=NX;
DRAWICON(XY,V,26);{金钻};
{长上影抛出};
SY:= Y3>Y1*1.5 AND Y3>Y2*2 AND (H-L)/L*100>=3 AND Y3>=NS AND H>=HHV(H,22);
DRAWICON(SY,V,15);