chrispec

Avec ce nouveau code: --[[ %% properties 184 sceneActivation 245 sceneActivation 248 sceneActivation 255 sceneActivation %% globals --]] -- Id des MINIMOTES local TelcoMarie = 184; local TelcoMael = 245; local TelcoParents = 248; local TelcoEntree = 255; -- Id des LUMIERES des chambres local LightMarie = 138; local LightMael = 143; local LightParents = 130; local LightEntree = 34; -- Id des VD HUE local VdHueMarie = 240; local VdHueMael = 246; local VdHueParents = 249; local VdHueEntree = 256; --fibaro:debug("scène lancée:" ..sceneActivation) -- Choix de la télécommande MINIMOTE local startSource = fibaro:getSourceTrigger(); if (startSource['type']=='property') then print('Valeur startSource:' ..startSource["type"]) if (startSource['deviceID']==tostring(TelcoMarie)) then fibaro:debug("Numéro telco Chambre Marie: " ..NumSceneMarie) elseif (startSource['deviceID']==tostring(TelcoMael)) then fibaro:debug("Numéro telco Chambre Maà«l: " ..NumSceneMael) elseif (startSource['deviceID']==tostring(TelcoParents)) then fibaro:debug("Numéro telco Chambre Parents: " ..NumSceneParents) elseif (startSource['deviceID']==tostring(TelcoEntree)) then fibaro:debug("Numéro telco Entree: " ..NumSceneEntree) end end --------------------------------------- -- DEBUT CODE MINIMOTE CHAMBRE MARIE -- --------------------------------------- local EtatLightMarie = fibaro:getValue(LightMarie, "value"); local NumSceneMarie = fibaro:getValue(TelcoMarie, "sceneActivation") if (tonumber(NumSceneMarie) == 1) then local IntensiteMarie= 50 -- si égal à 0 (lumière éteinte) alors on allume if (EtatLightMarie == "0") then fibaro:call(LightMarie, "turnOn") fibaro:debug("On Allume la lumière de Marie!") else -- dans le cas contraire (lumière allumée) on éteint fibaro:call(LightMarie, "turnOff") fibaro:debug("On éteint la lumière de Marie") fibaro:debug("Minimote Marie bouton 2 appuyé") end elseif (tonumber(NumSceneMarie) == 2) then -- si égal à 50 if IntensiteMarie == 50 then fibaro:call(VdHueMarie, "setSlider", "3", "50") fibaro:debug("On allume à 50% la lumière de Marie!") else -- dans le cas contraire 25 fibaro:call(VdHueMarie, "setSlider", "3", "25") fibaro:debug("On allume à 25% la lumière de Marie") fibaro:debug("Minimote Marie bouton 2 appuyé") end elseif (tonumber(NumSceneMarie) == 3) then fibaro:call(VdHueMarie, "pressButton", "12") -- rouge fibaro:debug("Minimote Marie bouton 3 appuyé") elseif (tonumber(NumSceneMarie) == 4) then fibaro:call(VdHueMarie, "pressButton", "13") -- orange fibaro:debug("Minimote Marie bouton 4 appuyé") elseif (tonumber(NumSceneMarie) == 5) then fibaro:call(VdHueMarie, "pressButton", "16") -- ciel fibaro:debug("Minimote Marie bouton 5 appuyé") elseif (tonumber(NumSceneMarie) == 6) then fibaro:call(VdHueMarie, "pressButton", "17") -- bleu fibaro:debug("Minimote Marie bouton 6 appuyé") elseif (tonumber(NumSceneMarie) == 7) then fibaro:call(VdHueMarie, "pressButton", "18") -- violet fibaro:debug("Minimote Marie bouton 7 appuyé") elseif (tonumber(NumSceneMarie) == 8) then fibaro:call(VdHueMarie, "pressButton", "19") -- rose fibaro:debug("Minimote Marie bouton 8 appuyé") end --------------------------------------- -- FIN CODE MINIMOTE CHAMBRE MARIE -- --------------------------------------- --------------------------------------- -- DEBUT CODE MINIMOTE CHAMBRE MAEL -- --------------------------------------- local EtatLightMael = fibaro:getValue(LightMael, "value"); local NumSceneMael = fibaro:getValue(TelcoMael, "sceneActivation") if (tonumber(NumSceneMael) == 1) then local IntensiteMael = 50 -- si égal à 0 (lumière éteinte) alors on allume if (EtatLightMael == "0") then fibaro:call(LightMael, "turnOn") fibaro:debug("On Allume la lumière de Maà«l!") else -- dans le cas contraire (lumière allumée) on éteint fibaro:call(LightMael, "turnOff") fibaro:debug("On éteint la lumière de Maà«l") fibaro:debug("Minimote Maà«l bouton 1 appuyé") end elseif (tonumber(NumSceneMael) == 2) then -- si égal à 50 if IntensiteMael == 50 then fibaro:call(VdHueMael, "setSlider", "3", "50") fibaro:debug("On allume à 50% la lumière de Maà«l!") fibaro:debug("Minimote Maà«l bouton 2 appuyé") else -- dans le cas contraire 25 fibaro:call(VdHueMael, "setSlider", "3", "25") fibaro:debug("On allume à 25% la lumière de Maà«l") fibaro:debug("Minimote Maà«l bouton 2 appuyé") end elseif (tonumber(NumSceneMael) == 3) then fibaro:call(VdHueMael, "pressButton", "12") -- rouge fibaro:debug("Minimote Maà«l bouton 3 appuyé") elseif (tonumber(NumSceneMael) == 4) then fibaro:call(VdHueMael, "pressButton", "13") -- orange fibaro:debug("Minimote Maà«l bouton 4 appuyé") elseif (tonumber(NumSceneMael) == 5) then fibaro:call(VdHueMael, "pressButton", "16") -- ciel fibaro:debug("Minimote Maà«l bouton 5 appuyé") elseif (tonumber(NumSceneMael) == 6) then fibaro:call(VdHueMael, "pressButton", "17") -- bleu fibaro:debug("Minimote Maà«l bouton 6 appuyé") elseif (tonumber(NumSceneMael) == 7) then fibaro:call(VdHueMael, "pressButton", "18") -- violet fibaro:debug("Minimote Maà«l bouton 7 appuyé") elseif (tonumber(NumSceneMael) == 8) then fibaro:call(VdHueMael, "pressButton", "19") -- rose fibaro:debug("Minimote Maà«l bouton 8 appuyé") end --------------------------------------- -- FIN CODE MINIMOTE CHAMBRE MAEL -- --------------------------------------- local EtatLightParents = fibaro:getValue(LightParents, "value"); local NumSceneParents = fibaro:getValue(TelcoParents, "sceneActivation") --------------------------------------------- -- DEBUT CODE MINIMOTE CHAMBRE DES PARENTS -- --------------------------------------------- if (tonumber(NumSceneParents) == 1) then local IntensiteParents = 50 -- si égal à 0 (lumière éteinte) alors on allume if (EtatLightParents == "0") then fibaro:call(LightParents, "turnOn") fibaro:debug("On Allume la lumière de la chambre des Parents!") fibaro:debug("Minimote Parents bouton 1 appuyé") else -- dans le cas contraire (lumière allumée) on éteint fibaro:call(LightParents, "turnOff") fibaro:debug("On éteint la lumière de la chambre des parents") fibaro:debug("Minimote Parents bouton 1 appuyé") end elseif (tonumber(NumSceneParents) == 2) then -- si égal à 50 if IntensiteParents == 50 then fibaro:call(VdHueParents, "setSlider", "3", "50") fibaro:debug("On allume à 50% la lumière de la chambre des parents!") fibaro:debug("Minimote Parents bouton 2 appuyé") else -- dans le cas contraire 25 fibaro:call(VdHueParents, "setSlider", "3", "25") fibaro:debug("On allume à 25% la lumière de la chambre des parents") fibaro:debug("Minimote Parents bouton 2 appuyé") end elseif (tonumber(NumSceneParents) == 3) then fibaro:call(VdHueParents, "pressButton", "12") -- rouge fibaro:debug("Minimote Maà«l bouton 3 appuyé") elseif (tonumber(NumSceneParents) == 4) then fibaro:call(VdHueParents, "pressButton", "13") -- orange fibaro:debug("Minimote Parents bouton 4 appuyé") elseif (tonumber(NumSceneParents) == 5) then fibaro:call(VdHueParents, "pressButton", "16") -- ciel fibaro:debug("Minimote Parents bouton 5 appuyé") elseif (tonumber(NumSceneParents) == 6) then fibaro:call(VdHueParents, "pressButton", "17") -- bleu fibaro:debug("Minimote Parents bouton 6 appuyé") elseif (tonumber(NumSceneParents) == 7) then fibaro:call(VdHueParents, "pressButton", "18") -- violet fibaro:debug("Minimote Parents bouton 7 appuyé") elseif (tonumber(NumSceneParents) == 8) then fibaro:call(VdHueParents, "pressButton", "19") -- rose fibaro:debug("Minimote Parents bouton 8 appuyé") end ------------------------------------------- -- FIN CODE MINIMOTE CHAMBRE DES PARENTS -- ------------------------------------------- -------------------------------- -- DEBUT CODE MINIMOTE ENTREE -- -------------------------------- local EtatLightEntree = fibaro:getValue(LightEntree, "value"); local NumSceneEntree = fibaro:getValue(TelcoEntree, "sceneActivation") local VoletsTous = {16, 18, 20, 22, 24, 26}; local VoletsRDC = {22, 24, 26}; local VoletsJardin = {18, 20, 22, 24, 26}; --tous sauf chambre parents local LumieresToutes = {32, 28, 237, 138, 143, 130, 34, 194, 19, 36}; local LumieresRDC = {32, 28, 34}; local VoletMarie = 18; local VoletMael = 20; local LumiereMarie = 138; local LumiereMael = 143; local VdMarie = 240; local VdMael = 246; if (tonumber(NumSceneEntree) == 1) then for i = 1, #LumieresToutes do fibaro:call(LumieresToutes[i], "turnOff") fibaro:debug("On éteint toutes les lumières de la maison") fibaro:debug("MiniMote Entree: bouton 1 appuyé") end elseif (tonumber(NumSceneEntree) == 2) then for j = 1, #VoletsTous do fibaro:call(VoletsTous[j], "turnOff") fibaro:debug("On ferme tous les volets") fibaro:debug("MiniMote Entree: bouton 2 appuyé") end elseif (tonumber(NumSceneEntree) == 3) then fibaro:debug("MiniMote button 3 appuyé: DEBUT ALERTE") fibaro:call(LumiereMarie, "turnOn") fibaro:call(LumiereMael, "turnOn") fibaro:call(VoletMarie, "close") fibaro:call(VoletMael, "close") fibaro:sleep(2000) fibaro:call(VdMarie, "pressButton", "12") fibaro:call(VdMael, "pressButton", "12") fibaro:call(VdMarie, "pressButton", "8") fibaro:call(VdMael, "pressButton", "8") fibaro:sleep(29000) fibaro:call(LumiereMarie, "turnOff") fibaro:call(LumiereMael, "turnOff") fibaro:debug("MiniMote Entree: bouton 3 - FIN ALERTE ") elseif (tonumber(NumSceneEntree) == 4) then fibaro:call(LumiereMarie, "turnOff") fibaro:call(LumiereMael, "turnOff") fibaro:debug("MiniMote Entree: bouton 4 appuyé: lumières enfants éteintes") elseif (tonumber(NumSceneEntree) == 5) then for m = 1, #VoletsRDC do fibaro:call(VoletsRDC[m], "close") --fermeture volets RDC fibaro:debug("MiniMote Entree: bouton 5 appuyé: FERMETURE volets RDC") end elseif (tonumber(NumSceneEntree) == 6) then for n = 1, #VoletsRDC do fibaro:call(VoletsRDC[n], "stop") fibaro:debug("MiniMote Entree: bouton 6 appuyé: STOP fermeture") end elseif (tonumber(NumSceneEntree) == 7) then for o = 1, #VoletsRDC do fibaro:call(VoletsRDC[o], "open") fibaro:debug("MiniMote Entree: bouton 7 appuyé: OUVERURE volets RDC") end elseif (tonumber(NumSceneEntree) == 8) then for p = 1, #VoletsRDC do fibaro:call(VoletsRDC[p], "stop") fibaro:debug("MiniMote Entree: bouton 8 appuyé: STOP ouverture") end end ------------------------------ -- FIN CODE MINIMOTE ENTREE -- ------------------------------ En appuyant sur le bouton 1 de la minimote 'parents' (n°3): [DEBUG]: Valeur startSource: property [DEBUG]: On allume la lumière de Marie [DEBUG]: On allume la lumière de Maà«l [DEBUG]: On allume la lumière des parents [DEBUG]: Minimote Parents bouton 1 appuyé [DEBUG]: Minimote Entree: bouton 4 appuyé: lumières enfants éteintes Lignes DEBUG 2, 5 et 6 ok ...les 1, 3 et 4 ??? Une idée ?

