Automated Home Forums

Home Temperature Data Logging System

antsals — Sat, 18 May 2013 14:23:59 GMT

Afternoon all,
I�m after putting together a temperature data logging system for my home. Primarily to log the temperature of each of the rooms and then maybe to add the logging of the hot water tank in the future.
As normal I don�t want it to cost the earth, but if it is scalable in the future then it doesn�t matter cause I can buy more items for it in the future. I would prefer wireless connection because this is easier to install without needing to run cables everywhere. I would like it to log the data to its own memory and not need a computer on all the time connected too it or a Server / raspberry pi an option?
If possible access for the internet or through a smartphone app?
I�m not bothered about just buying something readymade off the shelf I am happy to put it together myself.
I know this is probably everything required in one box; but has anyone seen a good solution / brand / make that could suit these requirements?
Cheers
Ant

Easy Power Management output from Wiser or Touch Screen

blacky7 — Fri, 17 May 2013 02:44:18 GMT

Hi All,

I wrote some logic for a client who wanted a text output rather than looking at the pretty graphs. Thought someone here might also find it useful for your own purposes.

It displays the last 12 months of Current Measurement Data (from the 5504CMU C-Bus module) and gives an easy to read output to assess your power use for the period. You just go into PICED, select your project and 'refresh project from unit' so it downloads the latest power CSV file. Of course, don't upload an earlier project to your screen or Wiser or you will overwrite your power data.

You can run this in the PICED logic window by setting your 'logic options' in the logic window to 'Allow use of all functions for testing' and 'Send WriteLn output to log'. You then look for the output in the PICED log file under the 'View' pull down menu in the main PICED window.

Output is as follows:

Code:

C-Bus Network Power Measurement

     

Total Energy (in kWh) Use Measured as at 17/05/2013

This Months Power Use To Date  = 665 kWh

This Months Expected Power Use = 1241 kWh

    

Previous 12 Months

    April 2013 Power Use = 1238 KWh

    March 2013 Power Use = 2166 KWh

  Febuary 2013 Power Use = 2324 KWh

  January 2013 Power Use = 1527 KWh

 December 2012 Power Use = 1514 KWh

 November 2012 Power Use = 1826 KWh

  October 2012 Power Use = 1607 KWh

September 2012 Power Use = 1353 KWh

   August 2012 Power Use = 1708 KWh

     July 2012 Power Use = 1850 KWh

     June 2012 Power Use = 1784 KWh

      May 2012 Power Use = 1632 KWh

     

Average Monthly Energy Use          =  1711 kWh

This Month's Expected Power Use     =  1241 kWh

This Month's Energy Use vs Average  =     -27.5 %

Setup in a new module in PICED Logic called [Power Monitor] (or whatever)

Code:

WriteLn('C-Bus Network Power Measurement');

WriteLn('     ');

DateToString(Date, Today);

DataString := Today;

WriteLn('Total Energy (in kWh) Use Measured as at ',DataString);

MonthPower := GetRealIBSystemIO("Power Meter Total Energy",3, 1, 0, 0, 0, -1);

Format(DataString, 'This Months Power Use To Date  = ', (MonthPower/1000):0:0,' kWh');

WriteLn(DataString);

CMonthPower := GetRealIBSystemIO("Power Meter Total Energy",3, 1, 0, 0, 1, -1);

Format(DataString, 'This Months Expected Power Use = ', (CMonthPower/1000):0:0,' kWh');

WriteLn(DataString);

WriteLn('    ');

WriteLn('Previous 12 Months');

countup := 1;

while countup <= 12 do

  begin

  MonthPower := GetRealIBSystemIO("Power Meter Total Energy", 3, 1, countup, 0, 0, -1);

  Format(DataString, ' Power Use = ', (MonthPower/1000):0:0);

  MonthValue:=Date-(31*countup);

  DecodeDate(MonthValue, CYear, CMonth, CDay);

    case CMonth of //Select Month

    1 : DMonth:='January';

    2 : DMonth:='Febuary';

    3 : DMonth:='March';

    4 : DMonth:='April';

    5 : DMonth:='May';

    6 : DMonth:='June';

    7 : DMonth:='July';

    8 : DMonth:='August';

    9 : DMonth:='September';

    10 : DMonth:='October';

    11 : DMonth:='November';

    12 : DMonth:='December';

    end; 

WriteLn(DMonth:9,CYear:5,DataString,' KWh');

  countup := Succ(countup);

  MonthAv:=MonthAv + MonthPower; 

  end;

