Page 269 - Amphibionics : Build Your Own Biologically Inspired Robot

Amphibionics 06 3/24/03 9:02 AM Page 248
PROGRAM 6.5
walk-routines.bas
program listing ' move left leg Amphibionics
(continued) high enable_left
high reverse_left
pause 300
while limit_left = 0
wend

low enable_left
low reverse_left

' move right leg

high enable_right
high forward_right
pause 300

while limit_right = 0
wend

low enable_right
low forward_right

next temp

'------------------------------------------------------------------------------------------------------------------------------

walk_reverse:

For temp = 1 to 5

' move left leg

high enable_left
high reverse_left
pause 300

248