FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-13 05:06:35 +00:00
Code Issues Releases Wiki Activity

76_SolarForecast.pm: contrib 0.72.4

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@26665 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2022-11-06 15:08:43 +00:00
parent efe6aa9677
commit cfe3bb8db5
1 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
fhem/contrib/DS_Starter/76_SolarForecast.pm
View File

@ -8359,25 +8359,25 @@ sub _calcCAQwithSolCastPercentil {
$est80 = sprintf "%.0f", ($est50 + ($highdm * 3));
my %pc = (
10 => $est10,
20 => $est20,
30 => $est30,
40 => $est40,
60 => $est60,
70 => $est70,
80 => $est80,
90 => $est90,
1 => { perc => 40, est => $est40 },
2 => { perc => 30, est => $est30 },
3 => { perc => 20, est => $est20 },
4 => { perc => 10, est => $est10 },
5 => { perc => 60, est => $est60 },
6 => { perc => 70, est => $est70 },
7 => { perc => 80, est => $est80 },
8 => { perc => 90, est => $est90 },
);
my $perc = 50; # Standardpercentil
my $diff0 = abs ($est50 - $pvval);
## no critic 'NoStrict'
for my $p (sort keys %pc) {
my $diff1 = abs ($pc{$p} - $pvval);
my $diff1 = abs ($pc{$p}{est} - $pvval);
if($diff1 < $diff0) {
$diff0 = $diff1;
$perc = $p;
$perc = $pc{$p}{perc};
}
}