Domotique Piscine

Vous avez des questions concernant les scripts dans Domoticz, posez vos questions ici, quelque soit le langage nous tenterons des réponses pertinentes ...
lavinch31
Messages : 52
Enregistré le : 03 févr. 2020, 11:16

Re: Domotique Piscine

Message par lavinch31 »

Merci denis_brasseur pour les billes :P

Alors j'ai créé un script à part pour tester :

Code : Tout sélectionner

-- Paramètres
local dev_PpeFl   = "Pompe Piscine" -- interrupteur de commande de la pompe
local dev_ModeFl  = "Mode filtration piscine"  -- Selecteur du mode de la pompe (Manu/Auto HC/AutoHP) 
local dev_TChlor  = "Tempo Chlorinateur" -- interrupteur d'activation de la Tempo 

-- -------------------------------
-- Bibliothèque de fonctions
-- -------------------------------

-- retourne le temps en seconde depuis la dernière maj du périphérique
function lastSeen(device)
	timestamp = otherdevices_lastupdate[device] or device
	y, m, d, H, M, S = timestamp:match("(%d+)-(%d+)-(%d+) (%d+):(%d+):(%d+)")
	difference = os.difftime(os.time(), os.time{year=y, month=m, day=d, hour=H, min=M, sec=S})
	return difference
end
commandArray = {}

