diff --git a/fhem/contrib/DS_Starter/76_SolarForecast.pm b/fhem/contrib/DS_Starter/76_SolarForecast.pm index 4b71b2f9a..d81a52759 100644 --- a/fhem/contrib/DS_Starter/76_SolarForecast.pm +++ b/fhem/contrib/DS_Starter/76_SolarForecast.pm @@ -2727,7 +2727,8 @@ sub forecastGraphic { my $pvcorrf00 = NexthoursVal($hash, "NextHour00", "pvcorrf", "-/m"); my ($pcf,$pcq) = split "/", $pvcorrf00; - $pcq =~ s/m/100/xs; + my $pvcanz = "factor: $pcf / quality: $pcq"; + $pcq =~ s/m/-1/xs; my $pvfc00 = NexthoursVal($hash, "NextHour00", "pvforecast", undef); if ($kw eq 'kWh') { @@ -2837,13 +2838,13 @@ sub forecastGraphic { $pcqicon = $pcq < 10 ? "" : $pcq < 20 ? "" : ""; - $pcqicon = "-" if(!$pvfc00 || $pcq == 100); + $pcqicon = "-" if(!$pvfc00 || $pcq == -1); ## erste Header-Zeilen ####################### - $header .= "".$dlink."".$lupt. " ".$lup." ".$upicon." "; - $header .= " ".$autoct." " .$acicon."".$lbpcq." " .$pcqicon. ""; + $header .= "".$dlink."".$lupt. " ".$lup." ".$upicon." "; + $header .= " ".$autoct." " .$acicon."".$lbpcq." " .$pcqicon. ""; } ########################