@ Michael_f:

Sorry, wenn ich jetzt dein Programm auseinandernehme, aber ich wills kappieren:

$regfile = "m8def.dat" // Definiert die AVR (wahrschinlich mega8 )
$crystal = 3686400 // Taktung
$lib "mcsbyte.lbx" // was meint das?
$baud = 9600 // Setzen der Baudrate für print

Ddrc = &B00011111 // Ja was meint das?
Portc = &B00100000 // und das hier?
Config Rc5 = Pinc.5 // Pin 5 als eingang
Enable Interrupts // ???
Dim Adress As Byte , Command As Byte // Definition der Variablen
Print "Warte auf Daten" // das ist klar
Do // Dauerschleife
Getrc5(adress , Command) //
Waitms 150 // Warum eine PAuse?
Print "Geraeteadresse: " ; Adress ; " Geraetekommando: " ; //print der Daten Command ; " - " // was soll das?
Waitms 150 // Warum eine PAuse?
Loop
End