EnOcean.pm Präsenzmelder von Ratio Eagle PM101

Begonnen von Guest, 08 Februar 2012, 13:32:33

Vorheriges Thema - Nächstes Thema

Guest

Originally posted by: <email address deleted>

Hallo,

hab so ein Ding zur Hand, der Sensor Kanal war noch nicht in der
EnOcean.pm definiert, also hab is reingeschrieben.

Der Präsenzmelder meldet über 4 Kanäle ( AI,A0, .. D1,D0 ) ein- und
ausschalt Signale.
Der 5. Kanal sendet ein Ticket wenn einer der 4 Schaltkanäle bedient
wird ( kurz danach )

Der 5. Kanal ist ein Sensor-Kanal. Hier wird die aktuelle Lichtstärke
in LUX gesendet. Desweiteren die Schaltzustände von Kanal 1 und
Kanal2.

Für die Schalter ( switch ) ist die Decodierung bereits im bestehenden
Modul vorhanden.
Für das Ticket im 5. Kanal habe ich einen SubType Eintrag
hinzugefügt.

attr EnO_sensor_FF850031 subType PM101


im Log werden dann die 3 neuen Daten übertragen:

2012-02-08_13:11:57 EnO_sensor_FF850031 Lux: 333.33
2012-02-08_13:11:57 EnO_sensor_FF850031 Kanal1: on
2012-02-08_13:11:57 EnO_sensor_FF850031 Kanal2: on

2012-02-08_09:51:53 EnO_sensor_FF850031 Lux: 74.51
2012-02-08_09:51:53 EnO_sensor_FF850031 Kanal1: off
2012-02-08_09:51:53 EnO_sensor_FF850031 Kanal2: off

Evtl. kann man dies Übernehmen
Die Änderung als diff  zur aktuellen Version # $Id: 10_EnOcean.pm 1154
2011-12-30 15:15:04Z rudolfkoenig $

# diff 10_EnOcean.pm 10_EnOcean.pm.org
69c69
<
"subType:switch,contact,sensor,windowHandle,SR04,MD15,PM101".
---
>                        "subType:switch,contact,sensor,windowHandle,SR04,MD15,".
312,322d311
<       ####################################
<       # Ratio Presence Sensor Eagle PM101
<       ####################################
<         if($st eq "PM101") {
<         my $lux = sprintf "%3d", $db_2;
<         # content  of $db_2 is the illuminance where max value 0xFF
stands for 1000 lx
<         $lux = sprintf "%04.2f", ( $lux * 1000 / 255 ) ;
<         push @event, "3:Lux:$lux";
<         push @event, "3:Kanal1:" . ($db_0 & 0x01 ? "off" : "on");
<         push @event, "3:Kanal2:" . ($db_0 & 0x02 ? "off" : "on");
<       } else {
324c313
<       }
---
>

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com

rudolfkoenig

                                                   

> Die Änderung als diff  zur aktuellen Version # $Id: 10_EnOcean.pm 1154

Danke, habs "eingeenglischt" (Lux -> brightness, etc), in commandref.html kurz
dokumentiert und eingecheckt.

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com