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

36_Vallox: added reading for handling homebridge speed control

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@19519 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Skjall 2019-06-01 12:50:13 +00:00
parent 461abed322
commit 5025bd39ca
2 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/CHANGED
View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it.
- change: 36_Vallox: added reading for handling homebridge speed control
- bugfix: 72_FB_CALLMONITOR: fix wrong call-by-call number removing for
german call-by-call numbers
- change: 93_DbRep: commandRef revised

14
fhem/FHEM/36_Vallox.pm
View File

@ -1228,6 +1228,12 @@ sub Vallox_InterpretAndUpdate(@) {
readingsSingleUpdate( $hash, $Vallox_datatypes{$rawReadingType},
$fineReadingValue, 1 );
# If this is a FanSpeed update FanSpeedPct as well
#
if ($rawReadingType eq "29") {
readingsSingleUpdate( $hash, "FanSpeedPct", POSIX::floor(($fineReadingValue*12.5)) , 1 );
}
# If this is a CO2SetPointLower && CO2SetPointUpper has been set, write CO2SetPoint
if ($rawReadingType eq "B4" && ReadingsVal( $name, "CO2SetPointUpper", "unknown" ) ne "unknown" ) {
my $CO2SetPoint = ReadingsVal( $name, "CO2SetPointUpper", "unknown" ) . $fineReadingValue;
@ -1706,6 +1712,7 @@ sub Vallox_Set($@) {
$setCommands .= " FanSpeed:slider,1,1,8";
$setCommands .= " FanSpeedMin:slider,1,1,8";
$setCommands .= " FanSpeedMax:slider,1,1,8";
$setCommands .= " FanSpeedPct:slider,1,1,100";
$setCommands .= " BasicHumidityLevel:slider,0,1,100";
$setCommands .= " HeatRecoveryCellBypassSetpointTemperature:slider,0,1,20";
$setCommands .= " ServiceReminderMonths:slider,1,1,15";
@ -1746,6 +1753,13 @@ sub Vallox_Set($@) {
$cmd = $Vallox_multiReadingTable_realcmd{$cmd};
}
# Replace FanSpeedPct with FanSpeed
if ( $cmd eq "FanSpeedPct" ) {
$cmd = "FanSpeed";
$arg = POSIX::ceil($arg / 12.5);
}
## TODO
if ( exists $Vallox_datatypesReverse{$cmd} ) {