if  dev_TChlor == 'On' and dev_PpeFl == 'On' and lastSeen(dev_PpeFl) >= 10 and dev_ModeFl ~= 'Manu' then
    print ('le chlorinateur doit faire une pause')
    --passage du mode filtration piscine en mode Manu puis HP apres 30min
	commandArray[#commandArray + 1]={[dev_ModeFl] = 'Set Level 10'}
	commandArray[#commandArray + 1]={[dev_ModeFl] = 'Set Level 30 AFTER 1800'}
	--Tempo OFF de la pompe pendant 30 min puis remise sur ON
	commandArray[#commandArray + 1]={[dev_PpeFl] = 'Off'} 
	commandArray[#commandArray + 1]={[dev_PpeFl] = 'On AFTER 1800'}  
	print (' fin de pause du Chlorinateur')
end
return commandArray
Mais le script ne se lance pas .
pas de

Code : Tout sélectionner

'le chlorinateur doit faire une pause' dans les log
Afin de debuger le script j'ai fait un print

Code : Tout sélectionner

print(otherdevices[dev_PpeFl])
print(otherdevices[dev_ModeFl])
print(otherdevices[dev_TChlor])
qui me donne respectivement :

Code : Tout sélectionner

 Status: LUA: On
 Status: LUA: Auto HP
 Status: LUA: On
donc le problème se situerai au niveau de la valeur lastSeen(dev_PpeFl)

Comment puis-je verifier cette valeur ?
Pi3b+ SSD
Zigbee Conbee II + Philips hue +Variateurs +smart buttons
Station meteo Netatmo
Plusieurs ESP8266 sous ESPEASY + DS18B20 + BMP280 +Relais

denis_brasseur
Messages : 572
Enregistré le : 24 déc. 2018, 17:05
Localisation : (26)

Re: Domotique Piscine

Message par denis_brasseur »

Code : Tout sélectionner

print(lastSeen(dev_PpeFl))
devrait afficher le temps en seconde depuis la dernière maj du périphérique dev_PpeFl
Pi3 + DD PiDrive + RFXtrx433 + AEON Labs ZW090
7 Modules fil pilote ZMNHJD1
2 détecteur fumées CHACON 34131
5 Bresser Capteur thermo/hygro
1 contacteur porte Philio PST02-1A Z
OWL Micro+ CM180
D2L LINKY
FGR-223 "Roller Shutter 3"

lavinch31
Messages : 52
Enregistré le : 03 févr. 2020, 11:16

Re: Domotique Piscine

Message par lavinch31 »

lorsque je place ce print juste apres la fonction lastSeen(device)

Code : Tout sélectionner

function lastSeen(device)
	timestamp = otherdevices_lastupdate[device] or device
	y, m, d, H, M, S = timestamp:match("(%d+)-(%d+)-(%d+) (%d+):(%d+):(%d+)")
	difference = os.difftime(os.time(), os.time{year=y, month=m, day=d, hour=H, min=M, sec=S})
	return difference

end
	 print(lastSeen(dev_PpeFl))	
commandArray = {}

if  dev_TChlor == 'On' and dev_PpeFl == 'On' and lastSeen(dev_PpeFl) >= 10 and dev_ModeFl ~= 'Manu' then
   
    print ('le chlorinateur doit faire une pause')
    --passage du mode filtration piscine en mode Manu puis HP apres 30min
	commandArray[#commandArray + 1]={[dev_ModeFl] = 'Set Level 10'}
	commandArray[#commandArray + 1]={[dev_ModeFl] = 'Set Level 30 AFTER 1800'}
	--Tempo OFF de la pompe pendant 30 min puis remise sur ON
	commandArray[#commandArray + 1]={[dev_PpeFl] = 'Off'} 
	commandArray[#commandArray + 1]={[dev_PpeFl] = 'On AFTER 1800'}  
	print (' fin de pause du Chlorinateur')
end
return commandArray
il renvoi pourtant bien une valeur cohérente :roll:

Code : Tout sélectionner

2020-04-22 20:47:00.439 Status: LUA: 45.0
Pi3b+ SSD
Zigbee Conbee II + Philips hue +Variateurs +smart buttons
Station meteo Netatmo
Plusieurs ESP8266 sous ESPEASY + DS18B20 + BMP280 +Relais

lavinch31
Messages : 52
Enregistré le : 03 févr. 2020, 11:16

Re: Domotique Piscine

Message par lavinch31 »

Lorsque je laisse uniquement la condition

Code : Tout sélectionner

 lastSeen(dev_PpeFl) >= 10
le script s'execute correctement

donc ca bloquerait sur une condition multiple
Pi3b+ SSD
Zigbee Conbee II + Philips hue +Variateurs +smart buttons
Station meteo Netatmo
Plusieurs ESP8266 sous ESPEASY + DS18B20 + BMP280 +Relais

lavinch31
Messages : 52
Enregistré le : 03 févr. 2020, 11:16

Re: Domotique Piscine

Message par lavinch31 »

en modifiant la ligne comme suit , ça semble etre bon :P

Code : Tout sélectionner

if lastSeen(dev_PpeFl) > 10 and (otherdevices[dev_TChlor] == 'On') and (otherdevices[dev_PpeFl] == 'On') and (otherdevices[dev_ModeFl] ~= 'Manu') then
Pi3b+ SSD
Zigbee Conbee II + Philips hue +Variateurs +smart buttons
Station meteo Netatmo
Plusieurs ESP8266 sous ESPEASY + DS18B20 + BMP280 +Relais

denis_brasseur
Messages : 572
Enregistré le : 24 déc. 2018, 17:05
Localisation : (26)

Re: Domotique Piscine

Message par denis_brasseur »

lavinch31 a écrit : 22 avr. 2020, 21:32 en modifiant la ligne comme suit , ça semble etre bon :P

Code : Tout sélectionner

if lastSeen(dev_PpeFl) > 10 and (otherdevices[dev_TChlor] == 'On') and (otherdevices[dev_PpeFl] == 'On') and (otherdevices[dev_ModeFl] ~= 'Manu') then
Effectivement, j'ai oublié les otherdevices[] !! 8-)
Et tes parenthèses autour des otherdevices ne sont pas nécessaires.
Pi3 + DD PiDrive + RFXtrx433 + AEON Labs ZW090
7 Modules fil pilote ZMNHJD1
2 détecteur fumées CHACON 34131
5 Bresser Capteur thermo/hygro
1 contacteur porte Philio PST02-1A Z
OWL Micro+ CM180
D2L LINKY
FGR-223 "Roller Shutter 3"

Sanstouf
Messages : 12
Enregistré le : 08 déc. 2019, 14:54

Re: Domotique Piscine

Message par Sanstouf »

Bonjour,

J'ai un peu lu les différents messages, mais devant les 30 pages :shock: j'ai pas réussi à trouver l'info que je cherche :? .

Quel capteur utilisez vous pour mettre dans la piscine? Actuellement, j'utilise du sonoff (flasher) et du 433, mais sauf erreur de ma part le pb du sonoff est le 220v :evil: . J'ai pas trop envie de mettre du 220 juste à coté de l'eau...
Pour moi l'idéal étant un 433 sur pile.

Merci :)

Martial
Messages : 125
Enregistré le : 03 mars 2017, 18:58

Re: Domotique Piscine

Message par Martial »

Bonjour,
J'utilise ça: https://fr.aliexpress.com/item/32914353 ... 6c374D8WMv

mais pour le sonoff et une sonde ds18b20, il suffit de la mettre dans un "doigt" inséré dans la tuyauterie de la piscine et donc dans le local technique.

Jerboy
Messages : 7
Enregistré le : 18 mai 2020, 21:30

Re: Domotique Piscine

Message par Jerboy »

Bonjours à tous,
je suis nouveau sur le forum mais cela fait maintenant 2 semaines que je teste le script pour ma nouvelle installation.
J'ai finalement réussit à le faire marcher mais en voulant l'optimiser (supression de capteur de mesure) , j'ai maintenant un message d'erreur "08: attempt to concatenate a nil value (field '?')

Code : Tout sélectionner

2020-05-18 21:36:11.906 Status: LUA: Script Piscine : Gestion de la filtration
2020-05-18 21:36:11.944 Status: LUA: Déjà effectué : 470.0 minutes sur 458.0
2020-05-18 21:36:11.944 Error: EventSystem: in Script de gestion de la piscine_page15: [string "--[[ Script de gestion de la piscine page 15 ..."]:108: attempt to concatenate a nil value (field '?')
qui correspond a la ligne

Code : Tout sélectionner

    --Met à jour un device numérique Domotica
    commandArray[CmdIdx] = {['UpdateDevice'] = otherdevices_idx[device]..'|'..tostring(nvalue)..'|'..tostring(svalues)}
De plus, des que j'ai eux cette erreur, mon capteur texte, qui affiche le bilan de la filtration soit le début de la filtration, la fin de filtration, la filtration effectuée et le temps restant à éffectuer, ne s'est plus mis à jour... (en ligne 277 du programme)

Code : Tout sélectionner

-- Capteur texte pour afficher le bilan de la filtration soit le début de la filtration, la fin de filtration, la filtration effectuée et le temps restant à éffectuer.
            UpdateDev(Bil_Filt, 0, "Début filtration: "..HDebFilt.." \n Fin Filtration: "..HFinFilt.." \n fitration éffectuée: "..PpeFait.." sur: "..PpeDuree.." \n Temps restant de filtration: "..PpeRestH)
L'autre capteur teste, "Durée filtration Piscine" lui marche bien.
voici le log

Code : Tout sélectionner

2020-05-18 22:34:17.709 Status: EventSystem: reset all events...
2020-05-18 22:35:00.016 Status: LUA: Script Piscine : Calcul de la filtration
2020-05-18 22:35:00.054 Status: LUA: Température moyenne hier : 25.7 °C
2020-05-18 22:35:00.054 Status: LUA: Durée de filtration : 458.0 min
2020-05-18 22:35:00.054 Status: LUA: Début de filtration : 09:40
2020-05-18 22:35:00.054 Status: LUA: Script Piscine : Gestion de la filtration
2020-05-18 22:35:00.099 Status: LUA: Déjà effectué: 520.0 minutes sur 458.0
2020-05-18 22:35:00.112 Status: EventSystem: Script event triggered: Script de gestion de la piscine_page15
2020-05-18 22:35:00.099 Error: EventSystem: in Script de gestion de la piscine_page15: [string "--[[ Script de gestion de la piscine page 15 ..."]:108: attempt to concatenate a nil value (field '?')
>Du coup "CalcFiltration" marche
> ChkFiltration bug

Pouvez vous m'aider. La je suis sec. :cry:

Voici mon code complet

Code : Tout sélectionner

--[[ Script de gestion de la piscine page 15 avec normalement toutes les modifications...
https://easydomoticz.com/forum/viewtopic.php?f=10&t=3935&hilit=domotique+piscine&start=250

Fonctions :

1. Gestion de la filtration
1.1 Calculer la durée et la période optimale de filtration
1.2 Démarrer / arrêter la filtration
     Si température eau > 12°C, selon planning calculé au dessus
     Sinon,cas de l'hivernage 
     Démarrage si température d'eau <= 0.8
     Arrêt si température d'air >= 1.5 et température eau >= 1
     
     Viltration minimum 3h et maxi 12h
    
1/ Les devices :
- dev_Tair et dev_Teau de type thermomètres, ras
- dev_PpeFl : le switch qui commande la pompe de filtration , de type On/Off
- dev_ModeFl : un interrupteur selecteur pour le mode de filtration. Doit contenir 4 niveaux :
* Off (Caché)
* Manu (Level 10) Dans ce mode, le script fait seulement les calculs de durée et de début, mais ne gère pas la pompe
* Auto HC (Level 20) pour filtration en heures creuses
* Auto HP (Level 30) pour filtration en journée 
- dev_HC : Un switch on/off avec planning pour indiquer les heures pleines ou creuses (On=HC, Off=HP)
- dev_cptFl : Un P1 smart counter pour comptabiliser la consommation électrique de la pompe

Le script a été conçu pour qu'on puisse à tout moment prendre la pompe en manuel (pour passer l'aspirateur, nettoyer les filtres, etc) et faire ce qu'on veut (arrêter, démarrer comme on veut) et, lorsqu'on repasse en mode automatique, il reprends la filtration là où elle avait élé laissée. Il faut donc un compteur qui stocke le temps de filtration effectué chaque jour pour pouvoir le comparer au temps calculé à minuit. La version la plus simple aurait été d'accumuler des minutes dans une variable. Mais finalement, la gestion qui consiste plutôt à accumuler des kWh dans un compteur n'est pas beaucoup plus compliquée, et elle donne l'avantage d'avoir un historique de la filtration ainsi que les rapports de coûts de celle-ci. C'est pour ça que j'ai choisi un compteur électrique plutôt qu'un compteur de minutes. En divisant les kWh par la puissance de la pompe, on retrouve la durée de filtration effectuée.

2/ Les variables :
2 variables à définir :
- var_PPStart, de type "Heure" stocke l'heure de début de filtration calculée à minuit
- var_PPDuree, de type "Entier" stocke la durée de filtration calculée, en minutes

3/ Les constantes
Elles servent à calculer la durée de filtration en fonction des caractéristiques du bassin et de la pompe :
- cst_PpeFl_Q Le débit nominal de la pompe de filtration en m3/h
- cst_Pisc_V Le volume du bassin, en m3
- cst_PpeFl_W La puissance électrique de la pompe piscine, pour pouvoir calculer la durée de filtration quotidienne ainsi que la consommation électrique correspondante
- cst_Adj Un coefficient à ajuster en + ou en - pour filtrer plus ou moins longtemps
    
    
--]]

-- Paramètres
local dbPath      = "/home/pi/domoticz/domoticz.db"
local gst_HorsGel = true                   -- gestion ou non du mode hors gel

local dev_TAir    = "Température Exterieur"           --"Température Extérieure"  idx 46 -- Température extérieure (nécessaire seulement pour le mode hors gel)
local dev_TEau    = "Temperature Piscine"            --"Température piscine"     idx 106-- Température eau piscine
local dev_PpeFl   = "Filtration piscine (Sonoff POW)"                 --"Filtration piscine"      idx 110-- Interrupteur de commande de la pompe
local dev_ModeFl  = "Mode filtration piscine"            --"Mode filtration piscine" idx 104-- Selecteur du mode de la pompe (Manu/Auto HC/AutoHP)
local dev_cptFl   = "Consommation Piscine"         --"Consommation Piscine"    idx 109-- Compteur de consommation électrique piscine
local dev_HC      = "Heures creuses EDF"             --"Heures creuses EDF" 

local tps_Fl      = "Durée filtration Piscine"      -- Capteur texte pour afficher le temps de filtration en minutes
local Bil_Filt    = "Bilan filtration Piscine"  -- Capteur texte pour afficher le bilan de la filtration soit le début de la filtration, la fin de filtration, la filtration effectuée et le temps restant à éffectuer.

local var_PPStart = "PpePiscStart"  -- Variable contenant l'heure de départ de la filtration
local var_PPDuree = "PpePiscDuree"  -- Variable contenant la durée de la filtration

-- Réglages du temps de filtration
local cst_PpeFl_Qn=18      -- Débit nominal de la pompe de filtration en m3/h
local cst_Pisc_V  =50     -- volume du bassin, en m3
local cst_Adj     =0.175  -- Coefficient à ajuster en + ou en - pour filtrer plus ou moins longtemps
local cst_PpeFl_W =400    -- Puissance électrique de la pompe piscine

-- -------------------------------
-- Bibliothèque de fonctions
-- -------------------------------
local CmdIdx=1
local debug=1

function round(num, dec)
    if num == 0 then
        return 0
    else
        local mult = 10^(dec or 0)
        return math.floor(num * mult + 0.5) / mult
    end
end

function os.capture(cmd, raw)
    local f = assert(io.popen(cmd, 'r'))
    local s = assert(f:read('*a'))
    f:close()
    if raw then return s end
    s = string.gsub(s, '^%s+', '')
    s = string.gsub(s, '%s+$', '')
    s = string.gsub(s, '[\n\r]+', ' ')
    return s
end
   
function UpdateSw(device,commande)
    --Update un switch Domoticz
    commandArray[CmdIdx] = {[device] = commande}
    CmdIdx=CmdIdx+1
end

function UpdateVar(variable,valeur)
    --Update une variable Domoticz
    commandArray[CmdIdx] = {['Variable:'..variable] = tostring(valeur)}
    CmdIdx=CmdIdx+1
end

function UpdateDev(device,nvalue,svalues)
    --Met à jour un device numérique Domotica
    commandArray[CmdIdx] = {['UpdateDevice'] = otherdevices_idx[device]..'|'..tostring(nvalue)..'|'..tostring(svalues)}
    CmdIdx=CmdIdx+1

end

function UpdateP1(device,HC,conso,prod,freq)
    -- Met à jour un P1 smart counter
    -- device : nom du compteur
    -- HC     : "On" si heures creuses, "Off" si heures pleines
    -- conso  : consommation instantannée
    -- prod   : production instantannée
    -- freq   : frequence d'exécution du script (en minutes) 
    
    local u1, u2, p1, p2
    local dbg=0
    
    u1, u2, p1, p2 = string.match(otherdevices_svalues[device],"(.-);(.-);(.-);(.-);.*")
    
    -- Utile pour les compteurs nouvellement crées
    u1=u1 or 0
    u2=u2 or 0
    p1=p1 or 0
    p2=p2 or 0

    if dbg == 1 then
        print("Mise à jour de "..tostring(device))
        print("u1 "..tostring(u1))
        print("u2 "..tostring(u2))
        print("p1 "..tostring(p1))
        print("p2 "..tostring(p2))
        print("conso "..tostring(conso))
        print("prod "..tostring(prod))
    end

    if otherdevices[HC] == 'Off' then
        -- svalue=USAGE1;USAGE2;RETURN1;RETURN2;CONS;PROD
        commandArray[CmdIdx] = {['UpdateDevice'] = otherdevices_idx[device]..'|0|'..tostring(u1+conso*freq/60)..';'..tostring(u2)..';'..tostring(p1+prod*freq/60)..';'..tostring(p2)..';'..tostring(conso)..';'..tostring(prod)}
        CmdIdx=CmdIdx+1
    else
        commandArray[CmdIdx] = {['UpdateDevice'] = otherdevices_idx[device]..'|0|'..tostring(u1)..';'..tostring(u2+conso*freq/60)..';'..tostring(p1)..';'..tostring(p2+prod*freq/60)..';'..tostring(conso)..';'..tostring(prod)}
        CmdIdx=CmdIdx+1
    end
end

function ConsoDev(switch,ConsoMarche,ConsoVeille)
    -- Retourne la consommation d'un appareil commandé
    -- selon qu'il est en marche ou en veille
    if otherdevices[switch] == 'On' then
        return ConsoMarche
    else
        return ConsoVeille
    end
end

function CalcFiltration()
    --[[ Calcule 
    * La durée optimale de filtration en fonction de la Température
    de l'eau, du débit de la pompe et du volume du bassin
    * L'heure de début de la filtration selon qu'on veut filtrer en heure creuses ou pleines

    Utilise les variables globales suivantes
    dev_Teau    : device du thermomètre d'eau
    dev_ModeFl  : le sélecteur de mode de filtration
    cst_PpeFl_Qn: débit nominal de la pompe en m3/h
    cst_Pisc_V : Volume du bassin en m3
    cst_Adj     : Coefficient d'ajustement
    var_PPStart : Nom de la variable qui va stocker l'heure de départ de la filtration
    var_PPDuree : Nom de la vatiable qui va stocker la durée de filtration
    --]]
    
    local val_TEau, MidiSol, DebutFiltration, dureeFiltration, HDebFilt, dev_TAir, dureeFiltrationH
    
    print("Script Piscine : Calcul de la filtration")
    val_TEau=os.capture('sqlite3 '..dbPath..' "select temp_avg from temperature_calendar where devicerowid='..otherdevices_idx[dev_TEau]..' order by date desc limit 1"')
    val_TEau=round(val_TEau,1)
    print("Température moyenne hier : "..val_TEau.." °C")

    -- dureeFiltration=round(60*math.max(0,cst_Adj*cst_Pisc_V/cst_PpeFl_Qn*(val_TEau-10)),0) -- Résultat en minutes ici init le 0 indique min 0 minutes
    dureeFiltration=round(60*math.max(3,math.min(12,cst_Adj*cst_Pisc_V/cst_PpeFl_Qn*(val_TEau-10))),0) -- resultat en minutes avec min 3h et max 12h
   dureeFiltrationH=os.date("%H:%M", dureeFiltration*60-3600)
    print("Durée de filtration : "..dureeFiltration.." min")
UpdateDev(tps_Fl, 0, "De "..dureeFiltration.." minutes soit "..dureeFiltrationH.."\n Température moyenne de l'eau hier : "..val_TEau.." °C")  -- affiche durée fitration en heures et minutes + temperature moyenne bassin
    --UpdateDev(tps_Fl,0,dureeFiltration) -- affiche seul en minutes duree de filtration
    --UpdateDev(tps_Flh,0,dureeFiltrationH) -- affiche seul en Heures duree de filtration

    if otherdevices[dev_ModeFl] == "Auto HC" then
        -- Mode Auto Heures Creuses
        -- On filtre jusqu'à 7h30 si possible (=450 min), et on déborde si nécessaire
        DebutFiltration=math.max(10,450-dureeFiltration)
    else
        -- Mode Auto Heures Pleines ou Manu
        -- On filtre en journée, centré sur le midi solaire
        MidiSol=round((timeofday['SunriseInMinutes']+timeofday['SunsetInMinutes'])/2,0) -- en minutes
        DebutFiltration=round(MidiSol-dureeFiltration/2,0) -- en minutes
    end
    HDebFilt=os.date("%H:%M", DebutFiltration*60-3600)
    print("Début de filtration : "..HDebFilt)

    UpdateVar(var_PPStart,HDebFilt)
    UpdateVar(var_PPDuree,dureeFiltration)
end

function ChkFiltration()
    --[[Gestion de la filtration
    Start / Stop de la pompe
    Demandes de chloration automaique --]]

    -- Mode de la filtration :
    -- Manu / Auto HC / Auto HP
    
    -- local PpeDuree, val_TEau, val_PpeFl, MinDuJour, PpeStart, today, PpeFait
    local dev_TAir, val_TAir, PpeRest, PpeRestH, HFinFilt, HDebFilt, PpeStartH, PpeDuree, PpeFait
    local eff_Fl, val_PpeFl, MinDuJour, PpeStart, today, val_TEau
    print("Script Piscine : Gestion de la filtration")

    PpeDuree=tonumber(uservariables[var_PPDuree])

    if (otherdevices[dev_ModeFl] ~= "Manu") then
        -- val_TEau = tonumber(string.match(otherdevices_svalues[dev_TEau],"(%d+.%d*);.*")) -- si capteur temperature avec capteur humidité
        val_TEau=tonumber(otherdevices_svalues[dev_TEau]) -- si capteur temperature seul
        val_PpeFl=otherdevices[dev_PpeFl]

        if (val_TEau >= 12) then
            -- La témpérature d'eau est >=12°C : on utilise la temporisation
            MinDuJour=60*time.hour+time.min

            PpeStart=tonumber(string.sub(uservariables[var_PPStart],1,2))*60+tonumber(string.sub(uservariables[var_PPStart],4,5))

            -- Calcul de la durée de fonctionnement de la pompe aujourd'hui
            -- Basé sur le compteur de puissance piscine
            today = os.date("%Y-%m-%d")
            PpeFait=os.capture('sqlite3 '..dbPath..' "select sum(value3) from multimeter where devicerowid='..otherdevices_idx[dev_cptFl]..' and Date(date)=\''..today..'\'"')*5/cst_PpeFl_W
            print("Déjà effectué: "..PpeFait.." minutes sur "..PpeDuree)
           UpdateDev('Filtration effectuée', 0, PpeFait.." minutes sur "..PpeDuree) -- test
            -- Calcul du temps restant de filtration
            PpeRest=PpeDuree-PpeFait
            PpeRestH=os.date("%H:%M", PpeRest*60-3600)
            PpeFaitH=os.date("%H:%M", PpeFait*60-3600)
            PpeDureeH=os.date("%H:%M", PpeDuree*60-3600)
            
            -- PpeRest=round(PpeRest,0)
            if (PpeRest > 0) then
                print("Temps restant de filtration piscine : "..PpeRestH.." heures ")
                --UpdateDev(tps_Fl,0,dureeFiltration)
                UpdateDev('Restant filtration', 0, PpeRestH.." heures ")
                --commandArray[#commandArray+1] = {['UpdateDevice'] = otherdevices_idx[rest_Fl]..'|0|'..PpeRestH..' heures'}
            else 
                print("Filtration piscine finie")
                UpdateDev('Restant filtration', 0, 'Arrêtée')
                -- commandArray[#commandArray+1] = {['UpdateDevice'] = otherdevices_idx[rest_Fl]..'|0|'..'Arrêtée'}
            end
                
                if (MinDuJour >= PpeStart and PpeFait < PpeDuree and val_PpeFl == "Off") then
                    print("Filtration piscine : Démarrage par timer")
                    UpdateSw(dev_PpeFl,'On')
                elseif (PpeFait >= PpeDuree and val_PpeFl == "On") then
                    print("Filtration piscine : Arrêt par timer")
                    UpdateSw(dev_PpeFl,'Off')
                end
            
            -- Calcul de l'heure de début de filtration
            HDebFilt=os.date("%H:%M", PpeStart*60-3600)
            print("Début de filtration : "..HDebFilt)
        --commandArray[#commandArray+1] = {['UpdateDevice'] = otherdevices_idx[heure_Fl]..'|0|'..HDebFilt}
            
            -- Calcul de l'heure de fin de filtration
            HFinFilt=os.date("%H:%M", ((PpeStart*60-3600)+(PpeDuree*60)))
            print("Fin de la filtration a : "..HFinFilt)
        --commandArray[#commandArray+1] = {['UpdateDevice'] = otherdevices_idx[fin_Fl]..'|0|'..HFinFilt}
            
-- Capteur texte pour afficher le bilan de la filtration soit le début de la filtration, la fin de filtration, la filtration effectuée et le temps restant à éffectuer.
            UpdateDev(Bil_Filt, 0, "Début filtration: "..HDebFilt.." \n Fin Filtration: "..HFinFilt.." \n fitration éffectuée: "..PpeFait.." sur: "..PpeDuree.." \n Temps restant de filtration: "..PpeRestH)
            --commandArray[#commandArray+1] = {['UpdateDevice'] = otherdevices_idx[tps_Fl]..'|0|'..'Début: '..PpeStartH..';'..' Fin: '..HFinFilt..';'..'\n Durée: '..PpeDuree..';'..' Fait: '..PpeFait}
        else
            if gst_HorsGel then
                --[[ La température de l'eau est <12°C : on utilise la température 
                Démarrage si température d'eau <= 0.8
                Arrêt si température d'air >= 1.5 et température eau >= 1
                --]]               
                val_Tair = tonumber(otherdevices_svalues[dev_TAir])
                if (val_TEau <= 0.8) and val_PpeFl == "Off" then
                    print("Filtration piscine : Démarrage par température")
                    UpdateSw(dev_PpeFl,'On')
                elseif (val_Tair >= 1.5) and (val_TEau>=1) and val_PpeFl == "On" then
                    print("Filtration piscine : Arrêt par température")
                    UpdateSw(dev_PpeFl,'Off')
                end                
            end

        end -- filtration timer/temperature 
    else
        print("Mode manu, pas de changement")
    end -- end mode auto/manu
end

-- -------------------------------
-- Fin bibliothèque de fonctions
-- -------------------------------

commandArray = {}

time = os.date("*t")

--Calcul de la durée optimale de filtration et de l'heure de démarrage tous le jours à minuit une
if time.hour==0 and time.min ==1 then CalcFiltration() end
--if time.hour==22 and time.min ==35 then CalcFiltration() end   -- mise a jour à 22H35

-- Marche/Arrêt de la pompe de filtration tous les quart d'heures
if (((time.min-1) % 15)== 0) then ChkFiltration() end
--if (((time.min-1) % 1)== 0) then ChkFiltration() end  -- toutes les minutes

-- Mise à jour du compteur de consommation de la piscine toutes les 5min
if (((time.min-2) % 5)== 0) then 
    UpdateP1(dev_cptFl,dev_HC,ConsoDev(dev_PpeFl,cst_PpeFl_W,0),0,5)
end

return commandArray  
Merci beaucoup pour vos aides.

denis_brasseur
Messages : 572
Enregistré le : 24 déc. 2018, 17:05
Localisation : (26)

Re: Domotique Piscine

Message par denis_brasseur »

Jerboy a écrit : 18 mai 2020, 21:47

qui correspond a la ligne

Code : Tout sélectionner

    --Met à jour un device numérique Domotica
    commandArray[CmdIdx] = {['UpdateDevice'] = otherdevices_idx[device]..'|'..tostring(nvalue)..'|'..tostring(svalues)}
De plus, des que j'ai eux cette erreur, mon capteur texte, qui affiche le bilan de la filtration soit le début de la filtration, la fin de filtration, la filtration effectuée et le temps restant à éffectuer, ne s'est plus mis à jour... (en ligne 277 du programme)

L'affichage des valeurs des variables devrait te permettre de trouver l'anomalie :

Code : Tout sélectionner

print('Bil_Filt='..Bil_Filt)
print('HDebFilt='..HDebFilt)
print('HFinFilt='..HFinFilt)
print('PpeFait='..PpeFait)
print('PpeDuree='..PpeDuree)
print('PpeRestH='..PpeRestH)
à placer avant la ligne

Code : Tout sélectionner

-- Capteur texte pour afficher le bilan de la filtration soit le début de la filtration, la fin de filtration, la filtration effectuée et le temps restant à éffectuer.
            UpdateDev(Bil_Filt, 0, "Début filtration: "..HDebFilt.." \n Fin Filtration: "..HFinFilt.." \n fitration éffectuée: "..PpeFait.." sur: "..PpeDuree.." \n Temps restant de filtration: "..PpeRestH)
Pi3 + DD PiDrive + RFXtrx433 + AEON Labs ZW090
7 Modules fil pilote ZMNHJD1
2 détecteur fumées CHACON 34131
5 Bresser Capteur thermo/hygro
1 contacteur porte Philio PST02-1A Z
OWL Micro+ CM180
D2L LINKY
FGR-223 "Roller Shutter 3"

Répondre