class_code = "SPBFUT"
--sec_code = "SiZ1"
sec_code = "GDZ1"

function main()
   ds, error_desc = CreateDataSource(class_code, sec_code, INTERVAL_M5)
   -- Ограничиваем количество попыток (времени) ожидания получения данных от сервера
   local try_count = 0
   -- Ждем пока не получим данные от сервера,
   --   либо пока не закончится время ожидания (количество попыток)
   while ds:Size() == 0 and try_count < 100 do
      sleep(100)
      try_count = try_count + 1
   end
   -- Если от сервера пришла ошибка, то выведем ее и прервем выполнение
   if error_desc ~= nil and error_desc ~= "" then
      message("Ошибка получения таблицы свечей:" .. error_desc)
      return 0
   end

   local index = 0
   local str

   while index <= ds:Size()-1 do
      str = string.format("%d,%d,%d,%d",ds:O(index), ds:H(index), ds:L(index), ds:C(index))
      index = index + 1
   end
end