Михаил Понамаренко (Все сообщения пользователя)

function main() -- Функция, реализующая основной поток выполнения в скрипте. Для ее выполнения терминал QUIK создает отдельный поток.
   is_run = true -- включение бесконечного цикла
   while is_run do -- повторяющийся цикл, пока is_run = true
         _tab = getItem("depo_limits", 1)
      sleep(50) -- приостановка выполнения скрипта в мс. зависает и при 1000, только реже
   end -- выход из цикла: повторяющийся цикл, пока is_run = true
end -- выход из функции: main

-- //////////////////////////
-- //  Определение порядка загрузки таблиц после подключения QUIK к серверу
-- //////////////////////////

function main() -- Функция, реализующая основной поток выполнения в скрипте. Для ее выполнения терминал QUIK создает отдельный поток.
   is_run = true -- включение бесконечного цикла
   local is_stop_orders, is_orders, is_trades, is_money_limits, is_depo_limits, is_futures_client_limits, futures_client_holding, is_assets, is_last, is_chart
   while is_run do -- повторяющийся цикл, пока is_run = true
      if isConnected() == 1 then -- если есть подключение к серверу
         if is_stop_orders == nil and getNumberOf("stop_orders") > 0 then
            message("Таблица стоп-заявок="..tostring(os.clock()),1) -- системное сообщение
            is_stop_orders = true
         end
         if is_orders == nil and getNumberOf("orders") > 0 then
            message("Таблица заявок="..tostring(os.clock()),1) -- системное сообщение
            is_orders = true
         end
         if is_trades == nil and getNumberOf("trades") > 0 then
            message("Таблица сделок="..tostring(os.clock()),1) -- системное сообщение
            is_trades = true
         end
         if is_money_limits == nil and getNumberOf("money_limits") > 0 then
            message("Позиции по деньгам="..tostring(os.clock()),1) -- системное сообщение
            is_money_limits = true
         end
         if is_depo_limits == nil and getNumberOf("depo_limits") > 0 then
            message("Позиции по инструментам="..tostring(os.clock()),1) -- системное сообщение
            is_depo_limits = true
         end
         if is_futures_client_limits == nil and getNumberOf("futures_client_limits") > 0 then
            message("Ограничения по клиентским счетам="..tostring(os.clock()),1) -- системное сообщение
            is_futures_client_limits = true
         end
         if is_futures_client_holding == nil and getNumberOf("futures_client_holding") > 0 then
            message("Позиции по клиентским счетам="..tostring(os.clock()),1) -- системное сообщение
            is_futures_client_holding = true
         end
         if is_assets == nil and getPortfolioInfoEx("MC0139600000", "35158", 2).assets ~= nil then -- требуется ввод параметров!
            message("Клиентский портфель="..tostring(os.clock()),1) -- системное сообщение
            is_assets = true
         end
         if is_last == nil and getParamEx2("TQBR", "SBER", "last").result == "1" then -- требуется ввод параметров!
            message("Текущие торги="..tostring(os.clock()),1) -- системное сообщение
            is_last = true
         end
         local chart = getCandlesByIndex("chart", 0, getNumCandles("chart") - 1, 1)[0].close
         local chart = getCandlesByIndex("chart", 0, getNumCandles("chart") - 1, 1)
         if chart ~= nil then
            chart = chart[0]
            if chart ~= nil then
               chart = chart.close
            end
         end
         if is_chart == nil and chart ~= nil then
            message("График="..tostring(os.clock()),1) -- системное сообщение
            is_chart = true
         end
      end
      sleep(1) -- приостановка выполнения скрипта в мс.
   end
end

      if ToNumber2(string.gsub(getInfoParam("CONNECTIONTIME"), '%:', '')) < 10 then -- если терминал на связи не более 10 сек.
         sleep(10000) -- пауза 10 сек. (ожидание заполнения таблиц)
      end -- выход из условия: если терминал на связи не более 10 сек.

OnInit(script_path)
 message(tostring(script_path), 1) -- отладка скрипта
end

function OnInit() -- Функция вызывается терминалом QUIK перед вызовом функции main().
   is_run = true
   return
end -- выход из функции: OnInit()

function main() -- Функция, реализующая основной поток выполнения в скрипте. Для ее выполнения терминал QUIK создает отдельный поток.
   while is_run do -- повторяющийся цикл, пока is_run = true
      sleep(1000)
   end -- выход из цикла: повторяющийся цикл, пока is_run = true
   return
end -- выход из функции: main()

function OnClose() -- Функция вызывается перед закрытием терминала QUIK и при выгрузке файла qlua.dll.
-- Под выгрузкой файла qlua.dll подразумевается отключение плагина QLua
-- в окне «Версии компонентов и плагинов» (см. п. 1.9. Раздела 1 Руководства
-- пользователя QUIK).
   message("OnCl ose="..tostring(1),1) -- отладка скрипта с выводом системного сообщения
end

function OnStop(flag) -- Функция вызывается терминалом QUIK при остановке скрипта из диалога управления и при закрытии терминала QUIK.
-- При остановке или удалении работающего скрипта Lua из диалога управления «Доступные
-- скрипты» параметр вызова flag принимает значение «1». При закрытии терминала QUIK –
-- значение «2».
   message("OnStop flag="..tostring(flag),1) -- отладка скрипта с выводом системного сообщения
   is_run = false
   return 5000
end

function OnInit() -- Функция вызывается терминалом QUIK перед вызовом функции main().
   is_run = true
   return
end -- выход из функции: OnInit()
function main() -- Функция, реализующая основной поток выполнения в скрипте. Для ее выполнения терминал QUIK создает отдельный поток.
   while is_run do -- повторяющийся цикл, пока is_run = true
      ScriptTimeStart = getInfoParam("SERVERTIME") -- Время начала расчёта скрипта
      sleep(1000)
   end -- выход из цикла: повторяющийся цикл, пока is_run = true
   return
end -- выход из функции: main()
function OnStop() -- Функция вызывается терминалом QUIK при остановке скрипта из диалога управления и при закрытии терминала QUIK.
   is_run = false
   return
end