code style
This commit is contained in:
parent
d2b3490e14
commit
898e3b1463
@ -584,8 +584,8 @@ sub ShuttersDeviceScan($) {
|
|||||||
; # temporär muss später gelöscht werden ab Version 0.4.11beta6
|
; # temporär muss später gelöscht werden ab Version 0.4.11beta6
|
||||||
delFromDevAttrList( $_, 'ASC_Wind_Pos' )
|
delFromDevAttrList( $_, 'ASC_Wind_Pos' )
|
||||||
; # temporär muss später gelöscht werden ab Version 0.4.11beta6
|
; # temporär muss später gelöscht werden ab Version 0.4.11beta6
|
||||||
CommandDeleteReading(undef,$_ . ' ASC_Time_PrivacyDriveUp')
|
CommandDeleteReading( undef, $_ . ' ASC_Time_PrivacyDriveUp' )
|
||||||
if ( ReadingsVal($_,'ASC_Time_PrivacyDriveUp','none') ne 'none' )
|
if ( ReadingsVal( $_, 'ASC_Time_PrivacyDriveUp', 'none' ) ne 'none' )
|
||||||
; # temporär muss später gelöscht werden ab Version 0.6.3
|
; # temporär muss später gelöscht werden ab Version 0.6.3
|
||||||
|
|
||||||
$shuttersList = $shuttersList . ',' . $_;
|
$shuttersList = $shuttersList . ',' . $_;
|
||||||
@ -866,32 +866,31 @@ sub EventProcessingWindowRec($@) {
|
|||||||
)
|
)
|
||||||
{
|
{
|
||||||
ASC_Debug( 'EventProcessingWindowRec: '
|
ASC_Debug( 'EventProcessingWindowRec: '
|
||||||
. $shutters->getShuttersDev
|
. $shutters->getShuttersDev
|
||||||
. ' Event Closed' );
|
. ' Event Closed' );
|
||||||
|
|
||||||
if (
|
if (
|
||||||
IsDay($shuttersDev)
|
IsDay($shuttersDev)
|
||||||
and ( ( $homemode ne 'asleep' and $homemode ne 'gotosleep' )
|
and ( ( $homemode ne 'asleep' and $homemode ne 'gotosleep' )
|
||||||
or $homemode eq 'none' )
|
or $homemode eq 'none' )
|
||||||
and $shutters->getModeUp ne 'absent'
|
and $shutters->getModeUp ne 'absent'
|
||||||
and $shutters->getModeUp ne 'off'
|
and $shutters->getModeUp ne 'off'
|
||||||
)
|
)
|
||||||
{
|
{
|
||||||
if ( $shutters->getShadingStatus eq 'in'
|
if ( $shutters->getShadingStatus eq 'in'
|
||||||
and $shutters->getShuttersPlace eq 'terrace'
|
and $shutters->getShuttersPlace eq 'terrace'
|
||||||
and $shutters->getShadingPos != $shutters->getStatus
|
and $shutters->getShadingPos != $shutters->getStatus )
|
||||||
)
|
|
||||||
{
|
{
|
||||||
$shutters->setLastDrive('shading in');
|
$shutters->setLastDrive('shading in');
|
||||||
$shutters->setNoOffset(1);
|
$shutters->setNoOffset(1);
|
||||||
$shutters->setDriveCmd($shutters->getShadingPos);
|
$shutters->setDriveCmd( $shutters->getShadingPos );
|
||||||
}
|
}
|
||||||
elsif ( $shutters->getStatus != $shutters->getOpenPos ) {
|
elsif ( $shutters->getStatus != $shutters->getOpenPos ) {
|
||||||
$shutters->setLastDrive('window closed at day');
|
$shutters->setLastDrive('window closed at day');
|
||||||
$shutters->setNoOffset(1);
|
$shutters->setNoOffset(1);
|
||||||
$shutters->setDriveCmd(
|
$shutters->setDriveCmd(
|
||||||
(
|
(
|
||||||
$shutters->getLastPos != $shutters->getClosedPos
|
$shutters->getLastPos != $shutters->getClosedPos
|
||||||
? $shutters->getLastPos
|
? $shutters->getLastPos
|
||||||
: $shutters->getOpenPos
|
: $shutters->getOpenPos
|
||||||
)
|
)
|
||||||
@ -1536,8 +1535,7 @@ sub EventProcessingBrightness($@) {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
EventProcessingShadingBrightness( $hash, $shuttersDev,
|
EventProcessingShadingBrightness( $hash, $shuttersDev, $events );
|
||||||
$events );
|
|
||||||
ASC_Debug( 'EventProcessingBrightness: '
|
ASC_Debug( 'EventProcessingBrightness: '
|
||||||
. $shutters->getShuttersDev
|
. $shutters->getShuttersDev
|
||||||
. ' - Brightness Event kam nicht innerhalb der Verarbeitungszeit für Sunset oder Sunris oder aber für beide wurden die entsprechendne Verarbeitungsschwellen nicht erreicht.'
|
. ' - Brightness Event kam nicht innerhalb der Verarbeitungszeit für Sunset oder Sunris oder aber für beide wurden die entsprechendne Verarbeitungsschwellen nicht erreicht.'
|
||||||
@ -1875,9 +1873,10 @@ sub ShadingProcessing($@) {
|
|||||||
: $getStatus < $getShadingPos
|
: $getStatus < $getShadingPos
|
||||||
);
|
);
|
||||||
|
|
||||||
if ( not $queryShuttersShadingPos
|
if (
|
||||||
and not (CheckIfShuttersWindowRecOpen($shuttersDev) == 2
|
not $queryShuttersShadingPos
|
||||||
and $shutters->getShuttersPlace eq 'terrace')
|
and not( CheckIfShuttersWindowRecOpen($shuttersDev) == 2
|
||||||
|
and $shutters->getShuttersPlace eq 'terrace' )
|
||||||
)
|
)
|
||||||
{
|
{
|
||||||
$shutters->setLastDrive('shading in');
|
$shutters->setLastDrive('shading in');
|
||||||
|
Loading…
x
Reference in New Issue
Block a user