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

add attribut ASC_RainProtection

Browse Source
This commit is contained in:
Marko Oldenburg 2019-04-29 13:22:37 +02:00
parent cad34208ea
commit 503545e620
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
73_AutoShuttersControl.pm
View File

@ -44,7 +44,7 @@ use strict;
use warnings; use warnings;
use FHEM::Meta; use FHEM::Meta;
my $version = '0.6.2.1'; my $version = '0.6.2.3';
sub AutoShuttersControl_Initialize($) { sub AutoShuttersControl_Initialize($) {
my ($hash) = @_; my ($hash) = @_;
@ -207,6 +207,7 @@ my %userAttrList = (
'ASC_WindParameters' => '-', 'ASC_WindParameters' => '-',
'ASC_DriveUpMaxDuration' => '-', 'ASC_DriveUpMaxDuration' => '-',
'ASC_WindProtection:on,off' => '-', 'ASC_WindProtection:on,off' => '-',
'ASC_RainProtection:on,off' => '-',
); );
my %posSetCmds = ( my %posSetCmds = (
@ -1199,6 +1200,10 @@ sub EventProcessingRain($@) {
foreach my $shuttersDev ( @{ $hash->{helper}{shuttersList} } ) { foreach my $shuttersDev ( @{ $hash->{helper}{shuttersList} } ) {
$shutters->setShuttersDev($shuttersDev); $shutters->setShuttersDev($shuttersDev);
next
if ($shutters->getRainProtection eq 'off' );
if ( $val > $triggerMax if ( $val > $triggerMax
and $shutters->getStatus != $closedPos and $shutters->getStatus != $closedPos
and IsAfterShuttersManualBlocking($shuttersDev) ) and IsAfterShuttersManualBlocking($shuttersDev) )
@ -3997,6 +4002,12 @@ sub getWindProtection {
return AttrVal( $self->{shuttersDev}, 'ASC_WindProtection', 'on' ); return AttrVal( $self->{shuttersDev}, 'ASC_WindProtection', 'on' );
} }
sub getRainProtection {
my $self = shift;
return AttrVal( $self->{shuttersDev}, 'ASC_RainProtection', 'on' );
}
sub getModeUp { sub getModeUp {
my $self = shift; my $self = shift;