for i = 23, 47, 1 do -- 23 is 00:00 for GMT+0200 (Eastern European Standard Time)
if data['data'][country][i] then
price = data['data'][country][i]['price']
if price < min_price then
min_price = price -- EUR/MegaWatt*hour
min_price_hour = i - 23 -- get hour for GMT+0200 (Eastern European Standard Time)
end
if price > max_price then
max_price = price -- EUR/MegaWatt*hour
max_price_hour = i - 23 -- get hour for GMT+0200 (Eastern European Standard Time)
end
if current_date['wday'] > 1 then
current_date['wday'] = current_date['wday'] - 1 -- 1 is Monday, 2 is Tuesday
else
current_date['wday'] = 7 -- 7 is Sunday
end
We have rewritten script (old script will not work properly), because of a change
in time intervals (previously electricity price was per hour, now per 15 minutes).
hourly_prices = {}
for h = 0, 23 do
hourly_prices[h] = { sum = 0, count = 0 }
end
if not data or not data.data or not data.data[country] then
log('No data for country: ' .. country)
return
end
for _, record in ipairs(data.data[country]) do
local timestamp = record.timestamp
local price = record.price
if timestamp >= day_start_ts and timestamp <= day_end_ts then
if price < min_price then
min_price = price
min_price_timestamp = timestamp
end
if price > max_price then
max_price = price
max_price_timestamp = timestamp
end
local record_time = os.date('*t', timestamp)
local hour = record_time.hour
if hourly_prices[hour] then
hourly_prices[hour].sum = hourly_prices[hour].sum + price
hourly_prices[hour].count = hourly_prices[hour].count + 1
end
end
if current_ts >= timestamp and current_ts < (timestamp + 15 * 60) then
current_price = price
end
end
--log('--- Current Status ---')
if current_price then
--log('Current 15-min price: ' .. current_price .. ' EUR/MWh')
grp.write(current_price_addr, current_price) -- float
else
log('Could not determine current price')
end
for hour, data in pairs(hourly_prices) do
if data.count > 0 then
local avg_price = data.sum / data.count
--log(string.format("Hour %02d:00 - Avg Price: %.2f", hour, avg_price))
if avg_price < min_avg_price then
min_avg_price = avg_price
cheapest_hour = hour
end
if avg_price > max_avg_price then
max_avg_price = avg_price
costliest_hour = hour
end
end
end
We have rewritten script (old script will not work properly), because of a change
in time intervals (previously electricity price was per hour, now per 15 minutes).
hourly_prices = {}
for h = 0, 23 do
hourly_prices[h] = { sum = 0, count = 0 }
end
if not data or not data.data or not data.data[country] then
log('No data for country: ' .. country)
return
end
for _, record in ipairs(data.data[country]) do
local timestamp = record.timestamp
local price = record.price
if timestamp >= day_start_ts and timestamp <= day_end_ts then
if price < min_price then
min_price = price
min_price_timestamp = timestamp
end
if price > max_price then
max_price = price
max_price_timestamp = timestamp
end
local record_time = os.date('*t', timestamp)
local hour = record_time.hour
if hourly_prices[hour] then
hourly_prices[hour].sum = hourly_prices[hour].sum + price
hourly_prices[hour].count = hourly_prices[hour].count + 1
end
end
if current_ts >= timestamp and current_ts < (timestamp + 15 * 60) then
current_price = price
end
end
--log('--- Current Status ---')
if current_price then
--log('Current 15-min price: ' .. current_price .. ' EUR/MWh')
grp.write(current_price_addr, current_price) -- float
else
log('Could not determine current price')
end
for hour, data in pairs(hourly_prices) do
if data.count > 0 then
local avg_price = data.sum / data.count
--log(string.format("Hour %02d:00 - Avg Price: %.2f", hour, avg_price))
if avg_price < min_avg_price then
min_avg_price = avg_price
cheapest_hour = hour
end
if avg_price > max_avg_price then
max_avg_price = avg_price
costliest_hour = hour
end
end
end
We have prepared script for electricity prices for Denmark, Norway, Sweden and Germany
Code:
price_area = 'DK1' -- west Denmark DK1 grid region
--price_area = 'DK2' -- east Denmark DK2 grid region
--price_area = 'DE' -- Germany
--price_area = 'NO2' -- southern and southwestern Norway
--price_area = 'SE3' -- north Sweden
--price_area = 'SE4' -- south Sweden
current_price_addr = '40/1/18' -- 14. 4 byte floating point
cheapest_hour_addr = '40/1/16' -- 10. 3 byte time / day
cheapest_hour_price_addr = '40/1/17' -- 14. 4 byte floating point
costliest_hour_addr = '40/1/19' -- 10. 3 byte time / day
costliest_hour_price_addr = '40/1/20' -- 14. 4 byte floating point
for _, record in ipairs(data.records) do
ts = record.TimeDK:gsub('%-', ''):gsub('T', ''):gsub(':', '')
hour = tonumber(ts:sub(1, 10))
price = record.DayAheadPriceEUR
if hour >= curr_hour then
store = prices[ hour ] or { sum = 0, count = 0 }
store.sum = store.sum + price
store.count = store.count + 1
prices[ hour ] = store
end
if ts:sub(1, 12) == curr_ts then
curr_price = price
end
end
hourly = {}
for hour, store in pairs(prices) do
price = store.sum / store.count
hourly[ #hourly + 1 ] = {
hour = hour,
price = price
}
end
table.sort(hourly, function(a, b)
return a.price > b.price
end)
function update(store, hour_addr, price_addr)
local hour = tostring(store.hour)
local date = hour:sub(1, 8)
local day = date == curr_date and curr_day or next_day
grp.checkupdate(hour_addr, { day = day, hour = hour:sub(9, 10) })
grp.checkupdate(price_addr, store.price)
end
Anyone had any luck or experience? Can you please share scripts for getting NordPool prices into logic machine?
Hi!
I do two scripts
Both "Scheduled" Script 1 -
Collecting electric price from API. running 4 times/day hour 17,18,21,23 amd minute 5.
Code:
CODE
-- API-skript (spara per datum)
local json = require("json")
local ltn12 = require("ltn12")
local http = require("socket.http")
local DECIMALS = 5
local PRISKLASS = "SE2"
local function fetch_prices(date_timestamp)
local year = os.date("%Y", date_timestamp)
local month_day = os.date("%m-%d", date_timestamp)
local url = string.format("https://www.elprisetjustnu.se/api/v1/prices/%s/%s_%s.json", year, month_day, PRISKLASS)
local resp = {}
local res, code = http.request({url = url, method = "GET", sink = ltn12.sink.table(resp)})
if code == 200 then
local decoded = json.pdecode(table.concat(resp))
if decoded then
local prices = {}
for i,v in ipairs(decoded) do
local time_start = v.time_start -- "2025-09-10T21:15:00+02:00"
local hh = string.sub(time_start, 12, 13)
local mm = string.sub(time_start, 15, 16)
local val = tonumber(string.format("%." .. DECIMALS .. "f", v.SEK_per_kWh))
if mm == "00" then
-- timpris: duplicera till kvart
for _, q in ipairs({"00","15","30","45"}) do
prices[hh .. ":" .. q] = val
end
else
prices[hh .. ":" .. mm] = val
end
end
return prices
end
end
return nil
end
local function save_prices()
local now = os.time()
-- idag och imorgon som timestamps (midnatt)
local t = os.date("*t", now)
t.hour, t.min, t.sec = 0,0,0
local idag_ts = os.time(t)
local imorgon_ts = idag_ts + 86400
-- Spara dagens priser i storage med datumnyckel
local ds_idag = os.date("%Y-%m-%d", idag_ts)
local p_idag = fetch_prices(idag_ts)
if p_idag then
storage.set("elpris_" .. ds_idag, json.encode(p_idag))
log("Sparade elpriser för " .. ds_idag)
else
log("️ Kunde inte hämta priser för " .. ds_idag)
end
-- Spara morgondagens priser (förutsatt kl 18+ eller när du vill hämta)
if tonumber(os.date("%H", now)) >= 18 then
local ds_im = os.date("%Y-%m-%d", imorgon_ts)
local p_im = fetch_prices(imorgon_ts)
if p_im then
storage.set("elpris_" .. ds_im, json.encode(p_im))
log("Sparade elpriser för " .. ds_im)
else
log("️ Kunde inte hämta priser för " .. ds_im)
end
end
-- Rensa gamla nycklar (behåll t.ex. -3..+2 dagar)
for i = 4, 30 do
local old = os.date("%Y-%m-%d", idag_ts - i*86400)
storage.set("elpris_" .. old, nil)
end
end
save_prices()
Script 2
Writing current electrical price to KNX address
Running as scheduled minute 0,15,30,45
Code:
local json = require("json")
local GA_ELPRIS = "34/4/99"
local function round_to_quarter()
local now = os.time()
local hh = tonumber(os.date("%H", now))
local min = tonumber(os.date("%M", now))
min = math.floor(min / 15) * 15
return string.format("%02d:%02d", hh, min)
end
-- försök hitta pris i dataset för en specifik datumnyckel
local function find_in_date(date_str, hhmm)
local key = "elpris_" .. date_str
local j = storage.get(key)
if not j then return nil end
local prices = json.decode(j)
if not prices then return nil end
local p = prices[hhmm]
if p then return p, key end
-- fallback: sök närmaste tidigare kvart inom detta dataset
local hh = tonumber(string.sub(hhmm,1,2))
local mm = tonumber(string.sub(hhmm,4,5))
local kvart_list = {0,15,30,45}
for h = hh, 0, -1 do
for i = #kvart_list, 1, -1 do
local q = kvart_list[i]
if (h < hh) or (q <= mm) then
local try = string.format("%02d:%02d", h, q)
if prices[try] then
return prices[try], key, try
end
end
end
end
return nil
end
-- Huvudfunktion som provar datum i prioriterad ordning
local function get_price_for_quarter()
local now = os.time()
local hhmm = round_to_quarter()
local date_today = os.date("%Y-%m-%d", now)
local date_tomorrow = os.date("%Y-%m-%d", now + 86400)
local date_yesterday = os.date("%Y-%m-%d", now - 86400)
local candidates = {date_today, date_tomorrow, date_yesterday}
for _, d in ipairs(candidates) do
local p, used_key, used_q = find_in_date(d, hhmm)
if p then
-- used_q kan vara nil om exakt hhmm träffade; annars är used_q den kvarten vi använde
local used = used_q or hhmm
return p, used, used_key
end
end
return nil, hhmm, nil
end
-- Anropa och skriv till KNX
local pris, used_hhmm, used_key = get_price_for_quarter()
if pris then
local pris_5dec = string.format("%.5f", pris)
log(string.format("Skriver elpris kl %s (från %s): %s kr/kWh", used_hhmm, used_key or "ingen", pris_5dec))
grp.write(GA_ELPRIS, tonumber(pris_5dec))
else
log("️ Ingen elprisinformation hittades för " .. used_hhmm)
end
