Domoticz

Code: Select all

--
-- Domoticz passes information to scripts through a number of global tables
--
-- device changed contains state and svalues for the device that changed.
--   devicechanged['yourdevicename'] = state 
--   devicechanged['svalues'] = svalues string 
--
commandArray = {}

--powersensor = "Power"

--if (devicechanged[powersensor]) then
 --  print( " ####Power debug: "..devicechanged[powersensor])
   -- commandArray['Variable:LUX']=tostring(devicechanged[luxsensor])
--  var1, var2,var3,var4,var5,var6 = string.match(otherdevices_svalues['Power'], "(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*)")
--   print( " ####Power debug: "..var6)
 --  end

solarsensor = "SolarEdge kWh"
if (devicechanged[solarsensor]) then
   --print( " ####Solar debug: "..devicechanged[solarsensor])
   Solarvar1, var2 = string.match(otherdevices_svalues[solarsensor], "(%d+%.*%d*);(%d+%.*%d*)")
   print( " ####Solar debug: "..Solarvar1)

   powersensor = "Power"
   -- if (devicechanged[powersensor]) then
   --print( " ####Power debug: "..devicechanged[powersensor])
   var1, var2,var3,var4,Powervar5,Powervar6 = string.match(otherdevices_svalues['Power'], "(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*);(%d+%.*%d*)")
   print( " ####Power debug: "..Powervar5)

   powercount = tonumber(Powervar6)
   solarcount = tonumber(Solarvar1)
 
   consume = solarcount - powercount
   print( " ####Consume debug: "..consume)
 
   ttidx = otherdevices_idx['PowerConsumtion']
   commandArray['UpdateDevice'] = ttidx..'|0|'..consume
end

return commandArray

Code: Select all

-- demo time script

-- Set printing to log options (true / false)
printData = true
-- printData = false						-- writes execution information to the log for script performance information
-- printDebug = false						-- writes detailed information for fault finding purposes
 printDebug = true

-- Get current date & time
t1 = os.time()
local currentDate = os.date("*t");  -- sets up currentDate.[table] 
-- (currentDate.year [full], .month [1-12], .day [1-31], .hour [0-23], .min [0-59], .sec [0-59], .wday [0-6 {Sun-Sat}])
sCurrentTime = currentDate.year .. "-" .. currentDate.month .. "-" .. currentDate.day .. " " .. currentDate.hour .. ":" .. currentDate.min .. ":" .. currentDate.sec

function update(device, id, power, energy, index)
commandArray[index] = {['UpdateDevice'] = id .. "|0|" .. power .. ";" .. energy}
end 


commandArray = {}

SolarPowerGeneration, SolarEnergyGeneration = otherdevices_svalues["Solar Generation"]:match("([^;]+);([^;]+)")

if printDebug == true then
	print(" ----- SolarPowerGeneration = " .. SolarPowerGeneration .. " W");
	print(" ----- SolarEnergyGeneration = " .. SolarEnergyGeneration .. " Wh");
end

MainCUPowerUsage, MainCUEnergyUsage = otherdevices_svalues["Main Consumer Unit"]:match("([^;]+);([^;]+)")

if printDebug == true then
	print(" ----- MainCUPowerUsage = " .. MainCUPowerUsage .. " W");
	print(" ----- MainCUEnergyUsage = " .. MainCUEnergyUsage .. " Wh");
end

GardenCUPowerUsage, GardenCUEnergyUsage = otherdevices_svalues["Garden Consumer Unit"]:match("([^;]+);([^;]+)")

if printDebug == true then
print(" ----- GardenCUPowerUsage = " .. GardenCUPowerUsage .. " W");
print(" ----- GardenCUEnergyUsage = " .. GardenCUEnergyUsage .. " Wh");
end
-- Do the calculations
-- CurrentPowerBalance = SolarPowerGeneration - (MainCUPowerUsage + GardenCUPowerUsage)
-- CurrentEnergyBalance = SolarEnergyGeneration - (MainCUEnergyUsage + GardenCUEnergyUsage)
CurrentPowerBalance = (MainCUPowerUsage + GardenCUPowerUsage) - SolarPowerGeneration
CurrentEnergyBalance = (MainCUEnergyUsage + GardenCUEnergyUsage) - SolarEnergyGeneration

HousePower = (MainCUPowerUsage + GardenCUPowerUsage)
HouseEnergy = (MainCUEnergyUsage + GardenCUEnergyUsage)

