Go to Post A problematic dynamic and culture becomes apparent when failure persists for such a duration and reoccurs so frequently that students begin to accept it as the norm, and never learn the proper way to do things. - sanddrag [more]
Home
Go Back   Chief Delphi > Technical > Programming
CD-Media   CD-Spy  
portal register members calendar search Today's Posts Mark Forums Read FAQ rules

 
Closed Thread
 
Thread Tools Rate Thread Display Modes
  #1   Spotlight this post!  
Unread 06-02-2003, 20:31
rbayer's Avatar Unsung FIRST Hero
rbayer rbayer is offline
Blood, Sweat, and Code
no team (Teamless Orphan)
 
Join Date: Mar 2002
Rookie Year: 2001
Location: Minnetonka, MN
Posts: 1,087
rbayer is a glorious beacon of lightrbayer is a glorious beacon of lightrbayer is a glorious beacon of lightrbayer is a glorious beacon of lightrbayer is a glorious beacon of light
Send a message via AIM to rbayer
There's a good example in the whitepapers section that you can get here. Other than that, there have been a few threads on this topic recently. Here's a few I've managed to dig up:

http://www.chiefdelphi.com/forums/sh...threadid=16452
http://www.chiefdelphi.com/forums/sh...threadid=15891
http://www.chiefdelphi.com/forums/sh...threadid=16994


If you just want to see some code quickly, here's a sample:

Code:
loopCnt VAR word
loopCnt=0
DO
SERIN...
IF auton_mode = 1 THEN 
	loopCnt=loopCnt+1
	SELECT loopCnt
		CASE <50
			PWM1=254
			PWM2=254
		CASE 50 TO 149
			PWM1=127
			PWM2=254
		CASE 150 TO 219
			PWM1=1
			PWM2=1
		CASE 220 TO 249
			PWM1=127
			PWM2=254
		CASE ELSE
			PWM1=127
			PWM2=127
			PWM3=127
			PWM4=127
	ENDSELECT

ELSE
	PWM1 = (((2000 + p1_y - p1_x + 127) Min 2000 Max 2254) - 2000)
	PWM2 = (((2000 + p1_y + p1_x - 127) Min 2000 Max 2254) - 2000)
ENDIF

SEROUT ....
LOOP
This will cause the robot to go forward, turn, go backwards, turn the other way and then stop. After autonomous mode ends, you will have normal one-joystick drive control. Let me know if you have any questions via PM/email or here.

--Rob
__________________
New C-based RoboEmu2 (code simulator) available at: http://www.robbayer.com/software.php
Closed Thread


Thread Tools
Display Modes Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Programming Compatition Angela06 Programming 30 08-04-2005 23:12
Hooking up Controller to computer for programming. Dragon45 General Forum 3 30-01-2003 00:22
Pneumatics electrical wiring and programming archiver 2001 1 23-06-2002 23:10
Error found in programming for the pump and pressure switch sjharobotics Programming 4 06-02-2002 17:46
pbasic programming punarhero Programming 4 21-01-2002 23:32


All times are GMT -5. The time now is 05:14.

The Chief Delphi Forums are sponsored by Innovation First International, Inc.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Copyright © Chief Delphi