Panasonic Wärmepumpe - Heishamon per mqtt auslesen

[Gisbert]

ad1)
sec2human_hms ist eine eigene Funktion, die die Laufzeit der Wärmepumpe pro Start in eine leserfreundliche Form bringt.

Code Auswählen Erweitern

# Umrechnung von Sekunden
sub sec2human_hms($){
  my ($diff) = @_;
  my ($h,$m,$s,$ret);
  ($h,$diff) = _s2h_Div($diff,3600);
  ($m,$diff) = _s2h_Div($diff,60);
  ($s,$diff) = _s2h_Div($diff,1);
  $ret  = "$h"."<span style='vertical-align: +4px;; font-size: 75%;;'>h</span><font size=2> </font>"."$m"."<span style='vertical-align: +4px;; font-size: 75%;;'>m</span><font size=2> </font>"."$s"."<span style='vertical-align: +4px;; font-size: 75%;;'>s</span>";
  return $ret;
}

sub _s2h_Div($$) {
  my ($p1,$p2) = @_;
  return (int($p1/$p2), $p1 % $p2);
}Das sieht dann so wie im angefügtem Screenshot aus. Ich find's schön mit den hochgestellten Ziffern, ist aber nur Optik.

ad 2)
Das ist in dem userReadings definiert. Den letzten Part musst du weglassen. Das ist meine zusätzlich Umwälzpumpe, die ich im Rücklauf verbaut habe.

Code Auswählen Erweitern

Watt:Watt1.* {round((ReadingsNum($name,'Watt1','')
+ReadingsNum($name,'Watt2','')
+ReadingsNum('Evosta2','POWER1_Num','')*30)/1000,3)}