From c8af674a5026f341542561e4f272e5aa25a2557d Mon Sep 17 00:00:00 2001
From: martinp876 <martinp876@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 6 Sep 2014 06:44:58 +0000
Subject: [PATCH] KFM100 battery state

git-svn-id: https://svn.fhem.de/fhem/trunk@6504 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_CUL_HM.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index 776b6b3dc..8a3dd79a5 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -1470,8 +1470,10 @@ sub CUL_HM_Parse($$) {#########################################################
   }
   elsif($md eq "KFM-Sensor") { ################################################
     if ($mTp eq "53"){
-      if($p =~ m/.14(.)0200(..)(..)(..)/) {
-        my ($seq, $k_v1, $k_v2, $k_v3) = (hex($1),$2,hex($3),hex($4));
+      if($p =~ m/(..)4(.)0200(..)(..)(..)/) {
+        my ($chn,$seq, $k_v1, $k_v2, $k_v3) = (hex($1),hex($2),$3,hex($4),hex($5));
+        push @evtEt,[$shash,1,"battery:".($chn & 0x80?"low":"ok")];
+        
         my $v = 128-$k_v2;                  # FIXME: calibrate
         $v += 256 if(!($k_v3 & 1));
         push @evtEt,[$shash,1,"rawValue:$v"];