Inmoov Doing Math

bhouston

Canada
Skip to comments   Jump to end

A short video of my InMoov doing math. Thanks to the Community Members who helped me out with the script for this using my EZ-B v4 and ARC

By — Last update
Jump to end

Other robots from Synthiam community

Markthebotbldr's What Should I Name This Robot?

Markthebotbldr's What Should I Name This Robot?

Controller IO Tiny Robot Roomba Red Poppy the Robot Head Temp sensor Light sensor Purpose: amuse the Cat.
JT's Jts Robie Sr.

JT's Jts Robie Sr.

Its about time I jumped in the pool. Just dont expect too big of a splash at first! Got this Robie SR. off eBay back in...
Justinratliff's Redbender

Justinratliff's Redbender

Robot Name: RedBender Purpose: To be used as a small test platform for testing ideas and developing my software ideas...

ARC Pro

Upgrade to ARC Pro

Synthiam ARC Pro is a new tool that will help unleash your creativity with programming robots in just seconds!

#1  

@Bob... Simply awesome!... Every time I see your videos of inMoov, it never fails to seriously impress me... :)

Trinidad/Tobago
#3  

That is so wicked:D but what happens if he doesn't have enough fingers for the number? lol

PRO
Synthiam
#4  

I'm speechless - absolutely blown away!

Belgium
#5  

Unbelievable ! You're a true robot master !

#6  

So cool! I gotta build one of these for sure! Very sweet!

Canada
#7  

Here's the main script for "Doing Math". There are several sub-scripts that need to go with this but working off of this main script you should be able to make your own sub-scripts to suit your robot. Let me know if you need any additional information.


Say("ok, I like doing math")
ControlCommand("Script Manager", ScriptStart, "Repeat speech3")

sleep(500)
ControlCommand("Script Manager", ScriptStart, "Do math")
sleep(5000)
say("ready")
ControlCommand("Script Manager", ScriptStart, "repeat speech 1")

:start
$heard = "speech"
WaitForChange($heard)
if($Heard = "won")
$x = 1
elseif($heard="two")
$x = 2
elseif($heard ="three")
$x = 3
elseif($heard = "four")
$x = 4
elseif($heard = "five")
$x = 5

endif

WaitForChange($heard)
if($heard = "plus one")
$y = 1
elseif($heard = "plus two")
$y = 2
elseif($heard ="plus three")
$y = 3
elseif($heard ="plus four")
$y = 4
elseif($heard = "plus five")
$y = 5
#print($x + $y)
EndIf

WaitForChange($heard)
if($heard = "what does that equal")
servo(d0,150)
servospeed(d0,3)
servo(d1,90)
servospeed(d1,3)
say("ummm")
ControlCommand("Script Manager", ScriptStart, "repeat speech 1")

ControlCommand("Script Manager", ScriptStart, "Close right Hand")
ControlCommand("Script Manager", ScriptStart, "Close left hand")
Sleep(2500)
Servo(d0,116)
servospeed(d0,3)
servo(d1,118)
servospeed(d1,3)
sleep(2000)
$sum = Abs($x + $y)
Say($x + " plus " + $y + " equals " + $sum)
ControlCommand("Script Manager", ScriptStart, "Repeat speech3")

endif

#print($x + $y)

if($sum = 2)
ControlCommand("Script Manager", ScriptStart, "equals two")
elseif($sum = 3)
ControlCommand("Script Manager", ScriptStart, "equals three")
elseif($sum = 4)
ControlCommand("Script Manager", ScriptStart, "equals four")
elseif($sum = 5)
ControlCommand("Script Manager", ScriptStart, "equals five")
elseif($sum = 6)
ControlCommand("Script Manager", ScriptStart, "equals six")
elseif($sum = 7)
ControlCommand("Script Manager", ScriptStart, "equals seven")
elseif($sum =8)
ControlCommand("Script Manager", ScriptStart, "equals seven")
elseif($sum = 9)
ControlCommand("Script Manager", ScriptStart, "equals nine")
elseif($sum = 10)
ControlCommand("Script Manager", ScriptStart, "equals ten")
endif

sleep(4000)
ControlCommand("Script Manager", ScriptStart, "Close right Hand")
ControlCommand("Script Manager", ScriptStart, "Close left hand")
Sleep(500)

GoTo(start)
Login to post a comment