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

HMConfig:TC-IT hysterese Bugfix2

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@11865 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2016-07-30 11:54:29 +00:00
parent 633387480d
commit 23d1914669
2 changed files with 13 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
fhem/FHEM/10_CUL_HM.pm
View File

@ -639,16 +639,16 @@ sub CUL_HM_Attr(@) {#################################
else {return "param $_ unknown, use offAtPon or onAtRain";} else {return "param $_ unknown, use offAtPon or onAtRain";}
} }
} }
elsif ($md eq "HM-Dis-EP-WM55" && $chn eq "03"){#reWriteDislay elsif ($md eq "HM-Dis-EP-WM55" && $chn eq "03"){#reWriteDisplay
if ($cmd eq "set"){ if ($cmd eq "set"){
if ($attrVal =~ m/(^reWriteDislay([0-9][0-9])$)/){# no action, just set if ($attrVal =~ m/^reWriteDisplay([0-9][0-9])$/){# no action, just set
my $delay = substr($attrVal,10,2); my $delay = $1;
if($delay < 1 || $delay >99){ if($delay < 1 || $delay >99){
return "invalid $delay- select between reWriteDislay01 and reWriteDislay99"; return "invalid $delay- select between reWriteDisplay01 and reWriteDisplay99";
} }
} }
else{ else{
return "attribut param $attrVal not valid for $name. Only reWriteDislayxx allowed"; return "attribut param $attrVal not valid for $name. Only reWriteDisplayxx allowed";
} }
} }
else{ else{
@ -2138,10 +2138,10 @@ sub CUL_HM_Parse($$) {#########################################################
if($mh{md} eq "HM-Dis-EP-WM55"){ if($mh{md} eq "HM-Dis-EP-WM55"){
my $disName = InternalVal($mh{devN},"channel_03",undef); my $disName = InternalVal($mh{devN},"channel_03",undef);
if (defined $disName ){ if (defined $disName ){
if (AttrVal($disName,"param","") =~ m/reWriteDislay(..)/){ if (AttrVal($disName,"param","") =~ m/reWriteDisplay(..)/){
my $delay = $1; my $delay = $1;
RemoveInternalTimer($disName.":reWriteDislay"); RemoveInternalTimer($disName.":reWriteDisplay");
InternalTimer(gettimeofday()+$delay,"CUL_HM_reWriteDislay", $disName.":reWriteDislay", 0); InternalTimer(gettimeofday()+$delay,"CUL_HM_reWriteDisplay", $disName.":reWriteDisplay", 0);
} }
} }
} }
@ -4887,7 +4887,7 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
} }
elsif($cmd eq "displayEP" ) { ############################################### elsif($cmd eq "displayEP" ) { ###############################################
$state = "displayEP"; $state = "displayEP";
RemoveInternalTimer($name.":reWriteDislay");# just in case param reWriteDislay used RemoveInternalTimer($name.":reWriteDisplay");# just in case param reWriteDisplay used
my %disp_icons = ( my %disp_icons = (
off => '80', on => '81', open => '82', closed => '83' off => '80', on => '81', open => '82', closed => '83'
,error => '84', ok => '85', info => '86', newmsg => '87' ,error => '84', ok => '85', info => '86', newmsg => '87'
@ -8762,7 +8762,7 @@ sub CUL_HM_motionCheck($){#
} }
} }
sub CUL_HM_reWriteDislay($){ sub CUL_HM_reWriteDisplay($){
my ($name) = split(":",shift);# uncertain:$name:$reading:$value my ($name) = split(":",shift);# uncertain:$name:$reading:$value
CUL_HM_Set($defs{$name},$name,"displayEP",":::"); CUL_HM_Set($defs{$name},$name,"displayEP",":::");
} }

6
fhem/FHEM/HMConfig.pm
View File

@ -815,8 +815,8 @@ foreach my $al (keys %culHmModel){ # duplicate entries for alias devices
showWeekday =>{a=> 14.7,s=>0.1,l=>7,min=>0 ,max=>1 ,c=>'lit' ,f=>'' ,u=>'' ,d=>0,t=>"show weekday" ,lit=>{off=>0,on=>1}}, showWeekday =>{a=> 14.7,s=>0.1,l=>7,min=>0 ,max=>1 ,c=>'lit' ,f=>'' ,u=>'' ,d=>0,t=>"show weekday" ,lit=>{off=>0,on=>1}},
#hyst2point addr is 15 according to XML - not to my device. add "bug" register justin case #hyst2point addr is 15 according to XML - not to my device. add "bug" register justin case
hyst2pointRead =>{a=> 15.0,s=>0.5,l=>7,min=>0 ,max=>2 ,c=>'' ,f=>'10' ,u=>'C' ,d=>1,t=>"hysteresis range",}, hyst2pointRead =>{a=> 21.0,s=>0.5,l=>7,min=>0 ,max=>2 ,c=>'' ,f=>'10' ,u=>'C' ,d=>1,t=>"hysteresis range",},
hyst2point =>{a=> 15.0,s=>0.5,l=>7,min=>0 ,max=>2 ,c=>'' ,f=>'10' ,u=>'C' ,d=>1,t=>"hysteresis range",}, hyst2pointWrite =>{a=> 15.0,s=>1 ,l=>7,min=>0 ,max=>2 ,c=>'' ,f=>'10' ,u=>'C' ,d=>1,t=>"hysteresis range",},
heatCool =>{a=> 15.7,s=>0.1,l=>7,min=>0 ,max=>1 ,c=>'lit' ,f=>'' ,u=>'' ,d=>1,t=>"select heating or cooling" ,lit=>{heating=>0,cooling=>1}}, heatCool =>{a=> 15.7,s=>0.1,l=>7,min=>0 ,max=>1 ,c=>'lit' ,f=>'' ,u=>'' ,d=>1,t=>"select heating or cooling" ,lit=>{heating=>0,cooling=>1}},
weekPrgSel =>{a=> 16.0,s=>1.0,l=>7,min=>0 ,max=>2 ,c=>'lit' ,f=>'' ,u=>'' ,d=>1,t=>"select week program" ,lit=>{prog1=>0,prog2=>1,prog3=>2}}, weekPrgSel =>{a=> 16.0,s=>1.0,l=>7,min=>0 ,max=>2 ,c=>'lit' ,f=>'' ,u=>'' ,d=>1,t=>"select week program" ,lit=>{prog1=>0,prog2=>1,prog3=>2}},
@ -1227,7 +1227,7 @@ $culHmRegModel{"ROTO_ZEL-STG-RM-DWT-10"}= $culHmRegModel{"HM-PB-4DIS-WM"};
,noMinMax4Manu =>1,daylightSaveTime=>1,sendWeatherData =>1 ,noMinMax4Manu =>1,daylightSaveTime=>1,sendWeatherData =>1
,modePrioParty =>1,modePrioManu =>1,weekPrgSel =>1 ,modePrioParty =>1,modePrioManu =>1,weekPrgSel =>1
} }
,"HM-TC-IT-WM-W-EU07"=>{ hyst2point =>1,hyst2pointRead =>1} ,"HM-TC-IT-WM-W-EU07"=>{ hyst2pointWrite =>1,hyst2pointRead =>1}
,"HM-ES-PMSw1-Pl01" =>{ OnTime =>1,OffTime =>1,OnDly =>1,OffDly =>1 ,"HM-ES-PMSw1-Pl01" =>{ OnTime =>1,OffTime =>1,OnDly =>1,OffDly =>1
,SwJtOn =>1,SwJtOff =>1,SwJtDlyOn =>1,SwJtDlyOff =>1 ,SwJtOn =>1,SwJtOff =>1,SwJtDlyOn =>1,SwJtDlyOff =>1
,CtValLo =>1,CtValHi =>1 ,CtValLo =>1,CtValHi =>1