ich habe das mit fastavr-basic gelöst.
--------------------------------------------------
$Device= m16
$Stack = 32
$Clock = 8
$Baud = 19200
$RC5=PORTD.2

Dim ir_adr As Byte, ir_Command As Byte

Declare Interrupt Int0()

Int0 Falling
Enable Int0
Enable Ovf0
Enable Interrupts

Do
Wait 100
Loop

End

Interrupt Int0(), Save 2
Disable Int0
Enable Interrupts
RC5(ir_adr, ir_Command)
Print ir_command
Reset Int0
Enable Int0
End Interrupt
-------------------------------------------

mfg psf