Rechercher dans la communauté

Bonjour, Petit partage d'un VD qui permet de récupérer les valeurs des 8 entrées et des 8 sorties d'une ipx800 afin de les exploiter ou dans des VDs, ou dans GEA :- Il faut donc 8 variables globales pour les entrées : IPX_IN1 IPX_IN2 etc jusqu'à IPX_IN8 Il faut 8 variables globales pour les sorties : RELAIS1 RELAIS 2 etc jusqu'à RELAIS8 Deux boutons de MAJ et 16 labels. Certains libellés dans ce VD sont adapté à mon utilisation, modifiez les! (Pensez également à changer l'adresse ip, chez moi 192.168.1.60) Suite aux remarques (très intéressante) de ce fil, voilà la nouvelle version : VERSION 3 (MAJ du 28/11/15) - Permet d'utiliser le PUSH de l'ipx (et donc ne faire qu'une requête lors d'un changement d'état d'une entrée) - A configurer dans l'ipx (appuie sur le BP Maj de ce VD) - Code plus simple - Permet la mise à jour des VDs qui changent les icônes. - Permet de gérer les sorties avec le retour d'info A reconfigurer pour votre usage : Pour les entrées : Variable local VD_nom (juste pour se rappeler sur quoi c'est branché ) Variable local VD_ID_IPX (L'id des VD à mettre à jour) - Mettre nil si aucune action voulu Variable local VD_BP_IPX (Le BP a appuyer pour la MAJ du Vd en question) - Mettre nil si aucune action voulu Variable local VariablesIPX (qui correspond au variables globales a modifier en fonction des entrées) Pour les sorties : local VD_NOM_SORTIES (Toujours pour se rappeler sur quoi c'est branché ) local VD_ID_IPX_SORTIES (L'id des VD à mettre à jour) - Mettre nil si aucune action voulu local VD_BP_IPX_SORTIES (Le BP a appuyer pour la MAJ du Vd en question) - Mettre nil si aucune action voulu local VD_LABEL_SORTIES (les valeurs des labels à modifier) Supprimer les lignes de debug après mise en place Coté IPX : On configure le push sur les entrées afin d'appuyer sur le BP MAJ Entrée et on configure le push sur les sorties afin d'appuyer sur le BP MAJ Sorties. Exemple pour les entrées : /api/callAction?deviceID=104&name=pressButton&arg1=9 104 étant l'id du VD MAJ et 9 étant le bouton à appuyer pour la maj des entrées Exemple pour les sorties : /api/callAction?deviceID=104&name=pressButton&arg1=18 104 étant l'id du VD MAJ et 18 étant le bouton à appuyer pour la maj des sorties Bouton de MAJ Entrées : HC2 = Net.FHttp("192.168.1.60") response = HC2:GET("/api/xdevices.json?cmd=10") response = json.decode(response) local i = 1 local TotalEntrees = 8 + 1 local Rvar = {response.IN1,response.IN2,response.IN3,response.IN4,response.IN5,response.IN6,response.IN7,response.IN8} local VariablesIPX = {"IPX_IN1","IPX_IN2","IPX_IN3","IPX_IN4","IPX_IN5","IPX_IN6","IPX_IN7","IPX_IN8"} local VD_NOM = {"IR","Libre","Etat AL","En Al","Courrier","Scene3","Scene2","Scene1"} -- Juste pour Aide local VD_ID_IPX = {nil,nil,88,88,92,nil,nil,nil} -- ID des VD à mettre à jour local VD_BP_IPX = {nil,nil,3,3,2,nil,nil,nil} -- Numéro des boutons de MAJ des VD DateHeure = os.date("%Y-%m-%d %H:%M:%S", os.time()) fibaro:log(DateHeure.."") fibaro:debug(DateHeure) while i < TotalEntrees do fibaro:debug(i) fibaro:setGlobal(VariablesIPX[i], Rvar[i]) fibaro:call(fibaro:getSelfId(), "setProperty", "ui.Label"..i..".value", Rvar[i]); fibaro:debug("Reponse entrée IPX : " ..i.." = " ..Rvar[i]) fibaro:debug("Nom du module = " ..VD_NOM[i]) if VD_ID_IPX[i] == nil then fibaro:debug("VD non configuré, rien à faire.") else fibaro:debug("Il faut appuyer sur le bouton : " ..VD_BP_IPX[i].. " de la VD id : " ..VD_ID_IPX[i]) fibaro:call(VD_ID_IPX[i], "pressButton", VD_BP_IPX[i]) end i = i + 1 end Bouton de Maj Sorties : HC2 = Net.FHttp("192.168.1.60") response = HC2:GET("/api/xdevices.json?cmd=20") response = json.decode(response) local i = 1 local TotalSorties = 8 + 1 local RvarSorties = {response.OUT1,response.OUT2,response.OUT3,response.OUT4,response.OUT5,response.OUT6,response.OUT7,response.OUT8} local VariablesIPXSorties = {"RELAIS1","RELAIS2","RELAIS3","RELAIS4","RELAIS5","RELAIS6","RELAIS7","RELAIS8"} local VD_NOM_SORTIES = {"VanneEAU","SecheServiette","ECL-EXT","Arrosage","PAC-Piscine","Filtration-Piscine","ECL-Piscine","Ventilation"} -- Juste pour Aide local VD_ID_IPX_SORTIES = {nil,85,84,nil,95,94,93,74} -- ID des VD à mettre à jour local VD_BP_IPX_SORTIES = {nil,4,4,nil,4,4,4,4} -- Numéro des boutons de MAJ des VD local VD_LABEL_SORTIES = {9,10,11,12,13,14,15,16} -- Label pour affichage des sorties DateHeure = os.date("%Y-%m-%d %H:%M:%S", os.time()) fibaro:log(DateHeure.."") fibaro:debug(DateHeure) while i < TotalSorties do fibaro:debug(i) fibaro:setGlobal(VariablesIPXSorties[i], RvarSorties[i]) fibaro:call(fibaro:getSelfId(), "setProperty", "ui.Label"..VD_LABEL_SORTIES[i]..".value", RvarSorties[i]); fibaro:debug("Reponse Sortie IPX : " ..i.." = " ..RvarSorties[i]) fibaro:debug("Nom du module = " ..VD_NOM_SORTIES[i]) if VD_ID_IPX_SORTIES[i] == nil then fibaro:debug("VD non configuré, rien à faire.") else fibaro:debug("Il faut appuyer sur le bouton : " ..VD_BP_IPX_SORTIES[i].. " de la VD id : " ..VD_ID_IPX_SORTIES[i]) fibaro:call(VD_ID_IPX_SORTIES[i], "pressButton", VD_BP_IPX_SORTIES[i]) end i = i + 1 end Exemples de VD Entrée : 1 label, 1 bouton de MAJ local icone = { ["DETECTION"] = 100, --numéro icone à renseigner ["PASDETECTION"] = 99, } if fibaro:getGlobalValue("IPX_IN1") == '1' then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label1.value", "Non") fibaro:call(fibaro:getSelfId(), "setProperty", "currentIcon", icone["PASDETECTION"]) else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label1.value", "Oui") fibaro:call(fibaro:getSelfId(), "setProperty", "currentIcon", icone["DETECTION"]) fibaro:log("Mouvement!!") end Exemple de Vd pour contrôle sortie 7 (et retour d'info) : 1 label, deux bouton ON/OFF, un bouton Maj Bouton on : Simplement mettre "Set071" en chaine et cochant "en attente de réponse du périphérique" Bouton off : "Set070" en chaine et cochant "en attente de réponse du périphérique" Bouton Maj : local icone = { ["ECLPON"] = 90, --numéro icone à renseigner ["ECLPOFF"] = 89, } if fibaro:getGlobalValue("RELAIS7") == '1' then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label1.value", "On") fibaro:call(fibaro:getSelfId(), "setProperty", "currentIcon", icone["ECLPON"]) fibaro:log("Eclairage ON") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label1.value", "Off") fibaro:call(fibaro:getSelfId(), "setProperty", "currentIcon", icone["ECLPOFF"]) fibaro:log("Eclairage OFF") end ANCIENNE VERSION 1 (Plus lourde, bcp de requêtes et ne met pas les VD d'état additionnel à jour) Coté bouton de MAJ : HC2 = Net.FHttp("192.168.1.60") response = HC2:GET("/api/xdevices.json?cmd=10") response = json.decode(response) fibaro:setGlobal("IPX_IN1", response.IN1) fibaro:setGlobal("IPX_IN2", response.IN2) fibaro:setGlobal("IPX_IN3", response.IN3) fibaro:setGlobal("IPX_IN4", response.IN4) fibaro:setGlobal("IPX_IN5", response.IN5) fibaro:setGlobal("IPX_IN6", response.IN6) fibaro:setGlobal("IPX_IN7", response.IN7) fibaro:setGlobal("IPX_IN8", response.IN8) DateHeure = os.date("%Y-%m-%d %H:%M:%S", os.time()) fibaro:log(DateHeure.."") fibaro:debug(DateHeure) local relais1 = fibaro:getGlobalValue("IPX_IN1") local relais2 = fibaro:getGlobalValue("IPX_IN2") local relais3 = fibaro:getGlobalValue("IPX_IN3") local relais4 = fibaro:getGlobalValue("IPX_IN4") local relais5 = fibaro:getGlobalValue("IPX_IN5") local relais6 = fibaro:getGlobalValue("IPX_IN6") local relais7 = fibaro:getGlobalValue("IPX_IN7") local relais8 = fibaro:getGlobalValue("IPX_IN8") if (relais1 == '0') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label1.value", "Oui") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label1.value", "Non") end if (relais2 == '0') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label2.value", "Actif") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label2.value", "Off") end if (relais3 == '1') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label3.value", "Armé") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label3.value", "Désarmé") end if (relais4 == '1') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label4.value", "En Alarme!") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label4.value", "RAS") end if (relais5 == '1') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label5.value", "Oui") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label5.value", "Non") end if (relais6 == '1') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label6.value", "On") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label6.value", "Off") end if (relais7 == '1') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label7.value", "On") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label7.value", "Off") end if (relais8 == '1') then fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label8.value", "On") else fibaro:call(fibaro:getSelfId(),"setProperty","ui.Label8.value", "Off") end Boucle principal : local myDeviceID = fibaro:getSelfId() if type(n) == "nil" then n1 = tonumber(os.time()) fibaro:call(myDeviceID, "pressButton", "1") n = 1 end if tonumber(os.time()) > n1 + (4) then fibaro:call(myDeviceID, "pressButton", "1") n1 = tonumber(os.time()) end Eclairage_Piscine.vfib IPX800_E-S.vfib