{"id":628,"date":"2014-11-21T18:23:19","date_gmt":"2014-11-21T16:23:19","guid":{"rendered":"http:\/\/dety.net.ua\/?p=628"},"modified":"2014-12-04T11:31:56","modified_gmt":"2014-12-04T09:31:56","slug":"arduino-energy-monitoring","status":"publish","type":"post","link":"https:\/\/dety.net.ua\/?p=628","title":{"rendered":"Arduino + Energy Monitoring"},"content":{"rendered":"

Recently I’ve built a device for monitoring power consuption from http:\/\/openenergymonitor.org\/emon\/buildingblocks\/how-to-build-an-arduino-energy-monitor<\/a><\/p>\n

I used: Nokia 5110 display for Arduino, sensor SCT-013, power adapter AC-AC 9v.<\/p>\n

I bought a cheap current sensor with LCD to calibrate my device (emon1.current(5, 28);).<\/p>\n

I used Adafruit library because others didn’t work correctly.<\/p>\n

My sketch for it:<\/p>\n

#include “EmonLib.h”\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/ Include Emon Library
\n#include <SPI.h>
\n#include <Adafruit_GFX.h>
\n#include <Adafruit_PCD8544.h>
\nEnergyMonitor emon1;\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/ Create an instance
\n\/\/ Software SPI (slower updates, more flexible pin options):
\n\/\/ pin 7 – Serial clock out (SCLK)
\n\/\/ pin 6 – Serial data out (DIN)
\n\/\/ pin 5 – Data\/Command select (D\/C)
\n\/\/ pin 4 – LCD chip select (CS)
\n\/\/ pin 3 – LCD reset (RST)
\nAdafruit_PCD8544 display = Adafruit_PCD8544(8, 9, 10, 11, 12);<\/p>\n

void setup()
\n{<\/p>\n

Serial.begin(9600);
\n\/\/ init
\ndisplay.begin();
\ndisplay.setContrast(60);
\n\/\/demo
\ndisplay.setTextSize(1);
\ndisplay.setTextColor(BLACK);
\ndisplay.setCursor(0,0);
\n\/\/\u00a0 delay(1000);
\ndisplay.clearDisplay();<\/p>\n

\/\/\u00a0 display.display();
\n\/\/ Calibration
\nemon1.voltage(4, 234.26, 1.7);
\nemon1.current(5, 28);\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/ Current: input pin, calibration.
\n}<\/p>\n

void loop()
\n{
\ndouble Irms = emon1.calcIrms(1480);\u00a0 \/\/ Calculate Irms only 1480
\nemon1.calcVI(20,2000); \/\/ Voltage<\/p>\n

float realPower\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 = emon1.realPower;\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/extract Real Power into variable
\nfloat apparentPower\u00a0\u00a0 = emon1.apparentPower;\u00a0\u00a0\u00a0 \/\/extract Apparent Power into variable
\nfloat powerFactor\u00a0\u00a0\u00a0\u00a0 = emon1.powerFactor;\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/extract Power Factor into Variable
\nfloat supplyVoltage\u00a0\u00a0 = emon1.Vrms;\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/extract Vrms into Variable
\n\/\/float Irms\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 = emon1.Irms;\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/extract Irms into Variable<\/p>\n

\/\/double Volt = emon1.readVcc();
\n\/\/emon1.serialprint();
\ndouble Watt = Irms*supplyVoltage;
\nSerial.print(Watt);\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/ Apparent power
\nSerial.print(” “);
\nSerial.print(Irms);\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/ Irms
\nSerial.print(” “);
\nSerial.print(supplyVoltage);
\nSerial.print(” “);
\nSerial.print(realPower);
\nSerial.print(” “);
\nSerial.print(apparentPower);
\nSerial.println(” “);
\n\/\/Display
\ndisplay.print(“A=”);
\ndisplay.println(Irms);
\ndisplay.print(“W=”);
\ndisplay.println(Irms*220);
\ndisplay.print(“V=”);
\ndisplay.println(supplyVoltage);
\ndisplay.print(“RP=”);
\ndisplay.println(realPower);
\ndisplay.print(“AP=”);
\ndisplay.println(apparentPower);
\ndisplay.print(“PF=”);
\ndisplay.println(powerFactor);
\ndisplay.display();
\ndelay(2000);
\ndisplay.clearDisplay();<\/p>\n

}<\/p><\/blockquote>\n

In the beginning my RRD graphs were strange – voltage and power looked like 0V, 23V, 180V, and so on. After some investigations I found the cause – 2 scripts asks USBtty and conflict with each other. So I composed them into a script:<\/p>\n

#!\/bin\/bash
\n# \u041f\u0443\u0442\u044c \u043a \u0438\u0441\u043f\u043e\u043b\u043d\u0438\u043c\u043e\u043c\u0443 \u0444\u0430\u0439\u043b\u0443 rrdtool
\nRRDTOOL=\/usr\/bin\/rrdtool<\/p>\n

# \u041f\u0443\u0442\u044c \u043a \u0431\u0430\u0437\u0435, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u0445\u0440\u0430\u043d\u0438\u0442\u044c\u0441\u044f \u0442\u0435\u043c\u043f\u0435\u0440\u0430\u0442\u0443\u0440\u0430
\nDATABASE=\/usr\/local\/rrd\/power.rrd
\nDATABASEV=\/usr\/local\/rrd\/voltage.rrd<\/p>\n

# \u041f\u0435\u0440\u0438\u043e\u0434\u0438\u0447\u043d\u043e\u0441\u0442\u044c \u043f\u043e\u0441\u0442\u0443\u043f\u043b\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u0432 \u0431\u0430\u0437\u0443 (\u0441\u0435\u043a) – \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0434\u043e\u043b\u0436\u0435\u043d \u0431\u044b\u0442\u044c \u043d\u0430\u0441\u0442\u0440\u043e\u0435\u043d CRON
\nPERIOD=60<\/p>\n

# \u041a\u043e\u043c\u0430\u043d\u0434\u0430 \u0434\u043b\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u0442\u0435\u043a\u0443\u0449\u0435\u0439 \u0442\u0435\u043c\u043f\u0435\u0440\u0430\u0442\u0443\u0440\u044b \u0441 \u0434\u0430\u0442\u0447\u0438\u043a\u0430!
\nDATASTR=`sed -n ‘n;n;p;q;’ < \/dev\/ttyUSB0` # omit 2 lines from tty because the first line contains not full data and the second line is empty
\nSENSOR=`echo $DATASTR | awk ‘{print $1}’`
\nSENSORV=`echo $DATASTR | awk ‘{print $3}’`
\n#SENSOR=`sed -n ‘n;n;p;q;’ < \/dev\/ttyUSB0 | awk ‘{print $1}’`
\n#SENSORV=`sed -n ‘n;n;p;q;’ < \/dev\/ttyUSB0 | awk ‘{print $3}’`
\necho Power=$SENSOR Voltage=$SENSORV
\n# \u041f\u0443\u0442\u044c \u043a \u043f\u0430\u043f\u043a\u0435, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u0431\u0443\u0434\u0443\u0442 \u043b\u0435\u0436\u0430\u0442\u044c \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0441 \u0433\u0440\u0430\u0444\u0438\u043a\u0430\u043c\u0438 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438, \u043a\u0430\u0442\u0430\u043b\u043e\u0433 web-\u0441\u0435\u0440\u0432\u0435\u0440\u0430.
\nIMAGE_PATH=\/var\/www\/power<\/p>\n

# \u0413\u043e\u0440\u0438\u0437\u043e\u043d\u0442\u0430\u043b\u044c\u043d\u0430\u044f \u043d\u0430\u0434\u043f\u0438\u0441\u044c \u0432 \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043a\u0435 \u0433\u0440\u0430\u0444\u0438\u043a\u0430
\nTITLE_TEXT=’\u042d\u043b\u0435\u043a\u0442\u0440\u043e\u044d\u043d\u0435\u0440\u0433\u0438\u044f’<\/p>\n

# \u0413\u043e\u0440\u0438\u0437\u043e\u043d\u0442\u0430\u043b\u044c\u043d\u0430\u044f \u043d\u0430\u0434\u043f\u0438\u0441\u044c \u0432 \u043b\u0435\u0433\u0435\u043d\u0434\u0435 \u043f\u043e\u0434 \u0433\u0440\u0430\u0444\u0438\u043a\u043e\u043c
\nUNDER_TEXT=’\u0421\u0442\u0430\u0442\u0438\u0441\u0442\u0438\u043a\u0430 \u043f\u043e\u0442\u0440\u0435\u0431\u043b\u0435\u043d\u0438\u044f \u044d\u043b\u0435\u043a\u0442\u0440\u043e\u044d\u043d\u0435\u0440\u0433\u0438\u0438’<\/p>\n

# ========= \u0428\u0410\u0413 1. \u0417\u0430\u043f\u0438\u0441\u044c \u0432 \u0431\u0430\u0437\u0443 \u0434\u0430\u043d\u043d\u044b\u0445 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u043d\u044b\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u0442\u0435\u043c\u043f\u0435\u0440\u0430\u0442\u0443\u0440\u044b ======<\/p>\n

# \u041f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u043c, \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043b\u0438 \u0432\u043e\u043e\u0431\u0449\u0435 \u0431\u0430\u0437\u0430 \u0434\u043b\u044f \u0442\u0435\u043c\u043f\u0435\u0440\u0430\u0442\u0443\u0440\u044b. \u0415\u0441\u043b\u0438 \u043d\u0435\u0442 – \u0441\u043e\u0437\u0434\u0430\u0451\u043c<\/p>\n

if ! [ -f $DATABASE ]
\nthen
\n$RRDTOOL create $DATABASE -s $PERIOD DS:input:GAUGE:600:U:U \\
\nRRA:AVERAGE:0.5:1:576 \\
\nRRA:AVERAGE:0.5:6:672 \\
\nRRA:AVERAGE:0.5:24:732 \\
\nRRA:AVERAGE:0.5:144:1460
\nfi
\nif ! [ -f $DATABASEV ]
\nthen
\n$RRDTOOL create $DATABASE -s $PERIOD DS:input:GAUGE:600:U:U \\
\nRRA:AVERAGE:0.5:1:576 \\
\nRRA:AVERAGE:0.5:6:672 \\
\nRRA:AVERAGE:0.5:24:732 \\
\nRRA:AVERAGE:0.5:144:1460
\nfi<\/p>\n

$RRDTOOL update $DATABASE N:$SENSOR
\n$RRDTOOL update $DATABASEV N:$SENSORV<\/p>\n

# ============================================================================<\/p>\n

# \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0434\u043b\u044f \u043f\u043e\u0441\u0442\u0440\u043e\u0435\u043d\u0438\u044f \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u0442\u0435\u043c\u043f\u0435\u0440\u0430\u0442\u0443\u0440\u044b \u043e\u0442 \u0432\u0440\u0435\u043c\u0435\u043d\u0438<\/p>\n

function DRAW_GRAPHIC
\n{<\/p>\n

# \u041e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c \u0432\u0440\u0435\u043c\u044f, \u0432\u043e \u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0433\u0435\u043d\u0435\u0440\u0438\u0440\u0443\u0435\u0442\u0441\u044f \u0433\u0440\u0430\u0444\u0438\u043a
\nNOW_HOUR=`date +%H`
\nNOW_MIN=`date +%M`
\nNOW_SEC=`date +%S`<\/p>\n

# \u041d\u0430 \u043e\u0441\u043d\u043e\u0432\u0435 \u043f\u0430\u0440\u0430\u043c\u0435\u0442\u0440\u0430 2, \u043f\u0435\u0440\u0435\u0434\u0430\u043d\u043d\u043e\u0433\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u043c \u043a\u0430\u043a\u043e\u0439 \u043a\u043e\u043c\u043c\u0435\u043d\u0442\u0430\u0440\u0438\u0439 \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c
\ncase $2 in
\nday)
\nTIME_TEXT=”\u0437\u0430 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0435 24 \u0447\u0430\u0441\u0430”
\n;;
\nweek)
\nTIME_TEXT=”\u0437\u0430 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u044e\u044e \u043d\u0435\u0434\u0435\u043b\u044e”
\n;;
\nmonth)
\nTIME_TEXT=”\u0437\u0430 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u043c\u0435\u0441\u044f\u0446”
\n;;
\nyear)
\nTIME_TEXT=”\u0437\u0430 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u0433\u043e\u0434”
\n;;
\nesac<\/p>\n

