1分钟调用TICK数据 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

先实现简单的吧，就取来盘中交易的就好了，如何实现电脑不卡？我现在用CALLSTOCK函数，调取数据，盘中时卡的鼠标无法动作，行情基本慢了3－5秒，已经没有意义，改成调取5秒数据，也是一样。调取和实现的部份代码如下：

（只做股指，程序是调取多秒－5秒过去的11个最高值）

TBUF:DYNAINFO(207)-(INTPART(DYNAINFO(207)/100)) *100,nodraw; //当前秒数

if (holding <=0 && enterbars >= 1 ) then begin  //调取5秒周期的过去11个周期的最高值
  Fh0:callstock('IF00',vthigh,12,0),nodraw;
  Fh1:callstock('IF00',vthigh,12,-1),nodraw;
  Fh2:callstock('IF00',vthigh,12,-2),nodraw;
  Fh3:callstock('IF00',vthigh,12,-3),nodraw;
  Fh4:callstock('IF00',vthigh,12,-4),nodraw;
  Fh5:callstock('IF00',vthigh,12,-5),nodraw;
  Fh6:callstock('IF00',vthigh,12,-6),nodraw;
  Fh7:callstock('IF00',vthigh,12,-7),nodraw;
  Fh8:callstock('IF00',vthigh,12,-8),nodraw;
  Fh9:callstock('IF00',vthigh,12,-9),nodraw;
  Fh10:callstock('IF00',vthigh,12,-10),nodraw;
  Fh11:callstock('IF00',vthigh,12,-11),nodraw;

  if barstatus = 2 then begin                                        //判断当前1分钟有多少次5秒周期最高值突破指标 Preac8a
     if Fh0>Preac8a && Tbuf>=5 then Hcount:=(Hcount+1);
     if Fh1>Preac8a && Tbuf>=10 then Hcount:=(Hcount+1);
     if Fh2>Preac8a && Tbuf>=15 then Hcount:=(Hcount+1);
     if Fh3>Preac8a && Tbuf>=20 then Hcount:=(Hcount+1);
     if Fh4>Preac8a && Tbuf>=25 then Hcount:=(Hcount+1);
     if Fh5>Preac8a && Tbuf>=30 then Hcount:=(Hcount+1);
     if Fh6>Preac8a && Tbuf>=35 then Hcount:=(Hcount+1);
     if Fh7>Preac8a && Tbuf>=40 then Hcount:=(Hcount+1);
     if Fh8>Preac8a && Tbuf>=45 then Hcount:=(Hcount+1);
     if Fh9>Preac8a && Tbuf>=50 then Hcount:=(Hcount+1);
     if Fh10>Preac8a && Tbuf>=55 then Hcount:=(Hcount+1);
   end
end

高突破次数:Hcount,nodraw;

…… （省去中间部份代码）

if 平空条件 then begin

    逃空:SELLSHORT(BARSTATUS<2 && HOLDING<0 ,ORDVOL,limitr,PKprice);
   SELLSHORT(BARSTATUS=2 && HOLDING<0 && Tbuf>5 && Hcount > 2,ORDVOL,limitr,PKprice);   //实盘中，如果5秒最高突破2次则平空
   DAYTRADE:=(DAYTRADE + 1); //统计当天交易次数

end

原理：作用在行情1分钟固定1秒轮询方式下，做空时，5秒周期最低价向下突破2次就立刻平仓。

请指点，如何修正，电脑才不卡？（注意：电脑已经设置只有360内存周期，只连接唯一的期货行情，图表仅有唯一框架，没有附图，程序也做了相应的优化）

主题：1分钟调用TICK数据