Wens voor toevoegen Energie monitor

[h143]

Kun je wat specifieke info geven zoals:

• Met wat voor een Nodo wil je pulsen tellen (Nodo variant)?
• Welke Nodo software versie + build gebruik je?
• Post even de eventlist;
• Welke instellingen heb je in de WebApp gemaakt?

Hallo Paul.

Ik gebruik zowel een mega als een uno.
Ik heb op dit moment losse componenten op een breadbordje met
- rf zender
- RF ontvanger
- RTC
- lm335z

Op bijde arduino's heb ik svn 447 draaien

De eventlist van de mega

Code: Selecteer alles

EventlistErase

EventlistWrite; Boot 1; Sound 7,0
EventlistWrite; WildCard IR,KAKU; RawSignalSend 0
EventlistWrite; WildCard RF,All; SendEvent HTTP
EventlistWrite; WildCard IR,All; SendEvent HTTP
EventlistWrite; WildCard Wired,All; SendEvent HTTP
EventlistWrite; WildCard All,UserEvent; SendEvent HTTP

! Timers
! Timer 1: pulsen meten
! Timer 2: ophalen temperatuur 5 min
! Timer 3: ventilatie uit na 15 min
! Timer 4: lampen vertraagd uitschakelen
! Timer 5: analoge pulsen

! Pulsen tellen
!EventlistWrite; Boot 1; TimerSetMin 1,1;                               ! Help na het opstarten de boel op gang
!EventlistWrite; Timer 1; VariablePulse 1,2;                           ! Als de timer is afgelopen, zet de pulstijd in variabele
!EventlistWrite; Timer 1; TimerSetMin 1,1;                             ! En herstart de timer

EventlistWrite; Boot 1; TimerSetMin 5,1;                               ! Help na het opstarten de boel op gang
EventListWrite; WiredIn 1,On; VariableInc 4,1,66
EventListWrite; Timer 5,0; Status VariableSet,4
EventListWrite; Timer 5,0; VariableSet 4,0.00
EventListWrite; Timer 5,0; TimerSetMin 5,1
EventListWrite; WildCard Variables,All; SendEvent HTTP

! Temperatuur ophalen
EventlistWrite; Boot 1; TimerSetMin 2,1;                               ! Help na het opstarten de boel op gang
EventlistWrite; Timer 2,0; Status WiredAnalog 2 ;         ! Temperatuur ophalen, elke 10 minuten
EventlistWrite; Timer 2,0; TimerSetMin 2,2                      ! Herstart de timer

! Alles aan
EventlistWrite; UserEvent 1,1; SendNewKAKU 1,6
EventlistWrite; UserEvent 1,2; SendNewKAKU 2,10
EventlistWrite; UserEvent 1,3; SendNewKAKU 3,10
EventlistWrite; UserEvent 1,4; SendNewKAKU 4,9
EventlistWrite; UserEvent 1,5; SendNewKAKU 5,6
EventlistWrite; UserEvent 1,6; SendKAKU A2,Off

! Slapen gaan
EventlistWrite; UserEvent 2,1; TimerSetSec 4,15
EventlistWrite; UserEvent 2,2; SendNewKAKU 2,Off
EventlistWrite; UserEvent 2,3; SendNewKAKU 3,Off
EventlistWrite; UserEvent 2,4; SendNewKAKU 4,Off
EventlistWrite; UserEvent 2,5; SendNewKAKU 5,Off
EventlistWrite; UserEvent 2,6; SendKAKU A2,Off
EventlistWrite; UserEvent 2,7; SendKAKU A1,Off
EventlistWrite; Timer 4,0; SendNewKAKU 1,Off

! Tv kijken
EventlistWrite; UserEvent 3,1; SendNewKAKU 1,5
EventlistWrite; UserEvent 3,2; SendNewKAKU 2,5
EventlistWrite; UserEvent 3,3; SendNewKAKU 3,6
EventlistWrite; UserEvent 3,4; SendNewKAKU 4,6
EventlistWrite; UserEvent 3,5; SendNewKAKU 5,5
EventlistWrite; UserEvent 3,6; SendKAKU A2,On

! Alles uit
EventlistWrite; UserEvent 4,1; SendNewKAKU 1,Off
EventlistWrite; UserEvent 4,2; SendNewKAKU 2,Off
EventlistWrite; UserEvent 4,3; SendNewKAKU 3,Off
EventlistWrite; UserEvent 4,4; SendNewKAKU 4,Off
EventlistWrite; UserEvent 4,5; SendNewKAKU 5,Off
EventlistWrite; UserEvent 4,6; SendKAKU A2,Off


