From f51af5bf461d688bbddb375d43de1767c8333700 Mon Sep 17 00:00:00 2001
From: Marko Oldenburg <leongaultier@gmail.com>
Date: Tue, 28 May 2019 15:44:44 +0200
Subject: [PATCH] add shading out routine then coming home and shading mode is
 absent

---
 73_AutoShuttersControl.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/73_AutoShuttersControl.pm b/73_AutoShuttersControl.pm
index 0593b3c..0565d11 100644
--- a/73_AutoShuttersControl.pm
+++ b/73_AutoShuttersControl.pm
@@ -1255,6 +1255,18 @@ sub EventProcessingResidents($@) {
                 $shutters->setLastDrive('shading in');
                 $shutters->setDriveCmd( $shutters->getShadingPos );
             }
+            elsif (
+                    $shutters->getShadingMode eq 'absent'
+                and IsDay($shuttersDev)
+                and $shutters->getIfInShading
+                and $shutters->getStatus == $shutters->getShadingPos
+                and not( CheckIfShuttersWindowRecOpen($shuttersDev) == 2
+                    and $shutters->getShuttersPlace eq 'terrace' )
+              )
+            {
+                $shutters->setLastDrive('shading out');
+                $shutters->setDriveCmd( $shutters->getLastPos );
+            }
             elsif (
                     $ascDev->getSelfDefense eq 'on'
                 and CheckIfShuttersWindowRecOpen($shuttersDev) != 0