also wenn du das RNControl 1.4 hast und testweise einen servo an pina0 hinhängst, dann muss folgender code eigentlich gehen:

Code:
$regfile = "m32def.dat"
   $crystal = 16000000
  $baud = 9600

Dim Center As Integer
dim servopos as integer
dim left as integer
dim right as integer
left=50
right=150
center=100 
servopos=center


'servo config
Config Servos = 1 , Servo1 = Porta.0 , Reload = 10
Config Pina.0 = Output
enable interrupts
'ende servo config

do
print "Servo Test"
  Wait 1


   Servopos = Center
  Servo(1) = Servopos
   Wait 1

  Servopos = left   'nach links fahren
  Servo(1) = Servopos
  Wait 1

     print   "Rechtsdrehung"
     For Servopos = left To right Step 10
   Servo(1) = Servopos
   Waitms 10
   Next
   Wait 1

    print  "Linksdrehung"
    For Servopos = right  To left Step -10
   Servo(1) = Servopos
   Waitms 10
   Next
    Wait 1

      print "Mitte"
    Servopos = Center
   Servo(1) = Servopos
loop