Versuche einmal das Bascom Demo

Code:
$regfile = "2313def.dat"  ' Auf Deinen µC anpassen!

Config Servos = 1 , Servo1 = Portb.0 , Reload = 10
Config Portb = Output
Enable Interrupts

Do
Loop

Dim I As Byte
Do
 For I = 0 To 100 ' I einfach mit anderen besser passenden Werten setzen
   Servo(1) = I
   Waitms 1000
 Next

 For I = 100 To 0 Step -1
 '  Servo(1) = I
   Waitms 1000
 Next
Loop
End
Hat bei mir bestens geklappt.

Gruß Richard