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

CUL_HM:provide RT teaming support

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@9580 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2015-10-21 18:52:17 +00:00
parent 491cccfe59
commit 77832f5858
2 changed files with 36 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
fhem/FHEM/10_CUL_HM.pm
View File

@ -4381,6 +4381,28 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
return "device for command cannot be identified";
}
}
elsif($cmd eq "brightCol") { ################################################
my (undef,undef,$bright,$colVal,$duration,$ramp) = @a; #date prepared extention to entdate
return "please enter the duration in seconds"
if (!defined $duration || $duration !~ m/^[+-]?\d+(\.\d+)?$/);
my $tval = CUL_HM_encodeTime16($duration);# onTime 0.0..85825945.6, 0=forever
return "timer value to low" if ($tval eq "0000");
$ramp = CUL_HM_encodeTime16($ramp);
CUL_HM_PushCmdStack($hash,'++'.$flag.'11'.$id.$dst.'80'.$chn.
sprintf("%02x%02",$bright,$colVal).$ramp.$tval);
}
elsif($cmd eq "brightAuto") { ###############################################
my (undef,undef,$bright,$colProg,$min,$max,$duration,$ramp) = @a; #date prepared extention to entdate
return "please enter the duration in seconds"
if (!defined $duration || $duration !~ m/^[+-]?\d+(\.\d+)?$/);
my $tval = CUL_HM_encodeTime16($duration);# onTime 0.0..85825945.6, 0=forever
return "timer value to low" if ($tval eq "0000");
$ramp = CUL_HM_encodeTime16($ramp);
CUL_HM_PushCmdStack($hash,'++'.$flag.'11'.$id.$dst.'80'.$chn.
sprintf("%02x%02%02x%02",$bright,$colProg,$min,$max).$ramp.$tval);
}
elsif($cmd eq "playTone") { #################################################
my $msg;
if ($a[2] eq 'replay'){

18
fhem/FHEM/HMConfig.pm
View File

@ -646,6 +646,11 @@ foreach my $al (keys %culHmModel){ # duplicate entries for alias devices
mtrConstLed =>{a=>154.0,s=>2 ,l=>1,min=>1 ,max=>65536 ,c=>'' ,f=>'' ,u=>'i/kWh',d=>0,t=>"constant led"},
mtrSensIr =>{a=>156.0,s=>1 ,l=>1,min=>-99 ,max=>99 ,c=>'' ,f=>'' ,u=>'%' ,d=>0,t=>"sensiblity IR"},
waRed =>{a=>164.0,s=>1 ,l=>1,min=>0 ,max=>100 ,c=>'' ,f=>'' ,u=>'%' ,d=>0,t=>"whitebalance red"},
waGreen =>{a=>165.0,s=>1 ,l=>1,min=>0 ,max=>100 ,c=>'' ,f=>'' ,u=>'%' ,d=>0,t=>"whitebalance green"},
waBlue =>{a=>166.0,s=>1 ,l=>1,min=>0 ,max=>100 ,c=>'' ,f=>'' ,u=>'%' ,d=>0,t=>"whitebalance blue"},
colChangeSpeed =>{a=>167.0,s=>1 ,l=>1,min=>0 ,max=>255 ,c=>'' ,f=>'' ,u=>'s/U' ,d=>0,t=>"color change speed"},
#un-identified List1
# SEC-WM55 08:01 (AES on?)
# SEC-WDS 34:0x64 ?
@ -1172,7 +1177,8 @@ $culHmRegModel{"ROTO_ZEL-STG-RM-DWT-10"}= $culHmRegModel{"HM-PB-4DIS-WM"};
,OffDlyStep =>1,OffDlyNewTime =>1,OffDlyOldTime =>1
,lgMultiExec =>1
}
,"HM-LC-RGBW-WM02" =>{ ActHsvCol =>1}
,"HM-LC-RGBW-WM02" =>{ ActHsvCol =>1
,waRed =>1,waGreen =>1,waBlue =>1,colChangeSpeed =>1}
,"HM-LC-RGBW-WM03" =>{ ActColPrgm =>1,ActMinBoarder =>1,ActMaxBoarder =>1}
);
@ -1666,11 +1672,15 @@ $culHmModelSets{"ROTO_ZEL-STG-RM-DWT-10"}= $culHmModelSets{"HM-PB-4DIS-WM"};
,inhibit =>"[on|off]"
,statusRequest =>""
,peerIODev =>"[IO] <btn> [set|unset]... not for future use"
,brightCol =>"<bright> <colVal> <duration> <ramp>"
,brightAuto =>"<bright> <colProg> <min> <max> <duration> <ramp>"
}
,"HM-LC-RGBW-WM02" =>{ brightCol =>"" #General work 2 do!!!
,brightAuto =>""
,"HM-LC-RGBW-WM02" =>{ brightCol =>"<bright> <colVal> <duration> <ramp>" #General rework
,brightAuto =>"<bright> <colProg> <min> <max> <duration> <ramp>"
}
,"HM-LC-RGBW-WM03" =>{ brightCol =>"<bright> <colVal> <duration> <ramp>"
,brightAuto =>"<bright> <colProg> <min> <max> <duration> <ramp>"
}
);
# clones- - - - - - - - - - - - - - - - -