Variable für Feiertage

Hat jemand eine Möglichkeit gefunden automatisch Feiertage festzustellen und in einer Variable abzulegen?

Ich habe im Moment nur eine manuelle Variante.

Feiertag.jpg

Hi,

Simon, hier aus dem Forum hat mir mal ein Script geschickt zum berechnen der Feiertage. Allerdings bin ich noch nicht zum testen gekommen.
Schau es dir gern mal an:

… Es berechnet, ob heute
bzw. morgen ein Feiertag ist und schreibt das Ergebnis in zwei
Systemvariablen. Damit lassen sich dann z.B. weitere Szenen steuern. …

--[[
%% autostart
%% properties
%% globals
--]]

-- ************************************************************************
-- FEIERTAGE-SCRIPT
-- ************************************************************************

-- Das Skript berechnet die eidg./kant. Feiertage im aktuellen Jahr und prüft,
-- ob heute oder morgen ein Feiertag ist und hinterlegt das Ergebnis in den
-- Systemvariablen "Feiertag_heute" und "Feiertag_morgen".

-- (c) Simon Betschmann (01-2015)
-- Version: 1.0
-- Basierend auf einer Idee von Peter Beck (01-2011)

-- Es werden folgende Systemvariablen benötigt:
-- Feiertag_heute
-- Feiertag_morgen

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- EINSTELLUNGEN
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

-- Bitte nur in dieser Sektion Einstellungen vornehmen
local debuging = false -- TOGGLE DEBUGING (true|false)
local Kanton = "ZH" -- Kanton angeben für kantonale Feiertage (ZH, AG,...)
-- leer lassen, um Funktion auszuschalten

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- DEBUG
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

-- Grundfunktion: Debug("red", "Nachrichtentext")
Debug = function(color, message)
if (debuging) then
fibaro:debug(string.format('<%s style="color:%s;">%s', "span", color, message, "span"))
end
end

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- FEIERTAGE BERECHNEN
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

function FeiertageFunc()

local Datum = os.date("%d.%m.") -- heutiges Datum (ohne Jahr)
local i = 1

-- OSTERDATUM BERECHNEN
local Jahr = os.date("%Y") -- Das aktuelle Jahr ermitteln
local oTag -- Das Tagesdatum vom Ostersonntag
local oMonat -- Das Monatsdatum von Ostersonntag
local oDatum -- Das komplette Datum vom Ostersonntag

local mTage -- Variable für die interne Berechnung
local LVar1 -- Variable für die interne Berechnung
local LVar2 -- Variable für die interne Berechnung
local LVar3 -- Variable für die interne Berechnung
local zahl -- Variable für die interne Berechnung

-- Interne Funktion zum Runden auf Ganzzahlen
function round(x)
return x>=0 and math.floor(x+0.5) or math.ceil(x-0.5)
end

-- Die modifizierte Gauss-Formel nach Lichtenberg
local LVar1 = ((19 * (Jahr % 19)) + (15 + (((3 * (Jahr / 100)) + 3) / 4) - (((8 * (Jahr / 100)) + 13) / 25))) % 30;
local LVar2 = (LVar1 / 29) + (((LVar1 / 28) - (LVar1 / 29)) * ((Jahr % 19) / 11));
local LVar3 = 7 - (((21 + LVar1 - LVar2) - (7 - ((Jahr + (Jahr / 4) + (2 - (((3 * (Jahr / 100)) + 3) / 4))) % 7))) % 7);
local oTag = round((21 + LVar1 - LVar2) + LVar3);

-- Monat und Tag von Ostern bestimmen
if (oTag > 31) then -- Der Monat März hat nur 31 Tage -> Ostern im April
oMonat = "04";
oTag = oTag - 31;
else
oMonat = "03"; -- Ostern ist im März
end

-- Das Ergebnis in Variable oDatum hinterlegen
if (oTag < 10) then
oDatum = "0" .. oTag .. "." .. oMonat .. "." .. Jahr;
else
oDatum = oTag .. "." .. oMonat .. "." .. Jahr;
end
Debug("gray", "Osterdatum: ".. oDatum)

-- Ermitteln, wieviele Tage der Februar im aktuellen Jahr hat
zahl = Jahr % 4;

