pepite

Test numero 956 412 ;-) - Temporisation variabilisée dans les "User Settings", je ne sais pas si c'est possible, a tester --[[ %% properties 208 value %% globals --]] ------ User settings ----- local id_RGBs = {239, 545} -- liste des IDs des RGBs concernés local ProgRGB = 546 -- Programme "alerte" souhaité à mettre sur les RGBs local Tempo = 15 -- En secondes, durée de la mise sur le programme "ALERTE" des RGBs, avant remise des valeurs précédentes -------------------- --------- Limitation à 1 seule instance --------- if (fibaro:countScenes() > 1) then fibaro:abort() end ---------------------------------------------- local currentdate = os.date("%d/%m/%Y %H:%M:%S") fibaro:debug("Démarrage du script : " ..currentdate) -- fonction split ---- function split(s, pattern, maxsplit) local pattern = pattern or ' ' local maxsplit = maxsplit or -1 local s = s local t = {} local patsz = #pattern while maxsplit ~= 0 do local curpos = 1 local found = string.find(s, pattern) if found ~= nil then table.insert(t, string.sub(s, curpos, found - 1)) curpos = found + patsz s = string.sub(s, curpos) else table.insert(t, string.sub(s, curpos)) break end maxsplit = maxsplit - 1 if maxsplit == 0 then table.insert(t, string.sub(s, curpos - patsz - 1)) end end return t end ---------- --------------function GetPutValueRGB---- function GetPutValueRGBs(id) for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) -- Debug valeur result et prog fibaro:debug("RGB num " ..id_RGBs[i].. " avait comme Couleur : " ..result[1]..","..result[2]..","..result[3]..","..result[4]) fibaro:debug("RGB num " ..id_RGBs[i].. " était sur le Programme " ..Prog) -- SI activation cellule 208, demarrage des RGB sur le programme ProgRGB fibaro:debug("Mise des RGBs sur Programme : " ..ProgRGB) fibaro:call(id_RGBs[i], "startProgram", ProgRGB) setTimeout( function() fibaro:debug("Remise des valeurs précédentes sur les RGBs") if ((result[1] == "0" and result[2] == "0" and result[3] == "0" and result[4] == "0") and (tonumber(Prog) > 0)) then fibaro:call(id_RGBs[i], "startProgram", Prog) fibaro:debug("Prog " ..Prog.. " sur " ..id_RGBs[i]) else fibaro:call(id_RGBs[i], "setColor", result[1], result[2], result[3], result[4]) fibaro:debug("Couleur sur : " ..id_RGBs[i]) end end, Tempo*1000) --tempo end end ---------- GetPutValueRGBs()

je suis plus que timide en code, la fonction split vient du code que tu as recupéré. j'aurais jamais pu ecrire ca, j'ai du mal a la comprendre lol Le fonctionnement à approuver par @did - sans variable - on doit pouvoir mettre autant de RGBs que l'on veut. - stocke l'etat de chaque RGB avant une "alerte", soit couleur soit programme. - mise en alerte des RGBs sur un programme : variable ProgRGB - pour les besoins de @Did, tempo de 15 secs sur l'alerte, modifiable facilement je pense qu'on doit pouvoir appeler une varaible dans le setTimeout - remise des Valeurs sur le RGB avant l'alerte, eteint,couleur ou prog

si effectivement c'est le bon code auj : tu vas pouvoir y aller ;-) @domodial c'est @did qui a bien voulu faire tous les tests ;-) je l'ai bien embete !!

Cool, c'est pas mal d'après le debug ;-) Et les 2 bandeaux se mettent sur le 54 en même temps ? plus de latence ? Quand veux tu que le message TTS ait lieu ? avant la mise sur le 546 ou après ? Pour éviter la latence tu peux faire un mp3 si le message est toujours identique.

