"Scrappy" the 10euro robotic arm

Let's Make Robots Robots
1

As a total moron, I've deleted the previous robot page while trying to clean some attachments

So, let's start again..

Steve the disembodied robotic arm as been a source of inspiration for me

I've found tons of nealy free micro servos on ebay.. so I decided to give a try

For more than a week now, I've been working on my excel simulator, and BS2 implementation of my inverse kinematics algorithm,

which is now able to reach a X,Y,Z target using 4 servos

I've just recieved the servos today ;)

So I took some foam board and tie wraps... to make something tangible

It's alive !

despites the fact that "on paper" the really low torque of those servos could lead it to be a total failure

makes noise

  • Actuators / output devices: SG90 micro servos
  • CPU: Basic Stamp 2
  • Power source: Boe Bot
This is a companion discussion topic for the original entry at https://community.robotshop.com/robots/show/scrappy-the-10euro-robotic-arm
2

sorry guys, I messed up and

sorry guys, I messed up and have deleted the complete robot page while trying to delete the attachments

here is a link I’d like to share with you :

http://freespace.virgin.net/hugo.elias/models/m_ik.htm

http://freespace.virgin.net/hugo.elias/models/m_ik2.htm

I really like the configuration space approach, but it’s probably much to heavy to run on a microcontroller

3

Connecting to PC
How are you interfacing with the PC/Excel? Are you using serial or usb? Just curious…

4

good ol’RS232

serial connection

for the moment my excel app. is using a m$ specific component,

But I’ve just tested what I’ve discussed in my boebot page : we can still access a serial port as a FILE !

windows scripting example (could be pasted “as is” in an excel macro)

set oFSO = CreateObject(“Scripting.FileSystemObject”)

set f = oFSO.OpenTextFile(“COM1:9600,N,8,1”, 1) ‘for Reading

’ f = oFSO.OpenTextFile(“COM1:9600,N,8,1”, 2) ‘for Writing

’ f.write(“abc”)

dim buffer

buffer=""

do until len(buffer)>250

Do While f.atendofstream <> true

buffer=buffer & f.readall

Loop

loop

msgbox buffer

f.close

I will continue tests on this license-troubles-free serial port connection in Excel