From 7643e161376d7f90e0c13a33f76d106d8a28577d Mon Sep 17 00:00:00 2001 From: LeonGaultier Date: Mon, 29 Jul 2019 09:40:52 +0000 Subject: [PATCH] 73_AutoShuttersControl: fix little commandref typo, expand ascAPIget Fn git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@19909 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- CHANGED | 2 ++ FHEM/73_AutoShuttersControl.pm | 42 +++++++++++++++++++++++----------- 2 files changed, 31 insertions(+), 13 deletions(-) diff --git a/CHANGED b/CHANGED index 78b33242b..2033d9bc0 100644 --- a/CHANGED +++ b/CHANGED @@ -1,5 +1,7 @@ # Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Do not insert empty lines here, update check depends on it. + - feature: 73_AutoShuttersControl: fix little commandref typo, + expand ascAPIget Fn - bugfix: 93_Log2Syslog: fix warning uninitialized value in numeric (>=) - feature: 93_Log2Syslog: V5.8.1, new attributes and further developments regarding to Forum: topic,75426.msg958836.html#msg958836, diff --git a/FHEM/73_AutoShuttersControl.pm b/FHEM/73_AutoShuttersControl.pm index 743ce1f90..b88659862 100644 --- a/FHEM/73_AutoShuttersControl.pm +++ b/FHEM/73_AutoShuttersControl.pm @@ -47,10 +47,10 @@ package main; use strict; use warnings; -sub ascAPIget($;$) { - my ( $getCommand, $shutterDev ) = @_; +sub ascAPIget($@) { + my ( $getCommand, $shutterDev, $value ) = @_; - return AutoShuttersControl_ascAPIget( $getCommand, $shutterDev ); + return AutoShuttersControl_ascAPIget( $getCommand, $shutterDev, $value ); } ## unserer packagename @@ -160,7 +160,6 @@ BEGIN { readingFnAttributes AttrVal ReadingsVal - Value IsDisabled deviceEvents init_done @@ -265,11 +264,16 @@ my %posSetCmds = ( my $shutters = new ASC_Shutters(); my $ascDev = new ASC_Dev(); -sub ascAPIget($;$) { - my ( $getCommand, $shutterDev ) = @_; +sub ascAPIget($@) { + my ( $getCommand, $shutterDev, $value ) = @_; my $getter = 'get' . $getCommand; - if ( defined($shutterDev) and $shutterDev ) { + + if ( defined($value) and $value ) { + $shutters->setShuttersDev($shutterDev); + return $shutters->$getter($value); + } + elsif ( defined($shutterDev) and $shutterDev ) { $shutters->setShuttersDev($shutterDev); return $shutters->$getter; } @@ -1239,7 +1243,7 @@ sub EventProcessingRoommate($@) { $shutters->setLastDrive('roommate absent'); } - ShuttersCommandSet( $hash, $shuttersDev, $$posValue ); + ShuttersCommandSet( $hash, $shuttersDev, $posValue ); } } } @@ -1718,6 +1722,9 @@ sub EventProcessingBrightness($@) { and $ascDev->getSelfDefense eq 'off' or ( $ascDev->getSelfDefense eq 'on' and CheckIfShuttersWindowRecOpen($shuttersDev) == 0 ) + or ( $ascDev->getSelfDefense eq 'on' + and CheckIfShuttersWindowRecOpen($shuttersDev) != 0 + and $ascDev->getResidentsStatus eq 'home' ) ) { $shutters->setSunrise(1); @@ -6017,7 +6024,7 @@ sub getblockAscDrivesAfterManual {
  • ASC_WindowRec_subType - Model type of the used ASC_WindowRec: Defaults to twostate. @@ -6206,7 +6213,7 @@ sub getblockAscDrivesAfterManual { Description - outTemp + OutTemp Current temperature of a configured temperature device, return -100 is no device configured @@ -6478,6 +6485,15 @@ sub getblockAscDrivesAfterManual { IsDayAbfrage ob das Rollo im Tag oder Nachtmodus ist. Also nach Sunset oder nach Sunrise PrivacyDownStatusAbfrage ob das Rollo aktuell im PrivacyDown Status steht OutTempaktuelle Außentemperatur sofern ein Sensor definiert ist, wenn nicht kommt -100 als Wert zurück + +

    + Übersicht für das Rollladen-Device mit Parameterübergabe + +
    + +
    GetterErläuterung
    QueryShuttersPosRückgabewert 1 bedeutet das die aktuelle Position des Rollos unterhalb der Valueposition ist. 0 oder nichts bedeutet oberhalb der Valueposition.

    Übersicht für das ASC Device @@ -6486,13 +6502,13 @@ sub getblockAscDrivesAfterManual {
    - + -
    GetterErläuterung
    outTemp aktuelle Außentemperatur sofern ein Sensor definiert ist, wenn nicht kommt -100 als Wert zurück
    OutTemp aktuelle Außentemperatur sofern ein Sensor definiert ist, wenn nicht kommt -100 als Wert zurück
    ResidentsStatusaktueller Status des Residents Devices
    ResidentsLastStatusletzter Status des Residents Devices
    AzimuthAzimut Wert
    ElevationElevation Wert
    ASCenableist die ASC Steuerung global aktiv?
    +
    =end html_DE @@ -6516,7 +6532,7 @@ sub getblockAscDrivesAfterManual { ], "release_status": "under develop", "license": "GPL_2", - "version": "v0.6.21", + "version": "v0.6.23", "x_developmentversion": "v0.6.19.34", "author": [ "Marko Oldenburg "