Et comme ceci : Modifications : - appel que d'1 fonction - limitation scene à une seule instance --[[ %% properties 208 value %% globals --]] ------ User settings ----- local id_RGBs = {239, 545} local ProgRGB = 546 --------------- --------- Limitation à 1 seule instance --------- if (fibaro:countScenes() > 1) then fibaro:abort() end ---------------------------------------------- local currentdate = os.date("%d/%m/%Y %H:%M:%S") fibaro:debug("Démarrage du script : " ..currentdate) -- fonction split ---- function split(s, pattern, maxsplit) local pattern = pattern or ' ' local maxsplit = maxsplit or -1 local s = s local t = {} local patsz = #pattern while maxsplit ~= 0 do local curpos = 1 local found = string.find(s, pattern) if found ~= nil then table.insert(t, string.sub(s, curpos, found - 1)) curpos = found + patsz s = string.sub(s, curpos) else table.insert(t, string.sub(s, curpos)) break end maxsplit = maxsplit - 1 if maxsplit == 0 then table.insert(t, string.sub(s, curpos - patsz - 1)) end end return t end ---------- --------------function GetPutValueRGB---- function GetPutValueRGBs(id) for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) -- Debug valeur result et prog fibaro:debug("RGB num " ..id_RGBs[i].. " avait comme Couleur : " ..result[1]..","..result[2]..","..result[3]..","..result[4]) fibaro:debug("RGB num " ..id_RGBs[i].. " était sur le Programme " ..Prog) -- SI activation cellule 208, demarrage des RGB sur le programme ProgRGB fibaro:debug("Mise des RGBs sur Programme : " ..ProgRGB) fibaro:call(id_RGBs[i], "startProgram", ProgRGB) setTimeout( function() fibaro:debug("Remise des valeurs précédentes sur les RGBs") if ((result[1] == "0" and result[2] == "0" and result[3] == "0" and result[4] == "0") and (tonumber(Prog) > 0)) then fibaro:call(id_RGBs[i], "startProgram", Prog) fibaro:debug("Prog " ..Prog.. " sur " ..id_RGBs[i]) else fibaro:call(id_RGBs[i], "setColor", result[1], result[2], result[3], result[4]) fibaro:debug("Couleur sur : " ..id_RGBs[i]) end end, 15000) --tempo 15 secs end end ---------- GetPutValueRGBs()

Salut @jojo, Sur mac, j'utilise Sublime Text depuis peu, j'utilisais Editra, mais je prefere Sublime Text, quoique pas encore tout compris à la conf, amis j'aime bien.

Bonjour, ah oui rien de grave @mprinfo ? courage @did, donc cela fonctionne avec le setTimeout pour les 15 secs, on y est presque. heuuu, alors 2 bugs : 1- ca boucle 2 fois ? hihihi, il recupere le programme précédent : ok mais recupere aussi apres etre passe en 546...heuuu 2- il remet le 546 à la fin comme tu m'as dit et on le voit bien sur le debug hihihi Merci, des boulettes dans le code encore lol

Bonjour, @elacombe, Si ton interr est ton Wallplug, comme ceci, avec le Inverse, qui dit si interrrupteur éteint alors allume GEA.add(id ["Interrupteur_VMC"], -1, "", {{"Inverse"}, {"Time", "06:00", "10:00"}, {"turnOn", id["Interrupteur_VMC"]}}) @Plap3014 1 ligne, je dirais non mais ta syntaxe du "Time" n'est pas la bonne Essaie comme ceci, avec syntaxe complete pour les Time et les TurnOn et turnOff pour tester GEA.add(true, 1, "", {{"Time","Sunset-30","Sunset-15"}, {"turnOn", id["ON_OFF_COTE"]}, {"turnOn", id["ON_OFF_SOFFITE"]}, {"turnOn", id["ON_OFF_PORTE"]}}) GEA.add(true, 1, "", {{"Time","22:30", "22:31"}, {"turnOff", id["ON_OFF_COTE"]}, {"turnOff", id["ON_OFF_SOFFITE"]}, {"turnOff", id["ON_OFF_PORTE"]}})

salut @mprinfo heuuu ben faut voir, le pauvre @did teste tous mes codes avec toutes les erreurs :P

