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.