summaryrefslogtreecommitdiff
path: root/irdecoderunit.pas
diff options
context:
space:
mode:
Diffstat (limited to 'irdecoderunit.pas')
-rw-r--r--irdecoderunit.pas6
1 files changed, 3 insertions, 3 deletions
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;