Page 3 of 3
Re: Alternative for Qees power strip?
Posted: Fri Nov 02, 2012 8:47 pm
by gvdham
after buying the powerstrip and the aeon stick 2 I tied to install it according to the manual on domotiga.nl. I started the zwave commander and saw 1 device, it looks like this is the stick itself. I tried to add and it says to push the button on the device but nothing happens. Can someone give me a go on how to get it started in domotiga?
Re: Alternative for Qees power strip?
Posted: Sat Nov 03, 2012 2:17 pm
by gvdham
after reading a lot i now see besides the stick two devices in the commander and a lot of log files stating that zwave device 2, 2.1, 2.2 and so on cannot be found. Do i have to add the devices now by hand?
Re: Alternative for Qees power strip?
Posted: Sat Nov 03, 2012 5:40 pm
by raymonvdm
You have to detach the usb device from your computer and push once on the button (device wil be blinking slowly) after that you push the small buton on the side of the powerstrip. If al goes wel the stick should blink fast. Press the button again to shutdown the stick. Place the stick back in your domotiga and restart
Re: Alternative for Qees power strip?
Posted: Sat Nov 03, 2012 6:23 pm
by gvdham
yeah!! I can now add a zwave device and select zwave appliance module with address 2:2 and power it on/off.
Maybe this wasn't the smartest device combination to start with. How can I make it show the power usage?
Re: Alternative for Qees power strip?
Posted: Fri Feb 08, 2013 3:32 am
by criple
Why polling all devices seperately? Just poll the root device to update all the devices...
Re: Alternative for Qees power strip?
Posted: Sat Jul 05, 2014 4:54 pm
by Broes
Slightly changed the script Geert Jan wrote but it won't work in HS3.
I get the error
"VB.Net script exception(0), re-starting: Object reference not set to an instance of an object."
In HS2 everything works at it should.
Has anyone experienced something simular or does anyone know what has to be changed in the vb code to get it working in HS3?
@criple I want to poll only one device (polling 6 devices takes a long time).
Code: Select all
' scriptname = Nuon_Poll_Standby.vb
' Parm0 deviceId = the device to switch off
' Parm1 deviceIdTotalPower = the device that gives the total power consumption
' Parm2 deviceIdCurrentPower = the device that gives the current power consumption
' Parm3 powerLevel = the limit to switch off 'deviceId'. The power is in units of 0.01 Watt, i.e. 200 means 2 Watt
Sub main(parm as Object)
Dim New deviceId As String
Dim deviceIdTotalPower As String
Dim deviceIdCurrentPower As String
Dim powerLevel as Integer
Dim previousPower as Integer
Dim totalPower as Integer
Dim currentPower as Integer
Dim arrParm() As String
' Extract parameters
arrParm = parm.ToString.Split("|")
deviceId = arrParm(0)
deviceIdTotalPower = arrParm(1)
deviceIdCurrentPower = arrParm(2)
powerLevel = arrParm(3)
previousPower = hs.DeviceValue(deviceIdCurrentPower)
' Get total power consumption for devices
hs.PollDevice(deviceIdTotalPower)
hs.WaitSecs(0.1)
totalPower = hs.DeviceValue(deviceIdTotalPower)
' Get current power consumption for devices
hs.PollDevice(deviceIdCurrentPower)
hs.WaitSecs(0.1)
currentPower = hs.DeviceValue(deviceIdCurrentPower)
' Turn off device:
' if device is On
' and was on in previous check also (to prevent switching off device directly)
if hs.IsOn(deviceId)
if previousPower > 0 AND previousPower < powerLevel AND currentPower < powerLevel
hs.Transmit(deviceId, "off")
end if
end if
End Sub