Hope this is easier to follow now..
local http = require('socket.http')
local ltn12 = require('ltn12')
local json = require('dkjson')
local hueBridgeIP = '192.168.102.29'
local hueBridgeAPI = "80uCoX2LNLhxEJ9tgPW6nmt-G5KWQ2uP3oONAvcm0j"
local url = string.format("http://%s/api/%s/lights", hueBridgeIP, hueBridgeAPI)
local t = {}
local huelights = {}
local total = 0
local Value = 0
local huewatts = {}
local fourpointeightwattTable = { [ 1 ] = 0.6 , [ 2 ] = 0.7 , [ 3 ] = 0.8 , [ 4 ] = 0.9 , [ 5 ] = 1.2 , [ 6 ] = 1.4 , [ 7 ] = 1.7 , [ 8 ] = 2.0 , [ 9 ] = 2.3 , [ 10 ] = 2.6 , [ 11 ] = 2.9 , [ 12 ] = 3.1 , [ 13 ] = 3.5 , [ 14 ] = 4.0 }
local sevenwattTable = { [ 1 ] = 1.6 , [ 2 ] = 1.7 , [ 3 ] = 1.8 , [ 4 ] = 1.9 , [ 5 ] = 2.2 , [ 6 ] = 2.4 , [ 7 ] = 2.7 , [ 8 ] = 3.0 , [ 9 ] = 3.5 , [ 10 ] = 3.9 , [ 11 ] = 4.5 , [ 12 ] = 5.1 , [ 13 ] = 5.5 , [ 14 ] = 6.4 }
local ninewattTable = { [ 1 ] = 1.6 , [ 2 ] = 1.7 , [ 3 ] = 1.8 , [ 4 ] = 1.9 , [ 5 ] = 2.2 , [ 6 ] = 2.5 , [ 7 ] = 2.9 , [ 8 ] = 3.5 , [ 9 ] = 3.8 , [ 10 ] = 4.6 , [ 11 ] = 5.5 , [ 12 ] = 6.5 , [ 13 ] = 7.7 , [ 14 ] = 8.5 }
local function getHueLight()
local b, c, h = http.request{url=url, sink = ltn12.sink.table(t), method='GET'}
local huestring = tostring(table.concat(t))
local hue, pos, err = json.decode(huestring, 1, nil)
for k, v in pairs(hue) do
local modelno = string.gsub(hue[k]['modelid'], "%s+", "")
table.insert(huelights, {k, hue[k]['state']['on'], hue[k]['name'], hue[k]['state']['bri'], modelno, hue[k]['state']['reachable']})
--print(k, hue[k]['state']['on'], hue[k]['name'], hue[k]['state']['bri'], modelno, hue[k]['state']['reachable'])
end
end
getHueLight()
function fourpointeightgetWattage(hue)
local index = math.floor(hue / 16.5)
if index <= 0 then return 0.2
elseif index >= 15 then return 4.8
else return fourpointeightwattTable[index]
end
end
function sevengetWattage(hue)
local index = math.floor(hue / 16.5)
if index <= 0 then return 0.4
elseif index >= 15 then return 7.0
else return sevenwattTable[index]
end
end
function ninegetWattage(hue)
local index = math.floor(hue / 16.5)
if index <= 0 then
return 0.4
elseif index >= 15 then
return 9.0
else
return ninewattTable[index]
end
end
for k,v in pairs(huelights) do
if v[2] == true and v[5] == "RS125" and v[6] == true then
local watts = fourpointeightgetWattage(v[4])
local Value = tonumber(watts)
local total = total + Value
print("four point eight watts")
print(v[5], v[4], v[2], v[3], watts)
table.insert(huewatts, {v[5], v[4], v[2], v[3], watts})
--print(watts)
--print(total)
elseif v[2] == true and v[5] == "LWA004" and v[6] == true then
local watts = sevengetWattage(v[4])
local Value = tonumber(watts)
local total = total + watts
print("seven watts")
print(v[5], v[4], v[2], v[3], watts)
table.insert(huewatts, {v[5], v[4], v[2], v[3], watts})
--print(watts)
--print(total)
elseif v[2] == true and v[6] == true then
local watts = ninegetWattage(v[4])
local Value = tonumber(watts)
local total = total + Value
print("nine watts")
print(v[5], v[4], v[2], v[3], watts)
table.insert(huewatts, {v[5], v[4], v[2], v[3], watts})
--print(watts)
--print(total)
end
end
print(total)
print(huewatts)
The print output is as follows.
LuaTest 1.7
Lua file: /etc/cmh-ludl/luatest.lua
Results
No errors
Runtime: 85.9 ms
Code returned: nil
Print output
nine watts
LWB004 254 true Table Light 9
nine watts
LWB010 254 true Wall Light 1 9
nine watts
LWB006 254 true Wall Light 2 9
nine watts
LWB006 254 true Wall Light 3 9
nine watts
LWB010 254 true Wall Light 4 9
0
table: 0x28953e0
QNAP - Installation via Container Station’s API
probonopd/irdb
!!
)
