change code for shutters drive

This commit is contained in:
Marko Oldenburg 2019-04-12 13:58:26 +02:00
parent 875af674a2
commit ad979345c8

View File

@ -2181,23 +2181,29 @@ sub SunSetShuttersAfterTimerFn($) {
and IsAfterShuttersManualBlocking($shuttersDev) and IsAfterShuttersManualBlocking($shuttersDev)
) )
{ {
$shutters->setLastDrive( my $queryShuttersPosPrivacyDown = (
( $shutters->getShuttersPosCmdValueNegate
$funcHash->{privacyMode} == 1 ? $shutters->getStatus > $shutters->getPrivacyDownPos
? 'privacy position' : $shutters->getStatus < $shutters->getPrivacyDownPos
: 'night close'
)
);
$shutters->setSunset(1);
ShuttersCommandSet(
$hash,
$shuttersDev,
(
$funcHash->{privacyMode} == 1
? $shutters->getPrivacyDownPos
: $posValue
)
); );
if ( $funcHash->{privacyMode} == 1
and not $queryShuttersPosPrivacyDown )
{
$shutters->setLastDrive('privacy position');
ShuttersCommandSet(
$hash,
$shuttersDev,
$shutters->getPrivacyDownPos );
}
elsif ( $funcHash->{privacyMode} == 0 ) {
$shutters->setSunset(1);
$shutters->setLastDrive('night close');
ShuttersCommandSet(
$hash,
$shuttersDev,
$posValue );
}
} }
CreateSunRiseSetShuttersTimer( $hash, $shuttersDev ); CreateSunRiseSetShuttersTimer( $hash, $shuttersDev );