Forum Domoticz en français

Code : Tout sélectionner

local devices = {}

-- tableau a renseigner {'dispositif', puissance, 'compteur'}

devices[1] = { 'Chauffage Cuisine', 2000, 'Consommation Chauffage Cuisine'}
-- etc..

Code : Tout sélectionner

-- vérifie s'il y a eu changement d'état
function stateChange(device)
	if (uservariables['lastState_'..device] == nil) then
		creaVar('lastState_'..device,otherdevices[device])
		log('stateChange : création variable manquante lastState_'..device,debug)
		return false
	elseif (devicechanged[device] == nil) then
		return false
	elseif (devicechanged[device] == uservariables['lastState_'..device]) then
		return false
	else
		duree = lastSeen(uservariables_lastupdate['lastState_'..device])
		updateVar('lastState_'..device,otherdevices[device])
		return otherdevices[device]
	end
end	

Code : Tout sélectionner

-- Chargement des modules vil1driver
dofile('/home/pi/domoticz/scripts/lua/modules.lua')

------------------------------------------------------------------
------------------------ Tableau à éditer ------------------------
-- {'dispositif', puissance, 'compteur conso', 'compteur coût'} --
------------------------------------------------------------------
local devices = {}
devices[1] = {'Fil pilote RDC', 3500, 'Consommation chauffage RDC', 'Coût chauffage RDC'}
--devices[2] = {'radiateur SDB', 1200, 'conso SDB'}
--devices[3] = {'radiateur salon', 3200, 'conso salon'}
--devices[4] = {'radiateur parents', 800, 'conso parents'}
-- etc..
------------------------------------------------------------------
------------------------- Fin du tableau -------------------------
------------------------------------------------------------------

--------------------------------
------ Variables à éditer ------
--------------------------------
local tarifhp = 'Tarif HP' -- Nom de la variable utilisateur Tarif HP
local tarifhc = 'Tarif HC' -- Nom de la variable utilisateur Tarif HC
local hp_hc = 'EDF HP / HC' -- Nom du sélecteur Heures pleines/Heures creuses
local lvl_hp = 10 -- Niveaux du sélecteur HP/HC
local lvl_hc = 20
--------------------------------
-- Fin des variables à éditer --
--------------------------------

commandArray = {}

for n,device in pairs(devices) do
	if stateChange(device[1]) == 'On' then -- Si l'état du device passe à On :
		-- Affichage puissance instantanée
		power, energy = string.match(otherdevices_svalues[device[3]], "(%d+%.*%d*);(%d+%.*%d*)") -- Récupération de la valeur du compteur de consommation électrique
		commandArray['UpdateDevice'] = otherdevices_idx[device[3]] .. '|0|' .. device[2] .. ';' .. energy -- Mise à jour du compteur (puissance instantanée)
		break
	end
	if stateChange(device[1]) == 'Off' then -- Si l'état du device passe à Off :
		log(device[1]..' est resté allumé '..duree..'s')
		-- Envoi de la consommation dans le compteur de consommation électrique
		power, energy = string.match(otherdevices_svalues[device[3]], "(%d+%.*%d*);(%d+%.*%d*)") -- Récupération de la valeur du compteur de consommation électrique
		local conso_cycle = tonumber(device[2] / 3600 * duree) -- Consommation du cycle
		energy = tonumber(energy + conso_cycle) -- Somme valeur initiale + consommation du cycle
		commandArray[1] = {['UpdateDevice'] = otherdevices_idx[device[3]] .. '|0|0;' .. energy} -- Mise à jour du compteur (puissance instantanée à zéro + conso du cycle)
		-- Calcul du coût EDF et envoi dans le compteur virtuel
		hp_hc = tonumber(otherdevices_svalues[hp_hc]) -- Récupération du planning HP/HC
		tarifhp = tonumber(uservariables[tarifhp]) -- Récupération des tarifs HP/HC
		tarifhc = tonumber(uservariables[tarifhc])
		if hp_hc == lvl_hp then -- Si on est en heures pleines :
			cout_cycle = tonumber(conso_cycle * tarifhp / 1000) -- On calcule le coût du cycle
		elseif hp_hc == lvl_hc then -- Si on est en heures creuses :
			cout_cycle = tonumber(conso_cycle * tarifhc / 1000) -- On calcule le coût du cycle
		end
		local compteur_init = tonumber(otherdevices_svalues[device[4]]) -- Récupération de la valeur initiale du compteur
		local compteur_maj = tonumber(compteur_init + cout_cycle) -- On ajoute le coût du cycle au compteur
		commandArray[2] = {['UpdateDevice'] = otherdevices_idx[device[4]] .. '|0|' .. compteur_maj} -- Mise à jour du compteur
		break
	end
end

return commandArray