EventlistWrite; NewKAKU 0x53F0680,On; SendNewKAKU 1,On
EventlistWrite; NewKAKU 0x53F0680,Off; SendNewKAKU 1,Off
EventlistWrite; NewKAKU 0x53F0681,On; SendNewKAKU 2,On
EventlistWrite; NewKAKU 0x53F0681,Off; SendNewKAKU 2,Off
EventlistWrite; NewKAKU 0x53F0682,On; SendNewKAKU 3,On
EventlistWrite; NewKAKU 0x53F0682,Off; SendNewKAKU 3,Off
EventlistWrite; NewKAKU 0x53F0684,On; SendNewKAKU 4,On
EventlistWrite; NewKAKU 0x53F0684,Off; SendNewKAKU 4,Off
EventlistWrite; NewKAKU 0x53F0683,On; SendNewKAKU 5,On
EventlistWrite; NewKAKU 0x53F0683,Off; SendNewKAKU 5,Off
EventlistWrite; NewKAKU 0x53F0685,On; SendKAKU A2,On
EventlistWrite; NewKAKU 0x53F0685,Off; SendKAKU A2,Off
EventlistWrite; NewKAKU 0x53F06A0,On; UserEvent 1,0
EventlistWrite; NewKAKU 0x53F06A0,Off; UserEvent 4,0
EventlistWrite; NewKAKU 0x414AD89,Off; SendNewKAKU 7,Off
EventlistWrite; NewKAKU 0x414AD89,On; SendNewKAKU 7,On
EventlistWrite; NewKAKU 0x414AD89,On; timersetmin 3,15
EventlistWrite; Timer 3; SendNewKAKU 7, off
EventlistWrite; NewKAKU 0x53F068C,Off; SendNewKAKU 7,Off
EventlistWrite; NewKAKU 0x53F068C,On; SendNewKAKU 7,On
EventlistWrite; NewKAKU 0x53F068C,On; timersetmin 3,15
Reboot


En de uno

Code: Selecteer alles

! Script voor programmeren unit-3 in de Meterkast.
! Variabele-6 bevat energieverbruik in KWh.
! Variabele-5 bevat het aantal pulsen t.b.v. cumulatief verbruik per etmaal

sendto 15; WaitFreeRF On                                                                                    !  Zorg er voor dat De Nodo niet door andere signalen heen gaat zenden
sendto 15; EventlistErase
sendto 15; EventlistWrite; Boot 15; Sound 7
sendto 15; EventlistWrite; Wildcard Variables,All; SendEvent RF; ! Ieder variabele event versturen naar RF

! Periodiek het tijd tussen in variabele-6 plaatsen en deze verzenden
sendto 15; EventlistWrite; Boot 15; TimerSetSec 1,120 ! Help het proces eerste keer na een boot op gang
sendto 15; EventlistWrite; Timer 1; VariablePulse 6,1
sendto 15; EventlistWrite; Timer 1; VariablePulse 5,4
sendto 15; EventlistWrite; Timer 1; TimerSetSec 1,120


De webapp heb ik ingesteld op
Input: Variable
Display: value
Output
Verbruik
Suffix: kwh
Unit : 1
Variable: 1
Type: line
Aantal uren: 24
Op de x as uren

En
Input: Variable
Display: value
Output
Verbruik
Suffix: kwh
Unit : 15
Variable: 6
Type: line
Aantal uren: 24
Op de x as uren

[Paul]

Het is mij niet duidelijk wat je wilt en wat niet werkt. Het helpt als je 1 probleem er uit licht, aan geeft wat je wilt, wat je zien en wat je verwacht. Het nu voor mij een puzzel van timers en pulsen. Is het een idee om even eerst met 1 onderwerp te beginnen en dit werkend te krijgen?

[h143]

Het is mij niet duidelijk wat je wilt en wat niet werkt. Het helpt als je 1 probleem er uit licht, aan geeft wat je wilt, wat je zien en wat je verwacht. Het nu voor mij een puzzel van timers en pulsen. Is het een idee om even eerst met 1 onderwerp te beginnen en dit werkend te krijgen?

Ik heb de eventlist zoals jij hebt aangegeven in de uno.
Ik krijg ook netjes om de 2 minuten de waardes binnen op de mega.
Maar deze blijven gelijk. Als ik bijvoorbeeld de magnetron of de wasmachine aanzet dan zie ik mijn verbruik niet omhoog gaan die blijft constant op de zelfde waarde.
De waarde die ik nu binnen krijg is

15 Variable 6,0.26 2012-10-11 22:29:11

En deze komt elke 2 minuten terug maar de waarde veranderd niet.

[h143]

omdat ik de pulsen niet binnen krijg met een digitale pulsen teller op de ir ingang poort heb ik het maar aangesloten op de analoge poort

hiervoor gebruik ik het volgende script

Code: Selecteer alles

EventlistWrite; Boot 1; TimerSetmin 5,4;            ! Help na het opstarten de boel op gang
EventListWrite; WiredIn 1,On; VariableInc 4,0.025   ! verhoogt de met 0,04kw
EventListWrite; Timer 5,0; Status VariableSet,4     ! Verstuurd waarde naar Webapp
EventListWrite; Timer 5,0; VariableSet 4,0.00        ! Reset variable 4
EventListWrite; Timer 5,0; TimerSetmin 5,4        ! Herstart de Timer
EventListWrite; WildCard Variables,All; SendEvent HTTP    ! zorgt ervoor dat variable in de webapp te zien is

maar nu is mijn probleem dat ik alle verhogingen direct in de webapp zie.




