Danke für die schnelle Hilfe, mein Servo funktioniert jetzt.

Hier nochmal mein Programm:
Code:
$regfile = "m168def.dat"
$crystal = 16000000                                         'Quarzfrequenz
$baud = 9600
$hwstack = 32
$framesize = 32
$swstack = 32

Dim Center11 As Byte
Dim Center21 As Byte
Dim Pos11 As Byte
Dim Pos21 As Byte
Center11 = 20
Pos11 = 50
Center21 = 210
Pos21 = 190

'Servo config
Config Servos = 1 , Servo1 = Portc.1 , Reload = 10
Config Portc = Output


'finally we must turn on the global interrupt

Enable Interrupts

'ende Servo config

Do
'   Print "center"
'   Servo(1) = Center11
'   Waitms 1000
   Print "pos1"
   Servo(1) = Pos11
   Waitms 1000
'   Print "center"
'   Servo(1) = Center11
'   Wait 1000
   Print "pos2"
   Servo(1) = Pos21
   Waitms 1000
Loop
Als Servo verwende ich das "TOP-LINE STANDARD SERVO RS 2 JR" von conrad.de

Bei dem Servo ist:
orange = Port / Signal
rot = 5V
schwarz = GND

MfG
Scarabol