仿Superview当日持仓指标 HS:=vol/capital; DD:=BIGORDER(1,2)-BIGORDER(2,2); DT:=HS*DD*100; 主力持仓: 50+Sum(DT,0); 当日增减度: 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; |
