10_EnOcean: windSpeed.00 and smokeDetector.02 changed

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@13812 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
klaus.schauer 2017-03-27 04:39:32 +00:00
parent a8783c6ee2
commit 4c5b187804

View File

@ -1,6 +1,5 @@
##############################################
# $Id$
package main;
use strict;
@ -3069,8 +3068,8 @@ sub EnOcean_Set($@)
return "Usage: $cmd [learn]" if ($a[1] ne "learn");
if ($a[1] eq "learn") {
$cmd = 'off';
$setCmd = $setCmd | 0x24;
readingsSingleUpdate($hash, "block", "lock", 1);
$setCmd = $setCmd | 0x28;
readingsSingleUpdate($hash, "block", "unlock", 1);
}
shift(@a);
}
@ -7032,11 +7031,11 @@ sub EnOcean_Parse($$)
if ($st eq "FRW" || $st eq "smokeDetector.02") {
# smoke detector
if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || AttrVal($name, 'alarm', '') eq 'dead_sensor') {
if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || ReadingsVal($name, 'alarm', '') eq 'dead_sensor') {
if ($db[0] == 0x30) {
push @event, "3:alarm:off";
push @event, "3:battery:low";
$msg = AttrVal($name, 'state', 'off');
$msg = ReadingsVal($name, 'state', 'off');
} elsif ($db[0] == 0x10) {
push @event, "3:battery:ok";
push @event, "3:alarm:smoke-alarm";
@ -7055,11 +7054,11 @@ sub EnOcean_Parse($$)
} elsif ($st eq "windSpeed.00") {
# wind speed threshold detector
if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || AttrVal($name, 'alarm', '') eq 'dead_sensor') {
if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || ReadingsVal($name, 'alarm', '') eq 'dead_sensor') {
push @event, "3:alarm:off";
if ($db[0] == 0x30) {
push @event, "3:battery:low";
$msg = AttrVal($name, 'state', 'off');
$msg = ReadingsVal($name, 'state', 'off');
} elsif ($db[0] == 0x10) {
push @event, "3:windSpeed:on";
push @event, "3:battery:ok";