2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 12:49:34 +00:00

76_Solarforcast: contrib 1.6.0

git-svn-id: https://svn.fhem.de/fhem/trunk@28300 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2023-12-20 15:12:41 +00:00
parent 7e2cd7ebff
commit a542c4d26e

View File

@ -5621,11 +5621,12 @@ sub __sunRSbyCoordinates {
my ($cset, $lat, $lon) = locCoordinates();
return ($fc0_sr, $fc0_ss, $fc1_sr, $fc1_ss) if(!$t || !$cset); # keine global latitude/longitude gesetzt
$fc0_sr = substr (sunrise_abs_dat ($t, 'REAL'), 0, 5); # SunRise heute
$fc0_ss = substr (sunset_abs_dat ($t, 'REAL'), 0, 5); # SunSet heute
$fc1_sr = substr (sunrise_abs_dat ($t + 86400, 'REAL'), 0, 5); # SunRise morgen
$fc1_ss = substr (sunset_abs_dat ($t + 86400, 'REAL'), 0, 5); # SunSet morgen
my $alt = 'HORIZON=-0.833'; # default from https://metacpan.org/release/JFORGET/DateTime-Event-Sunrise-0.0505/view/lib/DateTime/Event/Sunrise.pm
$fc0_sr = substr (sunrise_abs_dat ($t, $alt), 0, 5); # SunRise heute
$fc0_ss = substr (sunset_abs_dat ($t, $alt), 0, 5); # SunSet heute
$fc1_sr = substr (sunrise_abs_dat ($t + 86400, $alt), 0, 5); # SunRise morgen
$fc1_ss = substr (sunset_abs_dat ($t + 86400, $alt), 0, 5); # SunSet morgen
return ($fc0_sr, $fc0_ss, $fc1_sr, $fc1_ss);
}