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

         workingY, workingX, Y, X = GetWindowRect(id) -- Запомнил координаты и размер таблицы
         workingW = X - workingX; workingH = Y - workingY

function OnTransReply(reply) -- Функция вызывается терминалом QUIK при получении ответа на транзакцию пользователя
   ***
   if reply.status == 3 then -- Транзакция выполнена
      --------------------------------------------------------------------------------------------
      OpCl[n] = rts(n, reply.price)
      Num[n] = reply.order_num
      --------------------------------------------------------------------------------------------
   elseif reply.status == 2 or reply.status > 3 then -- Произошла ошибка
   ***

   if round(getParamEx(statusClass, statusCode, "status").param_value) == 1 then status = true else status = false end -- Торговля разрешена/не разрешена

   ST = getInfoParam("SERVERTIME") -- Время сервера
   if #ST == 7 then ST = "0"..ST end
   
   if ST > "10:00:00" and ST < "14:00:00" then
      ...
   end

function main()
   Status = getParamEx("SPBFUT", "SiZ0", "STATUS").param_value
   message("!!!"..Status)
end

   while is_run do
      ---
      sleep(100)
   end

function round(num, n) -- Функция округляет до указанного количества знаков
   local n = (n or 0)
   return tonumber(string.format("%."..n.."f", num))
end

function GetClassBySec(code) -- Функция возвращает код класса по коду инструмента
   --------------------------------------------------------------------------------------------------------------------------
   for class in string_gmatch("STOCK_USA,SPBXM,FQBR,TQBR,QJSIM,SPBFUT,", "(%P*_*%P*),") do
      for sec in string_gmatch(getClassSecurities(class), "(%P*%.*%P*-*%P*),") do
         if sec == code then return class end
      end
   end
   --------------------------------------------------------------------------------------------------------------------------
end

function GetClassBySec(code) -- Функция возвращает код класса по коду инструмента
   --------------------------------------------------------------------------------------------------------------------------
   for class in string_gmatch("STOCK_USA,SPBXM,FQBR,TQBR,QJSIM,SPBFUT,", "(%P*),") do
      for sec in string_gmatch(getClassSecurities(class), "(%P*_*%P*_*%P*),") do
         if sec == code then return class end
      end
   end
   --------------------------------------------------------------------------------------------------------------------------
end

function CheckOrders() -- Функция проверяет таблицу заявок
   local gNOf = getNumberOf("orders")-1 -- Номер последней строки в таблице заявок
   for i = NumLineTO+1, gNOf, 1 do -- Перебирает строки в таблице заявок начиная от NumLineTO+1
      local orders = getItem("orders",i) -- Параметры заявки

      ...
   
      local num = 0 -- Номер заявки
      if bit.test(orders.flags, 0) then -- Заявка активна
         num = orders.order_num -- Контроль заявки
      end
      local stopNum = orders.linkedorder -- Номер стоп-заявки

      ...

   end
end

function Round(num, n) -- Функция округляет до указанного количества знаков
   local n = (n or 0)
   return tonumber(string_format("%."..n.."f", num))
end

Status = tonumber(getParamEx(CLASS_CODE, SEC_CODE , "status").param_value)