—[[ WEERSTATIONS:

Amsterdam= 36Groningen= 13Oost–Groningen= 31Vlissingen= 44

Arnhem= 2Hoek van Holland= 17Oost–Overijssel = 12Voorschoten= 46

Berkhout= 3Hoogeveen= 18Rotterdam= 33Wadden= 19

Den Helder= 6Leeuwarden= 26Utrecht= 5Weert= 8

Eindhoven= 7Lelystad= 27Terneuzen= 47West–Friesland= 38

Gilze Rijen = 10Maastricht= 29Twente= 41West–Utrecht= 28

Goes= 11Noord–Groningen= 24Uden= 45Woensdrecht= 50

Gorinchem= 16Noordoostpolder= 30Venlo= 1Zwolle= 15

—]]

——————————–

———- SETTINGS ————

——————————–

local domo_ip= “192.168.2.62:8080” — IP adres van Domoticz, inclusief poort

local weerstation= 33— Kies je weerstation naar keuze

local api_key= “126387d6c1a1bd4731a2f366854ab8ed5”— Darksky secret key

local debug= 1— 0 = no debug, 1 = debug

local language= “nl”— ar: Arabic, az: Azerbaijani, be: Belarusian, bg: Bulgarian, bs: Bosnian, ca: Catalan, cs: Czech, da: Danish,

— de: German, el: Greek, en: English, es: Spanish, et: Estonian, fi: Finnish, fr: French, he: Hebrew, hr: Croatian,

— hu: Hungarian, id: Indonesian, is: Icelandic, it: Italian, ja: Japanese, ka: Georgian, ko: Korean, kw: Cornish,

— lv: Latvian, nb: Norwegian Bokmål, nl: Dutch, no: Norwegian Bokmål (alias for nb), pl: Polish, pt: Portuguese,

— ro: Romanian, ru: Russian, sk: Slovak, sl: Slovenian, sr: Serbian, sv: Swedish, tet: Tetum, tr: Turkish,

— uk: Ukrainian, x–pig–latin: Igpay Atinlay, zh: simplified Chinese, zh–tw: traditional Chinese

local dev_TempGround= “Temperatuur Grond”— Temperature sensor

local dev_TextTomorrow= “Verwachting morgen”— Text sensor

local dev_LongText= “Verwachting uitgebreid”— Text sensor      

local dev_DewPoint= “Temperatuur Dauwpunt”— Temperature sensor

local dev_CloudCover= “Bewolkingsgraad”— Percentage sensor

local dev_UV= “UV”— UV sensor

local dev_Ozone= “Ozone”— Custom sensor with axis “DU”

commandArray={}

—Functie devices updaten

function UpdateDev(device,nvalue,svalues)

