主题：怎么统计当日开盘到现在的总盈利？

AVV1:=MA(VOL,50);
AVV2:=MA(VOL,10);//10周期移动平均
AVV3:=MA(VOL,3);

//控制部分

if  laststat !=100 and TIME>=091500 and TIME<=151359  then
begin
 
 if I>0 then  //有交易次数
 begin
 FOR K=1 TO I DO YL:=YL+NUMPROFIT(K); //计算本日内总平仓盈亏
 end
 
   IF (YL+OPENPROFIT)>3000   then  //在有交易情况下平仓亏损到一定执行操作，如果一次都没交易一样可以用这个计算，因为YL在无交易时值为0
       begin
         SELLSHORT( HOLDING<0,0,THISCLOSE),ORDERQUEUE; //平空
         SELL( HOLDING>0,0,THISCLOSE),ORDERQUEUE; //平多
        
         laststat:=100;
         EXIT;
       end
      
      
      
      
      if holding>=0 and VOL>AVV3*1.4 THEN  //为了开仓，无实际意义
      begin
          //平多开空
        SELL( true , 1 , THISCLOSE ) , ORDERQUEUE;
        BUYSHORT( true , 1, THISCLOSE ) , ORDERQUEUE;
           exit;
      end
     
      if holding<=0 and VOL>AVV2*2 then   //为了开仓，无实际意义
      begin
          //平空开多
        SELLSHORT( true , 1 , THISCLOSE ) , ORDERQUEUE;
        BUY( true , 1， THISCLOSE ) , ORDERQUEUE;
           exit;
      end 
      
end

 if time>151259 then  //每天结束时全局变量初始化
 begin
 laststat:=0;
 end
    
//防止隔夜仓

SELL(TIME>=151359 AND HOLDING>0,0,THISCLOSE); //股指期货时间大于15点13分59秒,平多