FHEM/mod-AutoShuttersControl
1
0
Fork 0
Code Issues 12 Pull Requests Releases 9 Wiki Activity

fix bug then ModeUp and ModeDown absent

Browse Source
This commit is contained in:
Marko Oldenburg 2020-04-14 08:12:55 +02:00
parent 3607269e72
commit 6ad0baabe5
1 changed files with 24 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
73_AutoShuttersControl.pm
View File

@ -1355,14 +1355,23 @@ sub EventProcessingRoommate {
&& ( !$shutters->getIsDay && ( !$shutters->getIsDay
|| $shutters->getDown eq 'roommate' || $shutters->getDown eq 'roommate'
|| $shutters->getShadingMode eq 'absent' || $shutters->getShadingMode eq 'absent'
|| $shutters->getUp eq 'absent' ) || $shutters->getModeUp eq 'absent'
|| $shutters->getModeDown eq 'absent' )
) )
{ {
Log3( $name, 4,
"AutoShuttersControl ($name) - EventProcessingRoommate absent: $shuttersDev"
);
if ( ( $shutters->getIsDay || $shutters->getUp eq 'roommate' ) if ( ( $shutters->getIsDay || $shutters->getUp eq 'roommate' )
&& $shutters->getIfInShading && $shutters->getIfInShading
&& !$shutters->getQueryShuttersPos( $shutters->getShadingPos ) && !$shutters->getQueryShuttersPos( $shutters->getShadingPos )
&& $shutters->getShadingMode eq 'absent' ) && $shutters->getShadingMode eq 'absent' )
{ {
Log3( $name, 4,
"AutoShuttersControl ($name) - EventProcessingRoommate Shading: $shuttersDev"
);
$shutters->setLastDrive('shading in'); $shutters->setLastDrive('shading in');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getShadingPos ); $shutters->getShadingPos );
@ -1371,17 +1380,30 @@ sub EventProcessingRoommate {
&& $getModeDown eq 'absent' && $getModeDown eq 'absent'
&& $getRoommatesStatus eq 'absent' ) && $getRoommatesStatus eq 'absent' )
{ {
Log3( $name, 4,
"AutoShuttersControl ($name) - EventProcessingRoommate Down: $shuttersDev"
);
$shutters->setLastDrive('roommate absent'); $shutters->setLastDrive('roommate absent');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getClosedPos ); $shutters->getClosedPos );
} }
elsif ($shutters->getIsDay elsif ($shutters->getIsDay
&& $shutters->getUp eq 'absent' ) && $shutters->getModeUp eq 'absent'
&& $getRoommatesStatus eq 'absent' )
{ {
Log3( $name, 4,
"AutoShuttersControl ($name) - EventProcessingRoommate Up: $shuttersDev"
);
$shutters->setLastDrive('roommate absent'); $shutters->setLastDrive('roommate absent');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getOpenPos ); $shutters->getOpenPos );
} }
Log3( $name, 4,
"AutoShuttersControl ($name) - EventProcessingRoommate NICHTS: $shuttersDev"
);
} }
} }