FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00
Code Issues Releases Wiki Activity

*** empty log message ***

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@781 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2010-12-27 09:39:28 +00:00
parent b17491dab9
commit 22a19fbbd1
2 changed files with 3 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/FHEM/00_CUL.pm
View File

@ -913,6 +913,7 @@ CUL_SimpleWrite(@)
}
$msg .= "\n" unless($nonl);
Log 1, "SW: $msg";
$hash->{USBDev}->write($msg . "\n") if($hash->{USBDev});
syswrite($hash->{TCPDev}, $msg) if($hash->{TCPDev});

20
fhem/FHEM/10_FS20.pm
View File

@ -109,7 +109,7 @@ FS20_Initialize($)
$hash->{DefFn} = "FS20_Define";
$hash->{UndefFn} = "FS20_Undef";
$hash->{ParseFn} = "FS20_Parse";
$hash->{AttrList} = "IODev follow-on-for-timer:1,0 do_not_notify:1,0 ignore:0,1 dummy:1,0 showtime:1,0 model;fs20hgs,fs20hgs,fs20pira,fs20piri,fs20s20,fs20s8,fs20s4,fs20s4a,fs20s4m,fs20s4u,fs20s4ub,fs20sd,fs20sn,fs20sr,fs20ss,fs20str,fs20tfk,fs20tfk,fs20tk,fs20uts,fs20ze,fs20as1,fs20as4,fs20di,fs20du,fs20ls,fs20ms2,fs20rst,fs20sa,fs20sig,fs20st,fs20sv,fs20usr exchange_on_off loglevel:0,1,2,3,4,5,6";
$hash->{AttrList} = "IODev follow-on-for-timer:1,0 do_not_notify:1,0 ignore:0,1 dummy:1,0 showtime:1,0 model;fs20hgs,fs20hgs,fs20pira,fs20piri,fs20s20,fs20s8,fs20s4,fs20s4a,fs20s4m,fs20s4u,fs20s4ub,fs20sd,fs20sn,fs20sr,fs20ss,fs20str,fs20tfk,fs20tfk,fs20tk,fs20uts,fs20ze,fs20as1,fs20as4,fs20di,fs20du,fs20ls,fs20ms2,fs20rst,fs20sa,fs20sig,fs20st,fs20sv,fs20usr loglevel:0,1,2,3,4,5,6";
}
@ -162,14 +162,6 @@ FS20_Set($@)
return "no set value specified" if($na < 2 || $na > 3);
return "Readonly value $a[1]" if(defined($readonly{$a[1]}));
if($attr{$a[0]} && $attr{$a[0]}{exchange_on_off}) {
if($a[1] =~ m/off/) {
$a[1] =~ s/off/on/;
} else {
$a[1] =~ s/on/off/;
}
}
my $c = $fs20_c2b{$a[1]};
if(!defined($c)) {
@ -197,7 +189,7 @@ FS20_Set($@)
my $val;
if($na == 3) { # Timed command.
$c =~ s/1/3/; # Set the extension bit
$c = sprintf("%02X", $c & 0x20); # Set the extension bit
########################
# Calculating the time.
@ -367,14 +359,6 @@ FS20_Parse($$)
my $lh = $def->{$n};
$n = $lh->{NAME}; # It may be renamed
if($attr{$n} && $attr{$n}{exchange_on_off}) {
if($v =~ m/off/) {
$v =~ s/off/on/;
} else {
$v =~ s/on/off/;
}
}
return "" if(IsIgnored($n)); # Little strange.
$lh->{CHANGED}[0] = $v;