nikolz (Все сообщения пользователя)

minfo=debug.getinfo(1, "S").source:sub(2);  p=minfo:match("(.*[/\\])") or "."
logf =p.."/lua_log.txt" Log = io.open(logf,"w")
class = "QJSIM"
sec = "SBER"    -- КОД ИНСТРУМЕНТА
local t={}
function main()
   while true do
       local x=CreateDataSource(class, sec,1);
      local y=x;
      Log:write(tostring(x).."\n");
         Log:write(tostring(y).."\n");
   sleep(1000);
   end
end

table: 0000014B7BA76EA0
table: 0000014B7BA76EA0
table: 0000014B7BA76760
table: 0000014B7BA76760
table: 0000014B7BA77020
table: 0000014B7BA77020
table: 0000014B7BA769A0
table: 0000014B7BA769A0
table: 0000014B7BA765A0
table: 0000014B7BA765A0
table: 0000014B7BA762A0
table: 0000014B7BA762A0
table: 0000014B7BA76AE0
table: 0000014B7BA76AE0
table: 0000014B7BA76BE0
table: 0000014B7BA76BE0
table: 0000014B7BA76620
table: 0000014B7BA76620
table: 0000014B7BA77A20
table: 0000014B7BA77A20
table: 0000014B7BA771A0
table: 0000014B7BA771A0
table: 0000014B7BA778E0
table: 0000014B7BA778E0
table: 0000014B7BA77F20
table: 0000014B7BA77F20
table: 0000014B7BA780A0
table: 0000014B7BA780A0
table: 0000014B7BA77C60
table: 0000014B7BA77C60
table: 0000014B7BA772A0
table: 0000014B7BA772A0
table: 0000014B7BA77220
table: 0000014B7BA77220
table: 0000014B7BA77360
table: 0000014B7BA77360

table: 0000027F53E0C620
table: 0000027F53E0C2A0
table: 0000027F53E0C3A0
table: 0000027F53E0C820
table: 0000027F53E0C460

--  Скрипт для КВИК: Получение цены и запись в лог-файл
-- =======================================================
minfo=debug.getinfo(1, "S").source:sub(2);  p=minfo:match("(.*[/\\])") or "."
log_file_path =p.."/lua_log.txt"
class = "QJSIM"
sec = "SBER"    -- КОД ИНСТРУМЕНТА
param = "LAST"  -- Параметр: Цена последней сделки
local value = getParamEx (class, sec,param).param_image
if value then
   log_message = " Цена " .. sec .. " = " .. tostring(value)
else
   -- Ошибка
   log_message = "ОШИБКА: Не удалось получить параметр " .. param .. " для " .. sec .. ". Проверьте коды класса/инструмента и активность торгов."
end
 message( log_message,1) 
local file = io.open(log_file_path, "a")
if file then
   file:write(os.date("[%Y-%m-%d %H:%M:%S] ") .. log_message .. "\n")
   io.close(file)
   print("Лог записан в файл: " .. log_file_path) -- В системный лог QUIK
else
   local err = "Невозможно открыть/записать файл лога по пути: " .. log_file_path
   message(err, true) -- Всплывающее окно в QUIK
   print(error)
end

--  Скрипт для КВИК: Получение цены BRF6 и запись в лог-файл
-- =======================================================
minfo=debug.getinfo(1, "S").source:sub(2);  p=minfo:match("(.*[/\\])") or "."
log_file_path =p.."/lua_log.txt"
class = "QJSIM"
sec = "SBER"    -- КОД ИНСТРУМЕНТА
param = "LAST"  -- Параметр: Цена последней сделки
-- Используем функцию QUIK API для получения данных
local value = getParamEx (class, sec,param).param_image
  message(tostring(value),1) -- Всплывающее окно в QUIK
if value then
   log_message = " Цена " .. sec .. " = " .. tostring(value)
else
   -- Ошибка
   log_message = "ОШИБКА: Не удалось получить параметр " .. param .. " для " .. sec .. ". Проверьте коды класса/инструмента и активность торгов."
end
-- Запись сообщения в файл лога
 message( log_message,1) 
local file = io.open(log_file_path, "a")
if file then
   file:write(os.date("[%Y-%m-%d %H:%M:%S] ") .. log_message .. "\n")
   io.close(file)
   print("Лог записан в файл: " .. log_file_path) -- В системный лог QUIK
else
   local err = "Невозможно открыть/записать файл лога по пути: " .. log_file_path
   message(err, true) -- Всплывающее окно в QUIK
   print(error)
end