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

Config Portb = Output
Dim X As Integer

Enable Interrupts

Config Servos = 1 , Servo1 = Portb.4 , Reload = 10
Servo(1) = 50

Do
Input , X
If X = 1 Then Servo(1) = 100 Else If X = 2 Then Servo(1) = 20
Loop

Wenn der AVR eine 1 empfängt, schaltet der Servo auf stellung 100, wenn er dann aber eine 2 empfängt, tut sich nichts mehr.

Aber es ist doch eine Endlosschleife?
Das INPUT funktioniert anscheinend nur ein mal, dann geht nichts mehr.

Wie stell ich das am besten an?