Automatisme et Programmation

Après avoir chargé le firmware Esp Easy Mega dans le Wemo D1 mini (il y a pleins de tutos sur internet) j'ai configuré des devices dans cet ordre: E1, E2, R1, R2, Infos1, Infos2.

Un contrôleur http est également configuré pour remonter les valeurs utiles à Jeedom

Les gpio correspondent au schéma électrique.

Pour un fonctionnement optimum, la mise en place du détecteur magnétique "volet fermé" est indispensable. Sans ce dernier, il faudra l'enlever sur les règles de séquence normale et la séquence entrouverture ne fonctionnera pas.

E2: Pour optimiser la wemo, D4 est utilisée en entrée uniquement avec un BP ouvert, sinon problème de boot. Cocher internal pullup.

Pour transposer la programmation directement, il faut respecter STRICTEMENT les libellés ci dessous. Si non il faudra modifier dans le programme...

Programmation règles 1: Ouverture et Fermeture normale:

La séquence d'ouverture commence avec le BP local ou la commande GPIO,16,0 depuis l'interface Espeasy ou JeedomLa séquence de fermeture commence avec le BP local ou la commande GPIO,4,0 depuis l'interface Espeasy ou Jeedom
Le principe de fonctionnement est basé sur des tempos et la manœuvre d'un vérin après l'autre pour que le limiteur de courant (détection d'obstacles) soit réglé au plus juste. Ainsi la sécurité de fonctionnement est assurée.
Les timers sont à ajuster.
------------------------------------------------------------------------------------------------on system#boot dogpio,16,1 // ouv blocagegpio,14,1 // ferm blocagegpio,12,1 // ouv volet droit appuigpio,13,1 // ferm volet droit appuigpio,0,1 // ouv volet gauchegpio,4,1 // ferm volet gaucheTaskValueSet 5,1,0TaskValueSet 5,2,0TaskValueSet 5,3,0TaskValueSet 5,4,0TaskRun,5TaskValueSet 6,1,0TaskValueSet 6,2,0TaskValueSet 6,3,0TaskRun,6Let,1,0 // variable sequence normale ou entrouvertureLet,2,0 // variable debut ou fin entrouvertureendon
// Ouverture volets
on r1#OuvVblocage doif [r1#OuvVblocage] = 1 and [e1#voletferme] = 1 And [var#1]=0gpio,16,0 //Robloc=1TaskValueSet 5,4,1 //Debut manœuvreTaskRun,5timerset,1,10 //tps ouv blocElseif[var#1]=0gpio,16,1endifendon
on rules#timer=1 dogpio,16,1 //Robloc=0gpio,12,0 //Rovd=1TaskValueSet 5,1,1TaskRun,5timerset,2,20 //tps ouv volet D appuiendon
on rules#timer=2 dogpio,12,1 //Rovd=0gpio,0,0 //Rovg=1TaskValueSet 5,2,1TaskRun,5timerset,3,20 //tps ouv volet Gendon
on rules#timer=3 dogpio,0,1 // ROG=0TaskValueSet 5,3,1TaskValueSet 5,4,0 //fin manœuvreTaskrun,5endon
//Fermeture volets
on r2#FermVgauche doif [r2#fermVgauche] = 1 and [e1#voletferme] = 0 And [var#1]=0TaskValueSet 6,2,0TaskRun,6Let,1,0gpio,4,0 //Rfvg=1TaskValueSet 5,4,1TaskRun,5timerset,4,20 //tps ferm volet Gelse If [var#1]=0gpio,4,1endifendon
on rules#timer=4 dogpio,4,1 //Rfvg=0gpio,13,0 //Rfvd=1TaskValueSet 5,3,0Taskrun,5timerset,5,20 //tps ferm volet D appuiendon
on rules#timer=5 dogpio,13,1 //Rfvd=0TaskValueSet 5,2,0 Taskrun,5if [e1#voletferme] =1TaskValueSet 6,1,0 // raz defaut de fermetureTaskRun,6gpio,14,0 //Rfbloc=1timerset,6,10 //tps ferm blocageElseTaskValueSet 6,1,1 // defaut de fermeture si pas de volet fermé au bout de la tempo 5 (obstacle)TaskRun,6endifendon
on rules#timer=6 dogpio,14,1 //Rfbloc=0TaskValueSet 5,1,0TaskValueSet 5,4,0 //fin manoeuvreTaskRun,5endon

Programmation règles 2: Entrouverture volets:

La séquence d'entrouverture est lancée uniquement avec le BP local à partir de la position fermée.Le vérin du volet est déplacé dans sa zone neutre (voir système d'entraînement mécanique), ce qui permet d'accrocher le volet tel qu'on le fait naturellement pour aérer. Il faudra bien entendu le décrocher pour lancer la fin de séquence qui l'ouvre complètement.
1er appui sur BP: Blocage de la séquence normale (variable1=1) , Ouverture vérin blocage, ouverture droit partielle, ouverture gauche partielle2ème appui sur BP: Ouverture droit max, ouverture gauche max, déblocage séquence normale (variable1=0)
-----------------------------------------------------------// entrouverture:
On e2#entrouverture DoIf [e1#voletferme] = 1 And [var#2] =0Let,1,1 //Variable entrouverture de blocage sequence normaleLet,2,1 // variable sequence ouv ou fermTaskValueSet 6,2,[var#2]TaskValueSet 6,3,[var#1]Taskrun,6EndifIf [e1#voletferme] = 0 And [var#2] =1Let,2,0 // variable sequence ouv ou fermTaskValueSet 6,2,[var#2]Taskrun,6EndifEndon
On infos2#voletentrouvert DoIf [infos2#voletentrouvert] = 1 And [var#1]=1gpio,16,0 //RObloc=1timerset,7,3 //tps ouv blocendifIf [infos2#voletentrouvert] = 0 And [var#1]=1gpio,12,0 //ROvd=1timerset,10,15 //tps ouv blocEndifendonon rules#timer=7 dogpio,16,1 //RObloc=0TaskValueSet 5,1,1TaskRun,5gpio,12,0 //ROvd=1timerset,8,5 //tps ouv volet D appuiendonon rules#timer=8 dogpio,12,1 //ROvd=0gpio,0,0 //Rovg=1timerset,9,5 //tps ouv volet Gendon on rules#timer=9 dogpio,0,1 // ROG=0endon
on rules#timer=10 dogpio,12,1 //ROvd=0TaskValueSet 5,2,1TaskRun,5gpio,0,0 //Rovg=1timerset,11,15 //tps ouv volet D appuiendonon rules#timer=11 dogpio,0,1 // ROG=0TaskValueSet 5,3,1TaskRun,5Let,1,0TaskValueSet 6,3,[var#1]Taskrun,6endon

Page updated

Google Sites

Report abuse