Hallo,
hier das Programm:
P.S.: Das ist die gekürzte formCode:$regfile = "m32def.dat" $crystal = 16000000 $framesize = 32 $swstack = 32 $hwstack = 32 Config Servos = 6 , Servo1 = Portb.0 , Servo2 = Portb.4 , Servo3 = Portb.1 , Servo4 = Portb.2 , Servo5 = Portb.3 , Servo6 = Portb.4 , Reload = 5 Config Portb = Output Dim Variable As Byte Enable Interrupts Do Servo(1) = 97 Servo(2) = 97 Servo(3) = 100 Servo(4) = 97 Servo(5) = 100 Servo(6) = 100 Wait 5 Loop End
Viele Grüße
Lesezeichen