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

CUL_HM: remove bug at reboot for virtual sensor simulation

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@23117 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2020-11-08 16:37:38 +00:00
parent fa9e1fda84
commit ce1d212eda
1 changed files with 19 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
fhem/FHEM/10_CUL_HM.pm
View File

@ -431,19 +431,24 @@ sub CUL_HM_updateConfig($){##########################
$hash->{helper}{vd}{idl} = 0;
$hash->{helper}{vd}{idh} = 0;
}
my $d =ReadingsVal($name,"valvePosTC","");
$d =~ s/ %//;
CUL_HM_Set($hash,$name,"valvePos",$d);
CUL_HM_Set($hash,$name,"virtTemp",ReadingsVal($name,"temperature",""));
CUL_HM_Set($hash,$name,"virtHum" ,ReadingsVal($name,"humidity",""));
CUL_HM_UpdtReadSingle($hash,"valveCtrl","restart",1) if (ReadingsVal($name,"valvePosTC",""));
RemoveInternalTimer("valvePos:$vId");
RemoveInternalTimer("valveTmr:$vId");
InternalTimer($hash->{helper}{vd}{next}
,"CUL_HM_valvePosUpdt","valvePos:$vId",0);
if ($hash->{helper}{fkt} eq "vdCtrl"){
my $d = ReadingsVal($name,"valvePosTC","");
$d =~ s/ %//;
CUL_HM_Set($hash,$name,"valvePos",$d);
CUL_HM_UpdtReadSingle($hash,"valveCtrl","restart",1) if ($d =~ m/^[-+]?[0-9]+\.?[0-9]*$/);
RemoveInternalTimer("valvePos:$vId");
RemoveInternalTimer("valveTmr:$vId");
InternalTimer($hash->{helper}{vd}{next},"CUL_HM_valvePosUpdt","valvePos:$vId",0);
}
elsif($hash->{helper}{fkt} eq "virtThSens"){
my $d = ReadingsVal($name,"temperature","");
CUL_HM_Set($hash,$name,"virtTemp",$d) if($d =~ m/^[-+]?[0-9]+\.?[0-9]*$/);
$d = ReadingsVal($name,"humidity","");
CUL_HM_Set($hash,$name,"virtHum" ,$d) if($d =~ m/^[-+]?[0-9]+\.?[0-9]*$/);
}
# delete - virtuals dont have regs
delete $attr{$name}{$_}
foreach ("autoReadReg","actCycle","actStatus","burstAccess","serialNr");
delete $attr{$name}{$_} foreach ("autoReadReg","actCycle","actStatus","burstAccess","serialNr");
}
}
elsif ($st eq "sensRain") {
@ -4599,10 +4604,10 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
elsif($param =~ m/([\-\d\.]*)\.\.([\-\d\.]*)/ ){# we check for min/max but not for step
my ($min,$max) = ($1,$2);
if ($parIn[$pCnt] !~ m/^[-+]?[0-9]+\.?[0-9]*$/){
$paraFail = "$parIn[$pCnt] not numeric";
$paraFail = "\'$parIn[$pCnt]\' not numeric";
}
elsif ($parIn[$pCnt] < $min || $parIn[$pCnt] > $max ){
$paraFail = "$parIn[$pCnt] out of range min:$min max:$max";
$paraFail = "\'$parIn[$pCnt]\' out of range min:$min max:$max";
}
}
else{ # user param no match