FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-26 10:34:52 +00:00
Code Issues Releases Wiki Activity

73_AutoShuttersControl: change ReadingsVal to ReadingsNum for read position Reading, add setDriveReading for wiggle

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@17869 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
LeonGaultier 2018-11-29 20:36:20 +00:00
parent 1a8c265ba8
commit b732e082a8
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fhem/CHANGED
View File

@ -1,5 +1,7 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # 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. # Do not insert empty lines here, update check depends on it.
- feature: 73_AutoShuttersControl: change ReadingsVal to ReadingsNum for
read position Reading, add setDriveReading for wiggle
- bugfix: 73_AutoShuttersControl: Code clean, fix unwanted rollo rides - bugfix: 73_AutoShuttersControl: Code clean, fix unwanted rollo rides
- feature: msgSchema: add support for LaMetric screen messages - feature: msgSchema: add support for LaMetric screen messages
- bugfix: 70_BRAVIA: removed unnecessary internals name, generation, model - bugfix: 70_BRAVIA: removed unnecessary internals name, generation, model

8
fhem/FHEM/73_AutoShuttersControl.pm
View File

@ -1559,10 +1559,12 @@ sub wiggle($$) {
my ( $hash, $shuttersDev ) = @_; my ( $hash, $shuttersDev ) = @_;
$shutters->setShuttersDev($shuttersDev); $shutters->setShuttersDev($shuttersDev);
$shutters->setNoOffset(1); $shutters->setNoOffset(1);
$shutters->setLastDrive('wiggle begin drive');
my %h = ( my %h = (
shuttersDev => $shutters->getShuttersDev, shuttersDev => $shutters->getShuttersDev,
posValue => $shutters->getStatus, posValue => $shutters->getStatus,
lastDrive => 'wiggle end drive',
); );
if ( $shutters->getShuttersPosCmdValueNegate ) { if ( $shutters->getShuttersPosCmdValueNegate ) {
@ -2253,6 +2255,7 @@ sub SetCmdFn($) {
my $posValue = $h->{posValue}; my $posValue = $h->{posValue};
$shutters->setShuttersDev($shuttersDev); $shutters->setShuttersDev($shuttersDev);
$shutters->setLastDrive($h->{lastDrive}) if ( defined($h->{lastDrive}) );
return return
unless ( $shutters->getASC != 0 ); unless ( $shutters->getASC != 0 );
@ -2929,7 +2932,8 @@ use GPUtils qw(GP_Import);
BEGIN { BEGIN {
GP_Import( GP_Import(
qw( qw(
ReadingsVal) ReadingsVal
ReadingsNum)
); );
} }
@ -2943,7 +2947,7 @@ sub getBrightness {
sub getStatus { sub getStatus {
my $self = shift; my $self = shift;
return ReadingsVal( $self->{shuttersDev}, $shutters->getPosCmd, 0 ); return ReadingsNum( $self->{shuttersDev}, $shutters->getPosCmd, 0 );
} }
sub getDelayCmd { sub getDelayCmd {