commandArray[#commandArray+1] = {[‘UpdateDevice’] = otherdevices_idx[device]..’|’..tostring(nvalue)..’|’..tostring(svalues)}

end

— Functie afronding

function round(num, dec)

if num == 0 then

return 0

else

local mult = 10^(dec or 0)

return math.floor(num * mult + 0.5) / mult

end

end

————————————————–

—– ######## Buienradar API Data call ######## —–

————————————————–

time = os.date(“*t”)

if((time.min+2)%5)==0then — Script loopt iedere 5 minuten (bv. 11.03, 11.08, 11.13, 11.18, etc.

json = (loadfile “/home/pi/domoticz/scripts/lua/JSON.lua”)()— For Linux

local config=assert(io.popen(‘curl “https://data.buienradar.nl/2.0/feed/json”‘))

local Stringjson = config:read(‘*all’)

config:close()

local jsonData = json:decode(Stringjson)

— Convert the json to a LUA table

if jsonData.actual.stationmeasurements[ weerstation ] ~= nil then— this sometimes happens around midnight

val_TempGround= jsonData.actual.stationmeasurements[ weerstation ].groundtemperature

val_WeatherTomorrow= jsonData.forecast.fivedayforecast[1].weatherdescription        

val_SunChanceTomorrow= jsonData.forecast.fivedayforecast[1].sunChance

val_RainChanceTomorrow= jsonData.forecast.fivedayforecast[1].rainChance        

val_RainMinimum= jsonData.forecast.fivedayforecast[1].mmRainMin

val_RainMaximum= jsonData.forecast.fivedayforecast[1].mmRainMax

val_WindDirectionTomorrow= jsonData.forecast.fivedayforecast[1].windDirection        

val_WindSpeedTomorrow= jsonData.forecast.fivedayforecast[1].wind        

val_TempTomorrowMinMin= jsonData.forecast.fivedayforecast[1].mintemperatureMin —minimale minimumtemperatuur

val_TempTomorrowMaxMin= jsonData.forecast.fivedayforecast[1].mintemperatureMax —maximale minimumtemperatuur

val_TempTomorrowMinMax= jsonData.forecast.fivedayforecast[1].maxtemperatureMin —minimale maximumtemperatuur

val_TempTomorrowMaxMax= jsonData.forecast.fivedayforecast[1].maxtemperatureMax —maximale maximumtemperatuur

end

—Min/Max. temperatuur bepalen

if val_TempTomorrowMinMin == val_TempTomorrowMaxMin then TempMinimum = val_TempTomorrowMinMin

else TempMinimum = val_TempTomorrowMinMin..” – “..val_TempTomorrowMaxMin end

if val_TempTomorrowMinMax == val_TempTomorrowMaxMax then TempMaximum = val_TempTomorrowMinMax

else TempMaximum = val_TempTomorrowMinMax..” – “..val_TempTomorrowMaxMax

end

—Regenhoeveeldheid bepalen

if val_RainMinimum == val_RainMaximum then RainIntensity = val_RainMinimum

else RainIntensity = val_RainMinimum..” – “..val_RainMaximum end

— Windrichting tekst bepalen

if val_WindDirectionTomorrow == “z” or val_WindDirectionTomorrow == “Z” then WindDirectionTomorrow = ” het zuiden”

elseif val_WindDirectionTomorrow == “zw” or val_WindDirectionTomorrow == “ZW” then WindDirectionTomorrow = “het zuidwesten”

elseif val_WindDirectionTomorrow == “zo” or val_WindDirectionTomorrow == “ZO” then WindDirectionTomorrow = “het zuidoosten”

elseif val_WindDirectionTomorrow == “w” or val_WindDirectionTomorrow == “W” then WindDirectionTomorrow = “het westen”

elseif val_WindDirectionTomorrow == “nw” or val_WindDirectionTomorrow == “NW” then WindDirectionTomorrow = “het noordwesten”

elseif val_WindDirectionTomorrow == “n” or val_WindDirectionTomorrow == “N” then WindDirectionTomorrow = “het noorden”

elseif val_WindDirectionTomorrow == “no” or val_WindDirectionTomorrow == “NO” then WindDirectionTomorrow = ” het noordoosten”

elseif val_WindDirectionTomorrow == “o” or val_WindDirectionTomorrow == “O” then WindDirectionTomorrow = “het oosten”

else WindDirectionTomorrow = “variabele richtingen” end

—Voorspellingen

forecast=val_WeatherTomorrow.. “\n “ ..“\n”.. “Komende nacht daalt de temperatuur naar “..TempMinimum..” °C. Morgen overdag wordt morgen maximaal “..TempMaximum.. ” °C. Er is morgen “..val_SunChanceTomorrow..” % kans op zon en “..val_RainChanceTomorrow..” % kans op neerslag (“..RainIntensity..” mm). De wind komt uit “..WindDirectionTomorrow..” en zal kracht “..val_WindSpeedTomorrow..” Bft hebben.” ..“\n “ ..“\n “

if otherdevices_svalues[dev_TextTomorrow] ~= forecast then UpdateDev(dev_TextTomorrow,0,forecast) end

— Updating domoticz devices

UpdateDev(dev_TempGround,0,val_TempGround)

if debug==1 then

print (“Temperatuur Grond: “..val_TempGround..” °C”)

end

end

—————————————

— ######## Darksy API call ######## —

—————————————

if((time.min+2)%5)==0then — Script loopt iedere 5 minuten (bv. 11.03, 11.08, 11.13, 11.18, etc.

json = (loadfile “/home/pi/domoticz/scripts/lua/JSON.lua”)()— For Linux

local config=assert(io.popen(‘curl “http://’..domo_ip..‘/json.htm?type=settings”‘))

local Stringjson = config:read(‘*all’)

config:close()

local jsonData = json:decode(Stringjson)

— Convert the json to a LUA table

lat= jsonData.Location.Latitude

lon= jsonData.Location.Longitude

bron ehoco.nl

local coord = lat..“,”..lon

json = (loadfile “/home/pi/domoticz/scripts/lua/JSON.lua”)()— For Linux

local config=assert(io.popen(‘curl “https://api.darksky.net/forecast/’..api_key..‘/’..coord..‘?lang=’..language..‘&units=si&exclude=hourly,flags”‘))

local Stringjson = config:read(‘*all’)

config:close()

local jsonData = json:decode(Stringjson)

— Convert the json to a LUA table

if jsonData ~= nil then— this sometimes happens around midnight

val_UV= jsonData.currently.uvIndex

val_Ozone= jsonData.currently.ozone

val_DewPoint= round(jsonData.currently.dewPoint,1)

val_CloudCover= jsonData.currently.cloudCover*100

end

if debug==1 then

print(“Bewolkingsgraad : “..val_CloudCover.. ” %”)

print(“UV-kracht :”..val_UV)

print(“Ozone : De ozone-waarde is “..val_Ozone)

print(“Dauwpunt : “..val_DewPoint.. ” °C”)

end

— Domoticz devices updaten

UpdateDev(dev_CloudCover,0,val_CloudCover)

UpdateDev(dev_DewPoint,0,val_DewPoint)

UpdateDev(dev_UV,0,val_UV..“;0”)

UpdateDev(dev_Ozone,0,val_Ozone)

if debug==1 then

print (“Dauwpunt: “..val_DewPoint..” °C”)

print (“Bewolkingsgraad: “..val_CloudCover..” %”)

print (“UV-Index: “..val_UV)

print (“Ozone: “..val_Ozone)

end

end

——————————————————-

— ######## Buienradar Verwachting API call ######## —

——————————————————-

if((time.min+2)%30)==0then — Script loopt iedere 30 minuten (bv. 11.28, 11.58, 12.28, 12.58, etc.

json = (loadfile “/home/pi/domoticz/scripts/lua/JSON.lua”)()— For Linux

local config=assert(io.popen(‘curl “https://data.buienradar.nl/1.1/feed/json”‘))

local Stringjson = config:read(‘*all’)

config:close()

local jsonData = json:decode(Stringjson)

— Convert the json to a LUA table

val_LongText = jsonData.buienradarnl.weergegevens.verwachting_vandaag.titel ..“\n “ ..“\n “.. jsonData.buienradarnl.weergegevens.verwachting_vandaag.tekst ..“\n “ ..“\n”

val_LongText = string.gsub(val_LongText, “ ”, ” “)

val_LongText = string.gsub(val_LongText, “’”, “‘”)

val_LongText = string.gsub(val_LongText, “‘”, “‘”)

val_LongText = string.gsub(val_LongText, “ë”, “ë”)

val_LongText = string.gsub(val_LongText, “è”, “è”)

val_LongText = string.gsub(val_LongText, “é”, “é”)

val_LongText = string.gsub(val_LongText, “ê”, “ê”)

val_LongText = string.gsub(val_LongText, “;”, “;”)

if debug==1 then

print (“Uitgebreid: “..val_LongText)

end

if otherdevices_svalues[dev_LongText] ~= val_LongText then UpdateDev(dev_LongText,0,val_LongText) end

end

return commandArray