heuuu à priori, après recherche, faute d'aurtografes ;-) C'est "setTimeout", le 2eme T en majuscule lol --[[ %% properties 208 value %% globals --]] ------ User settings ----- local id_RGBs = {239, 545} local ProgRGB = 546 --------------- local currentdate = os.date("%d/%m/%Y %H:%M:%S") fibaro:debug("Démarrage du script : " ..currentdate) -- fonction split ---- function split(s, pattern, maxsplit) local pattern = pattern or ' ' local maxsplit = maxsplit or -1 local s = s local t = {} local patsz = #pattern while maxsplit ~= 0 do local curpos = 1 local found = string.find(s, pattern) if found ~= nil then table.insert(t, string.sub(s, curpos, found - 1)) curpos = found + patsz s = string.sub(s, curpos) else table.insert(t, string.sub(s, curpos)) break end maxsplit = maxsplit - 1 if maxsplit == 0 then table.insert(t, string.sub(s, curpos - patsz - 1)) end end return t end ---------- --------------function GetPutValueRGB---- function GetPutValueRGBs(id) for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) -- Debug valeur result et prog fibaro:debug("RGB num : " ..id_RGBs[i].. " avec Couleur : " ..result[1]..","..result[2]..","..result[3]..","..result[4]) fibaro:debug("RGB num " ..id_RGBs[i].. " sur le Programme " ..Prog) setTimeout( function() fibaro:debug("Remise valeur précédente des RGBs") if ((result[1] == "0" and result[2] == "0" and result[3] == "0" and result[4] == "0") and (tonumber(Prog) > 0)) then fibaro:call(id_RGBs[i], "startProgram", Prog) fibaro:debug("Prog " ..Prog.. " sur " ..id_RGBs[i]) else fibaro:call(id_RGBs[i], "setColor", result[1], result[2], result[3], result[4]) fibaro:debug("Couleur sur : " ..id_RGBs[i]) end end, 15000) --tempo 15 secs end end ---------- function PutAlerteRGBs(id) for i = 1, #id_RGBs do -- SI activation cellule 208, demarrage des RGB sur le programme ProgRGB fibaro:debug("Mise des RGBs sur Programme : " ..ProgRGB) fibaro:call(id_RGBs[i], "startProgram", ProgRGB) end end ------------- GetPutValueRGBs() PutAlerteRGBs()

oui c'est cela, vu que j'avais modifie en faisant 2 boucles "For..do..end" avec les "local result et local prog" il a recup les 1eres valeurs precedentes, mis le prog 546, recupere de nouveau les valeurs en cours soit 546, puis a remis le prog 546, les valeurs précédentes lol on est pas loin, mais je n'arrive pas à bien mettre le tempo pour ne pas que les bandeaux clignotent l'1 après l'autre. J'ai changé le style avec des fonctions et ai utilisé un settimeout, 1 premiere pour moi --[[ %% properties 208 value %% globals --]] ------ User settings ----- local id_RGBs = {239, 545} local ProgRGB = 546 --------------- local currentdate = os.date("%d/%m/%Y %H:%M:%S") fibaro:debug("Démarrage du script : " ..currentdate) -- fonction split ---- function split(s, pattern, maxsplit) local pattern = pattern or ' ' local maxsplit = maxsplit or -1 local s = s local t = {} local patsz = #pattern while maxsplit ~= 0 do local curpos = 1 local found = string.find(s, pattern) if found ~= nil then table.insert(t, string.sub(s, curpos, found - 1)) curpos = found + patsz s = string.sub(s, curpos) else table.insert(t, string.sub(s, curpos)) break end maxsplit = maxsplit - 1 if maxsplit == 0 then table.insert(t, string.sub(s, curpos - patsz - 1)) end end return t end ---------- --------------function GetPutValueRGB---- function GetPutValueRGBs(id) for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) -- Debug valeur result et prog fibaro:debug("RGB num : " ..id_RGBs[i].. " avec Couleur : " ..result[1]..","..result[2]..","..result[3]..","..result[4]) fibaro:debug("RGB num " ..id_RGBs[i].. "sur le Programme" ..Prog) settimeout( function() fibaro:debug("Remise valeur précédente des RGBs") if ((result[1] == "0" and result[2] == "0" and result[3] == "0" and result[4] == "0") and (tonumber(Prog) > 0)) then fibaro:call(id_RGBs[i], "startProgram", Prog) fibaro:debug("Prog " ..Prog.. " sur " ..id_RGBs[i]) else fibaro:call(id_RGBs[i], "setColor", result[1], result[2], result[3], result[4]) fibaro:debug("Couleur sur : " ..id_RGBs[i]) end end, 15000) --tempo 15 secs end end ---------- function PutAlerteRGBs(id) for i = 1, #id_RGBs do -- SI activation cellule 208, demarrage des RGB sur le programme ProgRGB fibaro:debug("Mise des RGBs sur Programme : " ..ProgRGB) fibaro:call(id_RGBs[i], "startProgram", ProgRGB) end end ------------- GetPutValueRGBs() PutAlerteRGBs()