avec: print('Valeur startSource:' ..startSource["type"]) et ligne 39 en commentaire: Alors [DEBUG]: Valeur startSource: property

oui séparées elles marchent

suivant ton premier conseil (debug ligne 39 et print ligne 43): [ERROR] line 39: attempt to concatenate global 'sceneActivation' (a nil value) Et si je passe la ligne 39 en commentaire: [ERROR] line 43: attempt to concatenate local 'startSource' (a table value)

je teste ce soir merki

Ainsi: ? En 38: fibaro:debug("scène lancée:" ..sceneActivation) Et entre 41 et 42: print('Valeur startSource:' ..startSource)

Merci de l'idée Shad, mais y en a plein de 'fibaro:debug' ... Aucun ne s'affiche... pas de retour. Où me conseillerais-tu d'en rajouter alors ?

un petit up

Bonjour Pepite, la couleur rouge est la seule à marcher (avec le code d'hier) ... à chaque nouvelle impulsion ... l'ampoule reste rouge et un nouveau [DEBUG]...: rouge Je verrai à nouveau ce soir avec les parenthèses en plus Merci de l'idée...

[DEBUG] 00:00:12: Rouge [DEBUG] 00:00:14: Rouge [DEBUG] 00:00:16: Rouge ...

Testé et toujours que la première couleur "Rouge" ... (pas de problème de 'cAsE') A s’arracher les cheveux! --[[ %% properties 255 sceneActivation %% globals --]] local IdMinimoteTest = 255 local IdVDTest = 256 local NumSceneTest = fibaro:getValue(IdMinimoteTest, "sceneActivation") local RecupCouleurHue = fibaro:getGlobalValue("CouleurHue") if (tonumber(NumSceneTest) == 1) then fibaro:call(34, "turnOn") fibaro:sleep(2000) local VarianteCouleurHue = 12 fibaro:setGlobal("CouleurHue", "Rouge") fibaro:call(256, "pressButton", VarianteCouleurHue) fibaro:debug(RecupCouleurHue) elseif (tonumber(NumSceneTest) == 1) and (RecupCouleurHue == "Rouge") then local VarianteCouleurHue = 13 fibaro:setGlobal("CouleurHue", "Orange") fibaro:call(256, "pressButton", VarianteCouleurHue) fibaro:debug(RecupCouleurHue) elseif (tonumber(NumSceneTest) == 1) and (RecupCouleurHue == "Orange") then local VarianteCouleurHue = 14 fibaro:setGlobal("CouleurHue", "Jaune") fibaro:call(256, "pressButton", VarianteCouleurHue) fibaro:debug(RecupCouleurHue) elseif (tonumber(NumSceneTest) == 1) and (RecupCouleurHue == "Jaune") then local VarianteCouleurHue = 15 fibaro:setGlobal("CouleurHue", "Vert") fibaro:call(256, "pressButton", VarianteCouleurHue) fibaro:debug(RecupCouleurHue) elseif (tonumber(NumSceneTest) == 1) and (RecupCouleurHue == "Vert") then local VarianteCouleurHue = 16 fibaro:setGlobal("CouleurHue", "Ciel") fibaro:call(256, "pressButton", VarianteCouleurHue) fibaro:debug(RecupCouleurHue) elseif (tonumber(NumSceneTest) == 1) and (RecupCouleurHue == "Ciel") then local VarianteCouleurHue = 17 fibaro:setGlobal("CouleurHue", "Bleu") fibaro:call(256, "pressButton", VarianteCouleurHue) fibaro:debug(RecupCouleurHue) fibaro:debug("MiniMote button 1 pressed") end

Bonjour Je n'ai pas eu le temps de tester encore. Je tenterai ce soir. Entre tondre, scarifier et regarnir le gazon cramé de cet été ... j'ai eu un sacré WE ... Je te tiens au jus

dommage pour le tableau ce sera aussi pour plus tard ... cela semble la solution la plus optimisée ... d'un point de vue principe et maintenance de code ...

Bonjour pepite Merci de ton support ! Oui, j'ai bien créé une VG CouleurHUE. Je n'ai pas envie de passer à autre chose tant que cela n'est pas résolu Je retenterai ce soir... Merci encore;)

Bonsoir pepite, merci pour tes propositions! J'ai essayé il ne marche pas Il m'affiche la première couleur, mais après rien, même pas de 'bug' ... comme avec mon code

Salut Malheureusement l'adaptation n'a pas marché et bébé ne m'a pas laissé trop de temps non plus Pour la compréhension Je n'avais certainement pas dû bien expliquer au premier post... Je retenterai ce soir ...

Je comprends pepite. J'ai un bouton sur la minimote... le n°3 J'ai un VD avec 10 boutons: chaque bouton de ce VD donne une couleur pour une ampoule Hue. L'appui sur le bouton de la minimote permettra d'incrémenter une variable de 1 à 10. Et dans la table, il y a les 10 id des boutons du VD ... En résumé ... regrouper 10 boutons du VD sur un seul de la télécommande. Je change de couleur l'ampoule à chaque nouvel appui.

bonjour pépite, Je te remercie ! Je testerai ce soir! Dois-je ajouter une boucle de test ? Ex: si 10 choix de VarianteCouleur ( if VarianteCouleur <10 then ... et VarianteCouleur = VarianteCouleur + 1) ? Comment me conseillerais-tu de procéder alors ?

Bonsoir @jojo! Merci de ta réponse. En fait, ce code est une partie de code. Il y a 8 boutons ... un IF et une suite de 7 ELSEIF ... pour la question ... j'aurais pu mettre un IF ... Un IF ou ELSEIF 'si bouton 1 à 8 appuyé ... then ... (boutons physiques de la minimote) Le code ci-dessus est dans une scène. VarianteCouleur est le numéro du bouton dans un VD. J'ai 8 boutons du VD (boutons virtuels) de 12 à 19. Le premier appui sur le bouton 3 de la télécommande Minimote donne la couleur 'rouge' à l'ampoule (bouton n°12 du VD) Le second appui sur le bouton 3 de la télécommande Minimote donne la couleur 'orange' à l'ampoule (bouton n°13 du VD) ... Voilà ...

Peut-être ce code ? Local VarianteCouleur = 12 elseif (tonumber(MinimoteTest) == 3) and VarianteCouleur <= 19 then fibaro:call(VdHUE, "pressButton", VarianteCouleur) VarianteCouleur = VarianteCouleur + 1 if VarianteCouleur = 19 then VarianteCouleur = 12 end

Bonjour, Que pensez-vous du code (action sur un bouton de minimote): Local VarianteCouleur == { "12", "13", "14", "15", "16", "17", "18", "19"} Local i = 1 elseif (tonumber(MinimoteTest) == 3) and i<= 8 then fibaro:call(VdHUE, "pressButton", VarianteCouleur[i]) i = i + 1 if i = 8 then i = 1 end VdHUE est l'id du VD d'une ampoule HUE. Objectif: une nouvelle couleur (bouton du VD) à chaque nouvelle impulsion de bouton de minimote Je vous remercie de vos commentaires. A la clé ... VD Hue + Scène de la minimote en partage ... et en option* ... une scène pour X minimotes (même cas d'utilisation: une Hue principale dans les chambres des enfants ) Un VD pour X Hue ? * si ça veut bien marcher !

Bonjour à tous, Les codes de mprinfo marchent. Je me pose la question de la valeur 'orientation des lamelles' cf le post: http://www.domotique-fibaro.fr/index.php/topic/3398-ouvrir-seulement-les-lamelles-de-mes-volets-v%C3%A9nitiens/?hl=lamelles Comment peut-on rajouter le paramètre "orientation des lamelles" à la fonction Lever() et Coucher() ? Comme dit razowski: Pour garder le store en bas mais juste ouvrir les lamelles : (ouverture le matin) fibaro:call(ID_de_ton_module, "setValue", "2"); ...2% d'ouverture du volet fibaro:call(ID_de_ton_module, "setValue2", "99"); ...ouverture à 100% des lamelles (position horizontale...) Pour garder le store en bas mais juste fermer les lamelles: (le soir fibaro:call(ID_de_ton_module, "setValue", "99"); fibaro:call(ID_de_ton_module, "setValue2", "99"); Merci de vos pistes et aides...

module de Krikroff ? lequel ?

Bonjour BenjyNet, C'est aussi l'interrogation de Laurent sur son blog: http://gurau-audibert.hd.free.fr/josdblog/2015/03/communication-en-lua-avec-la-centrale-myfox/#more-6458 D'ailleurs, en voulant m'inspirer de: http://www.domotique-fibaro.fr/index.php/topic/776-module-pour-gestion-des-volets-automatique/ Pour VD: (variable globale SysMyfox avec comme valeurs: ON, OFF et PARTIEL) Pour un des boutons: Et pour le Mainloop: --[[ %% properties %% globals –]] --local https = require("ssl.https") local identifiant = '<identifiant>' local motDePasse = '<mot de passe>' local clientID = '<Client ID>' local clientSecret = '<Client Secret>' local siteId = '<Site Id>' local access_token = nil local refresh_token = nil local echeance = nil -- Request access token function acquerirJeton() local url = 'https://api.myfox.me/oauth2/token' local post = string.format('grant_type=password&client_id=%s&client_secret=%s&username=%s&password=%s', clientID, clientSecret, identifiant, motDePasse) local body, code = https.request(url, post) assert(code == 200) access_token, refresh_token = string.match(body, '"access_token":"([^"]*)".*"refresh_token":"([^"]*)"') end -- Refreshing an expired access_token function renouvelerJeton() local url = 'https://api.myfox.me/oauth2/token' local post = string.format('grant_type=refresh_token&refresh_token=%s&client_id=%s&client_secret=%s', refresh_token, clientID, clientSecret) local body, code = https.request(url, post) assert(code == 200) access_token, refresh_token = string.match(body, '"access_token":"([^"]*)".*"refresh_token":"([^"]*)"') end -- Statut de l'alarme : 'disarmed', 'partial' ou 'armed' function statut() local url = string.format('https://api.myfox.me:443/v2/site/%s/security?access_token=%s', tostring(siteId), access_token) local body, code = https.request(url) assert(code == 200) local statut = string.match(body, '"statusLabel":"([^"]*)"') return statut fibaro:setGlobal("SysMyfox", statut); end Qu'en penses-tu ?

Bonjour, Avis aux possesseurs d'alarmes Myfox, je viens de trouver cela: http://gurau-audibert.hd.free.fr/josdblog/2015/03/communication-en-lua-avec-la-centrale-myfox/#more-6458 Ce qui nous ferait ... --[[ %% properties %% globals –]] local https = require("ssl.https") local identifiant = '<identifiant>' local motDePasse = '<mot de passe>' local clientID = '<Client ID>' local clientSecret = '<Client Secret>' local siteId = '<Site Id>' local access_token = nil local refresh_token = nil local echeance = nil -- Request access token function acquerirJeton() local url = 'https://api.myfox.me/oauth2/token' local post = string.format('grant_type=password&client_id=%s&client_secret=%s&username=%s&password=%s', clientID, clientSecret, identifiant, motDePasse) local body, code = https.request(url, post) assert(code == 200) access_token, refresh_token = string.match(body, '"access_token":"([^"]*)".*"refresh_token":"([^"]*)"') end -- Refreshing an expired access_token function renouvelerJeton() local url = 'https://api.myfox.me/oauth2/token' local post = string.format('grant_type=refresh_token&refresh_token=%s&client_id=%s&client_secret=%s', refresh_token, clientID, clientSecret) local body, code = https.request(url, post) assert(code == 200) access_token, refresh_token = string.match(body, '"access_token":"([^"]*)".*"refresh_token":"([^"]*)"') end -- Statut de l'alarme : 'disarmed', 'partial' ou 'armed' function statut() local url = string.format('https://api.myfox.me:443/v2/site/%s/security?access_token=%s', tostring(siteId), access_token) local body, code = https.request(url) assert(code == 200) local statut = string.match(body, '"statusLabel":"([^"]*)"') return statut end Je le testerai ce WE ... avis aux intéressés ...