change version, code style
This commit is contained in:
parent
6f8175ca88
commit
50f5bd9477
@ -44,7 +44,7 @@ use strict;
|
||||
use warnings;
|
||||
use FHEM::Meta;
|
||||
|
||||
my $version = '0.6.7.1-patchBrightness';
|
||||
my $version = '0.6.7';
|
||||
|
||||
sub AutoShuttersControl_Initialize($) {
|
||||
my ($hash) = @_;
|
||||
@ -2050,7 +2050,8 @@ sub EventProcessingShutters($@) {
|
||||
ASC_Debug( 'EventProcessingShutters: '
|
||||
. $shutters->getShuttersDev
|
||||
. ' - Event vom Rolllo erkannt. Es wird nun eine etwaige manuelle Fahrt ausgewertet.'
|
||||
. ' Int von gettimeofday: ' . int( gettimeofday() )
|
||||
. ' Int von gettimeofday: '
|
||||
. int( gettimeofday() )
|
||||
. ' Last Position Timestamp: '
|
||||
. $shutters->getLastPosTimestamp
|
||||
. ' Drive Up Max Duration: '
|
||||
@ -2058,16 +2059,12 @@ sub EventProcessingShutters($@) {
|
||||
. ' Last Position: '
|
||||
. $shutters->getLastPos
|
||||
. ' aktuelle Position: '
|
||||
. $shutters->getStatus
|
||||
);
|
||||
|
||||
|
||||
. $shutters->getStatus );
|
||||
|
||||
if ( ( int( gettimeofday() ) - $shutters->getLastPosTimestamp ) >
|
||||
$shutters->getDriveUpMaxDuration
|
||||
and ( int( gettimeofday() ) - $shutters->getLastManPosTimestamp ) >
|
||||
$shutters->getDriveUpMaxDuration
|
||||
)
|
||||
$shutters->getDriveUpMaxDuration )
|
||||
{
|
||||
$shutters->setLastDrive('manual');
|
||||
$shutters->setLastDriveReading;
|
||||
@ -2730,9 +2727,11 @@ sub IsDay($) {
|
||||
##### Nach Sonnenuntergang / Abends
|
||||
$respIsDay = (
|
||||
(
|
||||
( $shutters->getBrightness > $brightnessMinVal
|
||||
(
|
||||
$shutters->getBrightness > $brightnessMinVal
|
||||
and $isday
|
||||
and not $shutters->getSunset )
|
||||
and not $shutters->getSunset
|
||||
)
|
||||
or not $shutters->getSunset
|
||||
) ? 1 : 0
|
||||
) if ( $shutters->getDown eq 'brightness' );
|
||||
@ -2751,9 +2750,11 @@ sub IsDay($) {
|
||||
##### Nach Sonnenauf / Morgens
|
||||
$respIsDay = (
|
||||
(
|
||||
( $shutters->getBrightness > $brightnessMaxVal
|
||||
(
|
||||
$shutters->getBrightness > $brightnessMaxVal
|
||||
and not $isday
|
||||
and not $shutters->getSunrise )
|
||||
and not $shutters->getSunrise
|
||||
)
|
||||
or $respIsDay
|
||||
or $shutters->getSunrise
|
||||
) ? 1 : 0
|
||||
|
Loading…
Reference in New Issue
Block a user