Robot Arm

An example of a robot arm.

Program


---

Robot Arm Program

---


prog_vars =

d/count 0

d/color 0

d/ledno 1

prog_vars.


prog_start =

print "Program Start"

sledn 7

-- Setup arm buttons

btp u1 svp a1 0

btp u2 svp a1 50

btp u3 svp a2 0

btp u4 svp a2 80

d/posa1 0

d/posa2 0

repeat 12 ->

svp a1 /posa1

svp a2 /posa2

d250

inc /posa1 5

inc /posa2 5

"pos /posa1"

repeat.

repeat 12 ->

svp a1 /posa1

svp a2 /posa2

d250

dec /posa1 5

dec /posa2 5

repeat.

prog_start.


prog_loop =

sled /ledno /color

inc /ledno

inc /color

any /ledno >= 7 -> /ledno 1

any /color >= 15 -> /color 0

prog_loop.

prog_stop =

print "Bye"

prog_stop.