der "CODE" funzt tadellos...

vielleicht willste ja sowas:

$regfile = "m8def.dat"
$crystal = 1000000

Config Portc = Output
Config Portd = Input

DO
if Portd.0 = 1 Then
Portc.5 = 1
Else
Portc.5 = 0
End If
LOOP

lg