hihi ah ben oui mais non suis bete, si on fait le result et prog dans la 2eme boucle, lorsqu'il remet les valeurs precedentes il recupere le 546, soit ce qu'il y a en cours sur les RGB hihi je modifie encors et toujours si t'en as marre n'hesite pas a le dire ;-)

ah oui normal, la variable result et prog sont declarées dans la 1ere boucle, donc il ne retrouve pas la valeur a remettre ;-) Ceci ? Test numero 895 654 ;-) merci @did --[[ %% properties 208 value %% globals --]] ------ User settings ----- local id_RGBs = {239, 545} local ProgRGB = 546 --------------- local currentdate = os.date("%d/%m/%Y %H:%M:%S") fibaro:debug("Démarrage du script : " ..currentdate) -- fonction split ---- function split(s, pattern, maxsplit) local pattern = pattern or ' ' local maxsplit = maxsplit or -1 local s = s local t = {} local patsz = #pattern while maxsplit ~= 0 do local curpos = 1 local found = string.find(s, pattern) if found ~= nil then table.insert(t, string.sub(s, curpos, found - 1)) curpos = found + patsz s = string.sub(s, curpos) else table.insert(t, string.sub(s, curpos)) break end maxsplit = maxsplit - 1 if maxsplit == 0 then table.insert(t, string.sub(s, curpos - patsz - 1)) end end return t end ---------- for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) -- Debug valeur result et prog fibaro:debug("RGB num : " ..id_RGBs[i].. " avec Couleur : " ..result[1]..","..result[2]..","..result[3]..","..result[4]) fibaro:debug("RGB num " ..id_RGBs[i].. " sur le Programme " ..Prog) -- SI activation cellule 208, demarrage des RGB sur le programme ProgRGB fibaro:debug("Mise des RGBs sur Programme : " ..ProgRGB) fibaro:call(id_RGBs[i], "startProgram", ProgRGB) end -- Tempo de 15 secs fibaro:debug("tempo de 15 secs") fibaro:sleep(15*1000) -- Remise prog/couleur des RGBs en cours avant activation cellule 208 for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) fibaro:debug("Remise valeur précédente des RGBs") if ((result[1] == "0" and result[2] == "0" and result[3] == "0" and result[4] == "0") and (tonumber(Prog) > 0)) then fibaro:call(id_RGBs[i], "startProgram", Prog) fibaro:debug("Prog " ..Prog.. " sur " ..id_RGBs[i]) else fibaro:call(id_RGBs[i], "setColor", result[1], result[2], result[3], result[4]) fibaro:debug("Couleur sur : " ..id_RGBs[i]) end end

Bienvenue, tu vas bien t'amuser comme nous tous ici.

les specs d'odroid donnent envie mais les fdp... Commande groupee ?

