From 1fae94b55540458fb3c57b7877c62ef4d008519a Mon Sep 17 00:00:00 2001
From: TH9 <>
Date: Fri, 20 Aug 2021 08:00:53 +0000
Subject: [PATCH] LUXTRONIK2: new feature: set ventBOSUPCircPumpDeaerate

git-svn-id: https://svn.fhem.de/fhem/trunk@24860 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/CHANGED               |  1 +
 fhem/FHEM/23_LUXTRONIK2.pm | 24 ++++++++++++++++++++++--
 2 files changed, 23 insertions(+), 2 deletions(-)

diff --git a/fhem/CHANGED b/fhem/CHANGED
index 553aea3ae..385e3bb6a 100644
--- a/fhem/CHANGED
+++ b/fhem/CHANGED
@@ -1,5 +1,6 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+ - feature: 23_LUXTRONIK2: new set parameter ventBOSUPCircPumpDeaerate
  - bugfix:  73_DoorBird: Firmware update parsing fixed
  - change:  70_VIERA: changed Commandref
  - feature: 23_LUXTRONIK2: addded support for firmware V1.86.2
diff --git a/fhem/FHEM/23_LUXTRONIK2.pm b/fhem/FHEM/23_LUXTRONIK2.pm
index ffcf7334d..df460216f 100644
--- a/fhem/FHEM/23_LUXTRONIK2.pm
+++ b/fhem/FHEM/23_LUXTRONIK2.pm
@@ -3,6 +3,7 @@
 #
 #  23_LUXTRONIK2.pm 
 #
+#  (c) 2020-2021 Thomas Heiser
 #  (c) 2012-2017 Torsten Poitzsch
 #  (c) 2012-2013 Jan-Hinrich Fessel (oskar at fessel . org)
 #
@@ -292,14 +293,15 @@ LUXTRONIK2_Set($$@)
    }
    # Einstellung->Entlüftung
    elsif( int(@_)==4 && 
-          ( $cmd eq 'hotWaterCircPumpDeaerate' || $cmd eq 'heatingSystemCircPumpDeaerate' ) ) { 
+          ( $cmd eq 'hotWaterCircPumpDeaerate' || $cmd eq 'heatingSystemCircPumpDeaerate' || $cmd eq 'ventBOSUPCircPumpDeaerate' ) ) { 
         Log3 $name, 3, "set $name $cmd $val";
         return "$name Error: Wrong parameter given - use on,off"     if $val !~ /on|off/;
         $hash->{LOCAL} = 1;
         $resultStr = LUXTRONIK2_SetParameter ($hash, $cmd, $val);
         if( $val eq "on" 
             || ReadingsVal( $name, "heatingSystemCircPumpDeaerate", "off" ) eq "on"
-            || ReadingsVal( $name, "hotWaterCircPumpDeaerate", "off" ) eq "on" ) {    
+            || ReadingsVal( $name, "hotWaterCircPumpDeaerate", "off" ) eq "on"
+            || ReadingsVal( $name, "ventBOSUPCircPumpDeaerate", "off" ) eq "on" ) {    
           $resultStr .= LUXTRONIK2_SetParameter ($hash, "runDeaerate", 1);    
         } 
         # only send "0" if no Deaerate checkbox is selected at all.   
@@ -316,6 +318,7 @@ LUXTRONIK2_Set($$@)
           ." heatingCurveEndPoint"
           ." heatingCurveOffset"
           ." heatingSystemCircPumpDeaerate:on,off"
+          ." ventBOSUPCircPumpDeaerate:on,off"
           ." heatSourceDefrostAirEnd"
           ." heatSourceDefrostAirThreshold"
           ." hotWaterCircPumpDeaerate:on,off"
@@ -623,6 +626,8 @@ sub LUXTRONIK2_DoUpdate($)
   $return_str .= "|".($heatpump_visibility[4]==1 ? $heatpump_parameters[894] : "no");;
   # 80 - heatingSystemCircPumpDeaerate
   $return_str .= "|". ($heatpump_visibility[161]==1 ? $heatpump_parameters[678] : "no");
+  # 81 - ventBOSUPCircPumpDeaerate
+  $return_str .= "|". ($heatpump_visibility[161]==1 ? $heatpump_parameters[681] : "no");
   
    return $return_str;
 }
@@ -1059,6 +1064,7 @@ LUXTRONIK2_UpdateDone($)
    # Deaerate Function
      readingsBulkUpdate( $hash, "hotWaterCircPumpDeaerate",$a[61]?"on":"off")    unless $a[61] eq "no";
      readingsBulkUpdate( $hash, "heatingSystemCircPumpDeaerate",$a[80]?"on":"off")    unless $a[80] eq "no";
+     readingsBulkUpdate( $hash, "ventBOSUPCircPumpDeaerate",$a[81]?"on":"off")    unless $a[81] eq "no";
 
    # bivalentLevel
      readingsBulkUpdate($hash,"bivalentLevel",$a[43]);
@@ -1509,6 +1515,10 @@ sub LUXTRONIK2_SetParameter ($$$)
      $setParameter = 684;
      $setValue = $realValue eq "on" ? 1 : 0;
    }
+   elsif ($parameterName eq "ventBOSUPCircPumpDeaerate") { #isVisible(167) 
+     $setParameter = 681;
+     $setValue = $realValue eq "on" ? 1 : 0;
+   }
    elsif ($parameterName eq "runDeaerate") {
      $setParameter = 158;
      $setValue = $realValue;
@@ -2294,6 +2304,11 @@ LUXTRONIK2_doStatisticDeltaSingle ($$$$$$$)
          <br>
          NOTE! It uses the deaerate function of the controller. So, the pump alternates always 5 minutes on and 5 minutes off.
          </li><br>
+      <li><code>ventBOSUPCircPumpDeaerate &lt;on | off&gt;</code><br>
+         Switches the BOSUP circuit circulation pump on or off.
+         <br>
+         NOTE! It uses the deaerate function of the controller. So, the pump alternates always 5 minutes on and 5 minutes off.
+         </li><br>
       <li><code>hotWaterTemperatureTarget &lt;temperature&gt;</code><br>
          Target temperature of domestic hot water boiler in °C
          </li><br>
@@ -2457,6 +2472,11 @@ LUXTRONIK2_doStatisticDeltaSingle ($$$$$$$)
          <br>
          Achtung! Es wird die Entlüftungsfunktion der Steuerung genutzt. Dadurch taktet die Pumpe jeweils 5 Minuten ein und 5 Minuten aus.
          </li><br>
+      <li><code>ventBOSUPCircPumpDeaerate &lt;on | off&gt;</code><br>
+         Schaltet die Umwälzpumpe des BOSUP an oder aus.
+         <br>
+         Achtung! Es wird die Entlüftungsfunktion der Steuerung genutzt. Dadurch taktet die Pumpe jeweils 5 Minuten ein und 5 Minuten aus.
+         </li><br>
      <li><code>hotWaterTemperatureTarget &lt;Temperatur&gt;</code>
          <br>
          Soll-Temperatur des Heißwasserspeichers in °C