if printDebug == true then	
	print(" ----- CurrentPowerBalance = " .. CurrentPowerBalance .. " W");
	print(" ----- CurrentEnergyBalance = " .. CurrentEnergyBalance .. " Wh");
end

if printData == true then	

	if CurrentPowerBalance <0 then
		print("FREE Electric - Whoop!    " .. CurrentPowerBalance .. "W");
	end
end
	
-- update the counters	
-- Total power 
update("House Power Incoming", 475, CurrentPowerBalance, CurrentEnergyBalance, 1) -- 475 is the ID of the dummy incoming device
-- Load of the House	
update("House Load", 518, HousePower, HouseEnergy, 2) -- 518 is the ID of dummy house consumption device

-- update the user variables (used to write to a csv for futher analysis)
-- House Load
commandArray['Variable:VarHouseLoad_Power'] = tostring(HousePower)
commandArray['Variable:VarHouseLoad_Energy'] = tostring(HouseEnergy)
-- Grid Load
commandArray['Variable:VarGridLoad_Power'] = tostring(CurrentPowerBalance)
commandArray['Variable:VarGridLoad_Energy'] = tostring(CurrentEnergyBalance)
-- MainCU Load
commandArray['Variable:VarMainCU_Power'] = tostring(MainCUPowerUsage)
commandArray['Variable:VarMainCU_Energy'] = tostring(MainCUEnergyUsage)
-- Garden CU Load
commandArray['Variable:VarGardenCU_Power'] = tostring(GardenCUPowerUsage)
commandArray['Variable:VarGardenCU_Energy'] = tostring(GardenCUEnergyUsage)
	


	
   -- save new values to file

   file = io.open("/opt/scripts/housepower.csv", "a") -- append
   file:write("\n")  -- new line
   file:write (sCurrentTime)
   file:write(",")
   file:write(HousePower) -- Total House Load
   file:write(",")
   file:write(MainCUPowerUsage) -- Main CU
   file:write(",")
   file:write(GardenCUPowerUsage) --  Garden CU
   file:write(",")
   file:write(CurrentPowerBalance) -- Grid Demand
   file:close()
   

return commandArray

Code: Select all

-- demo time script

-- Get current date & time
t1 = os.time()
local currentDate = os.date("*t");  -- sets up currentDate.[table] 
-- (currentDate.year [full], .month [1-12], .day [1-31], .hour [0-23], .min [0-59], .sec [0-59], .wday [0-6 {Sun-Sat}])
sCurrentTime = currentDate.year .. "-" .. currentDate.month .. "-" .. currentDate.day .. " " .. currentDate.hour .. ":" .. currentDate.min .. ":" .. currentDate.sec

function update(device, id, power, energy, index)
commandArray[index] = {['UpdateDevice'] = id .. "|0|" .. power .. ";" .. energy}
end 

commandArray = {}

TotalPowerUsage, TotalEnergyUsage = otherdevices_svalues["Total"]:match("([^;]+);([^;]+)")

ApartamentoPowerUsage, ApartamentoEnergyUsage = otherdevices_svalues["Apartamento"]:match("([^;]+);([^;]+)")

CurrentPowerBalance = TotalPowerUsage - ApartamentoPowerUsage
CurrentEnergyBalance = TotalEnergyUsage - ApartamentoEnergyUsage

update("Casa", 50, CurrentPowerBalance, CurrentEnergyBalance, 2) -- 50 is the ID of the dummy incoming device


return commandArray

Code: Select all

-- /home/pi/domoticz/scripts/lua/script_device_calculate_consumption.lua

 
----------------------------------------------------------------------------------------------------------
-- Domoticz IDX and names of the needed devices
----------------------------------------------------------------------------------------------------------
local DeviceName1 = "kWh Meter L1"
local DeviceName2 = "kWh Meter L2"
local DeviceName3 = "kWh Meter L3"
local ConsumptionIDX = 343  		                	-- IDX of the energy device that shows calculated Consumption
local ConsumptionDeviceName = "Gesamtverbrauch" 		-- Name of the energy device that shows calculated Consumption

