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

fht interface syntax changed with culfw 1.27

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@423 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2009-08-12 08:01:22 +00:00
parent ad52c1cf86
commit e7c235a67e
1 changed files with 6 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
fhem/FHEM/00_CUL.pm
View File

@ -595,18 +595,16 @@ CUL_Write($$$)
################### ###################
# Rewrite message from FHZ -> CUL # Rewrite message from FHZ -> CUL
if(length($fn) <= 1) { # CUL Native if(length($fn) <= 1) { # CUL Native
;
} elsif($fn eq "04" && substr($msg,0,6) eq "010101") { # FS20 } elsif($fn eq "04" && substr($msg,0,6) eq "010101") { # FS20
$fn = "F"; $fn = "F";
$msg = substr($msg,6); $msg = substr($msg,6);
} elsif($fn eq "04" && substr($msg,0,6) eq "020183") { # FHT
my $moff = 10; } elsif($fn eq "04" && substr($msg,0,6) eq "020183") { # FHT
while(length($msg) > $moff) { $fn = "T";
my $snd = substr($msg,6,4) . $msg = substr($msg,6,4) . substr($msg,10);
substr($msg,$moff,2) . "79" . substr($msg,$moff+2,2); CUL_SimpleWrite($hash, $fn . $msg);
CUL_SimpleWrite($hash, "T$snd");
$moff += 4;
}
return; return;
} else { } else {