FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-29 23:47:10 +00:00
Code Issues Releases Wiki Activity

00_ZWDongle.pm: PRIORITY_ROUTE patch from krikan, Forum #61359

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@15478 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2017-11-22 19:40:43 +00:00
parent 421b1d2826
commit 16bb7afd4d
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
fhem/FHEM/00_ZWDongle.pm
View File

@ -547,7 +547,10 @@ ZWDongle_Get($@)
} elsif($cmd eq "routeFor") { ############################ } elsif($cmd eq "routeFor") { ############################
my $homeId = $hash->{homeId}; my $homeId = $hash->{homeId};
my @list; my @list;
for(my $off=6; $off<16; $off+=2) { my $e = hex(substr($msg, 6, 2));
push @list, ($e==1 ? "last": ($e==2 ? "next":"application"))
if($e !=0);
for(my $off=8; $off<16; $off+=2) {
my $dec = hex(substr($msg, $off, 2)); my $dec = hex(substr($msg, $off, 2));
my $hex = sprintf("%02x", $dec); my $hex = sprintf("%02x", $dec);
my $h = ($hex eq $hash->{nodeIdHex} ? my $h = ($hex eq $hash->{nodeIdHex} ?