program fernbedienung;

{$mode objfpc}{$H+}

{$DEFINE UseCThreads}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Classes, lesethreadunit
  { you can add units after this },
  sysutils, lowlevelunit, irdecoderunit;

var
  irDecoder: tIRDecoder;

begin
  irDecoder:=tIRDecoder.create(paramstr(1));

  repeat
    repeat
      while irDecoder.zeileVerarbeitet do;
    until not irDecoder.befehlVerarbeitet;
    sleep(100);
  until false;

  irDecoder.free;
end.