OK mit dem modify kann man den TCM310 tatsächlich "aufwecken"
Piezzo Schalter WS R101 von Omnio funktioniert nicht
modfiy EUL 310 /dev/ttyACM0@57600
Piezzo Schalter funktioniert.
Die Funkinformationen vom FWZ12-16A kommen allerdings nicht durch.
( irgendwann kommt dann ein paket aber ich hab noch nicht rausgefunden welche Bedingungen das begünstigen bzw. verhindern. Einstreueffekt vom LTE kann ich glaub ich ausschliessen das modem hab ich auch schon ausgemacht..)
Der PM101 liegt neben dem FWZ12-16A und sendet fleissig vor sich hin
( btw. kannst du den Code vom PM101 in die "A5" if-Schleife legen - ich hab das kurz vor dem teach-in reingemacht damit es funktioniert - guckst du:)
----------- CODE
if(($db_0 & 0x08) == 0) {
if($db_0 & 0x80) {
my $fn = sprintf "%02x", ($db_3>>2);
my $tp = sprintf "%02X", ((($db_3&3) << 5) | ($db_2 >> 3));
my $mf = sprintf "%03X", ((($db_2&7) << 8) | $db_1);
$mf = $EnO_manuf{$mf} if($EnO_manuf{$mf});
my $m = "teach-in:class A5.$fn.$tp (manufacturer: $mf)";
Log 1, $m;
push @event, "3:$m";
my $st = "A5.$fn.$tp";
$st = $EnO_subType{$st} if($EnO_subType{$st});
$attr{$name}{subType} = $st;
if("$fn.$tp" eq "20.01" && $iohash->{pair}) { # MD15
select(undef, undef, undef, 0.1); # max 10 Seconds
EnOcean_A5Cmd($hash, "800800F0", "00000000");
select(undef, undef, undef, 0.5);
EnOcean_MD15Cmd($hash, $name, 128); # 128 == 20 degree C
}
} elsif($model eq "PM101") {
####################################
# Ratio Presence Sensor Eagle PM101, code by aicgazi
####################################
my $lux = sprintf "%3d", $db_2;
# content of $db_2 is the illuminance where max value 0xFF stands for 1000 lx
$lux = sprintf "%4d", ( $lux * 1000 / 255 ) ;
push @event, "3:brightness:$lux";
push @event, "3:channel1:" . ($db_0 & 0x01 ? "on" : "off");
push @event, "3:channel2:" . ($db_0 & 0x02 ? "on" : "off");
} else {
push @event, "3:teach-in:no type/manuf. data transmitted";
}
------------------ Code
