diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm index 2ccf08d50..d5a51e632 100755 --- a/fhem/FHEM/10_CUL_HM.pm +++ b/fhem/FHEM/10_CUL_HM.pm @@ -217,7 +217,7 @@ sub CUL_HM_updateConfig($){ my $st = CUL_HM_Get($hash,$name,"param","subType"); my $md = CUL_HM_Get($hash,$name,"param","model"); - if ("HM-CC-TC" eq $md){ + if ($md =~ /(HM-CC-TC|HM-CC-RT-DN)/){ $hash->{helper}{role}{chn} = 1 if (length($id) == 6); #tc special $attr{$name}{stateFormat} = "last:trigLast" if ($chn eq "03"); } @@ -2985,7 +2985,7 @@ sub CUL_HM_Set($@) { my $pHash = CUL_HM_id2Hash($peer); my $peerFlag = $peer eq '00000000'?'A4':CUL_HM_getFlag($pHash); $peerFlag =~ s/0/4/;# either 'A4' or 'B4' - CUL_HM_SndCmd($hash, "++B412$dst".substr($peer,0,6_)) + CUL_HM_SndCmd($hash, "++B412$dst".substr($peer,0,6)) if (CUL_HM_getRxType($pHash) & 0x80); CUL_HM_SndCmd($hash, sprintf("++%s41%s%s%02X%02X%02X" ,$peerFlag,$dst,$peer diff --git a/fhem/FHEM/98_HMinfo.pm b/fhem/FHEM/98_HMinfo.pm index d5e567f0d..e138bc273 100644 --- a/fhem/FHEM/98_HMinfo.pm +++ b/fhem/FHEM/98_HMinfo.pm @@ -234,9 +234,10 @@ sub HMinfo_SetFn($@) {######################################################### } elsif($cmd eq "clear" ) {##actionImmediate: clear parameter-------------- my ($type) = @a; - $opt .= "d" if ($type ne "Readings");# readings apply to all, others device only + $opt .= "d" if ($type !~ m/(readings|register)/);# readings apply to all, others device only my @entities; - return "unknown parameter - use Protocol,readings or rssi" if ($type !~ m/^(Protocol|readings|rssi)$/); + return "unknown parameter - use Protocol, readings, register or rssi" + if ($type !~ m/^(Protocol|readings|register|rssi)$/); $type = "msgEvents" if ($type eq "Protocol");# translate parameter foreach my $dName (HMinfo_getEntities($opt."v",$filter)){ push @entities,$dName; @@ -504,8 +505,9 @@ sub HMinfo_SetFn($@) {######################################################### ."\n ---clear status---" ."\n clear [] [Protocol|Readings|Rssi]" ."\n Protocol # delete all protocol-events" - ."\n Readings # delete all readings" - ."\n Rssi # delete all rssi data" + ."\n readings # delete all readings" + ."\n register # delete all register-readings" + ."\n rssi # delete all rssi data" ."\n ---help---" ."\n help #" ."\n ***footnote***" diff --git a/fhem/FHEM/HMConfig.pm b/fhem/FHEM/HMConfig.pm index 6a3d0a7b7..4db69ba14 100644 --- a/fhem/FHEM/HMConfig.pm +++ b/fhem/FHEM/HMConfig.pm @@ -1031,6 +1031,8 @@ my %culHmChanSets = ( ,on =>"" ,off =>"" ,toggle =>""}, + "HM-CC-RT-DN00" =>{ sysTime =>""}, + "HM-CC-RT-DN02" =>{ sysTime =>""}, "HM-CC-RT-DN04" =>{ mode => "[auto|manu|party|boost|comfort|lower] ... " ,tempListSat =>"HH:MM temp ..." ,tempListSun =>"HH:MM temp ..." @@ -1040,6 +1042,7 @@ my %culHmChanSets = ( ,tempListWed =>"HH:MM temp ..." ,tempListFri =>"HH:MM temp ..." ,"desired-temp" =>"[on|off|5.0..30.0]" + ,sysTime =>"" }, "HM-CC-RT-DN05" =>{ peerChan =>" 0 ... [single] [set|unset] [actor|remote|both]"}, );