Simple Servo Position Control Program - Is this right?

[El_AMPo]

I've made some code that might help you.
It was for a high voltage SPDT servo switch for my research.

It sends a 1 second burst signal to the servo and then release it.
Usually thats more than enough time for the servo to react

'//ON INITIAL CONFIG
A      VAR BYTE  'counter
SerPos var word  'servo position variable

sers var PORTB.0 'servo signal pin out

'//ON MAIN PROGRAM ROUTINE
'-Set servo position
serpos = 1300 'uS   pulse width: 0º -> 1000uS / 180º -> 2000uS
gosub servout 'send pulse for 1 second

'//ON SUBROUTINES
servOUT: 'sends servo a PWM position signal for 1 sec.
for a = 0 to 59  '60hz
    Sers = 1
    pauseus serpos
    Sers = 0
    PAUSEUS 2000-serpos '2ms TOTAL
    pauseus 14667 '2+14.667ms = 16.667ms -> 60hz  -> 1seg total refresh time
next a

return

[marcusvm]

Not to bring up a dead subject, and I am not sure if anybody is going to have any interest in helping out. But if I am using a code similar to Alain's that he posted above ^^^, how can I slow down the movement of the servo? Basically, the servo goes straight from one point to another. I want to add something that will make it so that rather then jumping from position one to position two and back again that it takes, say 10 seconds, to gradually move from position one to position two. I have an idea in mind to basically have it move from say position 200 to 300 by 1 every .1 seconds so that after 10 seconds it has reached the second position. I would think a counting function or something would work so that it would go

IF I >= 50 THEN
position=200
pause 100
position=201
pause 100
position=202
pause 100
...
 ELSE 
  POSITION = 200
 ENDIF

And if that is what it takes that I need to type out the whole process count down then so be it. But I would think there would be an easier option..

Application: My problem right now is that there is a 4 inch piece of copper rod on the servo with a ceramic insulator attached to the end of that copper arm. So whenever it moves from position one to position two, the momentum of the mass of the ceramic insulator is causing the servo to overshoot its programmed position. Maybe its a servo issue, but I thought I would start with this.

Any thoughts or help?

[Ioannis]

Simple solution:

For position=start to finish
    pause 100 
    gosub Servo_Control
Next position

Ioannis

[marcusvm]

Ioannis, would you mind explaining that code a little bit to me? I'm a bit of a newbie and haven't dealt with a lot of different code. Is it as simple as copy and pasting in ....

For position=start to finish
    pause 100 
    gosub Servo_Control
Next position

Or are there values for start and finish? and is

gosub Servo_Control

another program loop? If so what for? Sorry if this is a simple code and I am being an idiot.

Thanks.

-Marcus