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

00_ZWCUL.pm: add dataRate 9600

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@10291 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2015-12-29 11:33:45 +00:00
parent fdd70b3def
commit 10fac8ab5c
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fhem/FHEM/00_ZWCUL.pm
View File

@ -3,16 +3,18 @@
package main; package main;
# TODO # TODO
# 9.6k, needed by inclusion
# always verify checksum in firmware
# inclusion/exclusion # inclusion/exclusion
# resend in firmware # resend in firmware
# send anomaly on remotes
# neighborUpdate Class: 010404010c0001 010604000c0040 010700 0105 # neighborUpdate Class: 010404010c0001 010604000c0040 010700 0105
# static routing # static routing
# explorer frames # explorer frames
# implement security # implement security
# multicast # multicast
# NIF:
#zwcul: 0101 d3 9c01 10 01 5e25263370273281855972867a73ef5a82 (zwcul)
#zme reporting: 1404 10 01 5e25263370273281855972867a73ef5a82
#zme nodeInfo: 0141 d3 9c01 041001
use strict; use strict;
use warnings; use warnings;
@ -60,7 +62,7 @@ ZWCUL_Initialize($)
$hash->{AttrFn} = "ZWCUL_Attr"; $hash->{AttrFn} = "ZWCUL_Attr";
$hash->{UndefFn} = "ZWCUL_Undef"; $hash->{UndefFn} = "ZWCUL_Undef";
$hash->{AttrList}= "do_not_notify:1,0 dummy:1,0 model disable:0,1 ". $hash->{AttrList}= "do_not_notify:1,0 dummy:1,0 model disable:0,1 ".
"networkKey noDispatch dataRate:40k,100k"; "networkKey noDispatch dataRate:40k,100k,9600";
} }
##################################### #####################################
@ -467,7 +469,8 @@ ZWCUL_Attr($$$$)
return; return;
} elsif($attr eq "dataRate" && $cmd eq "set") { } elsif($attr eq "dataRate" && $cmd eq "set") {
my $sfx = ($value eq "100k" ? "1" : "4"); my $sfx = ($value eq "100k" ? "1" :
($value eq "9600" ? "9" : "4"));
$hash->{initString} = ($hash->{homeIdSet} =~ m/^0*$/ ? "zm$sfx":"zr$sfx"); $hash->{initString} = ($hash->{homeIdSet} =~ m/^0*$/ ? "zm$sfx":"zr$sfx");
ZWCUL_DoInit($hash); ZWCUL_DoInit($hash);
@ -561,7 +564,7 @@ ZWCUL_Ready($)
<a name="ZWCULattr"></a> <a name="ZWCULattr"></a>
<b>Attributes</b> <b>Attributes</b>
<ul> <ul>
<li><a name="#dataRate">dataRate</a> [40k|100k]<br> <li><a name="#dataRate">dataRate</a> [40k|100k|9600]<br>
specify the data rate. specify the data rate.
</li> </li>
<li><a href="#dummy">dummy</a></li> <li><a href="#dummy">dummy</a></li>