Дмитрий (Все сообщения пользователя)

function Report()
   i = i + 1
   last_time = os.date("%H:%M:%S", os.time())
   status1 = tonumber(getParamEx(CLASS_CODE,  SEC_CODE, "STATUS").param_value);
   status2 = tonumber(getParamEx(CLASS_CODE,  SEC_CODE, "TRADINGSTATUS").param_value);
   
   SetCell(id, i, 0, tostring(last_time))
   SetCell(t_id, i, 1, tostring(status1))
   SetCell(t_id, i, 2, tostring(status2))
   InsertRow(t_id, -1)
end

function Report()
i = i + 1
last_time = os.date("%H:%M:%S", os.time())
SetCell(id, i, 0, tostring(last_time))
end

CLASS_CODE     = "SPBFUT"     -- Класс бумаги
SEC_CODE       = "RIU0"       -- Код бумаги
 
IsRun = true

function main()
   CreateTable()
   while IsRun do
      sleep(1)
   end
end

function CreateTable()
   t_id = AllocTable()   
   AddColumn(t_id, 0, "Time", true, QTABLE_INT_TYPE, 15)
   AddColumn(t_id, 1, "Status", true, QTABLE_INT_TYPE, 15)
  
   t = CreateWindow(t_id)   
   SetWindowCaption(t_id, "Status "..SEC_CODE)
   InsertRow(t_id, -1)
end

function OnAllTrade(alltrade)
   status = alltrade.period
   SetCell(t_id, 1, 1, tostring(status))
   if status == nil then message("Торгов нет", 3) end
end

function OnStop()
   IsRun = false
end 

CLASS_CODE     = "SPBFUT"     -- Класс бумаги
SEC_CODE       = "RIM0"       -- Код бумаги

IsRun = true

function main()
   -- Округление по Фэншую
   -- status =  tostring(math.modf(getParamEx(CLASS_CODE,  SEC_CODE, "TRADINGSTATUS").param_value)) -- Вариант 1
   status = tostring(math.modf(getParamEx(CLASS_CODE, SEC_CODE , "STATUS").param_value))            -- Вариант 2
   message(status)  
    
    while IsRun do
      sleep(1)
    end
end

function OnStop()   -- Функция вызывается когда пользователь останавливает скрипт
   IsRun = false
end

CLASS_CODE     = "SPBFUT"     -- Класс бумаги
SEC_CODE       = "RIM0"       -- Код бумаги

IsRun = true

function main()
      CreateTable()
      Status = Round(getParamEx(CLASS_CODE, SEC_CODE , "status").param_value)  
      -- Error: attempt to call global 'Round' (a nil value)
      while IsRun do
           sleep(1)
      end
end

status =  tonumber(getParamEx(CLASS_CODE,  SEC_CODE, "TRADINGSTATUS").param_value)

function Get_Time(Seconds)
      Seconds = os.time()
      if (Seconds%60 == 0) then
             message("NEW Minute", 3)
      end
end

local Last_Time = tostring(GetInfoParam( "SERVERTIME" ))

status =  tonumber(getParamEx(CLASS_CODE,  SEC_CODE, "STATUS").param_value)

candle = GET_CANDLE(secClass, secCode, "", timeFrame, "PRICE", dateString, timeString)

local D = A - B;
if D<0 then Red(Rows,3); end     -- Red функция закрашивания ячейки красным цветом
if D>0 then Green(Rows,3); end   -- Green функция закрашивания ячейки зеленым цветом

if D<-100 then Red(Rows,3); end    
if D>100 then Green(Rows,3); end    

if D<-100 then Red(Rows,3); end    
if D>100 then Green(Rows,3); end
if (D < 100) and (D > -100) then White(Rows,3); end

t  =   string.format ( "%М" , alltrade.datetime.min)

If string.len(alltrade.datetime.min)=2 then
t = tostring(alltrade.datetime.hour)..":"..tostring(alltrade.datetime.min);
Else
t = tostring(alltrade.datetime.hour)..":0"..tostring(alltrade.datetime.min);
end

t = tostring(alltrade.datetime.hour)..":"..tostring(alltrade.datetime.min);

SetCell(t_id, Rows, 0, t);