Удваиваются заявки. Версия 9.7.1.10.

function OnCalculate(i)
--------------------
Order("orders",0);  --снять заявку, если она есть 
------------------
if conX("orders")==0 then  
buy_sel(1,1,-1); --выставить заявку на покупку 1 лота, если ее нет
end
---------------
end

local function initT(sec,clas,account,client)
   tS={};     tS[0]=0; for i=1,7 do tS[i]={0,0} end  --стоп заяки
   tO={};    tO[0]=0; for i=1,7 do tO[i]={0,0} end  -- заявки
   tOi={};tOi[0]=0; for i=1,7 do tOi[i]={0,0} end  --транзакции заявок
   tSi={};tSi[0]=0; for i=1,7 do tSi[i]={0,0} end  --транзакции стоп-заявок
   id,nOrder,nStop,obal,tbal,nto,nts=0,0,0,0,0,0,0; jD=-1;
   step,lot_size,scale=0,0,0;
--   Log:write("sec="..tostring(sec)..",clas="..tostring(clas)..",tS0="..tostring(tS[0])..",tO0="..tostring(tO[0]).."\n");   Log:flush()
-----------------
end
---------------
local function nkInit()
--   DelAllLabels(tag);
   tinfo=getDataSourceInfo();
   clas=tinfo.class_code;   sec=tinfo.sec_code;    tag=sec;    pname=tinfo.param;
   interval=tinfo.interval;
   Log=io.open(path_Log..name..sec..".log","w")
   client=Settings.client;
--   Log:write("sec="..tostring(sec)..",clas="..tostring(clas)..",client="..tostring(client).."\n");   Log:flush()
    t_acc={};
--- определяем торговый счет
   local N=getNumberOf("trade_accounts");
   for i=0,N-1 do  z=getItem("trade_accounts", i);
      if string.find(z.class_codes,clas,1,true) and z.status==0 then
         firmid=z.firmid;    account=z.trdaccid; break;
      end
   end
-----------------------------
end