[oopic] control servo via serialport

I'm trying to control a servo using data coming from the serialport.
The code is as follows:
***********************************
Dim SR As New oServoSP
Dim SP As New oSerialH
Dim i As New oWord

Sub Main()
ooPIC.Delay = 4000
SR.IOLine = 30
SR.Operate =cvTrue
SP.Baud = cv9600
SP.Operate = cvTrue
SR = 0
Do
If SP.Received = cvTrue Then
i.Value = SP.Value
SP.Value = i.Value
SR.Speed = SP.Value
End If
Loop
End Sub
*********************************

The problem is that the servo does not move coresponding to the
correct value sent to the serial port.

How do you convert the incoming ascii data into a string that can be
used to control the servo?

Please help!

Regards,
Angelo

------------------------------------

Yahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/oopic/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/oopic/join
(Yahoo! ID required)

<*> To change settings via email:
mailto:oopic-digest@yahoogroups.com
mailto:oopic-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
oopic-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/