was ich will ist 2 Servos per RS232 zu steuern. ich will per terminal werte übergeben. am anfang stelle ich die Servos auf mittelstellung. da fangen sie an zu ruckeln. ca. 3x pro sekunde mit einer auslenkung von immerhin 2 mm. (5€-conradservos). Das ist auf die dauer tierisch nervig, kann mir jemand sagen woran das liegt? wenn ich z.b. auf 0 fahre ruckelts nicht. die bascom-routine kann doch nicht SO schlecht sein.Code:$regfile = "m8def.dat" $crystal = 1000000 $baud = 4800 Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 1 Config Servos = 2 , Servo1 = Portc.0 , Servo2 = Portc.1 , Reload = 10 Config Portc = Output Enable Interrupts Dim A As Byte Dim B As Byte Servo(1) = 150 Servo(2) = 150 Schleife: Inputbin , A , B If A > 0 Then Servo(1) = A If B > 0 Then Servo(2) = B Goto Schleife
Lesezeichen