sans le sleep, ca a du enchainer : 546 puis valeur précédente, on va tenter autre chose alors ;-) Comme ceci, peut-etre plus coherent : 1- recup des valeurs en cours sur les RGBs puis mise sur porg alerte : 546 2- sleep de 15 secondes 3- Remise des valeurs précéentes sur les RGBs --[[ %% properties 208 value %% globals --]] ------ User settings ----- local id_RGBs = {239, 545} local ProgRGB = 546 --------------- local currentdate = os.date("%d/%m/%Y %H:%M:%S") fibaro:debug("Démarrage du script : " ..currentdate) -- fonction split ---- function split(s, pattern, maxsplit) local pattern = pattern or ' ' local maxsplit = maxsplit or -1 local s = s local t = {} local patsz = #pattern while maxsplit ~= 0 do local curpos = 1 local found = string.find(s, pattern) if found ~= nil then table.insert(t, string.sub(s, curpos, found - 1)) curpos = found + patsz s = string.sub(s, curpos) else table.insert(t, string.sub(s, curpos)) break end maxsplit = maxsplit - 1 if maxsplit == 0 then table.insert(t, string.sub(s, curpos - patsz - 1)) end end return t end ---------- for i = 1, #id_RGBs do -- Recup Couleur et programme des RGBs local result = split(fibaro:getValue(id_RGBs[i], "color"), ',') local Prog = tonumber(fibaro:getValue(id_RGBs[i], "currentProgramID")) -- Debug valeur result et prog fibaro:debug("RGB num : " ..id_RGBs[i].. " avec Couleur : " ..result[1]..","..result[2]..","..result[3]..","..result[4]) fibaro:debug("RGB num " ..id_RGBs[i].. "sur le Programme" ..Prog) -- SI activation cellule 208, demarrage des RGB sur le programme ProgRGB fibaro:debug("Mise des RGBs sur Programme : " ..ProgRGB) fibaro:call(id_RGBs[i], "startProgram", ProgRGB) end -- Tempo de 15 secs fibaro:debug("tempo de 15 secs") fibaro:sleep(15*1000) -- Remise prog/couleur des RGBs en cours avant activation cellule 208 for i = 1, #id_RGBs do fibaro:debug("Remise valeur précédente des RGBs") if ((result[1] == "0" and result[2] == "0" and result[3] == "0" and result[4] == "0") and (tonumber(Prog) > 0)) then fibaro:call(id_RGBs[i], "startProgram", Prog) fibaro:debug("Prog " ..Prog.. " sur " ..id_RGBs[i]) else fibaro:call(id_RGBs[i], "setColor", result[1], result[2], result[3], result[4]) fibaro:debug("Couleur sur : " ..id_RGBs[i]) end end

ah put..bien vu @mprinfo, j'vais oublie les 2 points lol le boulet hihihih pourtant j'ai regarde et relu plein de fois, je ne voyais vraiment pas lol Cool ;-) Bon, je pige pas pourquoi 5 secs après ? ce serait pas 15 secs apres ? Dansla boucle, il passe le 1er ID, le 239, : le passe en 546, puis le sleep, puis le remet à la valeur précédente ? Commente le tempo de 15 secs, ca devrait etre bon je pense, après si ca fonctionne on le sortira de la boucle

c'est vole, merci couillerot :-) oui suis d'accord avec D-GK !!

superbe couillerot je vole aussi, mais celui qui manque est l INACTIF :-)

ah oui merci couillerot :-)

moi je bidouille pas trop couillerot, pourrais tu le faire en inactif pour le motion stp ?

yeah superbe ;-) direction ta galerie je trouve pas dans ta galerie dans ta signature :-(

bonjour, J'ai relu toutes les pages, quelqu'un sait comment arreter la petite led en haut à droite qui clignote svp ? Merciiii

hihi moi j'hesite encore, à2 doigts de prendre un kit complet ;-)

Bonjour à toutes et tous, Avez-vous lu cela ? Ca donne envie ;-) surtout couplé à IFTTT http://blog.domadoo.fr/2016/02/29/alexa-via-lamazon-echo-les-balbutiements-de-jarvis/#more-56452