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

culfw version 1.46 FHT_compress changes

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@1751 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2012-07-22 09:13:52 +00:00
parent 12081a188e
commit 314d649d17
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
fhem/FHEM/16_CUL_RFR.pm
View File

@ -93,6 +93,16 @@ CUL_RFR_Parse($$)
my @m = split(";", $smsg, -1); # process only messages terminated with ;
for(my $i = 0; $i < $#m; $i++) {
my $m = $m[$i];
# Compressed FHT messages
while($m =~ m/^T(....)(..)(..)(..)(..)(..)(.*)(..)$/) {
my ($fhtid, $cmd, $source, $val, $cmd2, $val2, $rest, $rssi) =
($1, $2, $3, $4, $5, $6, $7, $8);
my $firstmsg = "T$fhtid$cmd$source$val$rssi";
$m = "T$fhtid$cmd2$source$val2$rest$rssi";
CUL_Parse($hash, $iohash, $hash->{NAME}, $firstmsg, "X21");
}
CUL_Parse($hash, $iohash, $hash->{NAME}, $m, "X21");
if($m =~ m/^T/) { $hash->{NR_TMSG}++ }
elsif($m =~ m/^F/) { $hash->{NR_FMSG}++ }