Stingray Code by Steve Norris

Whit · 2010-03-12 22:18

Hey All,

In the May/June issue of Robot Magazine, James H. Phelan, MD did a great review of the Stingray. Attached to that article was a review by Steve Norris titled, "The Parallax Stingray - a so-called "expert's" review" Well, Steve Norris is an expert. Check out his website at http://www.norrislabs.com/·if you have any doubts.

Anyway, Steve promised in his article to post some of his·code for the Stingray - It is now ready for download at www.botmag.com·at this link http://www.botmag.com/source-code/StingrayDemos.zip

Take a look - it is an education. Thanks Steve!

P.S. This is the same issue with a review of the PropScope (by Steve too) and an article called "Basic Transportation" by erco (aka Eric Ostendorff)·featuring his Retrobot. His code is also now ready to download too.

▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Whit+

"We keep moving forward, opening new doors, and doing new things, because we're curious and curiosity keeps leading us down new paths." - Walt Disney

Post Edited (Whit) : 3/12/2010 10:26:53 PM GMT

Roy Eltham · 2010-03-12 22:39

That issue was awesome. Erco's bot, the stingray and the prop scope. The PropScope article finally convinced me to go ahead and get one to replace the ancient old scope I have, and with the stuff I am getting myself into with electronics lately, I'm going to need it.

I'll check out that Stingray code tonight.

▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Check out the Propeller Wiki·and contribute if you can.

wyzard28 · 2010-04-05 16:38

Norris' Stingray code seems incomplete. I compiled and loaded my Stingray with it and it just sits there, pings pinging, but no go. There's a GO method that's never accessed. Perhaps that's the problem?
I'm not using RF, but I believe the code is designed to work without it.

Shouldn't there be a GoFWD method that invokes the Go method i.e.:

    if m_Auto
      Blocked(1)
      Avoid(2)
      AvoidWall(3)
'     GoFWD(4 )             ' <== Should this method call go here?


PRI GoFWD(priority)
  if m_CurrentPriority => Priority
    if m_CurrentDir == Mov_Rev                          ' to be on the safe side, may never happen.
      Halt

      ' Disable all lower priority behaviors
      m_CurrentPriority := Priority
      DispMsg(string("Reversing Dir"))
   elseif m_CurrentDir == Mov_Halt
      Go
      m_CurrentPriority := Priority
      DispMsg(string("Moving Forward"))
   else
      ' Release control
      m_CurrentDir := Mov_Fwd
      DispMsg(string(" "))

norris56 · 2010-04-06 15:15

The code would be incomplete if you removed the RF section. It is there that I initiate the forward command from my remote control. I use the remote control to override the behaviors. Your solution is a good one if you want the robot to start up on its own.

The code was meant as and example of the behavior based framework I use for all my robots. I leave it up to the reader to build their own robust behaviors based on the type of mission they wish their machine to perform.

▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Steve Norris

www.norrislabs.com

Stingray Code by Steve Norris

Comments