$RRDTOOL graph $IMAGE_PATH\/$1 \\
\n-s -1$2 \\
\n-e now \\
\n-a PNG \\
\n-v $4 \\
\n-t “$TITLE_TEXT $TIME_TEXT” \\
\n-r \\
\n-E \\
\n-i \\
\n-R light \\
\n–zoom 1 \\
\n-w 500 \\
\n-h 150 \\
\n–font DEFAULT:10:\/usr\/local\/share\/rrdtool\/fonts\/ARIAL8.TTF \\
\nDEF:input=$3:input:AVERAGE \\
\nLINE2:input#C0140E \\
\nGPRINT:input:LAST:’\u0422\u0435\u043a\u0443\u0449\u0430\u044f\\:%2.1lf’\\
\nGPRINT:input:MIN:’\u041c\u0438\u043d\\:%2.1lf’ \\
\nGPRINT:input:MAX:’\u041c\u0430\u043a\u0441\\:%2.1lf’ \\
\nGPRINT:input:AVERAGE:’\u0421\u0440\u0435\u0434\u043d\u044f\u044f\\:%4.1lf’
\n}<\/p>\n

# ========= \u0428\u0410\u0413 2. \u041e\u0442\u0440\u0438\u0441\u043e\u0432\u043a\u0430 \u0433\u0440\u0430\u0444\u0438\u043a\u043e\u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u0442\u0435\u043c\u043f\u0435\u0440\u0430\u0442\u0443\u0440\u044b \u043e\u0442 \u0432\u0440\u0435\u043c\u0435\u043d\u0438 ========
\nDRAW_GRAPHIC ‘power_d.png’ ‘day’ $DATABASE ‘\u0412\u0430\u0442\u0442’
\nDRAW_GRAPHIC ‘power_w.png’ ‘week’ $DATABASE ‘\u0412\u0430\u0442\u0442’
\nDRAW_GRAPHIC ‘power_m.png’ ‘month’ $DATABASE ‘\u0412\u0430\u0442\u0442’
\nDRAW_GRAPHIC ‘power_y.png’ ‘year’ $DATABASE ‘\u0412\u0430\u0442\u0442’<\/p>\n

