-- Флаг поддержания работы скрипта
IsRun = true;
 
function main()
   -- Цикл будет выполнятся, пока IsRun == true
   while IsRun do
      sleep(1000);
   end;   
end;
 
-- Функция вызывается терминалом QUIK при получении изменений лимита по бумагам
function OnDepoLimit(dlimit)
 
   message("Код бумаги "..tostring(dlimit.sec_code));-- STRING 
   message("Счет депо "..tostring(dlimit.trdaccid));-- STRING 
   message("Идентификатор фирмы "..tostring(dlimit.firmid));-- STRING 
   message("Код клиента "..tostring(dlimit.client_code));-- STRING 
   message("Входящий остаток по бумагам "..tostring(dlimit.openbal));-- NUMBER 
   message("Входящий лимит по бумагам "..tostring(dlimit.openlimit));-- NUMBER 
   message("Текущий остаток по бумагам "..tostring(dlimit.currentbal));-- NUMBER 
   message("Текущий лимит по бумагам "..tostring(dlimit.currentlimit));-- NUMBER 
   message("Заблокировано на продажу количества лотов "..tostring(dlimit.locked_sell));-- NUMBER 
   message("Заблокированного на покупку количества лотов "..tostring(dlimit.locked_buy));-- NUMBER 
   message("Стоимость ценных бумаг, заблокированных под покупку "..tostring(dlimit.locked_buy_value));-- NUMBER 
   message("Стоимость ценных бумаг, заблокированных под продажу "..tostring(dlimit.locked_sell_value));-- NUMBER 
   message("Цена приобретения "..tostring(dlimit.awg_position_price));-- NUMBER 
   message("Тип лимита "..tostring(dlimit.limit_kind));-- NUMBER Возможные значения: "0" – обычные лимиты, значение не равное "0" – технологические лимиты 
   message("__________");
 
end;
 
-- Функция вызывается терминалом QUIK при остановке скрипта из диалога управления и при закрытии терминала QUIK
function OnStop()
   -- Останавливает цикл в функции main
   IsRun = false;
end;