FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-06 12:18:46 +00:00
Code Issues Releases Wiki Activity

CUL_MAX: misc

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@2293 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
mgehre 2012-12-09 15:00:36 +00:00
parent f682a13443
commit 1103649ce0
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
fhem/FHEM/14_CUL_MAX.pm
View File

@ -119,6 +119,7 @@ my @waitForAck = ();
sub sub
CUL_MAX_Parse($$) CUL_MAX_Parse($$)
{ {
#Attention: there is a limit in the culfw firmware: It only receives messages shorter than 30 bytes (see rf_moritz.h)
my ($hash, $rmsg) = @_; my ($hash, $rmsg) = @_;
if(!exists($modules{CUL_MAX}{defptr})) { if(!exists($modules{CUL_MAX}{defptr})) {
@ -180,7 +181,7 @@ CUL_MAX_Parse($$)
Log 5, "CUL_MAX_Parse: Got PairPing (pairmode $shash->{pairmode}), unk1 $unk1, type $type, unk2 $unk2, serial $serial"; Log 5, "CUL_MAX_Parse: Got PairPing (pairmode $shash->{pairmode}), unk1 $unk1, type $type, unk2 $unk2, serial $serial";
if($shash->{pairmode}) { if($shash->{pairmode}) {
Log 3, "CUL_MAX_Parse: Pairing device $src of type $device_types{$type} with serial $serial"; Log 3, "CUL_MAX_Parse: Pairing device $src of type $device_types{$type} with serial $serial";
CUL_MAX_Send($shash, "PairPong", $src, "00", "00000000"); CUL_MAX_Send($shash, "PairPong", $src, "00");
#TODO: wait for Ack #TODO: wait for Ack
Dispatch($shash, "MAX,define,$src,$device_types{$type},$serial,0,0", {RAWMSG => $rmsg}); Dispatch($shash, "MAX,define,$src,$device_types{$type},$serial,0,0", {RAWMSG => $rmsg});
if($device_types{$type} eq "HeatingThermostat" or $device_types{$type} eq "WallMountedThermostat") { if($device_types{$type} eq "HeatingThermostat" or $device_types{$type} eq "WallMountedThermostat") {
@ -201,8 +202,6 @@ CUL_MAX_Parse($$)
return undef; return undef;
} }
sub
#All inputs are hex strings, $cmd is one from %msgCmd2Id #All inputs are hex strings, $cmd is one from %msgCmd2Id
sub sub
CUL_MAX_Send(@) CUL_MAX_Send(@)