%>
HS:=vol/capital;
DD:=BIGORDER(1,3)-BIGORDER(2,3);
DT:=HS*DD*100;
机构持仓: Sum(DT,0),linethick2;
当日增减度: DT, linethick0;
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;
{股票教程网-http://9188edu.com承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}