{主力持仓};
HS:=vol/capital;
DD1:=BIGORDER(1,2)-BIGORDER(2,2);
DT1:=HS*DD1*100;
主力持仓:=50+Sum(DT1,0);
三日1:=SUM(主力持仓,3);
五日1:=SUM(主力持仓,5);
十日1:=SUM(主力持仓,10);
当日增减度1:= DT1;
{机构持仓};
DD2:=BIGORDER(1,3)-BIGORDER(2,3);
DT2:=HS*DD2*100;
机构持仓:= Sum(DT2,0);
三日2:=SUM(机构持仓,3);
五日2:=SUM(机构持仓,5);
十日2:=SUM(机构持仓,10);
当日增减度2:= DT2;
DD:=DD1+DD2;
DT:=DT1+DT2;
综合持仓:(主力持仓+机构持仓),linethick1;
三日:=三日1+三日2;
五日:=五日1+五日2;
十日:=十日1+十日2;
当日增减度:= DT1+DT2;
STICKLINE(DT》0, 综合持仓, 综合持仓+DT,5,0),COLORRed;
STICKLine(DT《0, 综合持仓+DT, 综合持仓,5,0),COLORGreen;
当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
if (当日成交》=0) then
begin
Str1:= ‘净买’+ NUMTOSTRN(当日成交,0)+‘万元,’;
Str2 := ‘净买’+ NUMTOSTRN(买入手数,0)+‘手,’;
Str3 := ‘增减度’ + NUMTOSTRN(DT,3);
end;
if 当日成交《0 then
begin
Str1:= ‘净卖’+ NUMTOSTRN(当日成交,0)+‘万元,’;
Str2 := ‘净卖’+ NUMTOSTRN(买入手数,0)+‘手,’;
Str3 := ‘增减度’ + NUMTOSTRN(DT,3);
end;
DRAWFLAGTEXT(DT》=0,综合持仓,Str1+str2+str3),COLORRED;
DRAWFLAGTEXT(DT《0,综合持仓,Str1+str2+str3),COLORGREEN;
Copyright 2018- www.dyjian.com/ 大宇股票知识网 海口美兰韩哲棚百货商行 版权所有 琼ICP备2023001966号
免责声名:本站所发表的内容仅用于学术交流和学习,内容所带来的一切后果均与本站无关。若您发现本站存在您非授权的原创作品,请第一时间联系本站删除!