Космонавт (Все сообщения пользователя)

for sec in string.gmatch(ticker_list,"%a+") do
без sleep (1)
скрипт
end

for sec in string.gmatch(ticker_list,"%a+") do
sleep (1)
скрипт
end

function FreeMoney ()
dofile("C:\\variables.lua")
   i=0
   for sec in string.gmatch(ticker_list,"%a+") do
   sleep (1)
   ostatok=math.mod(i/5)
      if ostatok=0 then 
         table_mask={}
         table_mask.seccode=sec
         killAllOrders(table_mask)
         i=i+1
      end
   end   
end

function killAllOrders(table_mask)
   -- данная функция отправит транзакции на отмену АКТИВНЫХ заявок соответствующим фильтру указанному как входящий параметр table_mask
   -- список всех возможных параметров  : ACCOUNT,CLASSCODE,SECCODE,OPERATION,CLIENT_CODE,COMMENT
   -- если вызвать функцию с параметром nil - снимутся ВСЕ активные заявки
   local i,key,val,result_num=0,0,0,0
   local tokill=true
   local row={}
   local result_str=""

   for i=0,getNumberOf("orders")-1,1 do
      row=getItem("orders",i)
      tokill=false
      --toLog(log,"Row "..i.." onum="..row.order_num)
      if orderflags2table(row.flags).active then
         tokill=true
         --toLog(log,"acitve")
         if table_mask~=nil then
            for key,val in pairs(table_mask) do
               --toLog(log,"check key="..key.." val="..val)
               --toLog(log,"strlowe="..string.lower(key).." row="..row[string.lower(key)].." tbl="..val)
               if string_lower(key)=='comment' then
                  if string_find(string_lower(row.brokerref),string_lower(val))==nil then   tokill=false break end
               else
                  if row[string_lower(key)]~=val then tokill=false   break end
               end
            end
         end
      end
      if tokill then
         --toLog(log,"kill onum"..row.order_num)
         res,ms=killOrder(tostring(row.order_num),row[securityfiledname],row.class_code)
         result_num=result_num+1
         --toLog(log,ms)
         if res then
            result_str=result_str..row.order_num..","
         else
            result_str=result_str.."!"..row.order_num..","
         end
      end
   end
   return true,"QL.killAllOrders(): Sended "..result_num.." transactions. order_nums:"..result_str
end

function OnAllTrade (alltrade)
    if string.find(ticker_list,alltrade.sec_code)~=nil then
    last_price[alltrade.sec_code]=alltrade.price
    end
end

 function OnParam (class, sec)
     if string.find(ticker_list,sec)~=nil then 
        tablebid=getParamEx(class,  sec, "bid")
        tableoffer=getParamEx(class,  sec, "offer")

            if  bid_best[sec]~=tablebid.param_value then
                bid_best[sec]=tonumber(toPrice(sec, tablebid.param_value))
            end
            
            if offer_best[sec]~=tableoffer.param_value then
                offer_best[sec]=tonumber(toPrice(sec, tableoffer.param_value))
            end
     end
 end

        if bid_best[sec]~=0 and offer_best[sec]~=0 and last_price[sec]~=0 then        
            if last_price[sec]<line_3 or bid_best[sec]<line_3 then    
                status="Fire_LONG"
            elseif offer_best[sec]>line_2 or last_price[sec]>line_2 then        
                status="Fire_SHORT" 
            else 
                status="SPACE"
            end
        end   

function is_it_my_quote(price_from_glass, volume_from_glass, sec)
   local row
   for i=getNumberOf("orders"),getNumberOf("orders")-orders_threshold,-1 do   
      row=getItem("orders",i)

      if row.seccode==sec and row.price==price_from_glass and orderflags2table(row.flags).active then
         if row.balance==volume_from_glass then
            return true,true
         else
            return true,false
         end
      end
   end
   return false,false
end