ZWave: multilevel signed values by simli

git-svn-id: https://svn.fhem.de/fhem/trunk@4854 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2014-02-09 10:48:04 +00:00
parent 248947da1a
commit 68dca44ba3

View File

@@ -484,9 +484,12 @@ ZWave_ParseMultilevel($$$)
my $pr = (hex($fl)>>5)&0x07; # precision my $pr = (hex($fl)>>5)&0x07; # precision
my $sc = (hex($fl)>>3)&0x03; # scale my $sc = (hex($fl)>>3)&0x03; # scale
my $bc = (hex($fl)>>0)&0x07; # bytecount
my $msb = (hex($arg)>>8*$bc-1); # most significant bit ( 0 = pos, 1 = neg )
my $val = $msb ? -( 2 ** (8 * $bc) - hex($arg) ) : hex($arg); # 2's complement
my $ml = $ml_tbl{$type}; my $ml = $ml_tbl{$type};
return "UNKNOWN multilevel type: $type fl: $fl arg: $arg" if(!$ml); return "UNKNOWN multilevel type: $type fl: $fl arg: $arg" if(!$ml);
return sprintf("%s:%.*f %s", $ml->{n}, $pr, hex($arg)/(10**$pr), return sprintf("%s:%.*f %s", $ml->{n}, $pr, $val/(10**$pr),
int(@{$ml->{st}}) > $sc ? $ml->{st}->[$sc] : ""); int(@{$ml->{st}}) > $sc ? $ml->{st}->[$sc] : "");
} }