moex+quik+lua+candles

function main()
while IsRun do
sleep(1000)
for j= 1, 1 do
if IsWindowClosed(t_id) then --Если окно робота закрыто, то выключить робота
IsRun=false
break
end
— ========= КОНТРОЛЬ ВРЕМЕНИ СЕССИИ И СОЕДИНЕНИЯ С СЕРВЕРОМ
if isConnected()~=1 then
is=isConnected()
FIRSTRUN=0
break
end
— ========= ПЕРВЫЙ ЗАПУСК
if FIRSTRUN==0 then
ds15, error = CreateDataSource(CLASSCODE, INSTRUMENT, INTERVAL_M15)
if ds15 == nil or ds15:Size()<500 then
if error~=nil then
message('OHLC Si15: '..error,3)
else
message('OHLC Si15: error',3)
end
break
end
ds15: SetEmptyCallback()

FIRSTRUN=1
end
end --end FOR GLOBAL
end --end while
ds15:Close()
end --main

— открываем источник данных
local ds, error_desc;
ds, error_desc = CreateDataSource(class,name,period);
— Ограничиваем количество попыток (времени) ожидания получения данных от сервера
local try_count = 0;
if ds==nil then
message(name..' '..class..' data source error :\n'..error_desc);
return {0},0;
end
— Ждем пока не получим данные от сервера, либо пока не закончится время ожидания (количество попыток)
while ds:Size() == 0 and try_count < 100 do
sleep(100);
try_count = try_count + 1
end
— Если от сервера пришла ошибка, то выведем ее и прервем выполнение
if try_count>99 or error_desc ~= nil then
message('Error loading data for '..name..', '..class..' — can not open data source ');
return;
end