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

10_CUL_HM: Dis_WM55 text - displayWM

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7291 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2014-12-21 18:04:16 +00:00
parent 5dfb13cd00
commit 62cdbc09b1
2 changed files with 51 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

49
fhem/FHEM/10_CUL_HM.pm
View File

@ -3905,6 +3905,31 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
}
CUL_HM_PushCmdStack($hash,$msg) if ($msg);
}
elsif($cmd eq "displayWM" ) { #################################################
# textNo color icon
my %color=(white=>0,red=>1,orange=>2,yellow=>3,green=>4,blue=>5);
my %icon=(off=>0,on=>1,open=>2,closed=>3,error=>4,ok=>5,noIcon=>99);
my %btn=(txt01_1=>0 ,txt01_2=>1 ,txt02_1=>2 ,txt02_2=>3 ,txt03_1=>4 ,txt03_2=>5,
txt04_1=>6 ,txt04_2=>7 ,txt05_1=>8 ,txt05_2=>9 ,txt06_1=>10,txt06_2=>11,
txt07_1=>12,txt07_2=>13,txt08_1=>14,txt08_2=>15,txt09_1=>16,txt09_2=>17,
txt10_1=>18,txt10_2=>19);
my $msg = "800102";
my $param = (scalar(@a)-2);
return "not enough parameter - always use txtNo, color and icon in a set"
if($param %3);
for (my $cnt=2;$cnt<$param;$cnt+=3){
return "color wrong ".$a[$cnt+1]." use:".join(",",sort keys %color) if (!defined $color{$a[$cnt+1]});
return "icon wrong " .$a[$cnt+2]." use:".join(",",sort keys %icon) if (!defined $icon {$a[$cnt+2]});
return "text wrong " .$a[$cnt+0]." use:".join(",",sort keys %btn) if (!defined $btn {$a[$cnt+0]});
$msg .= sprintf("12%02X11%02X",$btn{$a[$cnt+0]}+0x80,$color{$a[$cnt+1]}+0x80);
$msg .= sprintf("13%02X",$icon{$a[$cnt+2]}+0x80) if ($icon{$a[$cnt+2]} != 99 );
$msg .= ($cnt<$param-1)?"0A":"0A03";
CUL_HM_PushCmdStack($hash,'++'.$flag.'11'.$id.$dst.$msg);
$msg = "8001";
}
}
elsif($cmd =~ m/^(controlMode|controlManu|controlParty)$/) { ################
my $mode = $a[2];
@ -8123,6 +8148,18 @@ sub CUL_HM_tempListTmpl(@) { ##################################################
</li>
</ul><br>
</li>
<li>HM-Dis-WM55
<ul>
<li><B>displayWM &lt;text1&gt; &lt;color1&gt; &lt;icon1&gt; ... &lt;text6&gt; &lt;color6&gt; &lt;icon6&gt;
</B><br>
up to 6 lines can be addressed.<br>
<B>textNo</B> is the text to be dispalyed in line No. The text is asotiated with the text defined for the buttons.
txt&lt;BtnNo&gt;_&lt;lineNo&gt; references the button 1 to 10 and their lines 1 or 2<br>
<B>color</B> is one white,red, orange,yellow,green,blue<br>
<B>icon</B> is one off,on,open,closed,error,ok,noIcon<br>
</li>
</ul><br>
</li>
<li>keyMatic<br><br>
<ul>The Keymatic uses the AES signed communication. Therefore the control
of the Keymatic is only together with the HM-LAN adapter possible. But
@ -9373,6 +9410,18 @@ sub CUL_HM_tempListTmpl(@) { ##################################################
</li>
</ul><br>
</li>
<li>HM-Dis-WM55
<ul>
<li><B>displayWM &lt;text1&gt; &lt;color1&gt; &lt;icon1&gt; ... &lt;text6&gt; &lt;color6&gt; &lt;icon6&gt;
</B><br>
bis zu 6 Zeilen können addresiert werden. <br>
<B>textNo</B> ist der anzuzeigende Text. Der Inhalt des Texts wird in den Buttonds definiert.
txt&lt;BtnNo&gt;_&lt;lineNo&gt; referenziert den Button und dessn jeweiligen Zeile<br>
<B>color</B> kann sein white,red, orange,yellow,green,blue<br>
<B>icon</B> kann sein off,on,open,closed,error,ok,noIcon<br>
</li>
</ul><br>
</li>
<li>keyMatic<br><br>
<ul>Keymatic verwendet eine AES-signierte Kommunikation. Deshalb ist die Steuerung von Keymatic

2
fhem/FHEM/HMConfig.pm
View File

@ -1570,7 +1570,7 @@ $culHmModelSets{"HM-Dis-WM55"} = $culHmModelSets{"HM-PB-4DIS-WM"};
,statusRequest =>""},
"HM-CC-RT-DN06" =>{ press =>"[long|short] [<peer>] [<repCount(long only)>] [<repDelay>] ..."
},
"HM-Dis-WM5500" =>{ displayWM =>"<textNo1> <color1> <icon1> [<textNo2> <color2> <icon2>] ...[<textNo6> <color6> <icon6>] "},
"CCU-FHEM00" =>{ update =>"",
hmPairForSec =>"<sec>",
hmPairSerial =>"<serial>",