DRAW_GRAPHIC ‘volt_d.png’ ‘day’ $DATABASEV ‘\u0412\u043e\u043b\u044c\u0442’
\nDRAW_GRAPHIC ‘volt_w.png’ ‘week’ $DATABASEV ‘\u0412\u043e\u043b\u044c\u0442’
\nDRAW_GRAPHIC ‘volt_m.png’ ‘month’ $DATABASEV ‘\u0412\u043e\u043b\u044c\u0442’
\nDRAW_GRAPHIC ‘volt_y.png’ ‘year’ $DATABASEV ‘\u0412\u043e\u043b\u044c\u0442’<\/p><\/blockquote>\n

Some photos:<\/p>\n

 <\/p>\n

1. The sensor has a burden resistor already.<\/p>\n

2. Calibration and comparison.<\/p>\n

3. The bad image on the LCD with non-Adafruit library.<\/p>\n

4. RRDtool graphs.<\/p>\n

\"IMG_20141113_115730\"<\/a> \"IMG_20141118_183058\"<\/a> \"Untitled\"<\/a>\"temp\"<\/a><\/p>\n

 <\/p>\n","protected":false},"excerpt":{"rendered":"

Recently I’ve built a device for monitoring power consuption from http:\/\/openenergymonitor.org\/emon\/buildingblocks\/how-to-build-an-arduino-energy-monitor I used: Nokia 5110 display for Arduino, sensor SCT-013, power adapter AC-AC 9v. I bought a cheap current sensor with LCD to calibrate my device (emon1.current(5, 28);). I used Adafruit library because others didn’t work correctly. My sketch for it: #include “EmonLib.h”\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \/\/ Include […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[4,13],"tags":[],"class_list":["post-628","post","type-post","status-publish","format-standard","hentry","category-gadgets","category-novosti"],"_links":{"self":[{"href":"https:\/\/dety.net.ua\/index.php?rest_route=\/wp\/v2\/posts\/628","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/dety.net.ua\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/dety.net.ua\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/dety.net.ua\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/dety.net.ua\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=628"}],"version-history":[{"count":5,"href":"https:\/\/dety.net.ua\/index.php?rest_route=\/wp\/v2\/posts\/628\/revisions"}],"predecessor-version":[{"id":649,"href":"https:\/\/dety.net.ua\/index.php?rest_route=\/wp\/v2\/posts\/628\/revisions\/649"}],"wp:attachment":[{"href":"https:\/\/dety.net.ua\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=628"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/dety.net.ua\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=628"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/dety.net.ua\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=628"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}