first commit
This commit is contained in:
Souti
210
lua/old/script_device_Radiateur.old
Executable file
210
lua/old/script_device_Radiateur.old
Executable file
@@ -0,0 +1,210 @@
|
||||
require "scripts/lua/functions"
|
||||
|
||||
commandArray = {}
|
||||
|
||||
--local switch = 'VoletCuisine'
|
||||
|
||||
-- ------------------------------------------------------------------------------
|
||||
--recupere les minutes
|
||||
-- ------------------------------------------------------------------------------
|
||||
time=os.time()
|
||||
minutes=tonumber(os.date('%M',time))
|
||||
jour=tonumber(os.date('%w',time))
|
||||
heures=tonumber(os.date('%H',time))
|
||||
heurmin= heures * 60 + minutes
|
||||
|
||||
-- ------------------------------------------------------------------------------
|
||||
-- Test temperature radiateur chambres
|
||||
-- ------------------------------------------------------------------------------
|
||||
function gestionRadiateur( switchTemp, switchRadiateur, consigne)
|
||||
|
||||
if (minutes % 10 ~= 5) then
|
||||
return
|
||||
end
|
||||
|
||||
local last = lastUpdateOfDevice(switchRadiateur)
|
||||
debug("--------------"..switchRadiateur.."-----------------------------------")
|
||||
debug("delai="..tostring(delai).." last="..tostring(last)..' Chauffage='..otherdevices[switchRadiateur])
|
||||
debug("------------------------------------------------------------")
|
||||
|
||||
if (last < 600) then
|
||||
debug("Aucune action. Mise à jour trop récente.".." last="..tostring(last).." temp="..tostring(currentTemp).." / Consigne="..tostring(consigne))
|
||||
return
|
||||
end
|
||||
|
||||
local delta = 0.2
|
||||
|
||||
local currentTemp = tonumber(otherdevices_svalues[switchTemp])
|
||||
|
||||
local tempAbsence = tonumber(otherdevices_svalues['ConsigneAbsence'])
|
||||
|
||||
local variation = variationTemp2(switchTemp, 10) -- variation des 10 dernières minutes
|
||||
|
||||
local variationExt = uservariables['AugmentationTempExterieure']
|
||||
|
||||
local augmentation = variation * 60 / 10 --time -- ° par heure
|
||||
|
||||
local ecart = consigne - currentTemp
|
||||
|
||||
local estimation = 0.0
|
||||
if (augmentation > 0 and ecart > 0) then
|
||||
estimation = 60 * ecart / augmentation
|
||||
end
|
||||
|
||||
debug("Retour augmentation="..tostring(augmentation).." ecart="..tostring(ecart)..'°C Estimation='..tostring(estimation).." minutes variationExt="..tostring(variationExt).."°C / heure")
|
||||
|
||||
--2016-02-27 20:08:59.864 LUA: delai=180 last=37
|
||||
--2016-02-27 20:08:59.918 LUA: Retour variation=0.3 switch=RadiateurManon
|
||||
--2016-02-27 20:08:59.918 LUA: CHECK Temperature Variation=0.3 switch=RadiateurManon currentTemp=18.3 tempAbsence=16 consigne=18.5
|
||||
|
||||
debug("Retour variation="..tostring(variation).." switch="..switchRadiateur..' lastUpdate='..tostring(lastUpdateOfDevice(switchRadiateur)))
|
||||
debug('CHECK Temperature Variation='..tostring(variation)..' switch='..switchRadiateur..' currentTemp='..tostring(currentTemp).. ' tempAbsence='..tostring(tempAbsence)..' consigne='..tostring(consigne))
|
||||
|
||||
if otherdevices['ChauffageGeneral'] == 'Off' then
|
||||
if (minutes%30 == 0) then
|
||||
switchOffRadiateur(switchRadiateur)
|
||||
debug("ChauffageGeneral Eteint. Demande extinction.")
|
||||
else
|
||||
debug("Radiateur ="..switchRadiateur.." Retour sans rien faire. ChauffageGeneral Eteint.")
|
||||
end
|
||||
end
|
||||
if lastUpdateOfDevice(switchRadiateur) < delai then
|
||||
debug("Radiateur ="..switchRadiateur.." Retour sans rien faire. Delai non atteint.")
|
||||
return
|
||||
end
|
||||
-- Periode de vacances ou absence ==> hors gel
|
||||
if (otherdevices['Vacances'] == 'On' or otherdevices['AbsenceFamille'] == 'On') then
|
||||
if (currentTemp > 14) then
|
||||
switchOffRadiateur(switchRadiateur)
|
||||
--commandArray[switchRadiateur]='Off'
|
||||
else
|
||||
if variation <= 0 then
|
||||
--commandArray[switchRadiateur]='On'
|
||||
switchOnRadiateur(switchRadiateur)
|
||||
end
|
||||
end
|
||||
debug ('CHECK Temperature chambre : Vacances -> ' ..otherdevices_svalues[switchTemp]..' switch='..switchRadiateur)
|
||||
else
|
||||
debug ('CHECK Temperature: Presence -> ' ..otherdevices_svalues[switchTemp]..' '..josdGetJourSemaine(jour))
|
||||
-- Température non atteinte
|
||||
if (currentTemp < consigne) then
|
||||
if variation <= 0.0 then
|
||||
-- commandArray[switchRadiateur]='On'
|
||||
switchOnRadiateur(switchRadiateur)
|
||||
debug("Demande chauffe : "..tostring(currentTemp).." / "..tostring(consigne).." Variation="..tostring(variation))
|
||||
else
|
||||
--switchIfNeeded(switchRadiateur, 'On')
|
||||
-- Dépassement prévu dans le delai on coupe
|
||||
if (estimation > 0 and estimation <= delai / 60 ) then
|
||||
--commandArray[switchRadiateur] = 'Off'
|
||||
switchOffRadiateur(switchRadiateur)
|
||||
debug("Arrêt chauffage : Température sera atteinte dans le delai "..tostring(estimation).." Minutes")
|
||||
else
|
||||
debug("Aucune action. Chauffage en-cours."..tostring(currentTemp).." / "..tostring(consigne).." Variation="..tostring(variation))
|
||||
end
|
||||
end
|
||||
-- Température dépassée
|
||||
else
|
||||
-- Température supérieure
|
||||
if (currentTemp >= consigne + delta or (estimation > 0 and estimation <= delai / 60 )) then
|
||||
if (consigne == consigneAbsence) then
|
||||
-- rien
|
||||
switchIfNeeded(switchRadiateur,"Off")
|
||||
else
|
||||
if (variation > 0) then
|
||||
if (variationExt <= 0) then
|
||||
switchOffRadiateur(switchRadiateur)
|
||||
debug("Demande arrêt. Température dépassée.")
|
||||
else
|
||||
switchIfNeeded(switchRadiateur,"Off")
|
||||
debug("Aucune action. Augmentation due à température extérieure.")
|
||||
end
|
||||
end
|
||||
end
|
||||
else
|
||||
-- Augmentation de la température non due à l'augmentation extérieure
|
||||
if (variation > 0) then
|
||||
-- Pas d'augmentation extérieure
|
||||
if (variationExt <= 0) then
|
||||
--commandArray[switchRadiateur]='Off'
|
||||
switchOffRadiateur(switchRadiateur)
|
||||
debug("Demande arrêt. Température atteinte et continue d'augmenter.")
|
||||
else
|
||||
switchIfNeeded(switchRadiateur,"Off")
|
||||
debug("Aucune action. Augmentation due à température extérieure.")
|
||||
end
|
||||
else
|
||||
-- Températue en baisse pas nécessaire d'envoyer
|
||||
--switchOffRadiateur(switchRadiateur)
|
||||
--commandArray[switchRadiateur]='Off'
|
||||
--switchIfNeeded(switchRadiateur, 'Off')
|
||||
switchIfNeeded(switchRadiateur,"Off")
|
||||
debug("Aucune action. Temperature atteinte et pas d'augmentation. "..tostring(currentTemp).." / "..tostring(consigne).." Variation="..tostring(variation))
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
debug("------------------------------------------------------------")
|
||||
end
|
||||
|
||||
-- ------------------------------------------------------
|
||||
-- Arrêt tous les radiateurs
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['ChauffageGeneral'] then
|
||||
if otherdevices['ChauffageGeneral'] == 'Off' then
|
||||
for i = 1, 7 do
|
||||
print("Arrêt radiateur="..radiateurs[i])
|
||||
commandArray[radiateurs[i]]='Off'
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- ------------------------------------------------------
|
||||
-- Chambre de Manon
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['ChambreManon'] or devicechanged['ConsigneConfortManon'] or devicechanged['ChauffageGeneral'] then
|
||||
local consigne = tonumber(otherdevices_svalues['ConsigneConfortManon'])
|
||||
gestionRadiateur('ChambreManon', 'RadiateurManon', consigne)
|
||||
end
|
||||
|
||||
-- ------------------------------------------------------
|
||||
-- Chambre de Theo
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['ChambreTheo'] or devicechanged['ConsigneConfortTheo'] or devicechanged['ChauffageGeneral'] then
|
||||
local consigne = tonumber(otherdevices_svalues['ConsigneConfortTheo'])
|
||||
gestionRadiateur('ChambreTheo', 'RadiateurTheo', consigne)
|
||||
end
|
||||
-- ------------------------------------------------------
|
||||
-- Chambre parents
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['Chambre'] or devicechanged['ConsigneConfortChambre'] or devicechanged['ChauffageGeneral'] then
|
||||
local consigne = tonumber(otherdevices_svalues['ConsigneConfortChambre'])
|
||||
gestionRadiateur('Chambre', 'RadiateurChambre', consigne)
|
||||
end
|
||||
-- ------------------------------------------------------
|
||||
-- Radiateur cuisine
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['TemperatureBarometre'] or devicechanged['ConsigneConfortSalon'] or devicechanged['ChauffageGeneral'] then
|
||||
local consigne = tonumber(otherdevices_svalues['ConsigneConfortSalon'])
|
||||
gestionRadiateur('TemperatureBarometre', 'RadiateurCuisine', consigne)
|
||||
end
|
||||
-- ------------------------------------------------------
|
||||
-- Radiateur Salon
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['TemperatureBarometre'] or devicechanged['ConsigneConfortSalon'] or devicechanged['ChauffageGeneral'] then
|
||||
local consigne = tonumber(otherdevices_svalues['ConsigneConfortSalon'])
|
||||
gestionRadiateur('TemperatureBarometre', 'RadiateurSalon1', consigne)
|
||||
gestionRadiateur('TemperatureBarometre', 'RadiateurSalon2', consigne)
|
||||
end
|
||||
|
||||
-- ------------------------------------------------------
|
||||
-- Radiateur Bureau
|
||||
-- ------------------------------------------------------
|
||||
if devicechanged['Bureau'] or devicechanged['ConsigneConfortBureau'] or devicechanged['ChauffageGeneral'] then
|
||||
local consigne = tonumber(otherdevices_svalues['ConsigneConfortBureau'])
|
||||
gestionRadiateur('Bureau', 'RadiateurBureau', consigne)
|
||||
--gestionRadiateur('TemperatureBarometre', 'RadiateurSalon2', consigne)
|
||||
end
|
||||
|
||||
|
||||
return commandArray
|
||||
Reference in New Issue
Block a user