From e68b156d3ddf61deb19896c0219b4b2164ad5c8d Mon Sep 17 00:00:00 2001
From: Marko Oldenburg <leongaultier@gmail.com>
Date: Sat, 11 May 2019 09:50:02 +0200
Subject: [PATCH] fix bug then ventilate off and comfort on, fix brightness and
 weekend in EventBrightness Routine

---
 73_AutoShuttersControl.pm | 20 +++++++++++++++-----
 1 file changed, 15 insertions(+), 5 deletions(-)

diff --git a/73_AutoShuttersControl.pm b/73_AutoShuttersControl.pm
index f32399a..cafd015 100644
--- a/73_AutoShuttersControl.pm
+++ b/73_AutoShuttersControl.pm
@@ -44,7 +44,7 @@ use strict;
 use warnings;
 use FHEM::Meta;
 
-my $version = '0.6.8';
+my $version = '0.6.9';
 
 sub AutoShuttersControl_Initialize($) {
     my ($hash) = @_;
@@ -1356,8 +1356,10 @@ sub EventProcessingBrightness($@) {
                             computeAlignTime( '24:00',
                                 $shutters->getTimeUpEarly ) / 86400
                         )
-                        and not IsWe()
-                    )
+                        and ( not IsWe()
+                          or (IsWe()
+                            and $ascDev->getSunriseTimeWeHoliday eq 'off')
+                    ) )
                     or (
                         int( gettimeofday() / 86400 ) != int(
                             computeAlignTime( '24:00',
@@ -1433,8 +1435,10 @@ sub EventProcessingBrightness($@) {
                             computeAlignTime( '24:00',
                                 $shutters->getTimeUpEarly ) / 86400
                         )
-                        and not IsWe()
-                    )
+                        and ( not IsWe()
+                          or (IsWe()
+                            and $ascDev->getSunriseTimeWeHoliday eq 'off')
+                    ) )
                     or (
                         int( gettimeofday() / 86400 ) != int(
                             computeAlignTime( '24:00',
@@ -2092,6 +2096,12 @@ sub ShuttersCommandSet($$$) {
                     or $shutters->getComfortOpenPos != $posValue )
                 and $shutters->getVentilateOpen eq 'on'
             )
+            or (
+                    CheckIfShuttersWindowRecOpen($shuttersDev) == 2
+                and $shutters->getSubTyp eq 'threestate'
+                and $ascDev->getAutoShuttersControlComfort eq 'on'
+                and $shutters->getVentilateOpen eq 'off'
+            )
             or (
                 CheckIfShuttersWindowRecOpen($shuttersDev) == 2
                 and (  $shutters->getLockOut eq 'soft'