Hallo

Mit diesem Programm:

Code:
'Servo steuern mit dem RP6                                          6.3.2008 mic'

$regfile = "m32def.dat"
$crystal = 8000000

$hwstack = 32
$swstack = 8
$framesize = 8

'Dims --------------------------------------------------------------------------'

Dim Servopos1 As Byte
Dim Servopos2 As Byte
Dim Temp As Integer
Dim Stellzeit As Integer

'Ports -------------------------------------------------------------------------'

Config Porta.0 = Output
Config Porta.1 = Output


'Variablen vorbelegen ----------------------------------------------------------'

' Mitte ist ~80
Servopos1 = 10
Servopos2 = 150

'Hauptprogramm -----------------------------------------------------------------'

Disable Interrupts

Do
   For Stellzeit = 0 To 100
      Set Porta.0
      For Temp = 1 To Servopos1
         Waitus 10
      Next Temp
      Reset Porta.0

      Set Porta.1
      For Temp = 1 To Servopos2
         Waitus 10
      Next
      Reset Porta.1

     For Temp = 1 To 500
         Waitus 10
      Next
   Next Stellzeit

   If Servopos1 = 10 Then Servopos1 = 150 Else Servopos1 = 10
   If Servopos2 = 45 Then Servopos2 = 125 Else Servopos2 = 45
Loop
kann mein RP6 das:

Bild hier  
http://www.youtube.com/watch?v=lN_NalOYS_4

Das sollte auch mit einem 1Mhz Mega8 funktionieren.

Gruß

mic