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

add mor drive informations in ASC_ShuttersLastDrive reading

Browse Source
This commit is contained in:
Marko Oldenburg 2018-11-14 05:28:53 +01:00
parent a7fd743010
commit 2f283eb2a4
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
73_AutoShuttersControl.pm
View File

@ -81,7 +81,7 @@ sub AutoShuttersControl_Initialize($) {
. "ASC_timeUpHolidayReading " . "ASC_timeUpHolidayReading "
. "ASC_shuttersDriveOffset " . "ASC_shuttersDriveOffset "
. "ASC_twilightDevice " . "ASC_twilightDevice "
. "ASC_expert " . "ASC_expert:1 "
. $readingFnAttributes; . $readingFnAttributes;
$hash->{NotifyOrderPrefix} = "51-"; # Order Nummer für NotifyFn $hash->{NotifyOrderPrefix} = "51-"; # Order Nummer für NotifyFn
@ -842,6 +842,7 @@ sub WindowRecEventProcessing($@) {
if ( $shutters->getDelayCmd ne 'none' ) if ( $shutters->getDelayCmd ne 'none' )
{ # Es wird geschaut ob wärend der Fenster offen Phase ein Fahrbefehl über das Modul kam,wenn ja wird dieser aus geführt { # Es wird geschaut ob wärend der Fenster offen Phase ein Fahrbefehl über das Modul kam,wenn ja wird dieser aus geführt
if ( $1 eq 'closed' ) { if ( $1 eq 'closed' ) {
$shutters->setLastDrive('delayed closed');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getClosedPos ); $shutters->getClosedPos );
} }
@ -854,6 +855,7 @@ sub WindowRecEventProcessing($@) {
and $queryShuttersPosWinRecTilted and $queryShuttersPosWinRecTilted
) )
{ {
$shutters->setLastDrive('delayed ventilate open');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getVentilatePos ); $shutters->getVentilatePos );
} }
@ -874,6 +876,7 @@ sub WindowRecEventProcessing($@) {
and $queryShuttersPosWinRecTilted and $queryShuttersPosWinRecTilted
) )
{ {
$shutters->setLastDrive('ventilate open');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getVentilatePos ); $shutters->getVentilatePos );
} }
@ -882,6 +885,7 @@ sub WindowRecEventProcessing($@) {
and $ascDev->getAutoShuttersControlComfort eq 'on' and $ascDev->getAutoShuttersControlComfort eq 'on'
and $queryShuttersPosWinRecTilted ) and $queryShuttersPosWinRecTilted )
{ {
$shutters->setLastDrive('comfort open');
ShuttersCommandSet( $hash, $shuttersDev, ShuttersCommandSet( $hash, $shuttersDev,
$shutters->getPosAfterComfortOpen ); $shutters->getPosAfterComfortOpen );
} }