FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-07 00:38:44 +00:00
Code Issues Releases Wiki Activity

CUL_HM: level calculation improve

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@9884 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2015-11-14 08:33:09 +00:00
parent c61162a293
commit f8c0e8a0a2
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
fhem/FHEM/10_CUL_HM.pm
View File

@ -1875,7 +1875,7 @@ sub CUL_HM_Parse($$) {#########################################################
my $vl = ReadingsVal($vh->{NAME},"level","???");
my $vs = ($vl eq "100"?"on":($vl eq "0"?"off":"$vl"));
my($clvlMin,$clvlMax)=split",",AttrVal($vh->{NAME}, "levelRange", "0,100");
my $plc = int(($pl-$clvlMin)/($clvlMax - $clvlMin)*200)/2;
my $plc = int((($pl-$clvlMin)*200)/($clvlMax - $clvlMin))/2;
$plc = 1 if ($pl && $plc <= 0);
$vs = ($plc ne $vl)?"chn:$vs phys:$plc":$vs;
push @evtEt,[$vh,1,"state:$vs"];
@ -1883,7 +1883,7 @@ sub CUL_HM_Parse($$) {#########################################################
}
$pl = (($pl-$lvlMin)<=0 && $pl)
? 1
: int(($pl-$lvlMin)/($lvlMax - $lvlMin)*200)/2;
: int((($pl-$lvlMin)*200)/($lvlMax - $lvlMin))/2;
push @evtEt,[$mh{cHash},1,"phyLevel:$pl"]; #phys level
$physLvl = $pl;
}
@ -1896,7 +1896,7 @@ sub CUL_HM_Parse($$) {#########################################################
my $pVal = $val;# necessary for roper 'off', not logical off
$val = (($val-$lvlMin)<=0 && $val)
? 1
: int((($val-$lvlMin)/($lvlMax - $lvlMin))*200)/2;
: int((($val-$lvlMin)*200)/($lvlMax - $lvlMin))/2;
# blind option: reverse Level Meaning 0 = open, 100 = closed
if ("levelInverse" eq AttrVal($mh{cName}, "param", "")){;