kan dit ook anders dat ik alleen de waarde na 2,5 min in de webapp terug krijg? en niet alle tussenstappen

[Paul]

Dat kan door periodiek, de inhoud van de teller variabele naar een andere variabele te kopieren met [VariableVariable] en deze vervolgens met de WebApp in een grafiek te tonen.

Maar het is niet aan te raden om op deze wijze pulsen te tellen. Deze wijze is onnauwkeurig. De kans dat je pulsen mist en dus verkeerde metingen krijgt is er groot. Doe jezelf een lol en hang hiervoor in de meterkast een uitgeklede nodo die pulsen telt op de gebruikelijke manier,

[h143]

Dat kan door periodiek, de inhoud van de teller variabele naar een andere variabele te kopieren met [VariableVariable] en deze vervolgens met de WebApp in een grafiek te tonen.

Maar het is niet aan te raden om op deze wijze pulsen te tellen. Deze wijze is onnauwkeurig. De kans dat je pulsen mist en dus verkeerde metingen krijgt is er groot. Doe jezelf een lol en hang hiervoor in de meterkast een uitgeklede nodo die pulsen telt op de gebruikelijke manier,

Bedankt voor je reactie.
Ik heb het geprobeerd met een cny70 op de ir (d18) ingang en aangesloten zoals aangegeven in de wiki
http://www.nodo-domotica.nl/index.php/B ... schema.JPG

Zelfs als ik mijn vinger erop leg en er weer afhaal krijg ik geen verandering in mijn eventlog.
Als ik de linetracking sensor aansluit gebeurt er ook niks.
Ik heb nu mij eventlist hellemaal gestript en alleen het noodzakelijke er in gezet en ziet er zo uit

Code: Selecteer alles

EventlistErase
EventlistWrite; Boot 1; TimerSetMin 1,1;                ! Help na het opstarten de boel op gang
EventlistWrite; Timer 1; VariablePulse 1,1;             ! Als de timer is afgelopen, zet de pulstijd in variabele-1
EventlistWrite; Timer 1; TimerSetMin 1,3;               ! En herstart de timer
EventlistWrite; Wildcard Variables,All; SendEvent HTTP; ! Ieder variabele event versturen naar de WebApp


En dit is mijn eventlog

Code: Selecteer alles

1   Variable 1,0.09   2012-10-19 23:38:03
1   Variable 1,0.09   2012-10-19 23:38:03
1   Variable 1,0.09   2012-10-19 23:44:06
1   Variable 1,0.09   2012-10-19 23:47:07
1   Variable 1,0.09   2012-10-19 23:50:09
1   Variable 1,0.09   2012-10-19 23:53:10
1   Variable 1,0.09   2012-10-19 23:56:11


Vandaar dat ik met een analoge pulse werk ipv met de digitale.

[Paul]

Volgens mij moet je het in de CNY70 zoeken. Ik maak zelf gebruik van een andere lichtsensor. Probleem is een beetje dat e.e.a. van de situatie afhangt. De ene meter geeft een fellere lichtpuls af dan de andere. Vermoedelijk geeft jou hardware geen duidelijke puls af die door de digitale poort kan worden waargenomen. Doe even de volgende test:

Sluit de lichtsensor aan op een ANALOGE poort en meet welke waarde de sensor afgeeft in rust (=donker) meet vervolgens de waarde die de sensor afgeeft als er een lichtpuls is. Is deze puls te kor om waar te nemen, stel de sensor dan bloot aan een hoeveelheid licht waarvan je schat dat deze overeen komt met een lichtpuls.

Geef dan even aan wat deze twee waarden dan gemiddeld zijn.

[h143]

Ik heb de cny op een analoge poort aangesloten.
Als ik mijn vinger erop leg heb ik een waarde van 63.3 en als ik hem erafhaal 63.7
Een heel klein verschil dus.

Als ik de tracking line sensor aansluit meet ik de volgende waardes.

Als het zwarte streepje voor de sensor zit 99.9
En als hij er niet voor zit 9.28 maar soms ook 9.18

Deze sensor kan dus wel duidelijk het streepje herkennen.

[Paul]

Ik heb de cny op een analoge poort aangesloten.
Als ik mijn vinger erop leg heb ik een waarde van 63.3 en als ik hem erafhaal 63.7
Een heel klein verschil dus.

Als ik de tracking line sensor aansluit meet ik de volgende waardes.

Als het zwarte streepje voor de sensor zit 99.9
En als hij er niet voor zit 9.28 maar soms ook 9.18

Deze sensor kan dus wel duidelijk het streepje herkennen.

Dan is het probleem duidelijk, de CNY werkt dus niet voor deze toepassing. Het verschil moet duidelijk zijn, zoals met tracking line sensor. Is het verschil te klein, dan kun je geen pulsen meten.

Heb je een gewone pulsenled in de meterkast of infrarood?

[h143]

Mijn meter heeft geen pulsen led helaas.
Maar met de tracking line sensor zou het toch wel moeten lukken? Deze geeft wel een duidelijk verschil.