mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

MDIR with help of Bassem

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

20
FHEM/10_CUL_HM.pm
View File

@@ -93,7 +93,7 @@ my %culHmModel=(
"0047" => "KFM-Display", "0047" => "KFM-Display",
"0048" => "IS-WDS-TH-OD-S-R3", "0048" => "IS-WDS-TH-OD-S-R3",
"0049" => "KFM-Sensor", "0049" => "KFM-Sensor",
"004A" => "HM-SEC-MDIR", "004A" => "HM-SEC-MDIR", # Tested
"004C" => "HM-RC-12-SW", "004C" => "HM-RC-12-SW",
"004D" => "HM-RC-19-SW", "004D" => "HM-RC-19-SW",
"004E" => "HM-LC-DDC1-PCB", "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") { ##################################### } elsif($st eq "smokeDetector") { #####################################
if($p =~ m/01..C8/) { if($p =~ m/01..C8/) {