Comments on: Boe-Bot infrared eyes http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/ Fri, 09 Jan 2009 21:12:15 +0000 http://wordpress.org/?v=2.6.1 By: moon http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/#comment-13429 moon Mon, 05 Jan 2009 20:52:12 +0000 http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/#comment-13429 I need to ask a question : if I need to save the path of the boe bot in an array then retrieve the path without using the IR sensor how can I do it?? I need to ask a question :
if I need to save the path of the boe bot in an array then retrieve the path without using the IR sensor
how can I do it??

]]> By: fouldsy http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/#comment-13183 fouldsy Sat, 25 Oct 2008 02:28:45 +0000 http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/#comment-13183 I think this was it. Basically right out the Parallax book (formatting isn't too good in the comments section for code, sorry): ' Robotics with the Boe-Bot - FastIRRoaming.bs2 ' Higher performance IR object detection assisted navigation ' {$STAMP BS2} ' {$PBASIC 2.5} ' Variables irDetectLeft VAR BIT irDetectRight VAR BIT pulseLeft VAR WORD pulseRight VAR WORD ' Signal program start/reset FREQOUT 4, 1000, 3000 ' Main routine DO FREQOUT 8, 1, 38500 irDetectLeft = IN9 FREQOUT 2, 1, 38500 irDetectRight = IN0 IF (irDetectLeft = 0) AND (irDetectRight = 0) THEN pulseLeft = 650 pulseRight = 650 HIGH 1 HIGH 10 ELSEIF (irDetectLeft = 0) THEN pulseLeft = 850 pulseRight = 850 HIGH 10 LOW 1 ELSEIF (irDetectRight = 0) THEN pulseLeft = 650 pulseRight = 650 HIGH 1 LOW 10 ELSE pulseLeft = 823 pulseRight = 650 LOW 1 LOW 10 ENDIF PULSOUT 13,pulseLeft PULSOUT 12,pulseRight PAUSE 15 LOOP I think this was it. Basically right out the Parallax book (formatting isn’t too good in the comments section for code, sorry):

‘ Robotics with the Boe-Bot - FastIRRoaming.bs2
‘ Higher performance IR object detection assisted navigation

‘ {$STAMP BS2}
‘ {$PBASIC 2.5}

‘ Variables
irDetectLeft VAR BIT
irDetectRight VAR BIT
pulseLeft VAR WORD
pulseRight VAR WORD

‘ Signal program start/reset
FREQOUT 4, 1000, 3000

‘ Main routine
DO
FREQOUT 8, 1, 38500
irDetectLeft = IN9
FREQOUT 2, 1, 38500
irDetectRight = IN0

IF (irDetectLeft = 0) AND (irDetectRight = 0) THEN
pulseLeft = 650
pulseRight = 650
HIGH 1
HIGH 10
ELSEIF (irDetectLeft = 0) THEN
pulseLeft = 850
pulseRight = 850
HIGH 10
LOW 1
ELSEIF (irDetectRight = 0) THEN
pulseLeft = 650
pulseRight = 650
HIGH 1
LOW 10
ELSE
pulseLeft = 823
pulseRight = 650
LOW 1
LOW 10
ENDIF

PULSOUT 13,pulseLeft
PULSOUT 12,pulseRight

PAUSE 15

LOOP

]]> By: moon http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/#comment-13166 moon Fri, 24 Oct 2008 13:04:50 +0000 http://www.fouldsy.com/2008/06/30/boe-bot-infrared-eyes/#comment-13166 that was imazing .. can you post the code please..??.. best regards.. that was imazing ..
can you post the code please..??..

best regards..

]]>