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

20_X10: migrated to use readings functions

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@25094 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
borisneubert 2021-10-19 06:02:13 +00:00
parent a6e26ccdde
commit e5253edc79
1 changed files with 47 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
fhem/FHEM/20_X10.pm
View File

@ -135,7 +135,8 @@ X10_Initialize($)
$hash->{UndefFn} = "X10_Undef";
$hash->{ParseFn} = "X10_Parse";
$hash->{AttrList} = "IODev do_not_notify:1,0 " .
"dummy:1,0 showtime:1,0 model:lm12,lm15,am12,tm13";
"dummy:1,0 showtime:1,0 model:lm12,lm15,am12,tm13 " .
$readingFnAttributes;
}
@ -208,10 +209,15 @@ X10_StateMachine($$$$)
$hash->{ONOFF}= $onoff;
$hash->{BRIGHT}= $bright;
$hash->{READINGS}{onoff}{TIME}= $time;
$hash->{READINGS}{onoff}{VAL}= $onoff;
$hash->{READINGS}{dimmer}{TIME}= $time;
$hash->{READINGS}{dimmer}{VAL}= int(1000.0*$bright/210.0+0.5)/10.0;
#$hash->{READINGS}{onoff}{TIME}= $time;
#$hash->{READINGS}{onoff}{VAL}= $onoff;
readingsBeginUpdate($hash);
readingsBulkUpdate($hash,'onoff',$onoff,1,$time);
#$hash->{READINGS}{dimmer}{TIME}= $time;
#$hash->{READINGS}{dimmer}{VAL}= int(1000.0*$bright/210.0+0.5)/10.0;
readingsBulkUpdate($hash,'dimmer',int(1000.0*$bright/210.0+0.5)/10.0,1,$time);
readingsEndUpdate($hash,1);
return;
}
#############################
@ -379,9 +385,10 @@ X10_Set($@)
my $tn = TimeNow();
$hash->{CHANGED}[0] = $v;
$hash->{STATE} = $v;
$hash->{READINGS}{state}{TIME} = $tn;
$hash->{READINGS}{state}{VAL} = $v;
#$hash->{STATE} = $v;
#$hash->{READINGS}{state}{TIME} = $tn;
#$hash->{READINGS}{state}{VAL} = $v;
readingsSingleUpdate($hash,'state',$v,1,$tn);
X10_StateMachine($hash, $tn, $function, int(210.0*$dim/22.0+0.5));
return undef;
@ -515,9 +522,10 @@ X10_Parse($$)
if($h) {
my $name= $h->{NAME};
$h->{CHANGED}[0] = $value;
$h->{STATE} = $value;
$h->{READINGS}{state}{TIME} = $tn;
$h->{READINGS}{state}{VAL} = $value;
#$h->{STATE} = $value;
#$h->{READINGS}{state}{TIME} = $tn;
#$h->{READINGS}{state}{VAL} = $value;
readingsSingleUpdate($h,'state',$value,1,$tn);
X10_StateMachine($h, $tn, $function, $arg);
Log3 $hash, 2, "X10 $name $value";
push(@list, $name);
@ -535,15 +543,17 @@ X10_Parse($$)
1;
__END__
=pod
=item summary devices communicating via the X10 protocol
=item summary_DE Anbindung von X10-Geräten
=begin html
<a name="X10"></a>
<a id="X10"></a>
<h3>X10</h3>
<ul>
<a name="X10define"></a>
<a id="X10-define"></a>
<b>Define</b>
<ul>
<code>define &lt;name&gt; X10 &lt;model&gt; &lt;housecode&gt;
@ -578,7 +588,7 @@ X10_Parse($$)
</ul>
<br>
<a name="X10set"></a>
<a id="X10-set"></a>
<b>Set </b>
<ul>
<code>set &lt;name&gt; &lt;value&gt; [&lt;argument&gt]</code>
@ -610,6 +620,7 @@ X10_Parse($$)
<li>An X10 device has 210 discrete brightness levels. If you use a
X10 sender, e.g. a remote control or a wall switch to dim, a
brightness step is 100%/210.</li>
<a id="X10-set-dimup" data-pattern="dim(up|down)"></a>
<li><code>dimdown</code> and <code>dimup</code> take a number in the
range from 0 to 22 as argument. It is assumed that argument 1 is
a 1% brightness change (microdim) and arguments 2 to 22 are
@ -637,10 +648,10 @@ X10_Parse($$)
</ul>
<br>
<a name="X10get"></a>
<a id="X10-get"></a>
<b>Get</b> <ul>N/A</ul><br>
<a name="X10attr"></a>
<a id="X10-attr"></a>
<b>Attributes</b>
<ul>
<li><a href="#do_not_notify">do_not_notify</a></li>