通达信分时成交量,见'★'抓涨停(源码副图贴图)无未来通达信公式

2017-07-11    来源:网络    编辑:翔博软件
VOL,VOLSTICK,PRECIS0; mm:=0; IF PFFIN(4251,0)0 Then begin mm:=PFFIN(4251,0);end; 流通盘:=CAPITAL-mm/100; dbhs:if(capital2000000,v/capital*100,v/流通盘*100),linethic

VOL,VOLSTICK,PRECIS0;
 mm:=0;
 IF PFFIN(4251,0)>0 Then begin
 mm:=PFFIN(4251,0);end;
流通盘:=CAPITAL-mm/100;
 dbhs:if(capital<2000000,v/capital*100,v/流通盘*100),linethick0;
标准量:if(count(v>流通盘/1000,0)>0,流通盘/1000,0),colorff00ff,PRECIS0;
 STICKLINE(C<REF(C,1),0,VOL,5,0),COLORgreen;
 STICKLINE(C>REF(C,1),0,VOL,5,0),COLOR4040FF;
 STICKLINE(C=REF(C,1),0,VOL,5,0),COLORwhite;
总量:SUM(V,0),linethick0,PRECIS0,colorcyan;
最大量:HHV(v,0),POINTDOT,COLORwhite,PRECIS0;
最大换手:HHV(dbhs,240),DOTLINE,COLORwhite,PRECIS2,linethick0;
 STICKLINE(C<REF(C,1) and v>ref(最大量,1) and time>94200,0,VOL,5,0),COLOR3d,colorgreen,LINETHICK2;
 STICKLINE(C>REF(C,1) and v>ref(最大量,1) and time>94200,0,VOL,5,0),COLORred,COLOR3d,LINETHICK2;
 STICKLINE(C=REF(C,1) and v>ref(最大量,1) and time>94200,0,VOL,5,0),COLORwhite,LINETHICK2;
 STICKLINE(v>ref(最大量,1)*1.5 and c>ref(c,1) and dbhs>0.15 and time>94500,0,VOL,5,0),COLORyellow,COLOR3d,LINETHICK2;
 STICKLINE(C>REF(C,1) and dbhs>0.22 and time<94200,0,VOL,5,0),COLOR66ffff,color3d,LINETHICK2;
 lxtp:=((v>ref(v,1) and dbhs>=0.1 and ref(v,1)>ref(最大量,2)) or (v>ref(最大量,1) and dbhs>=0.08 and ref(v,2)>ref(最大量,3))) and c>ref(c,1);
 lxtp1:=((v>ref(v,1)*0.9 and dbhs>=0.1 and ref(v,1)>ref(最大量,2)) or (v>ref(最大量,1)*0.9 and dbhs>=0.1 and ref(v,2)>ref(最大量,3))) and c>ref(c,1);
 DRAWTEXT(lxtp1,v*0.98,'★'),ALIGN1,VALIGN1,COLORdd22b8,LINETHICK3;
 DRAWTEXT(lxtp,v*0.98,'★'),ALIGN1,VALIGN1,COLORRED,LINETHICK3;
 n3:=barslast(cross(lxtp,0));
踪3:if(lxtp>0,n3+1,0),linethick0;
时长:=TIME>=093000 and TIME<=143000;
量数:sum(踪3,时长),linethick0,PRECIS0;
 xxx:count(量数,5);
比例:=v/ma(v,10)*100;
 DRAWTEXTREL(2,130,'均量比:'),COLORYELLOW;
 DRAWTEXTREL(60,130,NUMTOSTRN(比例,2)+'%' ),COLORYELLOW;
 DRAWRECTREL(125,150,375,225,RGB(30,30,30)),COLORYELLOW;
 DRAWRECTREL(125,150,125+比例*2.52,225,RGB(155,50,50)),COLORYELLOW;
 bl:=sum(v,0)/"引用.v1#day"*100;
 DRAWTEXTREL(2,300,'昨日比:'),COLORYELLOW;
 DRAWTEXTREL(60,300,NUMTOSTRN(bl,2)+'%' ),COLORYELLOW;
 DRAWRECTREL(125,300,375,375,RGB(30,30,30)),COLORYELLOW;
 DRAWRECTREL(125,300,125+bl*2.52,375,RGB(155,50,50)),COLORYELLOW;
 OBVJ:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
 VAs:=OBVJ/2;
 H1:=hhvall(hhv(C,0));
 L1:=llvall(llv(C,0));
 P1:=H1-L1;
 F:=L1-P1*0.5;
 STICKLINE(OBVJ>=0,F,F+VAs,4,0 ),Color0599ff,LAYER6;
 STICKLINE(OBVJ<0,F,F-VAs,4,0 ),Color003900,LAYER6;
 FILLRGN(F,L1,F<L1,RGB(30,30,30)),LINETHICK2,LAYER7;
  

1
3
点击进入翔博软件旗下官方微店--指标超市