From f6dcb37507266fa4d69128e20f12e15e89ed3ecd Mon Sep 17 00:00:00 2001 From: betateilchen <> Date: Wed, 2 Oct 2013 09:20:26 +0000 Subject: [PATCH] changed: new readings desired-temp and measured-temp, new set desired-temp, for command and reading compatibility with other heating control units git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@3988 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/98_PID.pm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/FHEM/98_PID.pm b/FHEM/98_PID.pm index 803d36e98..e3cffcaec 100644 --- a/FHEM/98_PID.pm +++ b/FHEM/98_PID.pm @@ -119,15 +119,16 @@ PID_Set($@) my @d = split(' ', $pid->{DEF}); $pid->{DEF} = "$d[0] $d[1] $a[2] $a[3] $a[4]"; - } elsif ($arg eq "desired" ) { - return "Set desired needs a numeric parameter" + } elsif ($arg eq "desired" || $arg eq "desired-temp") { + return "Set desired|desired-temp needs a numeric parameter" if(@a != 3 || $a[2] !~ m/^[\d\.]*$/); Log3 $pn, 3, "PID set $pn $arg $a[2]"; PID_sv($pid, 'desired', $a[2]); + PID_sv($pid, 'desired-temp', $a[2]); PID_setValue($pid); } else { - return "Unknown argument $a[1], choose one of factors desired" + return "Unknown argument $a[1], choose one of factors desired desired-temp" } return ""; @@ -204,6 +205,7 @@ PID_setValue($) } $inStr =~ m/$re/; my $in = $1; + PID_sv($pid, 'measured-temp', $in); my $desired = PID_gv($pid, 'desired'); return if(!defined($desired)); @@ -286,7 +288,7 @@ PID_setValue($)
  • set <name> factors p i d
    Set the p, i and d factors, as described above.
  • -
  • set <name> desired <value>
    +
  • set <name> desired|desired-temp <value>
    Set the desired value (e.g. temperature). Note: until this value is not set, no command is issued.