write on modbus - Printable Version

Code:
require('luamodbus')

--funzioni
function convert(data)
  --log(data)
  if data == 1 then
    value = "auto"
    else if data == 2 then
      value = "Cooling"
      else if data == 3 then
        value = "Heating"
        end
      end
    end
  return(value)
end

function convert_2(data)
  --log(data)
  if data > 200 then
    value = 0
    else
    voltage = grp.getvalue('Tensione_FTV')
      return(((data / 10) * voltage)/1000)
    end
  return(value)
end

--Programma

mb = luamodbus.rtu()
mb:open('/dev/ttyUSB0', 19200, 'E', 8, 1, 'H')
mb:connect()
mb:setslave(1)
local powerFull = grp.getvalue('Altherma - Powerfull')
local cmd_riscaldamento = grp.getvalue('Altherma - cmd_risc')
--log(cmd_riscaldamento)

local value_1 = mb:readregisters(0)
    if value_1 then        
        grp.update('Altherma - ON-OFF', value_1)
  end

local value_2 = mb:readregisters(1)
    if value_2 then
        grp.checkupdate('Altherma - Setpoint', value_2 / 10,0.5)
  end
--local value_3 = mb:readregisters(3)
--    if value_3 then
--        grp.update('Altherma - Modi', convert(value_3))
--  end
local value_4 = mb:readregisters(48)
    if value_4 then
      grp.checkupdate('Altherma - Temp Serbatoio', value_4 / 10, 0.5)
  end
local value_5 = mb:readregisters(45)
    if value_5 then 
      grp.checkupdate('Altherma - Assorbimento', convert_2(value_5),0.01)
  end
local value_6 = mb:readregisters(9)
    if value_6 then
      grp.update('Altherma - Unit status ACS', value_6)
  end
local value_7 = mb:readregisters(10)
    if value_7 then
    grp.update('Altherma - Status Power ACS', value_7)
  end
local value_8 = mb:readregisters(11)
    if value_8 then
      grp.checkupdate('Altherma - Setpoint Water', value_8 / 10,1)
  end
local value_9 = mb:readregisters(12)
    if value_9 then
      grp.checkupdate('Altherma - Setpoint ACS', value_9 / 10,1)
  end
local value_10 = mb:readregisters(35)
    if value_10 then
      grp.checkupdate('Altherma - Temperatura Esterna', value_10 / 10, 1)
  end
--local value_11 = mb:readregisters(49)
    --if value_11 then
      --grp.checkupdate('Altherma - Temp Acqua Uscita ICP', value_11 / 10,0.5)
  --end
local value_12 = mb:readregisters(50)
    if value_12 then
      grp.checkupdate('Altherma - Temp Refrigerante', value_12 / 10,0.5)
  end
local value_13 = mb:readregisters(51)
    if value_13 then
      grp.checkupdate('Altherma - Flusso Acqua', value_13 / 10, 1)
  end
local value_14 = mb:readregisters(52)
    if value_14 then 
      grp.checkupdate('Altherma - Pressione Acqua', value_14 / 10, 0.1)
  end
local value_15 = mb:readregisters(46)
    if value_15 then 
      grp.checkupdate('Altherma - Temp Acqua Uscita', value_15 / 10, 0.5)
  end
local value_16 = mb:readregisters(47)
    if value_16 then 
      grp.checkupdate('Altherma - Temp Acqua Ingresso', value_16 / 10, 0.5)
  end
local value_17 = mb:readregisters(36)
    if value_17 then
      grp.checkupdate('Altherma - Temperatura Ritorno', value_17 / 10,0.5)
  end

mb:close()