Inmoov's Sensors

bhouston

Canada
Jump to end

Other robots from Synthiam community

Hazbot's Bob Built On Bits

Hazbot's Bob Built On Bits

This is Bob, our 3 ft tall house robot using the Ez-Robot kit and leftovers from plastering angle beads (lengths of...
Mcsdaver's 3D Printed Ez Robot Bob

Mcsdaver's 3D Printed Ez Robot Bob

I forgot to click Robot Showcase so I am starting over here with Bob. Bob is my 3d printed EZ robot built with EZ-Bits,...
Knusel's Johnny 5 Hannover

Knusel's Johnny 5 Hannover

I think Johnny 5 from Short Circuit doesnt need to be introduced anymore The project still has a long way to go, but...

ARC Pro

Upgrade to ARC Pro

Join the ARC Pro community and gain access to a wealth of resources and support, ensuring your robot's success.

#1  

Bob, you're inmoov is great! I am so jealous. well a little jealous. I am still in the process of getting everything working on my inmoov. I'm not up to your speed yet but might be one day. I don't think as great as yours though.

thanks for sharing your videos are awesome.

:)

#2  

@Bob, Very nice! I want to get this ability into my full size B9. Can you post the script for this and the link to any threads on how you installed these sensors?

Canada
#3  

Here's the script for the Ultrasonic Sensors. I used two HC-SR04 Ultrasonic Sensors from EZ-Robot. They come with a voltage regulator which make them easy hook up. In the script you specify which ports the Ping and the Echo are attached to. I'm using 2 EZBv4's and have have them connected to Board #1. The servo movements in the script turn the head of the robot.


  
$proxclose = 65 # Change for minimum distance

:start

$proxsenseL = GetPing(1.d0,1.d1)

IF($proxsenseL < $proxclose)
ControlCommand("Personality Generator", PauseOn)

servo(d1,112)
servospeed(d1,2)
sleep(1500)
ControlCommand("Script Manager", ScriptStart, "Look for a human")
servo(d1,160)
sleep(4000)
servo(d1,112)
ControlCommand("Personality Generator", PauseOff)

sleep(9000)
endif

$proxsenseR = GetPing(1.d2,1.d3) 
if($proxsenseR < $proxclose)
ControlCommand("Personality Generator", PauseOn)

servo(d1,112)
servospeed(d1,2)
sleep(100)
ControlCommand("Script Manager", ScriptStart, "Look for a human")

servo(d1,50)
sleep(4000)
servo(d1,112)
sleep(9000)
 ControlCommand("Personality Generator", PauseOff)

endif

Goto(start)

Let me know if you have any questions.

Login to post a comment