FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-04 05:16:45 +00:00
Code Issues Releases Wiki Activity

10_FBDECT.pm: fix desired-temp changes (Forum #94270)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@17937 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2018-12-09 16:51:51 +00:00
parent 71df2ad654
commit 6b434dff07
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fhem/FHEM/10_FBDECT.pm
View File

@ -117,11 +117,11 @@ FBDECT_SetHttp($@)
if($cmd =~ m/^(open|closed|desired-temp)$/) { if($cmd =~ m/^(open|closed|desired-temp)$/) {
if($cmd eq "desired-temp") { if($cmd eq "desired-temp") {
return "Usage: set $name desired-temp value" if(int(@a) != 3); return "Usage: set $name desired-temp value" if(int(@a) != 3);
return "desired-temp must be between 8 and 28" return "desired-temp must be between 7.5 and 28.5"
if($a[2] !~ m/^[\d.]+$/ || $a[2] < 7.5 || $a[2] > 28.5) if($a[2] !~ m/^[\d.]+$/ || $a[2] < 7.5 || $a[2] > 28.5)
} }
my $val = ($cmd eq "open" || $a[2]== 7.5) ? 254 : my $val = ($cmd eq "open" || $a[2]==28.5) ? 254 :
($cmd eq "closed"|| $a[2]==28.5) ? 253: int(2*$a[2]); ($cmd eq "closed"|| $a[2]== 7.5) ? 253: int(2*$a[2]);
IOWrite($hash, ReadingsVal($name,"AIN",0),"sethkrtsoll&param=$val"); IOWrite($hash, ReadingsVal($name,"AIN",0),"sethkrtsoll&param=$val");
return undef; return undef;
} }
@ -299,7 +299,8 @@ FBDECT_ParseHttp($$$)
Log3 $hash, 5, " $n = $h{$n}"; Log3 $hash, 5, " $n = $h{$n}";
next if(!$fbhttp_readings{$n}); next if(!$fbhttp_readings{$n});
my $val = $h{$n}; my $val = $h{$n};
$val = ($val==254 ? 28.5: ($val==253 ? 7.5 : sprintf("%0.1f C",$val/2))) $val = ($val == 254 ? 28.5:
$val == 253 ? 7.5 : sprintf("%0.1f C",$val/2))
if($n eq "tsoll"); if($n eq "tsoll");
$val = $type if($n eq "productname" && $val eq ""); $val = $type if($n eq "productname" && $val eq "");
my ($ptyp,$pyld) = split(":", eval $fbhttp_readings{$n}, 2); my ($ptyp,$pyld) = split(":", eval $fbhttp_readings{$n}, 2);