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

Sync

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@758 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2010-11-25 07:55:20 +00:00
parent 3c4c7344dc
commit 2b4e5afe9f
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/10_CUL_HM.pm
View File

@ -297,6 +297,11 @@ CUL_HM_Set($@)
my $state; my $state;
if($cmd eq "raw") { ################################################## if($cmd eq "raw") { ##################################################
return "Usage: set $a[0] $cmd rowdata" if(@a != 3);
CUL_HM_SendCmd($hash, $a[2], 0, 1);
return "";
} elsif($cmd eq "rawStack") { ########################################
return "Usage: set $a[0] $cmd rowdata" if(@a != 3); return "Usage: set $a[0] $cmd rowdata" if(@a != 3);
CUL_HM_PushCmdStack($hash, $a[2]); CUL_HM_PushCmdStack($hash, $a[2]);
return ""; return "";
@ -487,6 +492,7 @@ CUL_HM_SendCmd($$$$)
$io->{HM_CMDNR} = $mn; $io->{HM_CMDNR} = $mn;
$cmd = sprintf("As%02X%02x%s", length($cmd2)/2+1, $mn, $cmd2); $cmd = sprintf("As%02X%02x%s", length($cmd2)/2+1, $mn, $cmd2);
Log 1, "CUL_HM SEND $cmd";
Log $l4, "CUL_HM SEND $cmd"; Log $l4, "CUL_HM SEND $cmd";
IOWrite($hash, "", $cmd); IOWrite($hash, "", $cmd);
if($waitforack) { if($waitforack) {
@ -503,7 +509,7 @@ CUL_HM_PushCmdStack($$)
my ($hash, $cmd) = @_; my ($hash, $cmd) = @_;
my @arr = (); my @arr = ();
$hash->{cmdStack} = \@arr if(!$hash->{cmdStack}); $hash->{cmdStack} = \@arr if(!$hash->{cmdStack});
#Log 1, $cmd; Log 1, $cmd;
push(@{$hash->{cmdStack}}, $cmd); push(@{$hash->{cmdStack}}, $cmd);
} }