09_CUL_FHTTK.pm: little improvements: added check of address code, adapted documentation

git-svn-id: https://svn.fhem.de/fhem/trunk@7475 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/FHEM/09_CUL_FHTTK.pm

@@ -147,18 +147,31 @@ CUL_FHTTK_Set($@)
   return "\"set $a[0]\" needs at least two parameters" if(@a < 2);
   
   my $name = shift(@a);
+  my $opt = shift @a;
   
   # suppress SET option
   if(defined($attr{$name}) && defined($attr{$name}{"model"})) {
     if($attr{$name}{"model"} ne "dummy") {
-		return $ret
+      return $ret;
+    }
+    
+    # check address of FHT TF
+    my $myaddr = hex($hash->{CODE});
+    my $boundary = hex(690000);
+        
+    if($myaddr < $boundary) {
+      Log3 $name, 3, "$name wrong housecode: The first digit must be equal or greater than 0x69.";
+      if($opt eq "?")
+      {
+        return $ret;
+      }
+      return "$name wrong housecode: The first digit must be equal or greater than 0x69.";
     }
   }
   else {
     return $ret;
   }
     
-  my $opt = shift @a;
   my $value = join("", @a);
   
   Log3 $name, 5, "$name option: $opt and value: $value";
@@ -208,7 +221,15 @@ CUL_FHTTK_Define($$)
   my $name     = $a[0];
   my $sensor   = lc($a[2]);
   if($sensor !~ /^[0-9a-f]{6}$/) {
-       return "wrong sensor specification $sensor, need a 6 digit hex number";
+    return "wrong sensor specification $sensor, need a 6 digit hex number!";
+  }
+
+  # check address of FHT TF at definition step
+  my $myaddr = hex($sensor);
+  my $boundary = hex(690000);
+
+  if($myaddr < $boundary) {
+    return "wrong sensor specification $sensor, the fist two digits must be equal or greater than 0x69!";
   }
   
   $hash->{CODE} = $sensor;
