From 43c5f3971041bf4847c898a187842dbce5dd86cd Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 30 Sep 2012 06:50:56 +0000
Subject: [PATCH] small MAX cleanup

git-svn-id: https://svn.fhem.de/fhem/trunk@1903 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/00_CUL.pm | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/fhem/FHEM/00_CUL.pm b/fhem/FHEM/00_CUL.pm
index 8d07e9294..fdb7be2f2 100755
--- a/fhem/FHEM/00_CUL.pm
+++ b/fhem/FHEM/00_CUL.pm
@@ -49,7 +49,7 @@ my $clientsSlowRF = ":FS20:FHT:FHT8V:KS300:USF1000:BS:HMS: " .
 
 my $clientsHomeMatic = ":CUL_HM:HMS:CUL_IR:";  # OneWire emulated as HMS on a CUNO
 
-my $clientsMAX = ":CUL_MAX:";  # as a starter - not available, yet
+my $clientsMAX = ":CUL_MAX:HMS:CUL_IR";  # CUL_MAX is not available, yet
 
 my %matchListSlowRF = (
     "1:USF1000"   => "^81..(04|0c)..0101a001a5ceaa00....",
@@ -74,7 +74,9 @@ my %matchListHomeMatic = (
 );
 
 my %matchListMAX = (
-    "F:CUL_MAX" => "^Z........................",
+    "1:CUL_MAX" => "^Z........................",
+    "8:HMS"       => "^810e04....(1|5|9).a001", # CUNO OneWire HMS Emulation
+    "D:CUL_IR"    => "^I............",
 );
 
 sub
@@ -955,7 +957,6 @@ CUL_Attr(@)
 
     my $name = $a[1];
     my $hash = $defs{$name};
-    my $numv = substr($hash->{VERSION},2,4);
 
     $a[3] = "SlowRF" if(!$a[3] || ($a[3] ne "HomeMatic" && $a[3] ne "MAX"));
 
@@ -964,15 +965,13 @@ CUL_Attr(@)
       $hash->{Clients} = $clientsHomeMatic;
       $hash->{MatchList} = \%matchListHomeMatic;
       $hash->{initString} = "X21\nAr";  # X21 is needed for RSSI reporting
-      CUL_SimpleWrite($hash, "Zx") if($numv > 1.46);  # reset MAX, if available
       CUL_SimpleWrite($hash, $hash->{initString});
 
-    } elsif(($a[3] eq "MAX") && ($numv > 1.46)) {
+    } elsif($a[3] eq "MAX") {
       return if($hash->{initString} =~ m/Zr/);
       $hash->{Clients} = $clientsMAX;
       $hash->{MatchList} = \%matchListMAX;
       $hash->{initString} = "X21\nZr";  # X21 is needed for RSSI reporting
-      CUL_SimpleWrite($hash, "Ax");     # reset AskSin
       CUL_SimpleWrite($hash, $hash->{initString});
 
     } else {
@@ -981,7 +980,6 @@ CUL_Attr(@)
       $hash->{MatchList} = \%matchListSlowRF;
       $hash->{initString} = "X21";
       CUL_SimpleWrite($hash, "Ax");     # reset AskSin
-      CUL_SimpleWrite($hash, "Zx") if($numv > 1.46); # reset MAX if available
       CUL_SimpleWrite($hash, $hash->{initString});
 
     }