Forum Domoticz en français

Code : Tout sélectionner

--script permettant des lires des donnees de sonde OWL et de remplir des compteurs virtuels (instantannée et total)
-- Initialisation des variables locales
local totalP1 = uservariables['totalP1']
local totalP2 = uservariables['totalP2']
local totalP3 = uservariables['totalP3']
local lastupdate = uservariables['lastupdate']

commandArray = {}

if devicechanged['Sondes - OWL'] then
    
	function timedifference (s)
		year = string.sub(s, 1, 4)
		month = string.sub(s, 6, 7)
		day = string.sub(s, 9, 10)
		hour = string.sub(s, 12, 13)
		minutes = string.sub(s, 15, 16)
		seconds = string.sub(s, 18, 19)
		t1 = os.time()
		t2 = os.time{year=year, month=month, day=day, hour=hour, min=minutes, sec=seconds}
		difference = os.difftime (t1, t2)
		return difference
	end
	
	--on recupere la date d'execution du script
		update = (otherdevices_lastupdate['Sondes - OWL'])
		--print(update)
	
	--on calcule l'intervalle de temps en secondes entre deux executions du script
		intervalle = timedifference(lastupdate)
		--print(intervalle)
	
    --on recupere les valeurs en Amperes des sondes OWL
		l1, l2, l3 = string.match(otherdevices_svalues['Sondes - OWL'], "(%d+.%d*);(%d+.%d*);(%d+.%d*)")
		--print(l1)
		--print(l2)
		--print(l3)
	--on les transforme en Watt
		p1 = l1 * 230
		--print(p1)
		p2 = l2 * 230
		--print(p2)
		p3 = l3 * 230
		--print(p3)
	
	--on calcule le delta (entier) en Wh a aujouter au compteur total
		deltaP1 = math.floor(p1/3600*intervalle)
		--print(deltaP1)
		deltaP2 = math.floor(p2/3600*intervalle)
		--print(deltaP2)
		deltaP3 = math.floor(p3/3600*intervalle)
		--print(deltaP3)
	
	--on incremente les compteurs totaux
		totalP1 = deltaP1 + totalP1
		totalP2 = deltaP2 + totalP2
		totalP3 = deltaP3 + totalP3
		--print(totalP1)
		--print(totalP2)
		--print(totalP3)
		
	--mise a jour variablees locales
		commandArray['Variable:totalP1'] = tostring(totalP1)
		commandArray['Variable:totalP2'] = tostring(totalP2)
		commandArray['Variable:totalP3'] = tostring(totalP3)
		commandArray['Variable:lastupdate'] = tostring(update)
	
	--on exporte les donnees P et totalP vers les compteurs virtuels
		p1 = tonumber(p1)
		totalP1 = tonumber(totalP1)
		commandArray[1]={['UpdateDevice']= 50 .. "|0|" .. p1 .. ';' .. totalP1 }
		
		p2 = tonumber(p2)
		totalP2 = tonumber(totalP2)
		commandArray[2]={['UpdateDevice']= 55 .. "|0|" .. p2 .. ';' .. totalP2 }
		
		p3 = tonumber(p3)
		totalP3 = tonumber(totalP3)
		commandArray[3]={['UpdateDevice']= 56 .. "|0|" .. p3 .. ';' .. totalP3 }
		
end
return commandArray

Code : Tout sélectionner

-- scripts/lua/script_device_sondes_owl.lua

commandArray = {}

local THIS_DEVICE_NAME = 'Sondes OWL' -- device name with type 'Current/Energy' and subtype 'CM180i'

if devicechanged[THIS_DEVICE_NAME] then

  -- define the custom values
  local ENERGY_DEVICE_NAME = 'Total OWL'  -- device name with type 'Energy' and subtype 'CM180'
  local ENERGY_VARIABLE = 'OwlEnergy'     -- user variable as float
  local ENERGY_VARIABLE_1 = 'OwlEnergy1'  -- user variable as float
  local ENERGY_VARIABLE_2 = 'OwlEnergy2'  -- user variable as float
  local ENERGY_VARIABLE_3 = 'OwlEnergy3'  -- user variable as float
  local ELECTRIC_SENSOR_INDEX_1 = 17      -- Maison
  local ELECTRIC_SENSOR_INDEX_2 = 16      -- Voiture
  local ELECTRIC_SENSOR_INDEX_3 = 15      -- Piscine

  -- get rate (a float from 0 to 1) of given current
  local function GetCurrentRate(current)
    return current / (current1 + current2 + current3)
  end

  -- get energy offset (Wh) from this script value and the previous one
  local function GetEnergyOffset()
    return energy - uservariables[ENERGY_VARIABLE]
  end

  -- set energy user variable with rated energy (Wh)
  local function SetEnergyVariable(name, current)
    commandArray['Variable:' .. name] = tostring(GetCurrentRate(current) * GetEnergyOffset() + uservariables[name])
    return
  end

  -- update electric virtual sensor with rated power (W) and energy (Wh)
  local function UpdateElectricDevice(idx, current, energy)
    commandArray[idx] = { ['UpdateDevice'] = idx .. "|0|" .. GetCurrentRate(current) * power .. ";" .. energy }
    return
  end

  -- get values from devices
  current1, current2, current3, energy = devicechanged[THIS_DEVICE_NAME]:match("([^;]+);([^;]+);([^;]+);([^;]+)")
  power = otherdevices_svalues[ENERGY_DEVICE_NAME]:match("([^;]+);([^;]+)") -- second captured value unused

  -- set computed values to device 1
  SetEnergyVariable(ENERGY_VARIABLE_1, current1)
  UpdateElectricDevice(ELECTRIC_SENSOR_INDEX_1, current1, uservariables[ENERGY_VARIABLE_1])

  -- set computed values to device 2
  SetEnergyVariable(ENERGY_VARIABLE_2, current2)
  UpdateElectricDevice(ELECTRIC_SENSOR_INDEX_2, current2, uservariables[ENERGY_VARIABLE_2])

  -- set computed values to device 3
  SetEnergyVariable(ENERGY_VARIABLE_3, current3)
  UpdateElectricDevice(ELECTRIC_SENSOR_INDEX_3, current3, uservariables[ENERGY_VARIABLE_3])

  -- reset energy user variable with this script value (Wh)
  commandArray['Variable:' .. ENERGY_VARIABLE] = energy

end

return commandArray