Aller au contenu

BenjyNet

Membres confirmés
  • Compteur de contenus

    5 384
  • Inscription

  • Dernière visite

  • Jours gagnés

    80

Tout ce qui a été posté par BenjyNet

  1. BenjyNet

    Fibaro Wall Plug

    Les tables à induction sont constituées de bobines, alimentées par une tension alternative générée par un hacheur. Les bobines sont entourées de capacités et de diodes ce qui évite les sur-intensités au démarrage et à l'arrêt. Donc normalement, pas de soucis de ce côté là , l'électronique est plutôt bien pensée. Je ne dirais pas la même chose si on doit mettre un wallplug sur une bétonnière, même si le moteur fait 2kW
  2. BenjyNet

    Le Hc Lite Est En Approche

    @ i-magin Moi je ne vois pas l'utilisation des télécommandes VD en tant que telles ! J'ai également plusieurs VD de ce type mais le but est des les utiliser dans des scènes pas d'y toucher en temps que télécommande parce qu'effectivement celle de mon ampli est universelle et marche très bien
  3. BenjyNet

    Fibaro Wall Plug

    Bon je teste ça sur le seche-linge cet aprem.
  4. Allez, un peu de teasing à la sauce FIBARO COMING SOON - V 1.1.0
  5. BenjyNet

    Fibaro Wall Plug

    Moi j'ai envie de le brancher sur mon seche linge mais il fait 2800W en continue ; ça m'aurait permis de savoir quand le cycle est terminé avec le relevé de conso.
  6. Je m'en doutais très fortement ! N'oublie pas de manger et bisouter femme et enfants
  7. Version 1.1.0 en approche
  8. Tiens cédric, testes ça dans le main loop ce soir si t'as le temps : ------------------------------------------------------------- -- Plugin for Onkyo TX-NR626 receiver -- Use port 60128 -- Version 1.0.3 (02-21-2014) -- Author : Jean-christophe Vermandé modified by BenjyNet ------------------------------------------------------------- -- Change log 1.0.2 to 1.0.3 : -- Update refresh data : set to 2 min -- Improved sending commands and receiving status -- Improved questions results -- Added source --------------------------------------------------------c[_]- fibaro:debug('Start process Main Loop v1.0.3'); local _deviceIp = fibaro:get(fibaro:getSelfId(), "IPAddress"); local _devicePort = fibaro:get(fibaro:getSelfId(), "TCPPort"); local _maxRetryProcess = 5; -- Polling time (value in milliseconds) local _polling = 2*60*1000; local _trace = true; device = device or { id = fibaro:getSelfId(), name = "Onkyo TX-NR626", power = 0, volume = 0, source = "unknow", }; function trace(value) if (_trace) then return fibaro:debug(tostring(value)); end end function getPowerState(retry) local retry = retry or 0; local cmd = nil; --notify user fibaro:debug("Request POWER status, #" .. retry .. " please wait..."); --send packet bytes, errorCode = _tcpSocket:write("ISCP\0\0\0\16\0\0\0\12\1\0\0\0\!1PWRQSTN\0x1A\r\n"); -- check for error if errorCode == 0 then fibaro:debug("POWER status command successufully transmited."); fibaro:sleep(50); -- amplifier sould return the string sent if success while (cmd == nil and retry < _maxRetryProcess) do local result = _tcpSocket:read(); -- check if result is equal than command to confirm success fibaro:debug("Result's lenght : " .. result:len() .. " " .. type(result)); cmd = string.match(result, "PWR%d%d"); if (cmd ~= nil) then fibaro:debug(cmd); local pwr_value = tonumber(cmd:sub(4,5)); fibaro:debug("Result OK : PWR" .. pwr_value); return pwr_value; else fibaro:debug("Result fail, retry process, #" .. retry .. " please wait..."); retry = retry + 1; end end return nil; else if retry < _maxRetryProcess then fibaro:debug("Retry process, please wait..."); fibaro:sleep(2000); return getPowerState(retry + 1); end return nil; end end function getVolumeLevel(retry) local retry = retry or 0; local cmd = nil; --notify user fibaro:debug("Request Volume level, #" .. retry .. " please wait..."); --send packet bytes, errorCode = _tcpSocket:write("ISCP\0\0\0\16\0\0\0\12\1\0\0\0\!1MVLQSTN\0x1A\r\n"); -- check for error if errorCode == 0 then fibaro:debug("Request VOLUME level command successufully transmited."); fibaro:sleep(50); -- amplifier sould return the string sent if success while (cmd == nil and retry < _maxRetryProcess) do local result = _tcpSocket:read(); -- check if result is equal than command to confirm success fibaro:debug("Result's lenght : " .. result:len() .. " " .. type(result)); cmd = string.match(result, "MVL.."); if (cmd ~= nil) then local vol_value = tonumber(cmd:sub(4, 5), 16); fibaro:debug("Result OK : MVL" .. vol_value .. cmd); return vol_value; else fibaro:debug("Result fail, retry process, #" .. retry .. " please wait..."); retry = retry + 1; end end return nil; else if retry < _maxRetryProcess then fibaro:debug("Retry process, please wait..."); fibaro:sleep(2000); return getVolumeLevel(retry + 1); end return nil; end end function getSource(retry) local retry = retry or 0; local cmd = nil; --notify user fibaro:debug("Request Source, #" .. retry .. " please wait..."); --send packet bytes, errorCode = _tcpSocket:write("ISCP\0\0\0\16\0\0\0\12\1\0\0\0\!1SLIQSTN\0x1A\r\n"); -- check for error if errorCode == 0 then fibaro:debug("Request SOURCE command successufully transmited."); fibaro:sleep(50); -- amplifier sould return the string sent if success while (cmd == nil and retry < _maxRetryProcess) do local result = _tcpSocket:read(); -- check if result is equal than command to confirm success fibaro:debug("Result's lenght : " .. result:len() .. " " .. type(result)); cmd = string.match(result, "SLI.."); if (cmd ~= nil) then local src_value = tonumber(cmd:sub(4, 5), 16); fibaro:debug("Result OK : SLI" .. src_value .. cmd); local input = nil; if (src_value == 01) then input = "CBL/SAT"; elseif (src_value == 02) then input = "GAME"; elseif (src_value == 03) then input = "AUX"; elseif (src_value == 04) then input = "CEDRIC - STOP TO PLAY !"; elseif (src_value == 05) then input = "PC"; elseif (src_value == 16) then input = "BD/DVD"; elseif (src_value == 34) then input = "PHONO"; elseif (src_value == 35) then input = "TV/CD"; elseif (src_value == 36) then input = "TUNER - FM"; elseif (src_value == 37) then input = "TUNER - AM"; elseif (src_value == 41) then input = "FRONT USB"; elseif (src_value == 43) then input = "NET"; end return (input); else fibaro:debug("Result fail, retry process, #" .. retry .. " please wait..."); retry = retry + 1; end end return nil; else if retry < _maxRetryProcess then fibaro:debug("Retry process, please wait..."); fibaro:sleep(2000); return getSource(retry + 1); end return nil; end end function refreshInterface() if (device.power == true) then fibaro:call(device.id, "setProperty", "ui.lblPowerStatus.value", "ON"); -- update UI volume if (device.volume ~= nil) then fibaro:call(device.id, "setProperty", "ui.VolumeSlider.value", device.volume); end -- update UI input if (device.source ~= nil) then fibaro:call(device.id, "setProperty", "ui.lblInput.value", device.source); end else fibaro:call(device.id, "setProperty", "ui.lblPowerStatus.value", "OFF"); fibaro:call(device.id, "setProperty", "ui.lblInput.value", "unknown"); fibaro:call(device.id, "setProperty", "ui.VolumeSlider.value", "0"); end return true; end function main() -- prepare a global counter if (_count == nil) then trace("HC2 start script at " .. os.date()); _count = 0; end --notify begin of process trace("Start process #".._count..", please wait..."); --open the socket if (_tcpSocket == nil) then _tcpSocket = Net.FTcpSocket(_deviceIp, _devicePort); --set the read timeout _tcpSocket:setReadTimeout(500); end -- Query power status local power = getPowerState(); if (power == 1) then device.power = true; trace("Power is ON"); -- Query volume device.volume = getVolumeLevel(); trace("Volume is "..device.volume); -- Query source device.source = getSource(); trace("Source selected is "..device.source); else device.power = false; trace("Power is OFF"); end -- call refresh interface to repaint UI refreshInterface(); -- dispose socket if (_tcpSocket ~= nil) then -- close socket _tcpSocket:disconnect(); -- destroy object _tcpSocket = nil; end --notify end of process trace("Process #".._count.." is finish!"); -- increment global counter _count = _count + 1; end -- Start main loop process main(); -- Sleep fibaro:sleep(_polling); -- EOF Main loop Si ça ne fonctionne pas, il faudra faire un petit teamviewer que je vois exactement ce qu'il se passe ! Ici ça marche impeccable, du 1er coup.
  9. Bah non j'ai déjàtenté, tu copie colle ici le caractère qui est dans ton VD c'est tout. Tiens d'ailleurs pour les pro du HC2 est-ce qu'on a quelque part l'ensemble des typos dispos sur le HC2 ?
  10. tu pourrais me poster les 2 icones de power et source qui me manquent ? Je vais les rajouter àla mano pour voir.
  11. Diters, vous avez les petits icones à côté de Power et Source par exemple ? Moi je ne les ais pas, j'ai des truc genre ⎋ ou â? Il faudrait pas installer une police sur le HC2 par hasard ?
  12. Tiens tant qu'on est dans les automatismes de volet, il y en a parmi vous qui ont automatisé leurs volets battants ?
  13. Bon alors moi il me faut un controleur DMX usb pour windows avec un logiciel opensource + 2 lyres wash pas chères + 2 lyres spot pas chères + 6 pars LED Mais putain j'ai pas de tunasse et un "pote" (qui ne l'est plus) m'a cramé ma table behringer !
  14. Oh con ! Domadoo qui publie un billet sur mon VD ! Mais bon c'est con, ça marche pas chez cédric... mais je suis de retour devant mon ordi, héhéhéhé ! Pour le TX NR525 il faut dans les paramètres activer le Hybrid standby, tu mets dans Network Setup , Network Standby à ON. Normalement tu dois pouvoir le commander, même éteint !
  15. BenjyNet

    Playlist De Musiques

    Encore faut il savoir si DS audio est pilotable par URL ?
  16. Oh punaise je ne connaissais pas ça... j'ai besoin d'un soft/interface DMX justement
  17. BenjyNet

    Le Hc Lite Est En Approche

    Encore heureux qu'il n'y ait pas de LUA sinon j'aurais les boules avec ma HC2 !
  18. BenjyNet

    Le Hc Lite Est En Approche

    D'après Pascal, effectivement, pas de LUA... Et moi je dis ouf ! Sinon qu'aurait il resté àla HC2 ? En évolution pour les modules, moi j'en aimerai un pour piloter les fils pilotes comme ce que fait Avidsen (sans les clacs des relais). Mais je sens que je vais me faire une passerelle FHEM.
  19. BenjyNet

    Le Hc Lite Est En Approche

    Hum, c'est moi ou ils ont copié l'idée de la zipabox avec l'ajout de modules sur le côté ? Si c'est le cas, ça risque de faire du mal ànotre HC2. En tout cas pour la partie multimédia je vois déjàdans le fond mon ampli Onkyo...miam...
  20. Bon, pas encore rentré àla maison mais de retour sur les ondes... Je réfléchis àune amélioration possible et te propose ça fin de semaine. @Domodial Ça marche chez toi cette version ?
  21. Miam miam, ça a l'air bon tout ça ! Dès que je rentre àla maison, je teste !
  22. BenjyNet

    Fibaro - Motion Sensor

    Ah les piles ! Qu'est ce que j'aime pas ça !
  23. Roh punaise, prêt à partir au ski et cédric qui me dit.. "ça marche pas" !! Rrrrrr Bon tu vas me modifier cette partie dans le main loop : function getPowerState(retry) local retry = retry or 0; local cmd = nil; --notify user fibaro:debug("Request POWER status, #" .. retry .. " please wait..."); --send packet bytes, errorCode = _tcpSocket:write("ISCP\0\0\0\16\0\0\0\12\1\0\0\0\!1PWRQSTN\0x1A\r\n"); -- check for error if errorCode == 0 then fibaro:debug("POWER status command successufully transmited."); -- amplifier sould return the string sent if success while (cmd == nil and retry < _maxRetryProcess) do fibaro:sleep(60); local result = _tcpSocket:read(); -- check if result is equal than command to confirm success fibaro:debug("Result's lenght : " .. result:len() .. " " .. type(result)); cmd = string.match(result, "PWR%d%d"); if (cmd ~= nil) then fibaro:debug(cmd); local pwr_value = tonumber(cmd:sub(4,5)); fibaro:debug("Result OK : PWR" .. pwr_value); return pwr_value; else fibaro:debug("Result fail, retry process, #" .. retry .. " please wait..."); retry = retry + 1; end end return nil; else if retry < _maxRetryProcess then fibaro:debug("Retry process, please wait..."); fibaro:sleep(2000); return getPowerState(retry + 1); end return nil; end end en ça function getPowerState(retry) local retry = retry or 0; local cmd = nil; --notify user fibaro:debug("Request POWER status, #" .. retry .. " please wait..."); --send packet bytes, errorCode = _tcpSocket:write("ISCP\0\0\0\16\0\0\0\12\1\0\0\0\!1PWRQSTN\0x1A\r\n"); -- check for error if errorCode == 0 then fibaro:debug("POWER status command successufully transmited."); -- amplifier sould return the string sent if success while (cmd == nil and retry < _maxRetryProcess) do fibaro:sleep(60); local result = _tcpSocket:read(); -- check if result is equal than command to confirm success fibaro:debug("Result's lenght : " .. result:len() .. " " .. type(result)); local test = string.find(result, "!1"); local aff_test = fibaro:debug(result:sub(test,test + 4)); cmd = string.match(result, "PWR%d%d"); if (cmd ~= nil) then fibaro:debug(cmd); local pwr_value = tonumber(cmd:sub(4,5)); fibaro:debug("Result OK : PWR" .. pwr_value); return pwr_value; else fibaro:debug("Result fail, retry process, #" .. retry .. " please wait..."); retry = retry + 1; end end return nil; else if retry < _maxRetryProcess then fibaro:debug("Retry process, please wait..."); fibaro:sleep(2000); return getPowerState(retry + 1); end return nil; end end Tu regardes le debug et tu pastes ici pour voir ce qui cloche. Sinon je serais sur Orleans vers 8h si tout va bien Allez les gars To SHUSSS on y crois, on va trouver
  24. Bon alors comme je m'en sens tout àfait capable, je vous passe un coup de fil.... ok ? Sinon il va falloir que je passe par mes parents qui revendent des alarmes (mais pas votre marque bien sur ! d'ailleurs inconnu de leur part alors qu'ils sont grossistes alarme/électricité/automatisme et vendent àdes pros justement). Je pense qu'il y a un problème de diffusion de la marque en France, même auprès des installateurs.
×
×
  • Créer...