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)
)
{
$shutters->setLastDrive(
(
$funcHash->{privacyMode} == 1
? 'privacy position'
: 'night close'
)
my $queryShuttersPosPrivacyDown = (
$shutters->getShuttersPosCmdValueNegate
? $shutters->getStatus > $shutters->getPrivacyDownPos
: $shutters->getStatus < $shutters->getPrivacyDownPos
);
$shutters->setSunset(1);
if ( $funcHash->{privacyMode} == 1
and not $queryShuttersPosPrivacyDown )
{
$shutters->setLastDrive('privacy position');
ShuttersCommandSet(
$hash,
$shuttersDev,
(
$funcHash->{privacyMode} == 1
? $shutters->getPrivacyDownPos
: $posValue
)
);
$shutters->getPrivacyDownPos );
}
elsif ( $funcHash->{privacyMode} == 0 ) {
$shutters->setSunset(1);
$shutters->setLastDrive('night close');
ShuttersCommandSet(
$hash,
$shuttersDev,
$posValue );
}
}
CreateSunRiseSetShuttersTimer( $hash, $shuttersDev );