Forum Domoticz en français

Code : Tout sélectionner

 
 ---------------------------------
 ------ variables à adapter ------
 ---------------------------------
local consigne = 'Thermostat Salon'  -- nom du thermostat de température de consigne
local hysteresis = 0.4 --Valeur seuil pour éviter que le relai ne cesse de commuter dans les 2 sens

local sonde1 = 'Salon' --Nom de la première sonde de température
local typeSonde1 = 'humid' -- type de sonde: 'temp': uniquement température / 'humid' : temp+humidité

local sonde2 = 'Cuisine' --Nom de la seconde sonde de température
local typeSonde2 = 'temp' -- type de sonde: 'temp': uniquement température / 'humid' : temp+humidité

local thermostat = 'Chauffage Salon' --Nom de l'interrupteur virtuel du chauffage

local radiateur1 = 'Radiateur Salon' --Nom du radiateur à allumer/éteindre
local radiateur2 = 'Radiateur Cuisine' --Nom du radiateur à allumer/éteindre
local radiateur3 = 'Radiateur Entree' --Nom du radiateur à allumer/éteindre



local EmailTo = 'alex.belair@gmail.com' -- adresse mail où seront envoyées les notifications, si plusieurs séparer par ;

local envoiMail1 = 'mail_sonde_Salon' -- nom de la variable utilisateur gérant l'envoi des alertes de la sonde 1
local envoiMail2 = 'mail_sonde_Cuisine' -- nom de la variable utilisateur gérant l'envoi des alertes de la sonde 2


	
local debug = 'oui'   -- oui ou non pour voir tous les messages debug dans le log 

local modeAlarme = 'sondeBis'  -- action à effectuer si il y a une alarme sonde:
						  -- choisir 'on' pour que le chauffage reste allumé, ou 'off' pour qu'il soit éteint
						  -- ou choisir 'sondeBis' pour utiliser une autre sonde de température (par ex une située dans une autre pièce) 
							local sondeBis = 'Parents' -- nom de la sonde de remplacement pour le mode sondeBis
							local typeSondeBis = 'humid' -- type de sonde: 'temp': uniquement température / 'humid' : temp+humidité
	
 --------------------------------
 -- Fin des variables à éditer --
 --------------------------------
 
 commandArray = {}
 if debug == 'oui' then print('######## script time Salon 2 sondes ########') end
 
------------------------------------ 
--- Gestion de l'alarme de sonde ---
------------------------------------
 
time = os.date("*t")  

function timedifference(d)
   s = otherdevices_lastupdate[d]
   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
 
-- ***********************************
-- Détection d'un problème sur sonde 1
-- *********************************** 
 
local lastSeen1 = timedifference(sonde1)
if debug == 'oui' then print ('lastseen sonde '..sonde1..' = '..lastSeen1) end

if (lastSeen1 > 6000 )  then
    alarmeSonde1 = 1
	else
	alarmeSonde1 = 0
	commandArray['Variable:'..envoiMail1] = tostring (0)
end

if debug == 'oui' then print ('alarme sonde '..sonde1..'= '..alarmeSonde1) end




-- on récupère la valeur de envoiMail1
mailEnvoye1 = tonumber(uservariables[envoiMail1])
if debug == 'oui' then print ('envoiMail1 = '..mailEnvoye1) end

if (mailEnvoye1==0) and (alarmeSonde1 == 1) then envoyerAlerte1 = 1 end
if (mailEnvoye1==1) and (alarmeSonde1 == 1) then envoyerAlerte1 = 0 end
if (mailEnvoye1==0) and (alarmeSonde1 == 0) then envoyerAlerte1 = 0 end
if (mailEnvoye1==1) and (alarmeSonde1 == 0) then envoyerAlerte1 = 0 end
if debug == 'oui' then print ('envoyerAlerte sonde 1 = '..envoyerAlerte1) end


