Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

chasing the HM-SCI-3-FM

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@1395 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2012-03-28 17:23:21 +00:00
parent 25539e0148
commit 574335124e
1 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
FHEM/10_CUL_HM.pm
View File

@ -597,7 +597,7 @@ CUL_HM_Parse($$)
}else{ }else{
$state = ($button&1 ? "off" : "on"); $state = ($button&1 ? "off" : "on");
} }
Log 1, $cmd; #Log 1, $cmd;
push @event, "state:Btn$btn $state$target"; push @event, "state:Btn$btn $state$target";
if($id eq $dst && $cmd ne "8002") { # Send Ack if($id eq $dst && $cmd ne "8002") { # Send Ack
CUL_HM_SendCmd($shash, "++8002".$id.$src."0101". # Send Ack. CUL_HM_SendCmd($shash, "++8002".$id.$src."0101". # Send Ack.
@ -653,9 +653,9 @@ CUL_HM_Parse($$)
push @event, "unknownMsg:$p" if(!@event); push @event, "unknownMsg:$p" if(!@event);
} elsif($st eq "threeStateSensor") { ##################################### } elsif($st eq "threeStateSensor") { #####################################
$p =~ m/^....(..)$/; $p =~ m/^....(..)$/;
my $lst = defined($1) ? $1 : "00"; my $lst = defined($1) ? $1 : "00";
my $chn = "01";
if($p =~ m/^0601000E$/) { if($p =~ m/^0601000E$/) {
push @event, "alive:yes"; push @event, "alive:yes";
@ -672,7 +672,7 @@ CUL_HM_Parse($$)
# Multi-channel device: Switch to the shadow source hash # Multi-channel device: Switch to the shadow source hash
# for the HM-SCI-3-FM # for the HM-SCI-3-FM
my $chn = $2 if($p =~ m/^(..)(..)/); $chn = $1 if($p =~ m/^(..)(..)/);
if($chn && $chn ne "01" && $chn ne "00") { if($chn && $chn ne "01" && $chn ne "00") {
my $sshash = $modules{CUL_HM}{defptr}{"$src$chn"}; my $sshash = $modules{CUL_HM}{defptr}{"$src$chn"};
$shash = $sshash if($sshash); $shash = $sshash if($sshash);
@ -694,7 +694,7 @@ CUL_HM_Parse($$)
} }
CUL_HM_SendCmd($shash, "++8002".$id.$src."0101".$lst."00",1,0) # Send Ack CUL_HM_SendCmd($shash, "++8002$id$src${chn}01${lst}00",1,0) # Send Ack
if($id eq $dst); if($id eq $dst);
push @event, "unknownMsg:$p" if(!@event); push @event, "unknownMsg:$p" if(!@event);