FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-07 16:59:18 +00:00
Code Issues Releases Wiki Activity

rain_diff addition + div by zero fix

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@485 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2009-11-25 10:12:29 +00:00
parent e28a12e5aa
commit 86a1254c48
1 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fhem/FHEM/13_KS300.pm
View File

@ -91,11 +91,11 @@ KS300_Parse($$)
my @v;
my @txt = ( "rain_raw", "rain", "wind", "humidity", "temperature",
"israining", "unknown1", "unknown2", "unknown3");
my @sfx = ( "(counter)", "(l/m2)", "(km/h)", "(%)", "(Celsius)",
"(yes/no)", "","","");
"israining", "unknown1", "unknown2", "unknown3","rain_now");
my @sfx = ( "(counter)", "(l/m2)", "(km/h)", "", "",
"(yes/no)", "","","","");
my %repchanged = ("rain"=>1, "wind"=>1, "humidity"=>1, "temperature"=>1,
"israining"=>1);
"israining"=>1, "rain_diff" =>1);
# counter for the change hash
my $n= 1; # 0 is STATE and will b explicitely set
@ -218,6 +218,13 @@ KS300_Parse($$)
$v[6] = $a[29];
$v[7] = $a[16];
$v[8] = $a[17];
if($v[1]){ # rain diff
my $rain_old = $def->{READINGS}{'rain'}{VAL};
$rain_old =~ s/[^0123456789.]//g;
$v[9] = $v[1] - $rain_old;
} else {
$v[9] = 0;
}
# Negative temp
$v[4] = -$v[4] if($v[8] & 8);