mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

90_SIGNALduino_un.pm: support tracing geiger rohrmotor signals

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@19858 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Sidey
2019-07-19 18:16:55 +00:00
parent dac1b8054e
commit 2cee196823
2 changed files with 1 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/CHANGED
View File

@@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it. # Do not insert empty lines here, update check depends on it.
- feature: 90_SIGNALduino_un.pm: support tracing geiger rohrmotor signals
- change: 00_SIGNALduino.pm: v3.4.0 - change: 00_SIGNALduino.pm: v3.4.0
Option to reconstruct last bit of transmission in MU and MS signals Option to reconstruct last bit of transmission in MU and MS signals
if there is enough data to detect it. if there is enough data to detect it.

29
fhem/FHEM/90_SIGNALduino_un.pm
View File

@@ -166,35 +166,6 @@ SIGNALduino_un_Parse($$)
Log3 $hash, 4, "$name decoded protocolid: 7 ($SensorTyp / type=$type) mode=$sendMode, sensor id=$id, channel=$channel, temp=$temp, bat=$bat\n" ; Log3 $hash, 4, "$name decoded protocolid: 7 ($SensorTyp / type=$type) mode=$sendMode, sensor id=$id, channel=$channel, temp=$temp, bat=$bat\n" ;
} elsif ($protocol == "78" && length($bitData)>=14) ## geiger rohrmotor
{
my %bintotristate=(
"00" => "0",
"10" => "F",
"11" => "1"
);
my $tscode;
for (my $n=0; $n<length($bitData); $n=$n+2) {
$tscode = $tscode . $bintotristate{substr($bitData,$n,2)};
}
Log3 $hash, 4, "geiger message converted to tristate code: " . $tscode;
#Dispatch($hash, $tscode,undef);
} elsif ($protocol == "88" && length($rawData) == 17) {
my $serial = substr($bitData,32,28);
my $buttonbits = substr($bitData,60,4);
my %buttons = (
"0010" => "hoch",
"1001" => "runter",
"1000" => "stop"
);
Log3 $hash, 4, "$name: Roto shutter - Serialbits=$serial Serial=".oct( "0b$serial" )." Buttonbits=$buttonbits Button=$buttons{$buttonbits}";
} }
############################################################################################## ##############################################################################################