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

93_PWMR.pm : fix adjust rounding of PVal and newpulsePID

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@12775 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jamesgo 2016-12-14 17:22:30 +00:00
parent 6e3f6fbb74
commit a9d9c60b6a
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
fhem/FHEM/93_PWMR.pm
View File

@ -41,6 +41,7 @@
# 16.11.16 GA fix format desired-temp with one digit after the decimal point
# 17.11.16 GA add internals for configuration parameters: p_factor, p_tsensor, p_actor, p_window, p_pid
# 11.12.16 GA add alternative PID calculation, selectable by usePID=2, implementation from user Albatros_
# 14.12.16 GA fix adjust rounding of PVal and newpulsePID
# module for PWM (Pulse Width Modulation) calculation
@ -1094,6 +1095,7 @@ PWMR_ReadRoom(@)
my $IVal = $ISum;
my $DVal = $room->{c_PID_DFactor} * ($room->{h_deltaTemp_D} - $room->{h_deltaTemp});
$PVal = sprintf ("%.4f", $PVal);
$IVal = minNum (1, sprintf ("%.4f", $IVal));
$DVal = minNum (1, sprintf ("%.4f", $DVal));
@ -1101,8 +1103,8 @@ PWMR_ReadRoom(@)
my $newpulsePID = ($PVal + $IVal + $DVal);
$newpulsePID = minNum ($MaxPulse, sprintf ("%.4f", $newpulsePID));
$newpulsePID = maxNum (0, sprintf ("%.4f", $newpulsePID));
$newpulsePID = minNum ($MaxPulse, sprintf ("%.2f", $newpulsePID));
$newpulsePID = maxNum (0, sprintf ("%.2f", $newpulsePID));
my $PWMPulsePID = $newpulsePID * 100;
my $PWMOnTimePID = sprintf ("%02s:%02s", int ($newpulsePID * $cycletime / 60), ($newpulsePID * $cycletime) % 60);