Habs jetzt mal versucht, aber die LED´s schalten sich der Reihe nach ein, wenn ich sie an 5V anschließe, auch, wenn Pin D2 kein High-Signal bekommt.

Habs jetzt mal so programmiert:

Code:
$regfile = "m8def.dat"
 $crystal = 3686411

 Ddrc = &B11111111
 Portd = &B00000000


 Do

  If Pind.2 = 1 Then
 Portc.0 = 1
  waitms 200
 portc.1=1
  waitms 200
 portc.2=1
  waitms 200
 portc.3=1
  waitms 200
 portc.4=1
  waitms 200
 portc.5=1
  Waitms 200

 End If


If Pind.2 = 0 Then
 portc.5=1
  waitms 200
 portc.4=1
  waitms 200
 portc.3=1
  waitms 200
 portc.2=1
  waitms 200
 portc.1=1
  waitms 200
 portc.0=1
  waitms 200

  End If

 Loop