was hast du denn für ein Gerät das bei dir Adresse 30 benutzt wird ?

Bei mir läuft alles über Addresse 0.

Kleines Codebeispiel :

Code:
'RC5 Receiver
Getrc5(address , Command)
If Address = 0 Then
Command = Command And &B01111111
Print #4 , Address ; "  " ; Command                         'wird benötigt um den Code zu sehen welche Taste gerade empfangen wurde

Portg.0 = 1                                                 'LED ein im IR Receiver
Portc.5 = 1                                                 'LED unter µC ein
Waitms 200
Portg.0 = 0                                                 'LED aus im IR Receiver
Portc.5 = 0                                                 'LED unter µController aus

'Ein
If Command = 13 And Di9_schaltzustand = "0" And Di11_schaltzustand = "0" Then
Sound Portl.4 , 500 , 450
Porth.3 = 1
End If

'Aus
If Command = 12 Or Di9_schaltzustand = "1" Or Di11_schaltzustand = "1" Then
Sound Portl.4 , 400 , 450
Sound Portl.4 , 300 , 450
Sound Portl.4 , 200 , 450
Sound Portl.4 , 100 , 450
Porth.3 = 0
End If
Gruß
Steffen