2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

76_SolarForecast.pm: contrib 0.15.1

git-svn-id: https://svn.fhem.de/fhem/trunk@24004 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2021-03-18 22:43:41 +00:00
parent 44767a2062
commit 03c80fafbf

View File

@ -1350,11 +1350,11 @@ sub _transferDWDForecastValues {
my $paref = shift; my $paref = shift;
my $hash = $paref->{hash}; my $hash = $paref->{hash};
my $name = $paref->{name}; my $name = $paref->{name};
my $t = $paref->{t}; my $t = $paref->{t}; # Epoche Zeit
my $chour = $paref->{chour}; my $chour = $paref->{chour};
my $daref = $paref->{daref}; my $daref = $paref->{daref};
my $fcname = ReadingsVal($name, "currentForecastDev", ""); # aktuelles Forecast Device my $fcname = ReadingsVal($name, "currentForecastDev", ""); # aktuelles Forecast Device
return if(!$fcname || !$defs{$fcname}); return if(!$fcname || !$defs{$fcname});
my ($time_str,$epoche); my ($time_str,$epoche);
@ -1376,14 +1376,8 @@ sub _transferDWDForecastValues {
Log3($name, 5, "$name - collect DWD forecast data: device=$fcname, rad=fc${fd}_${fh}_Rad1h, Val=$v"); Log3($name, 5, "$name - collect DWD forecast data: device=$fcname, rad=fc${fd}_${fh}_Rad1h, Val=$v");
if($num == 0) { $time_str = "NextHour".sprintf "%02d", $num;
$time_str = "NextHour00"; $epoche = $t + (3600*$num);
$epoche = $t; # Epoche Zeit
}
else {
$time_str = "NextHour".sprintf "%02d", $num;
$epoche = $t + (3600*$num);
}
my $calcpv = calcPVforecast ($name, $v, $fh); # Vorhersage gewichtet kalkulieren my $calcpv = calcPVforecast ($name, $v, $fh); # Vorhersage gewichtet kalkulieren
$data{$hash->{TYPE}}{$name}{pvfc}{sprintf("%02d",$fh)} = $calcpv if($num < 24); # Hilfshash Wert PV forecast Forum: https://forum.fhem.de/index.php/topic,117864.msg1133350.html#msg1133350 $data{$hash->{TYPE}}{$name}{pvfc}{sprintf("%02d",$fh)} = $calcpv if($num < 24); # Hilfshash Wert PV forecast Forum: https://forum.fhem.de/index.php/topic,117864.msg1133350.html#msg1133350
@ -1416,7 +1410,7 @@ sub _transferWeatherValues {
my $paref = shift; my $paref = shift;
my $hash = $paref->{hash}; my $hash = $paref->{hash};
my $name = $paref->{name}; my $name = $paref->{name};
my $t = $paref->{t}; my $t = $paref->{t}; # Epoche Zeit
my $chour = $paref->{chour}; my $chour = $paref->{chour};
my $daref = $paref->{daref}; my $daref = $paref->{daref};
@ -1445,14 +1439,8 @@ sub _transferWeatherValues {
my ($fd,$fh) = _calcDayHourMove ($chour, $num); my ($fd,$fh) = _calcDayHourMove ($chour, $num);
last if($fd > 1); last if($fd > 1);
if($num == 0) { $time_str = "NextHour".sprintf "%02d", $num;
$time_str = "NextHour00"; $epoche = $t + (3600*$num);
$epoche = $t; # Epoche Zeit
}
else {
$time_str = "NextHour".sprintf "%02d", $num;
$epoche = $t + (3600*$num);
}
my $wid = ReadingsNum($fcname, "fc${fd}_${fh}_ww", -1); my $wid = ReadingsNum($fcname, "fc${fd}_${fh}_ww", -1);
my $neff = ReadingsNum($fcname, "fc${fd}_${fh}_Neff", 0); # Effektive Wolkendecke my $neff = ReadingsNum($fcname, "fc${fd}_${fh}_Neff", 0); # Effektive Wolkendecke
@ -3539,8 +3527,8 @@ werden weitere SolarForecast Devices zugeordnet.
<ul> <ul>
<a name="pvForecast"></a> <a name="pvForecast"></a>
<li><b>pvForecast </b> <br> <li><b>pvForecast </b> <br>
Listet die im Ringspeicher vorhandenen PV Vorhersagewerte der kommenden 24h auf. Die Stundenangaben beziehen sich auf die Stunde Listet die im Ringspeicher vorhandenen PV Vorhersagewerte der kommenden 24h auf. Die Stundenangaben beziehen sich auf den
des Tages, z.B. Stunde 09 ist die Zeit von 08:00-09:00. Beginn der Stunde, z.B. bezieht sich 09 auf die Zeit von 08:00-09:00.
</li> </li>
</ul> </ul>
<br> <br>
@ -3557,8 +3545,8 @@ werden weitere SolarForecast Devices zugeordnet.
<ul> <ul>
<a name="weatherData"></a> <a name="weatherData"></a>
<li><b>weatherData </b> <br> <li><b>weatherData </b> <br>
Listet die im Ringspeicher vorhandenen Wetterdaten der kommenden 24h auf. Die Stundenangaben beziehen sich auf die Stunde Listet die im Ringspeicher vorhandenen Wetterdaten der kommenden 24h auf. Die Stundenangaben beziehen sich auf den
des Tages, z.B. Stunde 09 ist die Zeit von 08:00-09:00. Beginn der Stunde, z.B. bezieht sich 09 auf die Zeit von 08:00-09:00.
</li> </li>
</ul> </ul>
<br> <br>