I have problem with the following program.
The problem is that I want to compare the subtract value between
Rsonar and Lsonar values, so first I did this
sonar1 = Rsonar - Lsonar
But it gave me some strange value when I use the debugger to display
the value of sonar1. As an example, when the value of Rsonar and
Lsonar were 27, the value for sonar1 was 117 (sometime, it displays
different number) while I expected 0 (zero), so I changed to oMath,
but still the value of sonar1 dosen't make any sense to me.
My experience with oopic is limited, so please help me.
Thank you,
TS
Dim Lsonar as New oA2D 'Left Sonar Sensor
Dim Rsonar as New oA2D 'Right Sonar Sensor
Dim Rmotor as New oServo 'Move the Right motor
Dim Lmotor as New oServo 'Move the Left motor
Dim Add1 as New oMath
Dim sonar1 as New oByte
Dim sonar2 as New oByte
Sub Main()
OOPic.Node = 1 'For debugging
Rsonar.IOLine = 6 'IOLine 6 for sensor
Lsonar.IOLine = 7 'IOLine 7 for sensor
Rsonar.Operate = cvTrue
Lsonar.Operate = cvTrue
Rmotor.IOLine = 21 'IOLine 21 for Right
Rmotor.Center = 22 'The "standard" center value
Rmotor.Operate = cvTrue
Lmotor.IOLine = 26 'IOLine 26 for Left
Lmotor.Center = 22 'The "standard" center value
Lmotor.Operate = cvTrue
Add1.Input1.Link(Rsonar) 'Get right sonar data
Add1.Input2.Link(Lsonar)
Add1.Output.Link(sonar1)
Add1.Mode = cvSubtract
Add1.Operate = cvTrue
Do
If sonar1 > 7 Then
Rmotor.Value = 26
Lmotor.Value = 26
Else
Rmotor.Value = 38
Lmotor.Value = 38
End If
Loop
End Sub
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:
No comments:
Post a Comment