From 8d5c94b243f5f473d481b959e547a8556febc438 Mon Sep 17 00:00:00 2001 From: Marc Hoppe Date: Sun, 27 Mar 2016 20:59:34 +0200 Subject: [PATCH] 99-My dummys tag und hell pflegen --- fhem/FHEM/99_MyUtils.pm | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/99_MyUtils.pm b/fhem/FHEM/99_MyUtils.pm index 643f220f8..65336abdb 100644 --- a/fhem/FHEM/99_MyUtils.pm +++ b/fhem/FHEM/99_MyUtils.pm @@ -279,10 +279,18 @@ sub RollCheck() { my $tempOut=ReadingsVal("wetter", "temp_c", 99); my $twil=Value("twil"); - if($twil>=3 && $twil<10) { # civil + if ($twil>=3 && $twil<10) { # civil $tag=1; + myfhem("set tag 1"); + } else { + myfhem("set tag 0"); + } + my $light=ReadingsVal("twil", "light", 0); + if ($light>=5) { # weather + myfhem("set hell 1"); + } else { + myfhem("set hell 0"); } - my $wett=ReadingsVal("wetter", "code", 99); my $sr=Value("sonnenrichtung");