-- on envoi un mail si ce n'est pas déjà fait
if envoyerAlerte1 == 1 then 
		print ('Alerte sonde '..sonde1..', envoi d\'un mail')
		objet = 'Alerte chauffage '..thermostat
		message = 'Problème avec la sonde '..sonde1
		commandArray['SendEmail']= objet..'#'.. message .. '#' .. EmailTo
		commandArray['Variable:'..envoiMail1] = tostring (1)
						
		--else 
		--print ('Alerte sonde, mail déjà envoyé')
end


-- ***********************************
-- Détection d'un problème sur sonde 2
-- *********************************** 
 
local lastSeen2 = timedifference(sonde2)
if debug == 'oui' then print ('lastseen sonde '..sonde2..' = '..lastSeen2) end

if (lastSeen2 > 6000 )  then
    alarmeSonde2 = 1
	else
	alarmeSonde2 = 0
	commandArray['Variable:'..envoiMail2] = tostring (0)
end

if debug == 'oui' then print ('alarme sonde '..sonde2..'= '..alarmeSonde2) end


-- on récupère la valeur de envoiMail2
mailEnvoye2 = tonumber(uservariables[envoiMail2])
if debug == 'oui' then print ('envoiMail2 = '..mailEnvoye2) end

if (mailEnvoye2==0) and (alarmeSonde2 == 1) then envoyerAlerte2 = 1 end
if (mailEnvoye2==1) and (alarmeSonde2 == 1) then envoyerAlerte2 = 0 end
if (mailEnvoye2==0) and (alarmeSonde2 == 0) then envoyerAlerte2 = 0 end
if (mailEnvoye2==1) and (alarmeSonde2 == 0) then envoyerAlerte2 = 0 end
if debug == 'oui' then print ('envoyerAlerte sonde 2 = '..envoyerAlerte2) end


-- on envoi un mail si ce n'est pas déjà fait
if envoyerAlerte2 == 1 then 
		print ('Alerte sonde '..sonde2..', envoi d\'un mail')
		objet = 'Alerte chauffage '..thermostat
		message = 'Problème avec la sonde '..sonde2
		commandArray['SendEmail']= objet..'#'.. message .. '#' .. EmailTo
		commandArray['Variable:'..envoiMail2] = tostring (1)
						
		--else 
		--print ('Alerte sonde2, mail déjà envoyé')
end


-- *******************
-- Analyse des alarmes
-- *******************

-- en mode normal, on utilise la valeur la moyenne entre sonde1 et Sonde2 ==> mode 1
-- en cas de défaillance d'une des deux sondes, on utilise celle qui est fonctionnelle ==> mode 2
-- au cas ou les deux sondes sont hs, on utilise le paramètre modeAlarme ==> mode 3

if (alarmeSonde1==0) and (alarmeSonde2==0) then mode = 1 end
if ((alarmeSonde1==1) and (alarmeSonde2==0)) or ((alarmeSonde1==0) and (alarmeSonde2==1)) then mode = 2 end
if (alarmeSonde1==1) and (alarmeSonde2==1) then mode = 3 end



----------------------------------
--- Gestion de la température ----
----------------------------------

-- on récupère la consigne du thermostat
local consigne = tonumber(otherdevices_svalues[consigne])
if debug == 'oui' then print ('consigne = '..consigne) end
   
-- on récupère la température relevée par la sonde1

if (typeSonde1 == 'temp') then
            temperature1 = tonumber(otherdevices_svalues[sonde1])
         elseif (typeSonde1 == 'humid') then
            temp, sHumid = otherdevices_svalues[sonde1]:match("([^;]+);([^;]+)")
            temperature1 = tonumber(temp)
         end

          

if debug == 'oui' then print ('température '..sonde1..' = '..temperature1) end


-- on récupère la température relevée par la sonde2

if (typeSonde2 == 'temp') then
            temperature2 = tonumber(otherdevices_svalues[sonde2])
         elseif (typeSonde2 == 'humid') then
            temp, sHumid = otherdevices_svalues[sonde2]:match("([^;]+);([^;]+)")
            temperature2 = tonumber(temp)
         end

          

if debug == 'oui' then print ('température '..sonde2..' = '..temperature2) end


-- on choisi la température de référence en fonction du mode 

