input:n(403,1,10000);
DRAWGBKLAST(C>0,STRIP(RGB(0,0,0),RGB(0,0,153),0)),color33ff66;
DRAWTEXTREL(20,30,STKLABEL),LINETHICK4,Colorffff00;
DRAWTEXTREL(120,30,STKNAME),LINETHICK4,Color00ffff;
a:=BUYVOL*c/100;
bz:=sum(a,0);
b:=c*SELLVOL/100;
sz:=sum(b,0);
z:=bz+sz;
cz:=bz-sz;
净买:cz,Color00ffff;
DRAWTEXTREL(320,5,' 总成交金额（万元）：'+NUMTOSTRN(DYNAINFO(10)/10000,2)),LINETHICK4,COLORccffcc;
xb5:=if(a<=5,a,0);b5:=sum(xb5,0);
xs5:=if(b<=5,b,0);s5:=sum(xs5,0);
xb10:=if(a<=10 and a>=5 ,a,0);b10:=sum(xb10,0);
xs10:=if(b<=10 and b>=5,b,0);s10:=sum(xs10,0);
xb20:=if(a<=20 and a>=10 ,a,0);b20:=sum(xb20,0);
xs20:=if(b<=20 and b>=10 ,b,0);s20:=sum(xs20,0);
xb50:=if(a<=50 and a>=20 ,a,0);b50:=sum(xb50,0);
xs50:=if(b<=50 and b>=20 ,b,0);s50:=sum(xs50,0);
xb70:=if(a<=70 and a>=50 ,a,0);b70:=sum(xb70,0);
xs70:=if(b<=70 and b>=50 ,b,0);s70:=sum(xs70,0);
xb100:=if(a<=100 and a>=70,a,0);b100:=sum(xb100,0);
xs100:=if(b<=100 and b>=70,b,0);s100:=sum(xs100,0);
xb150:=if(a>=100 ,a,0);b150:=sum(xb150,0);
xs150:=if(b>=100 ,b,0);s150:=sum(xs150,0);
小买:b5,LINETHICK1,COLORred;
小卖:s5,LINETHICK1,COLORgreen;
中买:b10+b20,LINETHICK3,COLORred;
中卖:s10+s20,LINETHICK3,COLORgreen;
大买:b50+b70+b100,LINETHICK5,COLORred;
大卖:s50+s70+s100,LINETHICK5,COLORgreen;
特买:b150,LINETHICK7,COLORred;
特卖:s150,LINETHICK7,COLORgreen;
大量差:=大买-大卖;
特大量差:=特买-特卖;
主力量差:=大量差+特大量差;
主力差额:=主力量差*c/100;
主力增仓:主力量差/capital*100;
DRAWTEXTABS(10 ,30 ,'主力量差 :'+主力量差),COLORMAGENTA,linethick3;
DRAWTEXTABS(10 ,50 ,'主力增仓 :'+主力增仓+'%'),COLORMAGENTA,linethick3;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
