Page 270 - Amphibionics : Build Your Own Biologically Inspired Robot
P. 270

Amphibionics 06  3/24/03  9:02 AM  Page 249
                                                                                   PROGRAM 6.5
                          while limit_left = 0
                                                                                   walk-routines.bas
                          wend         Chapter 6 / Crocobot: Build Your Own Robotic Crocodile
                                                                                   program listing
                                                                                   (continued)
                          low enable_left
                          low reverse_left
                          ' move right leg
                          high enable_right
                          high reverse_right
                          pause 300

                          while limit_right = 0
                          wend

                          low enable_right
                          low reverse_right

                          next temp

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


                        turn_right:

                        For temp = 1 to 5

                          ' move left leg

                          high enable_left
                          high forward_left
                          pause 300


                          while limit_left = 0
                          wend

                          low enable_left
                          low forward_left


                                                                                                 249
   265   266   267   268   269   270   271   272   273   274   275