💬 Power Meter Pulse Sensor
-
@mfalkvidd , you are absolutely right. Let me clarify.
I am using the example code that is under build and power meter pulse sensor, updated may 1st, 2018.
Running it with "sleep mode = false" it works fine with both usb and battery power, just drains the battery quite fast.
Setting it to "sleep mode = true" it doesn't work either on usb or battery power.Here's how the serial monitor looks for the startup phase with sleep mode as true.
23:21:24.219 -> __ __ ____ 23:21:24.219 -> | \/ |_ _/ ___| ___ _ __ ___ ___ _ __ ___ 23:21:24.219 -> | |\/| | | | \___ \ / _ \ `_ \/ __|/ _ \| `__/ __| 23:21:24.219 -> | | | | |_| |___| | __/ | | \__ \ _ | | \__ \ 23:21:24.219 -> |_| |_|\__, |____/ \___|_| |_|___/\___/|_| |___/ 23:21:24.219 -> |___/ 2.3.0 23:21:24.219 -> 23:21:24.219 -> 16 MCO:BGN:INIT NODE,CP=RNNNA---,VER=2.3.0 23:21:24.254 -> 25 TSM:INIT 23:21:24.254 -> 26 TSF:WUR:MS=0 23:21:24.254 -> 33 TSM:INIT:TSP OK 23:21:24.254 -> 35 TSF:SID:OK,ID=2 23:21:24.254 -> 37 TSM:FPAR 73 TSF:MSG:SEND,2-2-255-255,s=255,c=3,t=7,pt=0,l=0,sg=0,ft=0,st=OK: 201 TSF:MSG:READ,0-0-2,s=255,c=3,t=8,pt=1,l=1,sg=0:0 23:21:24.428 -> 205 TSF:MSG:FPAR OK,ID=0,D=1 2080 TSM:FPAR:OK 23:21:26.306 -> 2081 TSM:ID 23:21:26.306 -> 2082 TSM:ID:OK 23:21:26.306 -> 2084 TSM:UPL 23:21:26.306 -> 2087 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=24,pt=1,l=1,sg=0,ft=0,st=OK:1 23:21:26.306 -> 2095 TSF:MSG:READ,0-0-2,s=255,c=3,t=25,pt=1,l=1,sg=0:1 23:21:26.306 -> 2100 TSF:MSG:PONG RECV,HP=1 23:21:26.306 -> 2103 TSM:UPL:OK 23:21:26.306 -> 2104 TSM:READY:ID=2,PAR=0,DIS=1 23:21:26.306 -> 2109 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=15,pt=6,l=2,sg=0,ft=0,st=OK:0100 23:21:26.341 -> 2118 TSF:MSG:READ,0-0-2,s=255,c=3,t=15,pt=6,l=2,sg=0:0100 23:21:26.341 -> 2125 TSF:MSG:SEND,2-2-0-0,s=255,c=0,t=17,pt=0,l=5,sg=0,ft=0,st=OK:2.3.0 23:21:26.341 -> 2134 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=6,pt=1,l=1,sg=0,ft=0,st=OK:0 2203 TSF:MSG:READ,0-0-2,s=255,c=3,t=6,pt=0,l=1,sg=0:M 23:21:26.410 -> 2210 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=11,pt=0,l=12,sg=0,ft=0,st=OK:Energy Meter 23:21:26.445 -> 2220 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=12,pt=0,l=3,sg=0,ft=0,st=OK:1.0 23:21:26.445 -> 2228 TSF:MSG:SEND,2-2-0-0,s=1,c=0,t=13,pt=0,l=0,sg=0,ft=0,st=OK: 23:21:26.445 -> 2234 MCO:REG:REQ 23:21:26.445 -> 2237 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=26,pt=1,l=1,sg=0,ft=0,st=OK:2 2252 TSF:MSG:READ,0-0-2,s=255,c=3,t=27,pt=1,l=1,sg=0:1 23:21:26.480 -> 2257 MCO:PIM:NODE REG=1 23:21:26.480 -> 2259 MCO:BGN:STP 23:21:26.480 -> 2263 TSF:MSG:SEND,2-2-0-0,s=1,c=2,t=24,pt=0,l=0,sg=0,ft=0,st=OK: 23:21:26.480 -> 2269 MCO:BGN:INIT OK,TSP=1 23:21:26.480 -> 2272 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:21:26.480 -> 2277 TSF:TDI:TSLAs far as i can see it seems fine and also shows up in myscontroller.
And here is an example how it looks after 20 seconds sleep.
2414 MCO:SLP:WUP=-1 23:26:36.346 -> 2416 TSF:TRI:TSB 23:26:36.346 -> 2418 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:26:36.346 -> 2423 TSF:TDI:TSLI don't see any connection attempts with my gateway, or shouldn't there by any if the sensor is not triggered?
Here i can show how it looks when tricking the sensor with the ir on the mouse.
2456 MCO:SLP:WUP=-1 23:27:48.785 -> 2458 TSF:TRI:TSB 23:27:48.785 -> 2460 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:48.785 -> 2465 TSF:TDI:TSL 2467 MCO:SLP:WUP=-1 23:27:48.924 -> 2468 TSF:TRI:TSB 23:27:48.959 -> 2470 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:48.959 -> 2476 TSF:TDI:TSL 2478 MCO:SLP:WUP=-1 23:27:49.098 -> 2480 TSF:TRI:TSB 23:27:49.098 -> 2481 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.098 -> 2486 TSF:TDI:TSL 2488 MCO:SLP:WUP=-1 23:27:49.235 -> 2490 TSF:TRI:TSB 23:27:49.235 -> 2492 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.270 -> 2497 TSF:TDI:TSL 2498 MCO:SLP:WUP=-1 23:27:49.408 -> 2500 TSF:TRI:TSB 23:27:49.408 -> 2502 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.408 -> 2507 TSF:TDI:TSL 2509 MCO:SLP:WUP=-1 23:27:49.546 -> 2510 TSF:TRI:TSB 23:27:49.546 -> 2512 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.546 -> 2518 TSF:TDI:TSLInterrupt is triggered and it wakes up, but nothing is sent to the gateway.
Have i missed something?
-
@mfalkvidd , you are absolutely right. Let me clarify.
I am using the example code that is under build and power meter pulse sensor, updated may 1st, 2018.
Running it with "sleep mode = false" it works fine with both usb and battery power, just drains the battery quite fast.
Setting it to "sleep mode = true" it doesn't work either on usb or battery power.Here's how the serial monitor looks for the startup phase with sleep mode as true.
23:21:24.219 -> __ __ ____ 23:21:24.219 -> | \/ |_ _/ ___| ___ _ __ ___ ___ _ __ ___ 23:21:24.219 -> | |\/| | | | \___ \ / _ \ `_ \/ __|/ _ \| `__/ __| 23:21:24.219 -> | | | | |_| |___| | __/ | | \__ \ _ | | \__ \ 23:21:24.219 -> |_| |_|\__, |____/ \___|_| |_|___/\___/|_| |___/ 23:21:24.219 -> |___/ 2.3.0 23:21:24.219 -> 23:21:24.219 -> 16 MCO:BGN:INIT NODE,CP=RNNNA---,VER=2.3.0 23:21:24.254 -> 25 TSM:INIT 23:21:24.254 -> 26 TSF:WUR:MS=0 23:21:24.254 -> 33 TSM:INIT:TSP OK 23:21:24.254 -> 35 TSF:SID:OK,ID=2 23:21:24.254 -> 37 TSM:FPAR 73 TSF:MSG:SEND,2-2-255-255,s=255,c=3,t=7,pt=0,l=0,sg=0,ft=0,st=OK: 201 TSF:MSG:READ,0-0-2,s=255,c=3,t=8,pt=1,l=1,sg=0:0 23:21:24.428 -> 205 TSF:MSG:FPAR OK,ID=0,D=1 2080 TSM:FPAR:OK 23:21:26.306 -> 2081 TSM:ID 23:21:26.306 -> 2082 TSM:ID:OK 23:21:26.306 -> 2084 TSM:UPL 23:21:26.306 -> 2087 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=24,pt=1,l=1,sg=0,ft=0,st=OK:1 23:21:26.306 -> 2095 TSF:MSG:READ,0-0-2,s=255,c=3,t=25,pt=1,l=1,sg=0:1 23:21:26.306 -> 2100 TSF:MSG:PONG RECV,HP=1 23:21:26.306 -> 2103 TSM:UPL:OK 23:21:26.306 -> 2104 TSM:READY:ID=2,PAR=0,DIS=1 23:21:26.306 -> 2109 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=15,pt=6,l=2,sg=0,ft=0,st=OK:0100 23:21:26.341 -> 2118 TSF:MSG:READ,0-0-2,s=255,c=3,t=15,pt=6,l=2,sg=0:0100 23:21:26.341 -> 2125 TSF:MSG:SEND,2-2-0-0,s=255,c=0,t=17,pt=0,l=5,sg=0,ft=0,st=OK:2.3.0 23:21:26.341 -> 2134 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=6,pt=1,l=1,sg=0,ft=0,st=OK:0 2203 TSF:MSG:READ,0-0-2,s=255,c=3,t=6,pt=0,l=1,sg=0:M 23:21:26.410 -> 2210 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=11,pt=0,l=12,sg=0,ft=0,st=OK:Energy Meter 23:21:26.445 -> 2220 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=12,pt=0,l=3,sg=0,ft=0,st=OK:1.0 23:21:26.445 -> 2228 TSF:MSG:SEND,2-2-0-0,s=1,c=0,t=13,pt=0,l=0,sg=0,ft=0,st=OK: 23:21:26.445 -> 2234 MCO:REG:REQ 23:21:26.445 -> 2237 TSF:MSG:SEND,2-2-0-0,s=255,c=3,t=26,pt=1,l=1,sg=0,ft=0,st=OK:2 2252 TSF:MSG:READ,0-0-2,s=255,c=3,t=27,pt=1,l=1,sg=0:1 23:21:26.480 -> 2257 MCO:PIM:NODE REG=1 23:21:26.480 -> 2259 MCO:BGN:STP 23:21:26.480 -> 2263 TSF:MSG:SEND,2-2-0-0,s=1,c=2,t=24,pt=0,l=0,sg=0,ft=0,st=OK: 23:21:26.480 -> 2269 MCO:BGN:INIT OK,TSP=1 23:21:26.480 -> 2272 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:21:26.480 -> 2277 TSF:TDI:TSLAs far as i can see it seems fine and also shows up in myscontroller.
And here is an example how it looks after 20 seconds sleep.
2414 MCO:SLP:WUP=-1 23:26:36.346 -> 2416 TSF:TRI:TSB 23:26:36.346 -> 2418 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:26:36.346 -> 2423 TSF:TDI:TSLI don't see any connection attempts with my gateway, or shouldn't there by any if the sensor is not triggered?
Here i can show how it looks when tricking the sensor with the ir on the mouse.
2456 MCO:SLP:WUP=-1 23:27:48.785 -> 2458 TSF:TRI:TSB 23:27:48.785 -> 2460 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:48.785 -> 2465 TSF:TDI:TSL 2467 MCO:SLP:WUP=-1 23:27:48.924 -> 2468 TSF:TRI:TSB 23:27:48.959 -> 2470 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:48.959 -> 2476 TSF:TDI:TSL 2478 MCO:SLP:WUP=-1 23:27:49.098 -> 2480 TSF:TRI:TSB 23:27:49.098 -> 2481 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.098 -> 2486 TSF:TDI:TSL 2488 MCO:SLP:WUP=-1 23:27:49.235 -> 2490 TSF:TRI:TSB 23:27:49.235 -> 2492 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.270 -> 2497 TSF:TDI:TSL 2498 MCO:SLP:WUP=-1 23:27:49.408 -> 2500 TSF:TRI:TSB 23:27:49.408 -> 2502 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.408 -> 2507 TSF:TDI:TSL 2509 MCO:SLP:WUP=-1 23:27:49.546 -> 2510 TSF:TRI:TSB 23:27:49.546 -> 2512 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 23:27:49.546 -> 2518 TSF:TDI:TSLInterrupt is triggered and it wakes up, but nothing is sent to the gateway.
Have i missed something?
@patrikr76 great info, thanks!
The -1 in Wup=-1 indicates that the node was waken up by timer and not by interrupt. That’s very strange, since the time stamps clearly show that 20 seconds has not passed.
Could you add
Serial.println(pulseCount);after
sleep(SEND_FREQUENCY);to see if pulseCount is increased?
-
@mfalkvidd , Here's the serial monitor after adding the serial print.
2269 MCO:SLP:WUP=-1 14:15:15.125 -> 2270 TSF:TRI:TSB 14:15:15.125 -> 0 14:15:15.125 -> 2272 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 14:15:15.125 -> 2277 TSF:TDI:TSL 2279 MCO:SLP:WUP=-1 14:15:37.264 -> 2281 TSF:TRI:TSB 14:15:37.264 -> 0 14:15:37.264 -> 2282 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 14:15:37.264 -> 2287 TSF:TDI:TSL 2289 MCO:SLP:WUP=-1 14:15:59.354 -> 2291 TSF:TRI:TSB 14:15:59.354 -> 0 14:15:59.354 -> 2293 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 14:15:59.389 -> 2298 TSF:TDI:TSLAs you see, it sleeps about 22 secs with no pulse on it.
Moving the mouse over it gives this.
2353 MCO:SLP:WUP=-1 14:18:09.982 -> 2355 TSF:TRI:TSB 14:18:09.982 -> 4 14:18:09.982 -> 2357 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 14:18:09.982 -> 2362 TSF:TDI:TSL 2363 MCO:SLP:WUP=-1 14:18:23.059 -> 2365 TSF:TRI:TSB 14:18:23.059 -> 5 14:18:23.059 -> 2367 MCO:SLP:MS=20000,SMS=0,I1=255,M1=255,I2=255,M2=255 14:18:23.059 -> 2372 TSF:TDI:TSLLooking through the code, this one raises a flag.
if (pcReceived && (SLEEP_MODE || sendTime))The pulseCount send is within that if statement which is not fullfilled because it doesn't receive pcReceived.
Or am i wrong? -
Found a solution, which is not ideal.
I was having similar problem with a motion sensor not being able to send, adding a delay after sleep helped on that one, but it was just a 5ms delay needed.On this one i had to add a 1 sec delay in the begining of the loop. I tried smaller but then it didn't work.
I am starting to think it is the nano clone that has crappy components. -
Found a solution, which is not ideal.
I was having similar problem with a motion sensor not being able to send, adding a delay after sleep helped on that one, but it was just a 5ms delay needed.On this one i had to add a 1 sec delay in the begining of the loop. I tried smaller but then it didn't work.
I am starting to think it is the nano clone that has crappy components.@patrikr76 nice work.
Sounds very similar to https://forum.mysensors.org/topic/9655/delay-after-tsf-tri-tsb/14 -
I have two meters I would like to measure: One that the LED is off most of the time and briefly pulses on per increment (at 3200 pulses per Kwh - so I adjusted the pulse factor accordingly). This works fine. The second meter, the LED pulses off (meaning the led it lit most of the time, and pulses off briefly). Do I need to adjust the code in any way to deal with this meter? Thanks. Really impressed it works virtually out of the box.
-
I have two meters I would like to measure: One that the LED is off most of the time and briefly pulses on per increment (at 3200 pulses per Kwh - so I adjusted the pulse factor accordingly). This works fine. The second meter, the LED pulses off (meaning the led it lit most of the time, and pulses off briefly). Do I need to adjust the code in any way to deal with this meter? Thanks. Really impressed it works virtually out of the box.
-
Is there a suggested replacement for the TSL250? While it can still be found, it seems to be discontinued for the most part.
I've had no luck with the LM393 solution for my new power meter. Just can't tune it to pick up the led impulses. What sort of diode solution is everyone else using? I'm aware of the possibility of IR communication (https://wiki.hal9k.dk/projects/kamstrup) but it seems a little over the top.
-
Hello
my skectch works very well, only I have a double pricing, I manage to recover the information. but I have to modify the code in order to have my exact consumption.
but my code sends me information always on the same IDs.
thank you -
Thank you for your welcome @mfalkvidd
Our electricity provider offers several rates.
HP: Full time
HC: off-peak timeusually the HP/HC rate is programmed at night by the provider.
As the consumption is saved by the arduino, I need two different IDs to trace the information to domotics
-
Here is the modified code:
#define MY_PARENT_NODE_ID 0 // define if fixed parent #define MY_PARENT_NODE_IS_STATIC #undef MY_REGISTRATION_FEATURE // sketch moves on if no registration #define MY_NODE_ID 2 // fixed node number // Enable debug prints #define MY_DEBUG // Enable RS485 transport layer #define MY_RS485 // Define this to enables DE-pin management on defined pin #define MY_RS485_DE_PIN 2 // Set RS485 baud rate to use #define MY_RS485_BAUD_RATE 9600 // Set blinking period #define MY_DEFAULT_LED_BLINK_PERIOD 300 // Flash leds on rx/tx/err #define MY_DEFAULT_ERR_LED_PIN 13 // Error led pin #define MY_DEFAULT_RX_LED_PIN 7 // Receive led pin #define MY_DEFAULT_TX_LED_PIN 6 // the PCB, on board LED // Enable and select radio type attached //#define MY_RADIO_NRF24 //#define MY_RADIO_RFM69 #include <MySensors.h> #include <SPI.h> #include <Bounce2.h> #define DIGITAL_INPUT_SENSOR 3 // The digital input you attached your light sensor. (Only 2 and 3 generates interrupt!) #define DIGITAL_INPUT_HCHP 5 #define PULSE_FACTOR 250 // Nummber of blinks per KWH of your meeter #define SLEEP_MODE false // Watt-value can only be reported when sleep mode is false. #define MAX_WATT 10000 // Max watt value to report. This filetrs outliers. //#define CHILD_ID 2 // Id of the sensor child unsigned long SEND_FREQUENCY = 20000; // Minimum time between send (in milliseconds). We don't wnat to spam the gateway. double ppwh = ((double)PULSE_FACTOR)/1000; // Pulses per watt hour bool pcReceived = false; volatile unsigned long pulseHpCount = 0; volatile unsigned long pulseHcCount = 0; volatile unsigned long lastBlink = 0; unsigned long oldPulseHpCount = 0; volatile unsigned long watt = 0; unsigned long oldWatt = 0; double oldKwhHp; unsigned long oldPulseHcCount = 0; double oldKwhHc; unsigned long lastSend; Bounce debouncer = Bounce(); int oldValue=-1; MyMessage wattMsg(1,V_WATT); MyMessage kwhHpMsg(3,V_KWH); MyMessage pcHpMsg(2,V_VAR1); MyMessage kwhHcMsg(5,V_KWH); MyMessage pcHcMsg(6,V_VAR1); MyMessage hchpMsg(7,V_VAR2); const int ledPin = 13; // sortie digitale void setup() { // Fetch last known pulse count value from gw request(2, V_VAR1); request(6, V_VAR1); // Use the internal pullup to be able to hook up this sketch directly to an energy meter with S0 output // If no pullup is used, the reported usage will be too high because of the floating pin pinMode(DIGITAL_INPUT_SENSOR,INPUT_PULLUP); pinMode(DIGITAL_INPUT_HCHP,INPUT_PULLUP); pinMode(ledPin, OUTPUT); attachInterrupt(digitalPinToInterrupt(DIGITAL_INPUT_SENSOR), onPulse, RISING); lastSend=millis(); // After setting up the button, setup debouncer debouncer.attach(DIGITAL_INPUT_HCHP); debouncer.interval(5); } void presentation() { // Send the sketch version information to the gateway and Controller sendSketchInfo("Energy Meter", "2.0"); // Register this device as power sensor present(1, S_POWER); // Register this device as power sensor present(2, S_POWER); // Register this device as power sensor present(3, S_POWER); // Register this device as power sensor present(5, S_POWER); // Register this device as power sensor present(6, S_POWER); // Register this device as power sensor present(7, S_POWER); } void loop() { unsigned long now = millis(); if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ) { // LED Power On digitalWrite(ledPin, HIGH); // LED Power Off digitalWrite(ledPin, LOW); } { debouncer.update(); // Get the update value int value = debouncer.read(); Serial.println(""); if (value != oldValue) { // Send in the new value send(hchpMsg.set(value==HIGH ? 1 : 0)); oldValue = value; } } // Only send values at a maximum frequency or woken up from sleep bool sendTime = now - lastSend > SEND_FREQUENCY; if (pcReceived && (SLEEP_MODE || sendTime)) { // New watt value has been calculated if (!SLEEP_MODE && watt != oldWatt) { // Check that we dont get unresonable large watt value. // could hapen when long wraps or false interrupt triggered if (watt<((unsigned long)MAX_WATT)) { send(wattMsg.set(watt)); // Send watt value to gw } Serial.print("Watt:"); Serial.println(watt); oldWatt = watt; } /////HP if (digitalRead(DIGITAL_INPUT_SENSOR) == HIGH ) { // Pulse cout has changed if (pulseHpCount != oldPulseHpCount) { send(pcHpMsg.set(pulseHpCount)); // Send pulse count value to gw double kwhHp = ((double)pulseHpCount/((double)PULSE_FACTOR)); oldPulseHpCount = pulseHpCount; digitalWrite(ledPin, LOW); if (kwhHp != oldKwhHp) { send(kwhHpMsg.set(kwhHp, 4)); // Send kwh value to gw oldKwhHp = kwhHp; } digitalWrite(ledPin, HIGH); } lastSend = now; }else if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ){ if (pulseHcCount != oldPulseHcCount) { send(pcHcMsg.set(pulseHcCount)); // Send pulse count value to gw double kwhHc = ((double)pulseHcCount/((double)PULSE_FACTOR)); oldPulseHcCount = pulseHcCount; digitalWrite(ledPin, LOW); if (kwhHc != oldKwhHc) { send(kwhHcMsg.set(kwhHc, 4)); // Send kwh value to gw oldKwhHc = kwhHc; } digitalWrite(ledPin, HIGH); } lastSend = now; } }else if (sendTime && !pcReceived) { // No count received. Try requesting it again request(2, V_VAR1); request(6, V_VAR1); lastSend=now; } if (SLEEP_MODE) { sleep(SEND_FREQUENCY); } } void receive(const MyMessage &message) { /////HP if (digitalRead(DIGITAL_INPUT_SENSOR) == HIGH ) { if (message.type==V_VAR1) { pulseHpCount = oldPulseHpCount = message.getLong(); Serial.print("Received last pulse count from gw:"); Serial.println(pulseHpCount); pcReceived = true; } } /////HC if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ) { if (message.type==V_VAR1) { pulseHcCount = oldPulseHcCount = message.getLong(); Serial.print("Received last pulse count from gw:"); Serial.println(pulseHcCount); pcReceived = true; } } } void onPulse() { /////HP if (digitalRead(DIGITAL_INPUT_SENSOR) == HIGH ) { if (!SLEEP_MODE) { unsigned long newBlink = micros(); unsigned long interval = newBlink-lastBlink; if (interval<10000L) { // Sometimes we get interrupt on RISING return; } watt = (3600000000.0 /interval) / ppwh; lastBlink = newBlink; } pulseHpCount++; } /////HC else if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ) { if (!SLEEP_MODE) { unsigned long newBlink = micros(); unsigned long interval = newBlink-lastBlink; if (interval<10000L) { // Sometimes we get interrupt on RISING return; } watt = (3600000000.0 /interval) / ppwh; lastBlink = newBlink; } pulseHcCount++; } } -
Here is the modified code:
#define MY_PARENT_NODE_ID 0 // define if fixed parent #define MY_PARENT_NODE_IS_STATIC #undef MY_REGISTRATION_FEATURE // sketch moves on if no registration #define MY_NODE_ID 2 // fixed node number // Enable debug prints #define MY_DEBUG // Enable RS485 transport layer #define MY_RS485 // Define this to enables DE-pin management on defined pin #define MY_RS485_DE_PIN 2 // Set RS485 baud rate to use #define MY_RS485_BAUD_RATE 9600 // Set blinking period #define MY_DEFAULT_LED_BLINK_PERIOD 300 // Flash leds on rx/tx/err #define MY_DEFAULT_ERR_LED_PIN 13 // Error led pin #define MY_DEFAULT_RX_LED_PIN 7 // Receive led pin #define MY_DEFAULT_TX_LED_PIN 6 // the PCB, on board LED // Enable and select radio type attached //#define MY_RADIO_NRF24 //#define MY_RADIO_RFM69 #include <MySensors.h> #include <SPI.h> #include <Bounce2.h> #define DIGITAL_INPUT_SENSOR 3 // The digital input you attached your light sensor. (Only 2 and 3 generates interrupt!) #define DIGITAL_INPUT_HCHP 5 #define PULSE_FACTOR 250 // Nummber of blinks per KWH of your meeter #define SLEEP_MODE false // Watt-value can only be reported when sleep mode is false. #define MAX_WATT 10000 // Max watt value to report. This filetrs outliers. //#define CHILD_ID 2 // Id of the sensor child unsigned long SEND_FREQUENCY = 20000; // Minimum time between send (in milliseconds). We don't wnat to spam the gateway. double ppwh = ((double)PULSE_FACTOR)/1000; // Pulses per watt hour bool pcReceived = false; volatile unsigned long pulseHpCount = 0; volatile unsigned long pulseHcCount = 0; volatile unsigned long lastBlink = 0; unsigned long oldPulseHpCount = 0; volatile unsigned long watt = 0; unsigned long oldWatt = 0; double oldKwhHp; unsigned long oldPulseHcCount = 0; double oldKwhHc; unsigned long lastSend; Bounce debouncer = Bounce(); int oldValue=-1; MyMessage wattMsg(1,V_WATT); MyMessage kwhHpMsg(3,V_KWH); MyMessage pcHpMsg(2,V_VAR1); MyMessage kwhHcMsg(5,V_KWH); MyMessage pcHcMsg(6,V_VAR1); MyMessage hchpMsg(7,V_VAR2); const int ledPin = 13; // sortie digitale void setup() { // Fetch last known pulse count value from gw request(2, V_VAR1); request(6, V_VAR1); // Use the internal pullup to be able to hook up this sketch directly to an energy meter with S0 output // If no pullup is used, the reported usage will be too high because of the floating pin pinMode(DIGITAL_INPUT_SENSOR,INPUT_PULLUP); pinMode(DIGITAL_INPUT_HCHP,INPUT_PULLUP); pinMode(ledPin, OUTPUT); attachInterrupt(digitalPinToInterrupt(DIGITAL_INPUT_SENSOR), onPulse, RISING); lastSend=millis(); // After setting up the button, setup debouncer debouncer.attach(DIGITAL_INPUT_HCHP); debouncer.interval(5); } void presentation() { // Send the sketch version information to the gateway and Controller sendSketchInfo("Energy Meter", "2.0"); // Register this device as power sensor present(1, S_POWER); // Register this device as power sensor present(2, S_POWER); // Register this device as power sensor present(3, S_POWER); // Register this device as power sensor present(5, S_POWER); // Register this device as power sensor present(6, S_POWER); // Register this device as power sensor present(7, S_POWER); } void loop() { unsigned long now = millis(); if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ) { // LED Power On digitalWrite(ledPin, HIGH); // LED Power Off digitalWrite(ledPin, LOW); } { debouncer.update(); // Get the update value int value = debouncer.read(); Serial.println(""); if (value != oldValue) { // Send in the new value send(hchpMsg.set(value==HIGH ? 1 : 0)); oldValue = value; } } // Only send values at a maximum frequency or woken up from sleep bool sendTime = now - lastSend > SEND_FREQUENCY; if (pcReceived && (SLEEP_MODE || sendTime)) { // New watt value has been calculated if (!SLEEP_MODE && watt != oldWatt) { // Check that we dont get unresonable large watt value. // could hapen when long wraps or false interrupt triggered if (watt<((unsigned long)MAX_WATT)) { send(wattMsg.set(watt)); // Send watt value to gw } Serial.print("Watt:"); Serial.println(watt); oldWatt = watt; } /////HP if (digitalRead(DIGITAL_INPUT_SENSOR) == HIGH ) { // Pulse cout has changed if (pulseHpCount != oldPulseHpCount) { send(pcHpMsg.set(pulseHpCount)); // Send pulse count value to gw double kwhHp = ((double)pulseHpCount/((double)PULSE_FACTOR)); oldPulseHpCount = pulseHpCount; digitalWrite(ledPin, LOW); if (kwhHp != oldKwhHp) { send(kwhHpMsg.set(kwhHp, 4)); // Send kwh value to gw oldKwhHp = kwhHp; } digitalWrite(ledPin, HIGH); } lastSend = now; }else if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ){ if (pulseHcCount != oldPulseHcCount) { send(pcHcMsg.set(pulseHcCount)); // Send pulse count value to gw double kwhHc = ((double)pulseHcCount/((double)PULSE_FACTOR)); oldPulseHcCount = pulseHcCount; digitalWrite(ledPin, LOW); if (kwhHc != oldKwhHc) { send(kwhHcMsg.set(kwhHc, 4)); // Send kwh value to gw oldKwhHc = kwhHc; } digitalWrite(ledPin, HIGH); } lastSend = now; } }else if (sendTime && !pcReceived) { // No count received. Try requesting it again request(2, V_VAR1); request(6, V_VAR1); lastSend=now; } if (SLEEP_MODE) { sleep(SEND_FREQUENCY); } } void receive(const MyMessage &message) { /////HP if (digitalRead(DIGITAL_INPUT_SENSOR) == HIGH ) { if (message.type==V_VAR1) { pulseHpCount = oldPulseHpCount = message.getLong(); Serial.print("Received last pulse count from gw:"); Serial.println(pulseHpCount); pcReceived = true; } } /////HC if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ) { if (message.type==V_VAR1) { pulseHcCount = oldPulseHcCount = message.getLong(); Serial.print("Received last pulse count from gw:"); Serial.println(pulseHcCount); pcReceived = true; } } } void onPulse() { /////HP if (digitalRead(DIGITAL_INPUT_SENSOR) == HIGH ) { if (!SLEEP_MODE) { unsigned long newBlink = micros(); unsigned long interval = newBlink-lastBlink; if (interval<10000L) { // Sometimes we get interrupt on RISING return; } watt = (3600000000.0 /interval) / ppwh; lastBlink = newBlink; } pulseHpCount++; } /////HC else if (digitalRead(DIGITAL_INPUT_SENSOR) == LOW ) { if (!SLEEP_MODE) { unsigned long newBlink = micros(); unsigned long interval = newBlink-lastBlink; if (interval<10000L) { // Sometimes we get interrupt on RISING return; } watt = (3600000000.0 /interval) / ppwh; lastBlink = newBlink; } pulseHcCount++; } } -
@fullmetal cool. Thanks for explaining, and for sharing your sketch.
-
Update: Running for over 12 months on 2 regular AA batteries using the method I described above. Basically rather than powering the tsl257 constantly, I wake up every 125ms then send power to the tsl257, check if there has been a state change in the power meter light then go back to sleep.
-
This thread contains comments for the article "Power Meter Pulse Sensor" posted on MySensors.org.
Hi
My heat exchanger does only give one pulse / kWh which results in that there can be hours between the pulses. When doing the watt calculation micros are used and that counter overflow after 70minutes. See: https://www.arduino.cc/reference/en/language/functions/time/micros/
I have modified the sketch to use millis instead of micros when the time between the pulses are above one hour and micros if it is less than an hour.
I hope I did it correct ;-)
Best regards
Peter Andersson/* * The MySensors Arduino library handles the wireless radio link and protocol * between your home built sensors/actuators and HA controller of choice. * The sensors forms a self healing radio network with optional repeaters. Each * repeater and gateway builds a routing tables in EEPROM which keeps track of the * network topology allowing messages to be routed to nodes. * * Created by Henrik Ekblad <henrik.ekblad@mysensors.org> * Copyright (C) 2013-2019 Sensnology AB * Full contributor list: https://github.com/mysensors/MySensors/graphs/contributors * * Documentation: http://www.mysensors.org * Support Forum: http://forum.mysensors.org * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * version 2 as published by the Free Software Foundation. * ******************************* * * REVISION HISTORY * Version 1.0 - Henrik Ekblad * Version 1.1 - Peter Andersson added millis watt calculation if time between pulses > 1h * * DESCRIPTION * This sketch provides an example how to implement a LM393 PCB * Use this sensor to measure kWh and Watt of your house meter * You need to set the correct pulsefactor of your meter (blinks per kWh). * The sensor starts by fetching current kWh value from gateway. * Reports both kWh and Watt back to gateway. * * Unfortunately millis() won't increment when the Arduino is in * sleepmode. So we cannot make this sensor sleep if we also want * to calculate/report watt value. * http://www.mysensors.org/build/pulse_power */ #define MY_REPEATER_FEATURE //Added // Enable debug prints #define MY_DEBUG // Enable and select radio type attached #define MY_RADIO_RF24 //#define MY_RADIO_NRF5_ESB //#define MY_RADIO_RFM69 //#define MY_RADIO_RFM95 #include <MySensors.h> #define DIGITAL_INPUT_SENSOR 3 // The digital input you attached your light sensor. (Only 2 and 3 generates interrupt!) #define PULSE_FACTOR 1 // Number of blinks per of your meter. Normally 1000 #define SLEEP_MODE false // Watt value can only be reported when sleep mode is false. #define MAX_WATT 100000 // Max watt value to report. This filters outliers. Normally 10000 #define CHILD_ID 1 // Id of the sensor child uint32_t SEND_FREQUENCY = 20000; // Minimum time between send (in milliseconds). We don't want to spam the gateway. double ppwh = ((double)PULSE_FACTOR)/1000; // Pulses per watt hour bool pcReceived = false; volatile uint32_t pulseCount = 0; volatile uint32_t lastBlinkmicros = 0; volatile uint32_t lastBlinkmillis = 0; volatile uint32_t watt = 0; uint32_t oldPulseCount = 0; uint32_t oldWatt = 0; double oldkWh; uint32_t lastSend; MyMessage wattMsg(CHILD_ID,V_WATT); MyMessage kWhMsg(CHILD_ID,V_KWH); MyMessage pcMsg(CHILD_ID,V_VAR1); void setup() { // Fetch last known pulse count value from gw request(CHILD_ID, V_VAR1); // Use the internal pullup to be able to hook up this sketch directly to an energy meter with S0 output // If no pullup is used, the reported usage will be too high because of the floating pin pinMode(DIGITAL_INPUT_SENSOR,INPUT_PULLUP); attachInterrupt(digitalPinToInterrupt(DIGITAL_INPUT_SENSOR), onPulse, RISING); lastSend=millis(); } void presentation() { // Send the sketch version information to the gateway and Controller sendSketchInfo("Energy Meter", "1.0"); // Register this device as power sensor present(CHILD_ID, S_POWER); } void loop() { uint32_t now = millis(); // Only send values at a maximum frequency or woken up from sleep bool sendTime = now - lastSend > SEND_FREQUENCY; if (pcReceived && (SLEEP_MODE || sendTime)) { // New watt value has been calculated if (!SLEEP_MODE && watt != oldWatt) { // Check that we don't get unreasonable large watt value. // could happen when long wraps or false interrupt triggered if (watt<((uint32_t)MAX_WATT)) { send(wattMsg.set(watt)); // Send watt value to gw } Serial.print("Watt:"); Serial.println(watt); oldWatt = watt; } // Pulse count value has changed if (pulseCount != oldPulseCount) { send(pcMsg.set(pulseCount)); // Send pulse count value to gw double kWh = ((double)pulseCount/((double)PULSE_FACTOR)); oldPulseCount = pulseCount; if (kWh != oldkWh) { send(kWhMsg.set(kWh, 4)); // Send kWh value to gw oldkWh = kWh; } } lastSend = now; } else if (sendTime && !pcReceived) { // No pulse count value received. Try requesting it again request(CHILD_ID, V_VAR1); lastSend=now; } if (SLEEP_MODE) { sleep(SEND_FREQUENCY); } } void receive(const MyMessage &message) { if (message.type==V_VAR1) { pulseCount = oldPulseCount = message.getLong(); Serial.print("Received last pulse count value from gw:"); Serial.println(pulseCount); pcReceived = true; } } void onPulse() { if (!SLEEP_MODE) { uint32_t newBlinkmicros = micros(); uint32_t newBlinkmillis = millis(); uint32_t intervalmicros = newBlinkmicros-lastBlinkmicros; uint32_t intervalmillis = newBlinkmillis-lastBlinkmillis; if (intervalmicros<10000L && intervalmillis<10L) { // Sometimes we get interrupt on RISING return; } if (intervalmillis<360000) { //Less then an hour since last pulse, use microseconds watt = (3600000000.0 /intervalmicros) / ppwh; } else { watt = (3600000.0 /intervalmillis) / ppwh; //more then an hour since last pulse, use milliseconds as micros will overflow after 70min } lastBlinkmicros = newBlinkmicros; lastBlinkmillis = newBlinkmillis; } pulseCount++; } -
Hi
My heat exchanger does only give one pulse / kWh which results in that there can be hours between the pulses. When doing the watt calculation micros are used and that counter overflow after 70minutes. See: https://www.arduino.cc/reference/en/language/functions/time/micros/
I have modified the sketch to use millis instead of micros when the time between the pulses are above one hour and micros if it is less than an hour.
I hope I did it correct ;-)
Best regards
Peter Andersson/* * The MySensors Arduino library handles the wireless radio link and protocol * between your home built sensors/actuators and HA controller of choice. * The sensors forms a self healing radio network with optional repeaters. Each * repeater and gateway builds a routing tables in EEPROM which keeps track of the * network topology allowing messages to be routed to nodes. * * Created by Henrik Ekblad <henrik.ekblad@mysensors.org> * Copyright (C) 2013-2019 Sensnology AB * Full contributor list: https://github.com/mysensors/MySensors/graphs/contributors * * Documentation: http://www.mysensors.org * Support Forum: http://forum.mysensors.org * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * version 2 as published by the Free Software Foundation. * ******************************* * * REVISION HISTORY * Version 1.0 - Henrik Ekblad * Version 1.1 - Peter Andersson added millis watt calculation if time between pulses > 1h * * DESCRIPTION * This sketch provides an example how to implement a LM393 PCB * Use this sensor to measure kWh and Watt of your house meter * You need to set the correct pulsefactor of your meter (blinks per kWh). * The sensor starts by fetching current kWh value from gateway. * Reports both kWh and Watt back to gateway. * * Unfortunately millis() won't increment when the Arduino is in * sleepmode. So we cannot make this sensor sleep if we also want * to calculate/report watt value. * http://www.mysensors.org/build/pulse_power */ #define MY_REPEATER_FEATURE //Added // Enable debug prints #define MY_DEBUG // Enable and select radio type attached #define MY_RADIO_RF24 //#define MY_RADIO_NRF5_ESB //#define MY_RADIO_RFM69 //#define MY_RADIO_RFM95 #include <MySensors.h> #define DIGITAL_INPUT_SENSOR 3 // The digital input you attached your light sensor. (Only 2 and 3 generates interrupt!) #define PULSE_FACTOR 1 // Number of blinks per of your meter. Normally 1000 #define SLEEP_MODE false // Watt value can only be reported when sleep mode is false. #define MAX_WATT 100000 // Max watt value to report. This filters outliers. Normally 10000 #define CHILD_ID 1 // Id of the sensor child uint32_t SEND_FREQUENCY = 20000; // Minimum time between send (in milliseconds). We don't want to spam the gateway. double ppwh = ((double)PULSE_FACTOR)/1000; // Pulses per watt hour bool pcReceived = false; volatile uint32_t pulseCount = 0; volatile uint32_t lastBlinkmicros = 0; volatile uint32_t lastBlinkmillis = 0; volatile uint32_t watt = 0; uint32_t oldPulseCount = 0; uint32_t oldWatt = 0; double oldkWh; uint32_t lastSend; MyMessage wattMsg(CHILD_ID,V_WATT); MyMessage kWhMsg(CHILD_ID,V_KWH); MyMessage pcMsg(CHILD_ID,V_VAR1); void setup() { // Fetch last known pulse count value from gw request(CHILD_ID, V_VAR1); // Use the internal pullup to be able to hook up this sketch directly to an energy meter with S0 output // If no pullup is used, the reported usage will be too high because of the floating pin pinMode(DIGITAL_INPUT_SENSOR,INPUT_PULLUP); attachInterrupt(digitalPinToInterrupt(DIGITAL_INPUT_SENSOR), onPulse, RISING); lastSend=millis(); } void presentation() { // Send the sketch version information to the gateway and Controller sendSketchInfo("Energy Meter", "1.0"); // Register this device as power sensor present(CHILD_ID, S_POWER); } void loop() { uint32_t now = millis(); // Only send values at a maximum frequency or woken up from sleep bool sendTime = now - lastSend > SEND_FREQUENCY; if (pcReceived && (SLEEP_MODE || sendTime)) { // New watt value has been calculated if (!SLEEP_MODE && watt != oldWatt) { // Check that we don't get unreasonable large watt value. // could happen when long wraps or false interrupt triggered if (watt<((uint32_t)MAX_WATT)) { send(wattMsg.set(watt)); // Send watt value to gw } Serial.print("Watt:"); Serial.println(watt); oldWatt = watt; } // Pulse count value has changed if (pulseCount != oldPulseCount) { send(pcMsg.set(pulseCount)); // Send pulse count value to gw double kWh = ((double)pulseCount/((double)PULSE_FACTOR)); oldPulseCount = pulseCount; if (kWh != oldkWh) { send(kWhMsg.set(kWh, 4)); // Send kWh value to gw oldkWh = kWh; } } lastSend = now; } else if (sendTime && !pcReceived) { // No pulse count value received. Try requesting it again request(CHILD_ID, V_VAR1); lastSend=now; } if (SLEEP_MODE) { sleep(SEND_FREQUENCY); } } void receive(const MyMessage &message) { if (message.type==V_VAR1) { pulseCount = oldPulseCount = message.getLong(); Serial.print("Received last pulse count value from gw:"); Serial.println(pulseCount); pcReceived = true; } } void onPulse() { if (!SLEEP_MODE) { uint32_t newBlinkmicros = micros(); uint32_t newBlinkmillis = millis(); uint32_t intervalmicros = newBlinkmicros-lastBlinkmicros; uint32_t intervalmillis = newBlinkmillis-lastBlinkmillis; if (intervalmicros<10000L && intervalmillis<10L) { // Sometimes we get interrupt on RISING return; } if (intervalmillis<360000) { //Less then an hour since last pulse, use microseconds watt = (3600000000.0 /intervalmicros) / ppwh; } else { watt = (3600000.0 /intervalmillis) / ppwh; //more then an hour since last pulse, use milliseconds as micros will overflow after 70min } lastBlinkmicros = newBlinkmicros; lastBlinkmillis = newBlinkmillis; } pulseCount++; }