habe den internen jetzt eingeschalten:

$regfile = "2313def.dat"
$crystal = 3686400
$baud = 9600
$lib "mcsbyte.lbx"

Ddrd.2 = 0
Portd.2 = 1

Config Rc5 = Pind.2
Enable Interrupts

Dim Address As Byte , Command As Byte

Do
Getrc5(address , Command)
Command = Command And &B01111111
Print "Adresse: " ; Address ; "Komando: " ; Command
Loop
End



Leider genau das selbe Ergebnis.
Stimmt der Code denn überhaupt, oder liegt da schon ein Fehler?

Grüße und danke
Enrico