; Experiment-20-Standard-Servo-Motor.bas #picaxe 28X2 ; Define the MCU ; Declare Constants, Variables and Devices * * * * * * * * * * * * * * * symbol srvPIN = B.0 init: servo srvPIN,150 ; start servo centered on B.4 = Pin 10 ; BEGIN Standard Servo Main Body * * * * * * * * * * * * * * * do gosub srvoC ; Move Standard Servo to Center pause 1000 gosub srvoR ; Move Standard Servo to Right pause 1000 gosub srvoC ; Move Standard Servo to center pause 1000 gosub srvoL ; Move Standard Servo to Left pause 1000 loop ; END Standard Servo Main Body * * * * * * * * * * * * * * * * end ; BEGIN Standard Servo Subroutines * * * * * * * * * * * * * * * srvoL: servopos srvPIN,250 ; Move Servo to Left Position return srvoC: servopos srvPIN,150 ; Move Servo to Center Position return srvoR: servopos srvPIN,50 ; Move Servo to Right Position return ; END Standard Servo Subroutines * * * * * * * * * * * * * * * * end