if (mode == 1) then
	
	tempRef = ((temperature1 + temperature2) / 2)
	if debug == 'oui' then print ('mode 1 ==> température moyenne ') end

	
	elseif (mode == 2) then
	
		if (alarmeSonde1 == 1) then 
			tempRef = temperature2
			if debug == 'oui' then print ('mode 2==> température de la sonde '..sonde2) end
			end
		if (alarmeSonde2 == 1) then 
			tempRef = temperature1 
			if debug == 'oui' then print ('mode 2==> température de la sonde '..sonde1) end
			end

		
	elseif (mode == 3) and (modeAlarme == 'sondeBis') then
	
	-- on récupère la température relevée par la sondeBis

		if (typeSondeBis == 'temp') then
            temperatureBis = tonumber(otherdevices_svalues[sondeBis])
         elseif (typeSondeBis == 'humid') then
            temp, sHumid = otherdevices_svalues[sondeBis]:match("([^;]+);([^;]+)")
            temperatureBis = tonumber(temp)
         end
	
		tempRef = temperatureBis
		
		print ('mode 3==> température de la sonde Bis : '..sondeBis)
		
	
	end
	
if debug == 'oui' then print ('température de référence = '..tempRef) end

-- ********************************
-- Gestion des scénarios d'allumage
-- ********************************


if (otherdevices[thermostat]=='On') then

    if debug == 'oui' then print(thermostat..' : ON') end

	
	if (mode == 1) or (mode == 2) then
		
		if (tempRef <= consigne)  then
			    if debug == 'oui' then print(thermostat..' : tempRef <= consigne => il faut allumer') end
				action = 1
		elseif (tempRef >= (consigne+hysteresis) )  then
			    if debug == 'oui' then print(thermostat..' : tempRef >= consigne => il faut éteindre') end
				action = 0
		elseif (tempRef > consigne) and (tempRef < (consigne + hysteresis)) then
				if debug == 'oui' then print(thermostat..' : tempRef dans l\'hystérésis => On laisse comme c\'est ') end
				action = 3
		end
		
	elseif (mode == 3) then
		
		if modeAlarme == 'on' then 
			action = 1
			if debug == 'oui' then print(thermostat..' : modeAlarm "on" => il faut allumer') end

			
		elseif modeAlarme == 'off' then 
			action = 0
			if debug == 'oui' then print(thermostat..' : modeAlarm "off" => il faut éteindre') end
			
		elseif modeAlarme == 'sondeBis' then

			if (tempRef <= consigne)  then
			    if debug == 'oui' then print(thermostat..' : modeAlarm "sondeBis" tempRef < consigne => il faut allumer') end
				action = 1
			elseif (tempRef >= (consigne+hysteresis) )  then
			    if debug == 'oui' then print(thermostat..' : modeAlarm "sondeBis" tempRef >= consigne => il faut éteindre') end
				action = 0
			elseif (tempRef > consigne) and (tempRef < (consigne + hysteresis)) then
				if debug == 'oui' then print(thermostat..' : modeAlarme "sondeBis" tempRef dans l\'hystérésis => On laisse comme c\'est ') end
				action = 3
				
			end
			
		end
		
	end
	
	if debug == 'oui' then print ('Action = '..action) end
	
elseif (otherdevices[thermostat]=='Off') then

	action = 0
	if debug == 'oui' then print(' Thermostat OFF : il faut éteindre / action = 0') end
	
end

-- ************************
-- Commande des radiateurs
-- ************************

if action == 1 then

	print('Allumage du chauffage :'..radiateur1)
    commandArray[radiateur1]='On'
	print('Allumage du chauffage :'..radiateur2)
    commandArray[radiateur2]='On'
	print('Allumage du chauffage :'..radiateur3)
    commandArray[radiateur3]='On'
	
	
elseif action == 0 then
	
	print('Extinction du chauffage:'..radiateur1)
	commandArray[radiateur1]='Off'
	print('Extinction du chauffage:'..radiateur2)
	commandArray[radiateur2]='Off'
	print('Extinction du chauffage:'..radiateur3)
	commandArray[radiateur3]='Off'
	
elseif action == 3 then

	print ('On laisse les radiateurs en l\'état')


end


return commandArray