From 12c5fcc4c5c21cb1b8354d078570d7e67499efd5 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Mon, 19 Oct 2015 19:43:32 +0200
Subject: richtige Bits maskieren und auslesen

---
 irdecoderunit.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'irdecoderunit.pas')

diff --git a/irdecoderunit.pas b/irdecoderunit.pas
index f344606..dcbc5fe 100644
--- a/irdecoderunit.pas
+++ b/irdecoderunit.pas
@@ -51,11 +51,11 @@ procedure tIRDecoder.verarbeite(lw: longword);
 var
   empf: boolean;
 begin
-  empf:=odd(lw);
-  lw:=lw shr 1;
+  empf:=odd(lw shr 1);
+  lw:=((lw shr 1) and not 1) or byte(odd(lw));
 
   if (lw<>letztesZeichen[letzterEmpf]) or not einzelKlickZeichen(lw) then
-    tastenDruckAnhaengen(lw);
+    tastenDruckAnhaengen(mirrorBits(lw and not $08));
 
   letztesZeichen[empf]:=lw;
   letzterEmpf:=empf;
-- 
cgit v1.2.3-70-g09d2