@@ -249,7 +270,6 @@ CUL_FHTTK_Parse($$)
 
   if(!defined($fhttfk_translatedcodes{$state})) {
       Log3 $name, 1, sprintf("FHTTK $def Unknown state $state");
-#      Log 3, sprintf("FHTTK $def Unknown state $state");
       $defs{$name}{READINGS}{"Unknown"}{VAL} = $state;
       $defs{$name}{READINGS}{"Unknown"}{TIME} = TimeNow();
       return "";
@@ -347,7 +367,13 @@ CUL_FHTTK_Parse($$)
   usually temperature+humidity sensors (no clue, why ELV didn't label this one "TFK" like with
   FS20 and HMS).<br><br>
   As said before, FHEM can receive FHT80 TF radio (868.35 MHz) messages only through an
-  <a href="#CUL">CUL</a> device, so this must be defined first.<br><br>
+  <a href="#CUL">CUL</a> device, so this must be defined first.
+  <br><br>
+  With the latest build on <a href="http://sourceforge.net/p/culfw/code/HEAD/tree/trunk/culfw/Devices/">SVN</a> 
+  or next official version 1.62 or higher, it is possible to send out FHT80 TF data with a CUL or simular 
+  devices. So it can be simulate up to four window sensor with one device 
+  (see <a href="http://www.fhemwiki.de/wiki/CUL_FHTTK">FHEM Wiki</a>). To setup a window sensor, you have to
+  add and/or change the attribute "model" to dummy. The 6 digit hex number must start at 690000.<br><br>
 
   <a name="CUL_FHTTKdefine"></a>
   <b>Define</b>
@@ -368,7 +394,16 @@ CUL_FHTTK_Parse($$)
 
   <a name="CUL_FHTTKset"></a>
   <b>Set</b>
-    <ul> Nothing to set here yet ... </ul>
+    <ul> Only available, if model is set to dummy.<br><br>
+    <code>set &lt;name&gt; &lt;value&gt; [&lt;time&gt]</code>
+    <br><br>
+    where <code>value</code> is one of:<br>
+    <ul><code>
+      Syncing     # start sync with FHT80B (activate FHT80B sync mode before) - state after is closed<br>
+      Closed      # set window state to closed<br>
+      Open        # set window state to open<br>
+    </code></ul>
+    </ul>
     <br>
 
   <b>Get</b>
@@ -380,7 +415,7 @@ CUL_FHTTK_Parse($$)
   <ul>
     <li><a href="#do_not_notify">do_not_notify</a></li><br>
     <li><a href="#verbose">verbose</a></li><br>
-    <li><a href="#model">model</a> (FHT80TF, FHT80TF-2)</li><br>
+    <li><a href="#model">model</a> (FHT80TF, FHT80TF-2, dummy)</li><br>
     <li><a href="#showtime">showtime</a></li><br>
     <li><a href="#IODev">IODev</a></li><br>
     <li><a href="#ignore">ignore</a></li><br>
@@ -405,7 +440,13 @@ CUL_FHTTK_Parse($$)
   Temperatur- und Feuchtigkeitssensoren suggeriert. (Keine Ahnung, warum ELV diesen Sensor nicht TFK genannt hat, 
   wie die Sensoren von FS20 und HMS).
   <br><br>
-  <a href="#CUL">CUL</a> device muss vorhr definiert sein.<br><br>
+  <a href="#CUL">CUL</a> device muss vorhr definiert sein.
+  <br><br>
+  Mit dem letzten Build auf <a href="http://sourceforge.net/p/culfw/code/HEAD/tree/trunk/culfw/Devices/">SVN</a> 
+  oder mit der naechsten offiziellen Version 1.62 oder hoeher, ist es moeglich, FHT80 TF Daten zu senden. Moeglich mit 
+  einem CUL oder aehnlichen Geraeten. So koennen bis zu vier Fenstersensoren mit einem Gerät simuliert werden  
+  (see <a href="http://www.fhemwiki.de/wiki/CUL_FHTTK">FHEM Wiki</a>). Es muss lediglich das Attribut model mit dem 
+  Wert "dummy" hinzugefuegt oder geaendert werdxen. Wichtig: Der Devicecode beginnt ab 690000 hex.<br><br>
 
   <a name="CUL_FHTTKdefine"></a>
   <b>D</b>
@@ -426,7 +467,16 @@ CUL_FHTTK_Parse($$)
 
   <a name="CUL_FHTTKset"></a>
   <b>Set</b>
-    <ul> N/A </ul>
+    <ul> Nur vorhanden, wenn das Attribut model mit dummy definiert wurde.<br><br>
+    <code>set &lt;name&gt; &lt;value&gt; [&lt;time&gt]</code>
+    <br><br>
+    wobei <code>value</code> folgendes sein kann:<br>
+    <ul><code>
+      Syncing     # startet die Synchronisation mit dem FHT80B (FHT80B muss sich im Sync mode befinden) - danach ist der sate closed<br>
+      Closed      # setzt den Fensterstatus zu Closed<br>
+      Open        # setzt den Fensterstatus zu Open<br>
+    </code></ul>
+    </ul>
     <br>
 
   <b>Get</b>
@@ -438,7 +488,7 @@ CUL_FHTTK_Parse($$)
   <ul>
     <li><a href="#do_not_notify">do_not_notify</a></li><br>
     <li><a href="#verbose">verbose</a></li><br>
-    <li><a href="#model">model</a> (FHT80TF, FHT80TF-2)</li><br>
+    <li><a href="#model">model</a> (FHT80TF, FHT80TF-2, dummy)</li><br>
     <li><a href="#showtime">showtime</a></li><br>
     <li><a href="#IODev">IODev</a></li><br>
     <li><a href="#ignore">ignore</a></li><br>