Page 336 - Amphibionics : Build Your Own Biologically Inspired Robot
P. 336
Amphibionics 07 3/24/03 9:13 AM Page 315
PROGRAM 7.7
endif
avoidance.bas program
endif gosub turn_right Chapter 7 / Turtletron: Build Your Own Robotic Turtle
listing (continued)
gosub forward
goto start
'------------------------------------------------------------------------------------------------------------------------------
' movement subroutines
forward:
high enable_left
high forward_left
high enable_right
high forward_right
pause 50
low enable_left
low forward_left
low enable_right
low forward_right
return
'------------------------------------------------------------------------------------------------------------------------------
turn_left:
high enable_left
high forward_left
high enable_right
high reverse_right
pause 300
low enable_left
315
