FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-08 13:24:56 +00:00
Code Issues Releases Wiki Activity

MDIR with help of Bassem

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@902 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2011-05-12 17:45:59 +00:00
parent d1a1412f1a
commit ecf1a24c35
1 changed files with 19 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
fhem/FHEM/10_CUL_HM.pm
View File

@ -93,7 +93,7 @@ my %culHmModel=(
"0047" => "KFM-Display",
"0048" => "IS-WDS-TH-OD-S-R3",
"0049" => "KFM-Sensor",
"004A" => "HM-SEC-MDIR",
"004A" => "HM-SEC-MDIR", # Tested
"004C" => "HM-RC-12-SW",
"004D" => "HM-RC-19-SW",
"004E" => "HM-LC-DDC1-PCB",
@ -305,6 +305,24 @@ CUL_HM_Parse($$)
}
} elsif($st eq "motionDetector") { #####################################
# Code with help of Bassem
my $state;
if($cmd eq "A410" && $p =~ m/^0601(..)(..)/) {
($state, undef) = ($1, $2);
push @event, "brightness:$state";
push @event, "state:alive";
}
if($cmd eq "A441" && $p =~ m/^01(......)/) {
$state = $1;
push @event, "state:motion";
}
CUL_HM_SendCmd($shash, "++8002".$id.$src."0101${state}00",1,0)
if($id eq $dst && $state); # Send Ack
} elsif($st eq "smokeDetector") { #####################################
if($p =~ m/01..C8/) {