gitarre

[xhome.git] / Griesstatt / 99_myUtils.pm

diff --git a/Griesstatt/99_myUtils.pm b/Griesstatt/99_myUtils.pm
index eb76ed9d5c59f1b8242674d6eb02aa0196e556fd..e3d0a3878700b73930d52329117010a5968af3b4 100644 (file)
--- a/Griesstatt/99_myUtils.pm
+++ b/Griesstatt/99_myUtils.pm
@@ -25,14 +25,6 @@ sub setHeizstatus {
    # parameter check
    die ("Ungültiger Heizstatus (1 .. 4)") if ($heizstatus < 1 or $heizstatus > 4);
 
-   # status check
-   my $hstat = Value("KNX_0000001");
-   if ($hstat == 4 or $hstat == 1) {
-      # Frostschutz/Aufheizen
-      if (!defined($force)) {
-         die "setHeizstatus nicht ausgeführt, da Frostschutz/Aufheizbetrieb. Setze mit '(F)orce'.";
-      }
-   }
    fhem("set KNX_0000001 g1 $heizstatus");
    Log(1, "Set Heizstatus to $heizstatus");
    fhem("set KNX_LED1 g1 off");
@@ -45,4 +37,20 @@ sub setHeizstatus {
    fhem("set KNX_LED3 g1 on") if ($heizstatus == 3);
    fhem("set KNX_LED4 g1 on") if ($heizstatus == 4);
 }
+sub boostReset {
+       my $zimmer = shift;
+
+       if ($zimmer eq "WZ") {
+               my $hstat = Value("KNX_0000001");
+          setHeizstatus(2) if ($hstat == 1);
+       }
+       elsif ($zimmer eq "GZ") {
+               my $hstat = Value("Heizregler_GZ");
+               fhem("set Heizregler_GZ g1 2") if ($hstat == 1);
+       }
+       else {
+               die "Unbekanntes Zimmer: $zimmer";
+       }
+}
+
 1;