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

Bugfix

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@4742 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
dirkho 2014-01-25 19:57:19 +00:00
parent 81548523b9
commit c5f7fd184b
1 changed files with 25 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
fhem/contrib/inputevent/89_inputevent.pm
View File

@ -38,8 +38,8 @@ sub INPUTEVENT_Initialize($) {
$hash->{SetFn} = "INPUTEVENT_Set";
$hash->{AttrList}= "model:EVENT loglevel:0,1,2,3,4,5";
$hash->{READINGS}{uTIME} = 0;
$hash->{READINGS}{lastCode} = 0;
$hash->{READINGS}{uTIME}{VAL} = 0;
$hash->{READINGS}{lastCode}{VAL} = 0;
}
#####################################
@ -203,18 +203,24 @@ sub INPUTEVENT_Parse($$) {
# Set $ignoreUSecs => µSec sice last command.
my $uTime = $sec * 1000000 + $ySec;
my $ignoreUSecs = $uTime - $hash->{READINGS}{uTIME};
$hash->{READINGS}{uTIME} = $uTime;
my $ignoreUSecs = $uTime - $hash->{READINGS}{uTIME}{VAL};
my $tm = TimeNow();
$hash->{READINGS}{uTIME}{VAL} = $uTime;
$hash->{READINGS}{uTIME}{TIME} = $tm;
#Log 4, $hash->{READINGS}{lastCode} . " _ " . $value . " | " . $hash->{READINGS}{uTIME} . " --- " . $uTime . " +++ " . $ignoreUSecs;
# IR-codes was repeated with short delay. So we ignor commands the next µSeconds set in the define command. (Default 175000)
if (($ignoreUSecs > ($hash->{msIgnore} * 1000)) || ($hash->{READINGS}{lastCode} ne $value)) {
if (($ignoreUSecs > ($hash->{msIgnore} * 1000)) || ($hash->{READINGS}{lastCode}{VAL} ne $value)) {
$hash->{READINGS}{LAST}{VAL} = unpack('H*',$msg);
$hash->{READINGS}{LAST}{TIME} = TimeNow();
$hash->{READINGS}{RAW}{TIME} = time();
$hash->{READINGS}{LAST}{TIME} = $tm;
$hash->{READINGS}{RAW}{VAL} = unpack('H*',$msg);
$hash->{READINGS}{lastCode} = $value;
$hash->{READINGS}{RAW}{TIME} = $tm;
$hash->{READINGS}{lastCode}{VAL} = $value;
$hash->{READINGS}{lastCode}{TIME} = $tm;
Log 4, $message;