From fd5fe589e3a64b0492d8ccbbb32d04347b1f4e04 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Mon, 25 Jun 2018 09:03:09 +0000 Subject: [PATCH] 00_CUL.pm: add WMBUS_C (Forum #88913) git-svn-id: https://svn.fhem.de/fhem/trunk@16907 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/00_CUL.pm | 27 +++++++++++++++++++++------ 1 file changed, 21 insertions(+), 6 deletions(-) diff --git a/fhem/FHEM/00_CUL.pm b/fhem/FHEM/00_CUL.pm index edbe73fff..650af8867 100755 --- a/fhem/FHEM/00_CUL.pm +++ b/fhem/FHEM/00_CUL.pm @@ -148,7 +148,7 @@ CUL_Initialize($) hmId longids hmProtocolEvents:0_off,1_dump,2_dumpFull,3_dumpTrigger model:CUL,CUN,CUNO,SCC,nanoCUL - rfmode:SlowRF,HomeMatic,MAX,WMBus_T,WMBus_S,KOPP_FC + rfmode:SlowRF,HomeMatic,MAX,WMBus_T,WMBus_S,WMBus_C,KOPP_FC sendpool showtime:1,0 ); @@ -1000,6 +1000,7 @@ CUL_Attr(@) && $aVal ne "MAX" && $aVal ne "WMBus_T" && $aVal ne "WMBus_S" + && $aVal ne "WMBus_C" && $aVal ne "KOPP_FC")); my $msg = $hash->{NAME} . ": Mode $aVal not supported"; @@ -1055,6 +1056,18 @@ CUL_Attr(@) Log3 $name, 2, $msg; return $msg; } + } elsif($aVal eq "WMBus_C") { + return if($hash->{initString} =~ m/brt/); + if($hash->{CMDS} =~ m/b/ || IsDummy($hash->{NAME}) || !$hash->{FD}) { + $hash->{Clients} = $clientsWMBus; + $hash->{MatchList} = \%matchListWMBus; + $hash->{initString} = "X21\nbrc"; # Use C-Mode + CUL_WriteInit($hash); + + } else { + Log3 $name, 2, $msg; + return $msg; + } } elsif($aVal eq "KOPP_FC") { if($hash->{CMDS} =~ m/k/ || IsDummy($hash->{NAME}) || !$hash->{FD}) { $hash->{Clients} = $clientsKOPP_FC; @@ -1378,10 +1391,11 @@ CUL_prefix($$$) To communicate with MAX! type of devices @10 kHz datarate.