----------------------------------------------------------------------------------------------------------
-- Script parameters
----------------------------------------------------------------------------------------------------------
Energy1 = 0 -- in Watt hours
Power1 = 0 	-- in Watts
Energy2 = 0	-- in Watt hours
Power2 = 0	-- in Watts
Energy3 = 0 -- in Watt hours
Power3 = 0 	-- in Watts
EnergyConsumption = 0 	-- in Watt hours
PowerConsumption = 0 	-- in Watts
Debug = "NO" 	    	-- Turn debugging on ("YES") or off ("NO")
 
---------------------------------------------------------------------------------------------------------
-- Get current date & time
---------------------------------------------------------------------------------------------------------
--t1 = os.time()
--local currentDate = os.date("*t");  -- sets up currentDate.[table] 
-- --(currentDate.year [full], .month [1-12], .day [1-31], .hour [0-23], .min [0-59], .sec [0-59], .wday [0-6 {Sun-Sat}])
--sCurrentTime = currentDate.year .. "-" .. currentDate.month .. "-" .. currentDate.day .. " " .. currentDate.hour .. ":" .. currentDate.min .. ":" .. currentDate.sec
----------------------------------------------------------------------------------------------------------
-- Lua Functions
----------------------------------------------------------------------------------------------------------
function update(device, id, power, energy, index)
	commandArray[index] = {['UpdateDevice'] = id .. "|0|" .. power .. ";" .. energy}
end 

----------------------------------------------------------------------------------------------------------
-- CommandArray
----------------------------------------------------------------------------------------------------------
commandArray = {}
	Power1, Energy1 = otherdevices_svalues[DeviceName1]:match("([^;]+);([^;]+)")
	if Debug=="YES" then
		print("  ----- ".. DeviceName1 .. "Power = " .. Power1 .. " W");
		print("  ----- ".. DeviceName1 .. "Energy = " .. Energy1 .. " Wh");
	end
 
	Power2, Energy2 = otherdevices_svalues[DeviceName2]:match("([^;]+);([^;]+)")
	if Debug=="YES" then
		print("  ----- ".. DeviceName2 .. "Power = " .. Power2 .. " W");
		print("  ----- ".. DeviceName2 .. "Energy = " .. Energy2 .. " Wh");
	end
	
	Power3, Energy3 = otherdevices_svalues[DeviceName3]:match("([^;]+);([^;]+)")
	if Debug=="YES" then
		print("  ----- ".. DeviceName3 .. "Power = " .. Power3 .. " W");
		print("  ----- ".. DeviceName3 .. "Energy = " .. Energy3 .. " Wh");
	end

--	Power4, Energy4 = otherdevices_svalues[DeviceName4]:match("([^;]+);([^;]+)")
--	if Debug=="YES" then
--		print("  ----- ".. DeviceName4 .. "Power = " .. Power4 .. " W");
--		print("  ----- ".. DeviceName4 .. "Energy = " .. Energy4 .. " Wh");
--	end
 
--	Power5, Energy5 = otherdevices_svalues[DeviceName5]:match("([^;]+);([^;]+)")
--	if Debug=="YES" then
--		print("  ----- ".. DeviceName5 .. "Power = " .. Power5 .. " W");
--		print("  ----- ".. DeviceName5 .. "Energy = " .. Energy5 .. " Wh");
--	end
 
	-- Calculate consumption
	PowerConsumption = Power1 + Power2 + Power3
	if Debug=="YES" then
		print("  ----- PowerConsumption = " .. PowerConsumption .. "W");
	end
	EnergyConsumption = Energy1 + Energy2 + Energy3
	if Debug=="YES" then
		print("  ----- EnergyConsumption = " .. EnergyConsumption .. "Wh");
	end
 
	-- Update comsumption device in Domoticz
	if devicechanged[DeviceName1] or devicechanged[DeviceName2] or devicechanged[DeviceName3] then
		update(ConsumptionDeviceName, ConsumptionIDX, PowerConsumption, EnergyConsumption, 1)

	end

Code: Select all

return {

	on = {
	    timer = { 'every 5 minutes' }
	},
	
	execute = function(domoticz, item)
	    
	    local bhPower = domoticz.devices(3)      -- big house power meter
	    local fhPower = domoticz.devices(53)     -- forest house power meter
	    local totalPower = domoticz.devices(54)  -- total (big + forest houses) power meter
	    
	    totalPower.updateElectricity(
            	bhPower.WhActual + fhPower.WhActual,
            	bhPower.WhTotal + fhPower.WhTotal
            )
	    
	end
	
}