注:本文章文字,图片部分来自网络
版权归原作者,侵删。
爱普生工业机器人诞生。当时,爱普生工厂自动化业务部开始在世界范围内与其它制造商分享其在高精密小型零部件组装领域的专业知识。创立爱普生工业机器人的*初目的是满足内部自动化需求,却迅速获得了全球许多*高水准的制造工厂的认可。在过去26年里,爱普生工业机器人一直是小型部件组装作业领域的领导者,其中包括基于PC的控件、紧凑型SCARA机器人等。
EPSON 自带CCD图像处理包的典型应用框架
EPSON 自带CCD图像处理包的典型应用框架
Function main
'********************************************
' Very import ant statement below: Use the * //非常重要的是在实际运行时,用合适的Z数值代替预定义的 ZHeight 。
' Z height which you wrote down earlier in *
' Step 3 of "Teaching Robot Points for use *
' with Vision Guidance. Substitute the *
' Z height value (a negative number) which *
' you wrote down in the place of the xx *
' shown below. *
'********************************************
#define ZHeight -xx
Real area, x, y, u
Boolean found
Integer answer
String msg$, answer$
Power Low 'Run robot at a slow speed and accel
Tool 1 'Use Tool 1 for positioning
Jump safept 'Move robot to safe start position
Do 'Continue looping until user stops
Jump camshot 'Move robot to take picture
VRun blobtut 'Run the vision sequence blobtut
VGet blobtut.washer.RobotXYU, found, x, y, u
If found = TRUE Then //判断 found 的值很重要,在将机器人移动到装配位置之前,判断是否找到了要装配的工件。如果没找到,进行另外的分支处理。
VGet blobtut.washer.area, area
Print "The washer was found!"
Print "The washerarea is: ", area, "Pixels"
washpos = XY(x, y, ZHeight, u) 'Set pos to move to
Jump washpos
msg$ = "The washer was found!"
Else
msg$ = "The washer was not found!"
EndIf
msg$ = msg$ + Chr$(B) + Chr$(10) + "Run another cycle(Y/N)?"
Print msg$
input answer$
If Ucase$(answer$)<> "Y" Then
Exit Do
EndIf
Loop
Fend
工博士提供了FANUC, Yaskawa, ABB,Kawasaki和 KUKA等各种新型机器人 。我们相信,我们真正地在协助第四次工业革命的进步,并为所有涉及机器人技术的人们增加优势和收益!如果您想获得更多信息,请在线或致电与我们联系 。
了解更多可点击咨询:爱普生机器人服务商
原文链接:https://blog.csdn.net/PINBODEXIAOZHU/article/details/43676143