WriteLn('     ');

WriteLn('Average Monthly Energy Use          = ',(MonthAv/12)/1000:5:0,' kWh');

Format(DataString, 'This Month''s Expected Power Use     = ', (CMonthPower/1000):5:0,' kWh');

WriteLn(DataString);

WriteLn('This Month''s Energy Use vs Average  = ',(-((MonthAv/12)-CMonthPower)/(MonthAv/12)*100):9:1,' %');  

DisableModule("Power Monitor");

It is designed to just run once and you can use it from PICED or your touch screen using a button etc.

and you need these variables defined in 'Global Variables'

Code:

Global Variables

countup : integer;

DataString : string;

Today :string;

s :string;

MonthPower : real;

CMonthPower : real;

CYear:integer;

CMonth:integer;

MonthAv : real;

DMonth:string;

CDay:integer;

MonthValue:integer;

In the case you wanted to write the output to a text file to keep as a power history, either on a Colour Touch Screen or from PICED after downloading the power data from the touch screen, use the following:

Code:

AssignFile(file2, '12Month_Power_Data.txt');

ReWrite(file2);

WriteLn(file2,'C-Bus Network Power Measurement');

WriteLn(file2,'     ');

DateToString(Date, Today);

DataString := Today;

WriteLn(file2,'Total Energy (in kWh) Use Measured as at ',DataString);

MonthPower := GetRealIBSystemIO("Power Meter Total Energy",3, 1, 0, 0, 0, -1);

Format(DataString, 'This Months Power Use To Date  = ', (MonthPower/1000):0:0,' kWh');

WriteLn(file2,DataString);

CMonthPower := GetRealIBSystemIO("Power Meter Total Energy",3, 1, 0, 0, 1, -1);

Format(DataString, 'This Months Expected Power Use = ', (CMonthPower/1000):0:0,' kWh');

WriteLn(file2,DataString);

WriteLn(file2,'    ');

WriteLn(file2,'Previous 12 Months');

countup := 1;

while countup <= 12 do

  begin

  MonthPower := GetRealIBSystemIO("Power Meter Total Energy", 3, 1, countup, 0, 0, -1);

  Format(DataString, ' Power Use = ', (MonthPower/1000):0:0);

  MonthValue:=Date-(31*countup);

  DecodeDate(MonthValue, CYear, CMonth, CDay);

    case CMonth of //Select Month

    1 : DMonth:='January';

    2 : DMonth:='Febuary';

    3 : DMonth:='March';

    4 : DMonth:='April';

    5 : DMonth:='May';

    6 : DMonth:='June';

    7 : DMonth:='July';

    8 : DMonth:='August';

    9 : DMonth:='September';

    10 : DMonth:='October';

    11 : DMonth:='November';

    12 : DMonth:='December';

    end; 

WriteLn(file2,DMonth:9,CYear:5,DataString,' KWh');

  countup := Succ(countup);

  MonthAv:=MonthAv + MonthPower; 

  end;

WriteLn(file2,'     ');

WriteLn(file2,'Average Monthly Energy Use          = ',(MonthAv/12)/1000:5:0,' kWh');

Format(DataString, 'This Month''s Expected Power Use     = ', (CMonthPower/1000):5:0,' kWh');

WriteLn(file2,DataString);

WriteLn(file2,'This Month''s Energy Use vs Average  = ',(-((MonthAv/12)-CMonthPower)/(MonthAv/12)*100):9:1,' %');  

CloseFile(file2);

DisableModule("Power Monitor");

Please note this code was knocked up quickly till late last night and may have some minor bugs. If you find one, be nice and PM me rather than replying and I will correct it for everyone.

Otherwise Enjoy and I hope you find it useful.

Blacky7

gate intercom and opener?

exon16m — Wed, 15 May 2013 05:44:53 GMT

I am finding it hard to get clear info on various systems.

My goal is :

1) gate button that when pressed alearts me via my mobile.

2) allows two way voice communication and picture from ip camera

3) activates a relay to open the gate.

4) does not require a subscription fee

I like the insteon hub system as does not need a fixed ip. Like the mcontrol setup but as I understand it needs a pc to be left running.

Any sugestions ?

Many X10 items

ianh100 — Tue, 14 May 2013 18:30:48 GMT

Hi All,

I have quite a bit of X10 hardware to sell, some of it on Ebay, some still to add. start with item number 330922304477 and then see my other items.

Still to add:

Multiple wall switches (several new and unused)
HomeVision
Timers
Ref controls and RX modules
TMU12 modules
micro dimmers.

Large mains powered inground 18w exterior LED uplighters for sale

toscal — Mon, 13 May 2013 21:21:27 GMT

Hi
We have 6 inground 18W LED uplights for sale either individually or for the whole batch. If you are interest then send me a PM.
They normally sell for between 160 to 180 euros each but we are selling them for;

Quantity	Price/unit
1 to 2	69 euros each
3 to 4	65 euros each
5 to 6	55 euros each

Price does not include shipping. Will normally ship via 3 to 5 day post with tracking number.

Features
Anti-corrosion, water-proof and excellent heat-dissipation.
Uses high-strength toughened glass as a cover which gives great light transparency.

Specs:

Warm White
1020 lumen
colour temp: 2700-3200K
beam angle not too sure but between 12 and 30 degrees
Power 18W (18x 1W Epistar LEDs)
Voltage 100 - 240V AC 50-60Hz
IP rating IP65
Dimensions 26cm dia x 9.3cm

dimensions.jpg IMGP0560.jpg IMGP0565.jpg IMGP0566.jpg

Attached Images

IMGP0560.jpg (95.9 KB)
dimensions.jpg (31.6 KB)
IMGP0565.jpg (95.2 KB)
IMGP0566.jpg (97.2 KB)

Latest Clipsal Colour eDLT for C-Bus Videos / Info

blacky7 — Sun, 05 May 2013 07:26:43 GMT

Hi All,

Just wanted to let all the C-Bus guys know that there are two videos about the Clipsal eDLT colour C-Bus switch up on You Tube and a new data sheet.

Take a look at the cool promo video and don't miss the video technical overview that details all the features, benefits and how to use them in your clients sites, or your home.

Also take a look at the specifications data sheet or the brochure for a hard copy.

All the best,

Blacky7

my home automation project...

skiv71 — Tue, 30 Apr 2013 09:45:10 GMT

http://ndautomation.net:8180

guest:guest

all feedback welcome

Neil

Need to update Cortex PC ...

chris_j_hunter — Thu, 25 Apr 2013 09:35:49 GMT

looks like our PC is getting overloaded - but what would be better ?

it's a VIA EPIA EK 10000G with maximum RAM & runs with Windows XP Pro at around 1GHz and a CPU load of around 80% ...

would be good to get that down to around 30% - but how ?

is it just a matter of a faster CPU, or are there other factors, too ?

would a more recent Windows version be faster ?

any thoughts ... ???

CM Zone Questions

Simes123 — Mon, 22 Apr 2013 22:19:19 GMT

Hi, have just bought a CM Zone Pack (1 x CM67Z and the boiler relay), and an extra pack of 4 x HR80UKs

I already have a CM927 and DBR91 combo controlling my boiler.

1....I'm thinking I may be able to reuse the CM927 to act as the temperature sensor in a zone in which 2 of the radiators are in cabinets (my large dining room), and the 3rd radiator (uncased) is at the bottom of an open staircase tha leads into the same dining room. Is that a sensible use of the CM927? i presume it will be the temperature sensor for all 3 radiators in such a scenario? Or can I have i such that the 3rd radiator's HR80UK uses it's own temp sensor?

2...The CM67Z (i believe) can also act as temperature sensor? The kitchen has 1 radiator exposed, and 1 hidden behind the sink, and vents through the workop (not very efficient I know, but it's what I inherited when I bought the house). So i presume i could use the CM67Z sensor to sense the temperature in the kitchen zone? Same question as before - will the exposed radiator HR80UK be able to verify it's own temperature in such a scenario?

3....I have an area - large hall, staircase and landing - that has 4 rads. As I don't have enough HR80UKs for all the house rads, I thought I could run this area with another CM67Z (if I buy one) to monitor the temperature, and run conventional TRVs in this area until such time as I get more HR8OUKs. I'm thinking if it gets cold enough, the CM67Z in this are will kick the boiler in and warm the area up, while if it is up to temperature, but a different zone is causing the boiler and pump to run hot water round the circuit, the TRVs will limit the heat output in this area to their setpoint?

4..... I understand the DBR91 is newer, so presume I'd continue to use that, over the one that comes in the CM Zone pack (HC60 or something?).

5.... I understand I can parallel boiler relays in future if I need to. But does that not run a risk of running the boiler for more cycles than is set up in the controls?

Grateful for any advice as new to this setup, and have found the threads on here very useful in my research, so have joined today!

Simon