Kondo KRS ICS Servos icon Kondo KRS ICS Servos Control Kondo KRS ICS2/3.5 servos via EZ-B UART; experimental, untested. Supports chaining, virtual servo ports, Release() and Servo() commands. Try it →
New Zealand
LinkedIn Thingiverse Twitter Google+ YouTube
Asked — Edited

Face Recognition Script

When I ask for input for one reason or another from a human I use this script to check before I have my robot speak It returns a $Face_Found=1 (YES) if it finds a human after about 5-10 seconds.

----------------------------------------------|

Visual Confirmation of Human Presence |

----------------------------------------------|

Print ("+-----------------------------+") Print ("| Checking for human presence |") Print ("+-----------------------------+")

Initialise Variables

$CameralsTracking=0 $count_down=20000 ControlCommand("Camera", CameraFaceTracking)

Start the sequence

Print("Scanning for faces....") ControlCommand("Camera", CameraFaceTrackingEnable) :Find_face $count_down=$count_down-1 $Face_found=$CameraIsTracking

Print("Scan $count_down")

IF ($count_down<=0) Print ("No faces visible!") Goto (Face_Check_Complete) ELSEIF ($Face_found=0) goto (Find_Face) ELSEIF ($Face_found=1) Print("Face located...") ControlCommand("Camera", CameraSnapshot) Print("Image recorded.") Goto (Face_Check_Complete) ENDIF

:Face_Check_Complete Print ("Scan completed!")

ControlCommand("Camera", CameraFaceTrackingDisable) halt()


ARC Pro

Upgrade to ARC Pro

Stay at the forefront of robot programming innovation with ARC Pro, ensuring your robot is always equipped with the latest advancements.

Author Avatar
United Kingdom
LinkedIn Twitter Google+ YouTube
#1  

These are great, loads of ideas on how to do things in scripts. I'm sure I will be borrowing parts for my code.

Author Avatar
New Zealand
LinkedIn Thingiverse Twitter Google+ YouTube
#2  

Glad to be able to give back....