if (zahl == 0) then -- Ein Schaltjahr -> Feb. = 29 Tage
mTage = {31,29,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
Debug("gray", Jahr.. " ist ein Schaltjahr.")
else
mTage = {31,28,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
Debug("gray", Jahr.. " ist kein Schaltjahr.")
end

-- Feiertage mit dem heutigen & morgigen Datum vergleichen und Ergebnis
-- in den Variablen "Feiertag_heute" bzw. "Feiertag_morgen" speichern
while i < 3 do

local Feiertag = 0

-- FESTE FEIERTAGE IN DER GANZEN SCHWEIZ
if (Datum == "01.01.") then Feiertag = 1 end -- Neujahr
if (Datum == "01.08.") then Feiertag = 1 end -- Nationalfeiertag
if (Datum == "25.12.") then Feiertag = 1 end -- Weihnachten
if (Datum == "26.12.") then Feiertag = 1 end -- Stephanstag

-- FEIERTAGE IM KANTON ZÜRICH
if (Kanton == "ZH") then
if (Datum == "01.05.") then Feiertag = 1 end -- Tag der Arbeit
end
-- FEIERTAGE IM KANTON AARGAU
if (Kanton == "AG") then
if (Datum == "02.01.") then Feiertag = 1 end -- Berchtoldstag
end

-- VARIABLE FEIERTAG IN DER GANZEN SCHWEIZ
-- Aray mit Differenztagen zum Ostersonntag:
-- Ostermontag, Karfreitag, Auffahrt, Pfingstmontag
local feiertage = {1,-2,39,50}

-- VARIABLE FEIERTAGE: DATEN BERECHNEN
oTage = mTage[tonumber(oMonat)] -- Anzahl Tage im Ostermonat
Debug("grey", "Anzahl Tage im Ostermonat: "..oTage)

local fDatum; -- Feiertagsdatum
local fDiff; -- Anzahl der Tage vom Ostersonntag entfernt
local Schleife; -- Für die Berechnungen in der while-Schleife notwendig

for x in next, feiertage do

fDiff = feiertage[x]
Schleife = true;

zahl = oTag + fDiff; -- Differenztage zum Referenztag hinzurechnen
Debug("grey", "Zahl: "..zahl..", oTag: "..oTag..", fDiff: "..fDiff..", index: "..x)

if (fDiff > 0) then
if (zahl > oTage) then
zahl = zahl - oTage; -- Sind wir ausserhalb des Referenzmonats?
Debug("grey", "Ausserhalb des Referenzmonats > Schleife durchlaufen.")
else -- Nein => Berechnungschleife nicht durchlaufen.
Schleife = false;
LVar2 = oMonat;
Debug("grey", "Innerhalb des Referenzmonats > Schleife nicht durchlaufen.")
end
else
if (zahl > 0) then -- Wenn innerhalb des Referenzmonats => Berechnungsschleife nicht durchlaufen.
Schleife = false;
LVar2 = oMonat;
Debug("grey", "Innerhalb des Referenzmonats > Schleife nicht durchlaufen.")
else
Debug("grey", "Ausserhalb des Referenzmonats > Schleife durchlaufen.")
end
end

LVar1 = 0;

-- Schleife 'Monatsberechnung', falls nicht im gleichen Monat wie Ostern
if (fDiff > 0) then
while (Schleife) do
LVar1 = LVar1 + 1.00;
LVar2 = oMonat + LVar1;
zahl = zahl - mTage[tonumber(oMonat)];
if (zahl <= 0) then -- Aktueller Monat gefunden
Schleife = false;
zahl = zahl + mTage[tonumber(oMonat)] -- Wieder addieren, um den Tag zu berechnen
end
end
else
if (fDiff < 0) then
while (Schleife) do
LVar1 = LVar1 + 1.00;
LVar2 = oMonat - LVar1;
zahl = zahl + mTage[tonumber(oMonat)]
if (zahl > 0) then -- Aktueller Monat gefunden
Schleife = false;
end
end
end
end

-- Datum des Feiertags berechnen
Debug("grey", "Datum des Feiertags berechnen...")
if (zahl < 10 and tonumber(LVar2) < 10) then
fDatum = "0" .. zahl .. ".0"..tonumber(LVar2).. ".";
elseif (zahl < 10) then
fDatum = "0" .. zahl .. "."..tonumber(LVar2).. ".";
elseif (tonumber(LVar2) < 10) then
fDatum = zahl .. ".0"..tonumber(LVar2).. ".";
else
fDatum = zahl .. "."..tonumber(LVar2).. ".";
end

Debug("white", "Feiertag: "..fDatum)

-- Prüfen, ob Datum heute/morgen mit Feiertag übereinstimmt
if (Datum == fDatum) then
Feiertag = 1
fibaro:debug("Feiertag ("..fDatum..") gefunden.")
end

end

-- VARIABLEN SETZTEN
if i == 1 then
-- 1. Durchgang: Datum heute mit den Feiertagen prüfen
Debug("grey", "1. Durchgang: Datum heute="..Datum..", Feiertag="..Feiertag)
fibaro:setGlobal("Feiertag_heute", Feiertag)
i = 2
Datum = os.date("%d.%m.", os.time()+24*60*60) -- Datum auf morgen setzen
else
-- 1. Durchgang: Datum morgen mit den Feiertagen prüfen
Debug("grey", "2. Durchgang: Datum morgen="..Datum..", Feiertag="..Feiertag)
fibaro:setGlobal("Feiertag_morgen", Feiertag)
i = 3
end

end

-- ERGEBNIS AUSGEBEN
if fibaro:getGlobal("Feiertag_heute") == 0 then
fibaro:debug("Heute ist kein Feiertag.")
else
fibaro:debug("Heute ist ein Feiertag. Variable gesetzt!")
end
if fibaro:getGlobal("Feiertag_morgen") == 0 then
fibaro:debug("Morgen ist kein Feiertag.")
else
fibaro:debug("Morgen ist ein Feiertag. Variable gesetzt!")
end

end

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- SZENE JEDEN TAG UM 00:01 AUSFÜHREN
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
local sourceTrigger = fibaro:getSourceTrigger();

function tempFunc()
local currentDate = os.date("*t");
local startSource = fibaro:getSourceTrigger();
if ((((currentDate.wday == 1 or currentDate.wday == 2 or currentDate.wday == 3 or currentDate.wday == 4 or currentDate.wday == 5 or currentDate.wday == 6 or currentDate.wday == 7) and string.format("%02d", currentDate.hour) .. ":" .. string.format("%02d", currentDate.min) == "00:01") )) then
FeiertageFunc()
end
setTimeout(tempFunc, 60*1000)
end

if (sourceTrigger["type"] == "autostart") then
tempFunc()
else
local currentDate = os.date("*t");
local startSource = fibaro:getSourceTrigger();
if (startSource["type"] == "other") then
FeiertageFunc()
end
end

 

 

Das das Script mal jemand umgesetzt?

Siehe auch hier:
http://siio.de/board/thema/feiertag-janein/

hab das Script heute mal getestet. Leider scheint es nicht richtig zu funktionieren. Es zeigt für heute und morgen einen Freitag bei mir an.

[DEBUG] 15:01:52: Heute ist ein Feiertag. Variable gesetzt!
[DEBUG] 15:01:52: Morgen ist ein Feiertag. Variable gesetzt!

Gruß, Valle

Zumindest war gestern ein Feiertag in der Schweiz, darauf zielt das Script ja ab
https://www.feiertagskalender.ch/index.php?geo=3056

habe gerade mal den Parameter “Kanton” leer gelassen. Leider ändert sich am Ergebnis nichts. Die Parameter “Feiertag_heute” und “Feiertag_morgen” haben auch den Wert 0. Eigentlich müsste ja bei einem Wert von 0 angezeigt werden, dass kein Feiertag ist. Trotzdem wird immer angezeigt, dass ein Feiertag ist.

Hier mal die Debug Ausgabe

[DEBUG] 15:44:22: Osterdatum: 28.03.2016
[DEBUG] 15:44:22: 2016 ist ein Schaltjahr.
[DEBUG] 15:44:22: Anzahl Tage im Ostermonat: 31
[DEBUG] 15:44:22: Zahl: 29, oTag: 28, fDiff: 1, index: 1
[DEBUG] 15:44:22: Innerhalb des Referenzmonats > Schleife nicht durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 29.03.
[DEBUG] 15:44:22: Zahl: 26, oTag: 28, fDiff: -2, index: 2
[DEBUG] 15:44:22: Innerhalb des Referenzmonats > Schleife nicht durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 26.03.
[DEBUG] 15:44:22: Zahl: 67, oTag: 28, fDiff: 39, index: 3
[DEBUG] 15:44:22: Ausserhalb des Referenzmonats > Schleife durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 05.05.
[DEBUG] 15:44:22: Zahl: 78, oTag: 28, fDiff: 50, index: 4
[DEBUG] 15:44:22: Ausserhalb des Referenzmonats > Schleife durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 16.05.
[DEBUG] 15:44:22: 1. Durchgang: Datum heute=26.07., Feiertag=0
[DEBUG] 15:44:22: Anzahl Tage im Ostermonat: 31
[DEBUG] 15:44:22: Zahl: 29, oTag: 28, fDiff: 1, index: 1
[DEBUG] 15:44:22: Innerhalb des Referenzmonats > Schleife nicht durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 29.03.
[DEBUG] 15:44:22: Zahl: 26, oTag: 28, fDiff: -2, index: 2
[DEBUG] 15:44:22: Innerhalb des Referenzmonats > Schleife nicht durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 26.03.
[DEBUG] 15:44:22: Zahl: 67, oTag: 28, fDiff: 39, index: 3
[DEBUG] 15:44:22: Ausserhalb des Referenzmonats > Schleife durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 05.05.
[DEBUG] 15:44:22: Zahl: 78, oTag: 28, fDiff: 50, index: 4
[DEBUG] 15:44:22: Ausserhalb des Referenzmonats > Schleife durchlaufen.
[DEBUG] 15:44:22: Datum des Feiertags berechnen...
[DEBUG] 15:44:22: Feiertag: 16.05.
[DEBUG] 15:44:22: 2. Durchgang: Datum morgen=27.07., Feiertag=0
[DEBUG] 15:44:22: Heute ist ein Feiertag. Variable gesetzt!
[DEBUG] 15:44:22: Morgen ist ein Feiertag. Variable gesetzt!

So, konnte das Problem lösen. Warum auch immer, werden die Variablen “Feiertag_heute” und “Feiertag_morgen” nicht richtig ausgewertet, wenn der Wert in der Abfrage aus Zeile 228 sowie 233 nicht in einem Anführungszeichen oder Hochkomma gesetzt werden.

Es sieht jetzt bei mir wie folgt aus:


-- ERGEBNIS AUSGEBEN
if fibaro:getGlobal("Feiertag_heute") == "0" then
fibaro:debug("Heute ist kein Feiertag.")
else
fibaro:debug("Heute ist ein Feiertag. Variable gesetzt!")
end
if fibaro:getGlobal("Feiertag_morgen") == "0" then
fibaro:debug("Morgen ist kein Feiertag.")
else
fibaro:debug("Morgen ist ein Feiertag. Variable gesetzt!")
end
 
end

So klappt es jetzt auch bei mir mit dem Script.

Gruß, Valle

Super.
Mit dem Para “Kanton” werden sicherlich die kantonspezifische Feiertage angezeigt. Ansonsten nur die für die ganze Schweiz.

ja der Parameter Kanton ist für die spezifischen Gliedstaaten der Schweiz. Ich passe mir das Script gerade für Deutschland an.

Hallo,

ich habe das Script mal angepasst auf Feiertage für Deutschland und den jeweiligen Bundesländern. Ich hoffe es ist fehlerfrei.

--[[
%% autostart
%% properties
%% globals
--]]

-- ************************************************************************
-- FEIERTAGE-SCRIPT
-- ************************************************************************

-- Das Skript berechnet die eidg./kant. Feiertage im aktuellen Jahr und prüft,
-- ob heute oder morgen ein Feiertag ist und hinterlegt das Ergebnis in den
-- Systemvariablen "Feiertag_heute" und "Feiertag_morgen".

-- (c) Simon Betschmann (01-2015)
-- Version: 1.0
-- Basierend auf einer Idee von Peter Beck (01-2011)
-- Version: 1.1
-- Erweiterung für Deutschland und Bundeländer von Udo Haß

-- Es werden folgende Systemvariablen benötigt:
-- Feiertag_heute
-- Feiertag_morgen

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- EINSTELLUNGEN
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

-- Bitte nur in dieser Sektion Einstellungen vornehmen
local debuging = false -- TOGGLE DEBUGING (true|false)
local Land = "DE"  -- LAND angeben (DE, CH)
local Bundesland = "NW" -- Bundesland eingeben (BW,BY,BE,BB,HB,HH,HE,MV,NI,NW,RP,SL,SN,ST,SH,TH) -- Kürzel http://www.schnelle-online.info/Feiertage-Deutschland.html
local katholische_Gemeinde ="nein" -- spezielle Feiertage für katholische Gemeinden (München, Ingolstadt, Rosenheim) 
local Kanton = "" -- Kanton angeben für kantonale Feiertage (ZH, AG,...) -- leer lassen, um Funktion auszuschalten

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- DEBUG
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

-- Grundfunktion: Debug("red", "Nachrichtentext")
Debug = function(color, message)
  if (debuging) then
    fibaro:debug(string.format('<%s style="color:%s;">%s', "span", color, message, "span"))
  end
end

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- FEIERTAGE BERECHNEN
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

function FeiertageFunc()
  local Datum = os.date("%d.%m.") -- heutiges Datum (ohne Jahr)
  local i = 1

-- OSTERDATUM BERECHNEN
  local Jahr = os.date("%Y") -- Das aktuelle Jahr ermitteln
  local oTag -- Das Tagesdatum vom Ostersonntag
  local oMonat -- Das Monatsdatum von Ostersonntag
  local oDatum -- Das komplette Datum vom Ostersonntag
  local mTage -- Variable für die interne Berechnung
  local LVar1 -- Variable für die interne Berechnung
  local LVar2 -- Variable für die interne Berechnung
  local LVar3 -- Variable für die interne Berechnung
  local zahl -- Variable für die interne Berechnung

-- Interne Funktion zum Runden auf Ganzzahlen
  function round(x)
    return x>=0 and math.floor(x+0.5) or math.ceil(x-0.5)
  end

-- Die modifizierte Gauss-Formel nach Lichtenberg
  local LVar1 = ((19 * (Jahr % 19)) + (15 + (((3 * (Jahr / 100)) + 3) / 4) - (((8 * (Jahr / 100)) + 13) / 25))) % 30;
  local LVar2 = (LVar1 / 29) + (((LVar1 / 28) - (LVar1 / 29)) * ((Jahr % 19) / 11));
  local LVar3 = 7 - (((21 + LVar1 - LVar2) - (7 - ((Jahr + (Jahr / 4) + (2 - (((3 * (Jahr / 100)) + 3) / 4))) % 7))) % 7);
  local oTag = round((21 + LVar1 - LVar2) + LVar3);

-- Monat und Tag von Ostern bestimmen
  if (oTag > 31) then -- Der Monat März hat nur 31 Tage -> Ostern im April
    oMonat = "04";
    oTag = oTag - 31;
  else
    oMonat = "03"; -- Ostern ist im März
  end

-- Das Ergebnis in Variable oDatum hinterlegen
  if (oTag < 10) then
    oDatum = "0" .. oTag .. "." .. oMonat .. "." .. Jahr;
  else
    oDatum = oTag .. "." .. oMonat .. "." .. Jahr;
  end

  Debug("gray", "Osterdatum: ".. oDatum)

-- Ermitteln, wieviele Tage der Februar im aktuellen Jahr hat
  zahl = Jahr % 4;

  if (zahl == 0) then -- Ein Schaltjahr -> Feb. = 29 Tage
    mTage = {31,29,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
    Debug("gray", Jahr.. " ist ein Schaltjahr.")
  else
    mTage = {31,28,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
    Debug("gray", Jahr.. " ist kein Schaltjahr.")
  end

-- Feiertage mit dem heutigen & morgigen Datum vergleichen und Ergebnis
-- in den Variablen "Feiertag_heute" bzw. "Feiertag_morgen" speichern
  while i < 3 do
    local Feiertag = 0

    if (Land == "DE") then -- Bundeseinheitliche Feiertage in Deutschland
      if (Datum == "01.01.") then Feiertag = 1 end -- Neujahr
      if (Datum == "01.05.") then Feiertag = 1 end -- Tag der Arbeit
      if (Datum == "03.10.") then Feiertag = 1 end -- Tag der Deutschen Einheit
      if (Datum == "31.10.") and (Jahr == "2017") then Feiertag = 1 end -- Reformationstag (nur 2017 Bundeseinheitlich!)
      if (Datum == "25.12.") then Feiertag = 1 end -- 1. Weihnachtstag
      if (Datum == "26.12.") then Feiertag = 1 end -- 2. Weihnachtstag
      
      if Bundesland =="BW" then  -- spezifische Feiertage für Baden-Würtenberg
        if (Datum == "06.01.") then Feiertag = 1 end -- Heilige Drei Könige
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam
        if (Datum == "01.11.") then Feiertag = 1 end -- Allerheiligen
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
            
      if Bundesland =="BY" then  -- spezifische Feiertage für Bayern
        if (Datum == "06.01.") then Feiertag = 1 end -- Heilige Drei Könige
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam
        if (Datum == "01.11.") then Feiertag = 1 end -- Allerheiligen
        if (katholische_Gemeinde == "ja") then
          if (Datum == "15.08.") then Feiertag = 1 end -- Mariä Himmelfahrt
        end
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end
      
      if Bundesland =="BE" then  -- spezifische Feiertage für Berlin
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
      
      if Bundesland =="BB" then  -- spezifische Feiertage für Brandenburg
        if (Datum == "31.10.") then Feiertag = 1 end -- Reformationstag
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostersonntag, Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstsonntag,Pfingstmontag
        feiertage = {0,1,-2,40,49,50}
      end       
            
      if Bundesland =="HB" then  -- spezifische Feiertage für Bremen
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
      
      if Bundesland =="HH" then  -- spezifische Feiertage für Hamburg
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
      
      if Bundesland =="HE" then  -- spezifische Feiertage für Hessen
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam

        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
      
      if Bundesland =="MV" then  -- spezifische Feiertage für Mecklenburg-Vorpommern
        if (Datum == "31.10.") then Feiertag = 1 end -- Reformationstag

        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
      
      if Bundesland =="NI" then  -- spezifische Feiertage für Niedersachsen
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
            
      if Bundesland =="NW" then  -- spezifische Feiertage für NRW
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam
        if (Datum == "01.11.") then Feiertag = 1 end -- Allerheiligen
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
      
      if Bundesland =="RP" then  -- spezifische Feiertage für Rheinland-Pfalz
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam
        if (Datum == "01.11.") then Feiertag = 1 end -- Allerheiligen
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
    
      if Bundesland =="SL" then  -- spezifische Feiertage für Saarland
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam
        if (Datum == "15.08.") then Feiertag = 1 end -- Mariä Himmelfahrt
        if (Datum == "01.11.") then Feiertag = 1 end -- Allerheiligen
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
    
      if Bundesland =="SN" then  -- spezifische Feiertage für Sachsen
        if (Datum == "26.05.") then Feiertag = 1 end -- Fronleichnam
        if (Datum == "31.10.") then Feiertag = 1 end -- Reformationstag
        if (Datum == "16.11.") then Feiertag = 1 end -- Buß- und Bettag
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
    
      if Bundesland =="SL" then  -- spezifische Feiertage für Sachsen-Anhalt
        if (Datum == "06.01.") then Feiertag = 1 end -- Heiligen-Drei-Könige
        if (Datum == "31.10.") then Feiertag = 1 end -- Reformationstag
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
    
      if Bundesland =="SH" then  -- spezifische Feiertage für Schleswig-Holstein
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
    
      if Bundesland =="TH" then  -- spezifische Feiertage für Thüringen
        if (Datum == "31.10.") then Feiertag = 1 end -- Reformationstag
        -- Aray mit Differenztagen zum Ostersonntag:
        -- Ostermontag, Karfreitag, Christi Himmelfahrt, Pfingstmontag
        feiertage = {1,-2,40,50}
      end 
    end

    if (Land == "CH") then -- FESTE FEIERTAGE IN DER GANZEN SCHWEIZ
      if (Datum == "01.01.") then Feiertag = 1 end -- Neujahr
      if (Datum == "01.08.") then Feiertag = 1 end -- Nationalfeiertag
      if (Datum == "25.12.") then Feiertag = 1 end -- Weihnachten
      if (Datum == "26.12.") then Feiertag = 1 end -- Stephanstag
-- FEIERTAGE IM KANTON ZÜRICH
      if (Kanton == "ZH") then
        if (Datum == "01.05.") then Feiertag = 1 end -- Tag der Arbeit
      end
-- FEIERTAGE IM KANTON AARGAU
      if (Kanton == "AG") then
        if (Datum == "02.01.") then Feiertag = 1 end -- Berchtoldstag
      end

-- VARIABLE FEIERTAG IN DER GANZEN SCHWEIZ
-- Aray mit Differenztagen zum Ostersonntag:
-- Ostermontag, Karfreitag, Auffahrt, Pfingstmontag
      feiertage = {1,-2,39,50}
    end

  
-- VARIABLE FEIERTAGE: DATEN BERECHNEN

    oTage = mTage[tonumber(oMonat)] -- Anzahl Tage im Ostermonat
    Debug("grey", "Anzahl Tage im Ostermonat: "..oTage)

    local fDatum; -- Feiertagsdatum
    local fDiff; -- Anzahl der Tage vom Ostersonntag entfernt
    local Schleife; -- Für die Berechnungen in der while-Schleife notwendig    
    
    for x in next, feiertage do
      Debug("red", "Feiertag: "..feiertage[x])

      fDiff = feiertage[x]
      Schleife = true;

      zahl = oTag + fDiff; -- Differenztage zum Referenztag hinzurechnen
      Debug("grey", "Zahl: "..zahl..", oTag: "..oTag..", fDiff: "..fDiff..", index: "..x)

      if (fDiff > 0) then
        if (zahl > oTage) then
          zahl = zahl - oTage; -- Sind wir ausserhalb des Referenzmonats?
          Debug("grey", "Ausserhalb des Referenzmonats > Schleife durchlaufen.")
        else -- Nein => Berechnungschleife nicht durchlaufen.
          Schleife = false;
          LVar2 = oMonat;
          Debug("grey", "Innerhalb des Referenzmonats > Schleife nicht durchlaufen.")
        end
      else
        if (zahl > 0) then -- Wenn innerhalb des Referenzmonats => Berechnungsschleife nicht durchlaufen.
          Schleife = false;
          LVar2 = oMonat;
          Debug("grey", "Innerhalb des Referenzmonats > Schleife nicht durchlaufen.")
        else
          Debug("grey", "Ausserhalb des Referenzmonats > Schleife durchlaufen.")
        end
      end

      LVar1 = 0;

-- Schleife 'Monatsberechnung', falls nicht im gleichen Monat wie Ostern
      if (fDiff > 0) then
      while (Schleife) do
        LVar1 = LVar1 + 1.00;
        LVar2 = oMonat + LVar1;
        zahl = zahl - mTage[tonumber(oMonat)];
        if (zahl <= 0) then -- Aktueller Monat gefunden
          Schleife = false;
          zahl = zahl + mTage[tonumber(oMonat)] -- Wieder addieren, um den Tag zu berechnen
        end
      end
    else
      if (fDiff < 0) then
        while (Schleife) do
          LVar1 = LVar1 + 1.00;
          LVar2 = oMonat - LVar1;
          zahl = zahl + mTage[tonumber(oMonat)]
          if (zahl > 0) then -- Aktueller Monat gefunden
            Schleife = false;
          end
        end
      end
    end

-- Datum des Feiertags berechnen
      Debug("grey", "Datum des Feiertags berechnen...")
      if (zahl < 10 and tonumber(LVar2) < 10) then
    fDatum = "0" .. zahl .. ".0"..tonumber(LVar2).. ".";
  elseif (zahl < 10) then
    fDatum = "0" .. zahl .. "."..tonumber(LVar2).. ".";
  elseif (tonumber(LVar2) < 10) then
    fDatum = zahl .. ".0"..tonumber(LVar2).. ".";
  else
    fDatum = zahl .. "."..tonumber(LVar2).. ".";
  end

      Debug("white", "Feiertag: "..fDatum)

-- Prüfen, ob Datum heute/morgen mit Feiertag übereinstimmt
      if (Datum == fDatum) then
    Feiertag = 1
    fibaro:debug("Feiertag ("..fDatum..") gefunden.")
  end
    end

-- VARIABLEN SETZTEN
    if i == 1 then
-- 1. Durchgang: Datum heute mit den Feiertagen prüfen
      Debug("grey", "1. Durchgang: Datum heute="..Datum..", Feiertag="..Feiertag)
      fibaro:setGlobal("Feiertag_heute", Feiertag)
      i = 2
      Datum = os.date("%d.%m.", os.time()+24*60*60) -- Datum auf morgen setzen
    else
-- 1. Durchgang: Datum morgen mit den Feiertagen prüfen
      Debug("grey", "2. Durchgang: Datum morgen="..Datum..", Feiertag="..Feiertag)
      fibaro:setGlobal("Feiertag_morgen", Feiertag)
      i = 3
    end

  end

-- ERGEBNIS AUSGEBEN
  if fibaro:getGlobal("Feiertag_heute") == '0' then
    fibaro:debug("Heute ist kein Feiertag.")
  else
    fibaro:debug("Heute ist ein Feiertag. Variable gesetzt!")
  end
  if fibaro:getGlobal("Feiertag_morgen") == '0' then
    fibaro:debug("Morgen ist kein Feiertag.")
  else
    fibaro:debug("Morgen ist ein Feiertag. Variable gesetzt!")
  end

end

-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- SZENE JEDEN TAG UM 00:01 AUSFÜHREN
-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
local sourceTrigger = fibaro:getSourceTrigger();

function tempFunc()
  local currentDate = os.date("*t");
  local startSource = fibaro:getSourceTrigger();
  if ((((currentDate.wday == 1 or currentDate.wday == 2 or currentDate.wday == 3 or currentDate.wday == 4 or currentDate.wday == 5 or currentDate.wday == 6 or    currentDate.wday == 7) and string.format("%02d", currentDate.hour) .. ":" .. string.format("%02d", currentDate.min) == "00:01") )) then
    FeiertageFunc()
  end
  setTimeout(tempFunc, 60*1000)
end

if (sourceTrigger["type"] == "autostart") then
  tempFunc()
else
  local currentDate = os.date("*t");
  local startSource = fibaro:getSourceTrigger();
  if (startSource["type"] == "other") then
    FeiertageFunc()
  end
end

Hi,

danke für deine Arbeit :slight_smile:

Gruß

Hallo,

sehr gute Arbeit. Auch von mir ein großes Dankeschön!

Kleine Ergänzung. Halb ernst und halb zur Belustigung und nur für die jüngere Generation. Das Jahr 2100 ist zwar durch 4 teilbar, aber kein Schaltjahr. Hier wird es Abweichungen geben :wink:
Ergänzung der Formel:


zahl4 = Jahr % 4;
zahl100 = Jahr % 100;
zahl400 = Jahr % 400;

  if ((zahl4 == 0) and (zahl100 <> 0)) or (zahl400 = 0)  then -- Ein Schaltjahr -> Feb. = 29 Tage
    mTage = {31,29,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
    Debug("gray", Jahr.. " ist ein Schaltjahr.")
  else
    mTage = {31,28,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
    Debug("gray", Jahr.. " ist kein Schaltjahr.")
  end

Sehr Interessant.
Werde ich auch mal probieren.
@ Bastian ab welcher Zeile mus dein Block eingebaut werden.

Bastian noch mal danke das du mir geholfen hast bei der Scene mit den Rollo´s die läuft jetzt,
und ich habe schon mehr bestehende Scenen mit elseif zusammenfügen können aus 2 mach eine Scene Danke.

Kleine Korrektur in Zeile 5 (ehemals Zeile 6; es fehlt ein 2. Gleichheitszeichen):

zahl4 = Jahr % 4;
zahl100 = Jahr % 100;
zahl400 = Jahr % 400;
 
  if ((zahl4 == 0) and (zahl100 <> 0)) or (zahl400 == 0)  then -- Ein Schaltjahr -> Feb. = 29 Tage
    mTage = {31,29,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
    Debug("gray", Jahr.. " ist ein Schaltjahr.")
  else
    mTage = {31,28,31,30,31,30,31,31,30,31,30,31}; -- Anzahl der Tage im Monat Jan.-Dez.
    Debug("gray", Jahr.. " ist kein Schaltjahr.")
  end

Ach so: im Script bitte ab Zeile 95 einfügen bzw. ersetzen ?.

HI,

wofür nutzt Ihr diese Variable im Anschluss. Mir fällt nur ein, das im der Heizungssteuerung zu verwenden. Wobei ich jetzt nicht wüsste wie ich dies bewerkstelligen würde.

Das soll heißen, wenn Feiertag dann Sonntagsplan

http://www.siio.de/heizenenergiesparen/bares-geld-sparen-fibaro-heizung-aus-bei-fenster-auf/

Gruß
ChrisBeat

Hi ChrisBeat,

für die Heozungssteuerung lässt sich die Variable nicht verwenden. Diese kennt nur Montag bis Sonntag.

Aber für jegliche Art von Szene ist die Variable interessant, wenn beispielsweise an Wochenenden andere Funktionen ausgeführt werden sollen als in der Woche. Auch für zeitgesteuerte Szenen ist es relevant. Oder für den Wecker der an einem Feiertag nicht um 6 Uhr klingeln soll.

Genau.
Am WE und Feiertagen sollen zB Rollos anders fahren.
Und bestimmte Szenen nicht.

ich nutze die Feiertagsoption für meine “Server- und Netzwerksteuern”. In der Nacht und an Werktagen werden alle Server autom. runtergefahren sowie Teilkomponenten des Netzwerks um eine definierte Uhrzeit abgeschaltet (WLAN, NAS, Plexserver, Mailserver z.B). Mit dem Script kann ich das halt an Feiertagen beeinflussen.

Gruß, Valle

Hallo Community,

wieder was gelernt und neue Ideen gesammelt. Danke Euch

Gruß
ChrisBeat