YAMAHA机器人视觉程序

发布时间:2024-8-30 12:03:23|来源: 雅马哈/YAMAHA

  [PGM]

  NAME=SHIFT

  PGN=1

  '===================声明数组============

  DIM PPS$(5)

  DIM PPX$(5)

  DIM PPY$(5)

  DIM PPR$(5)

  DIM PPX!(5)

  DIM PPY!(5)

  DIM PPR!(5)

  A%=1

  '=======================================

  *A:

  DO2()=0

  MOVE P,P0,Z=0.00

  WAIT ARM

  '======================================

  MOVE P,P101,Z=0.00    '1拍照位置

  WAIT ARM

  '======================================

  *PAIZHAO1:

  SEND "AA" TO GP1

  SEND GP1 TO DATA$

  PRINT "DATA$=",DATA$

  PPS$(1)=MID$(DATA$,1,2)

  IF PPS$(1)="OK" THEN

  GOTO *PAIZHAOOK1

  ENDIF

  IF PPS$(1)="NG" THEN

  DELAY 100

  GOTO *PAIZHAO1

  ENDIF

  '======================================

  *PAIZHAOOK1:

  PPX$(1)=MID$(DATA$,3,8)

  PPY$(1)=MID$(DATA$,11,8)

  PPR$(1)=MID$(DATA$,19,8)

  PPX!(1)=VAL(PPX$(1))

  PPY!(1)=VAL(PPX$(1))

  PPR!(1)=VAL(PPX$(1))

  LOC1(P11)=PPX!(1)

  LOC2(P11)=PPY!(1)

  LOC4(P11)=PPR!(1)

  LOC3(P11)=20.00

  '========================================

  MOVE P,P102,Z=0.00    '2拍照位置

  WAIT ARM

  '======================================

  *PAIZHAO2:

  SEND "AB" TO GP1

  SEND GP1 TO DATA$

  PPS$(2)=MID$(DATA$,1,2)

  PRINT "DATA$=",DATA$

  IF PPS$(2)="OK" THEN

  GOTO *PAIZHAOOK2

  ENDIF

  IF PPS$(2)="NG" THEN

  DELAY 100

  GOTO *PAIZHAO2

  ENDIF

  '=====================================

  *PAIZHAOOK2:

  PPX$(2)=MID$(DATA$,3,8)

  PPY$(2)=MID$(DATA$,11,8)

  PPR$(2)=MID$(DATA$,19,8)

  PPX!(2)=VAL(PPX$(2))

  PPY!(2)=VAL(PPX$(2))

  PPR!(2)=VAL(PPX$(2))

  LOC1(P12)=PPX!(2)

  LOC2(P12)=PPY!(2)

  LOC4(P12)=PPR!(2)

  LOC3(P12)=20.00

  '=========================================

  '=============偏移公式计算偏移S1============

  DLTX1=LOC1(P2)-LOC1(P1)

  DLTY1=LOC2(P2)-LOC2(P1)

  ANG1=ATN(DLTY1/DLTX1)

  DLTX11=LOC1(P12)-LOC1(P11)

  DLTY11=LOC2(P12)-LOC2(P11)

  ANG11=ATN(DLTY11/DLTX11)

  THETA=ANG11-ANG1

  LOC1(P1001)=LOC1(P1)*COS(THETA)-LOC2(P1)*SIN(THETA)

  LOC2(P1001)=LOC1(P1)*SIN(THETA)+LOC2(P1)*COS(THETA)

  DSTX1=LOC1(P11)-LOC1(P1001)

  DSTY1=LOC2(P11)-LOC2(P1001)

  LOC1(P1002)=LOC1(P2)*COS(THETA)-LOC2(P2)*SIN(THETA)

  LOC2(P1002)=LOC1(P2)*SIN(THETA)+LOC2(P2)*COS(THETA)

  DSTX2=LOC1(P12)-LOC1(P1002)

  DSTY2=LOC2(P12)-LOC2(P1002)

  DSTX=(DSTX1+DSTX2)/2

  DSTY=(DSTY1+DSTY2)/2

  LOC1(S1)=LOC1(S0)+DSTX

  LOC2(S1)=LOC2(S0)+DSTY

  LOC4(S1)=LOC4(S0)+RADDEG(THETA)

  LOC3(S1)=20.00

  '================================================

  '================================================

  *MAIN:

  FOR B%=1 TO 32

  C%=B%+499

  P[C%]=P0

  NEXT

  '======================================

  FOR B%=1 TO 32

  C%=B%+499

  P[C%]=PPNT(0,B%)

  NEXT

  '=======================================

  MOVE P,P103,Z=0.00      '3拍照位置

  WAIT ARM

  '=======================================

  *PAIZHAO3:

  SEND "AC" TO GP1

  SEND GP1 TO DATA$

  PPS$(3)=MID$(DATA$,1,2)

  PRINT "DATA$=",DATA$

  IF PPS$(3)="OK" THEN

  GOTO *PAIZHAOOK3

  ENDIF

  IF PPS$(3)="NG" THEN

  DELAY 100

  GOTO *PAIZHAO3

  ENDIF

  '=======================================

  *PAIZHAOOK3:

  PPX$(3)=MID$(DATA$,3,8)

  PPY$(3)=MID$(DATA$,11,8)

  PPR$(3)=MID$(DATA$,19,8)

  PPX!(3)=VAL(PPX$(3))

  PPY!(3)=VAL(PPX$(3))

  PPR!(3)=VAL(PPX$(3))

  LOC1(P13)=PPX!(3)

  LOC2(P13)=PPY!(3)

  LOC4(P13)=PPR!(3)

  LOC3(P13)=20.00

  SHIFT S0

  MOVE P,P13,Z=0.00       '走到吸料位

  WAIT ARM

  DO(23)=1                '吸料

  DELAY 100

  '=========================================

  MOVE P,P104,Z=0.00      '4拍照位置,矫正

  WAIT ARM

  '=======================================

  *PAIZHAO4:

  SEND "AD" TO GP1

  SEND GP1 TO DATA$

  PPS$(4)=MID$(DATA$,1,2)

  PRINT "DATA$=",DATA$

  IF PPS$(4)="OK" THEN

  GOTO *PAIZHAOOK4

  ENDIF

  IF PPS$(4)="NG" THEN

  DELAY 100

  GOTO *PAIZHAO4

  ENDIF

  '=====================================

  *PAIZHAOOK4:            '二次矫正拍照,固定相机

  PPX$(4)=MID$(DATA$,3,8)

  PPY$(4)=MID$(DATA$,11,8)

  PPR$(4)=MID$(DATA$,19,8)

  PPX!(4)=VAL(PPX$(4))

  PPY!(4)=VAL(PPX$(4))

  PPR!(4)=VAL(PPX$(4))

  LOC1(P14)=PPX!(4)

  LOC2(P14)=PPY!(4)

  LOC4(P14)=PPR!(4)

  LOC3(P14)=20.00

  SHIFT S0

  MOVE P,P14,Z=0.00              '矫正角度

  WAIT ARM

  '=====================================

  SHIFT S1

  MOVE P,P[A%+499],Z=0.00

  WAIT ARM

  DO(23)=0

  '====================================

  SHIFT S0

  MOVE P,P105,Z=0.00      '5拍照位置

  WAIT ARM

  '===================================

  *PAIZHAOOK5:

  SEND "AE" TO GP1

  SEND GP1 TO DATA$

  PPS$(5)=MID$(DATA$,1,2)

  PRINT "DATA$=",DATA$

  IF PPS$(5)="OK" THEN

  GOTO *PAIZHAOOK5

  ENDIF

  IF PPS$(5)="NG" THEN

  DELAY 100

  GOTO *PAIZHAO6

  ENDIF

  '==================================

  *PAIZHAO6:

  PPX$(5)=MID$(DATA$,3,8)

  PPY$(5)=MID$(DATA$,11,8)

  PPR$(5)=MID$(DATA$,19,8)

  PPX!(5)=VAL(PPX$(5))

  PPY!(5)=VAL(PPX$(5))

  PPR!(5)=VAL(PPX$(5))

  LOC1(P15)=PPX!(5)

  LOC2(P15)=PPY!(5)

  LOC4(P15)=PPR!(5)

  LOC3(P15)=20.00

  SHIFT S0

  MOVE P,P15,Z=0.00       '走到吸料位

  WAIT ARM

  DO(23)=1                '吸料

  DELAY 100

  '======================================

  MOVE P,P104,Z=0.00      '4拍照位置,矫正,固定相机

  WAIT ARM

  '=======================================

  *PAIZHAO4:

  SEND "AD" TO GP1

  SEND GP1 TO DATA$

  PPS$(4)=MID$(DATA$,1,2)

  PRINT "DATA$=",DATA$

  IF PPS$(4)="OK" THEN

  GOTO *PAIZHAOOK4

  ENDIF

  IF PPS$(4)="NG" THEN

  DELAY 100

  GOTO *PAIZHAO4

  ENDIF

  '=====================================

  *PAIZHAOOK4:            '二次矫正拍照

  PPX$(4)=MID$(DATA$,3,8)

  PPY$(4)=MID$(DATA$,11,8)

  PPR$(4)=MID$(DATA$,19,8)

  PPX!(4)=VAL(PPX$(4))

  PPY!(4)=VAL(PPX$(4))

  PPR!(4)=VAL(PPX$(4))

  LOC1(P14)=PPX!(4)

  LOC2(P14)=PPY!(4)

  LOC4(P14)=PPR!(4)

  LOC3(P14)=20.00

  SHIFT S0

  MOVE P,P14,Z=0.00     '矫正角度

  WAIT ARM

  A%=A%+1

  SHIFT S1

  MOVE P,P[A%+499],Z=0.00

  WAIT ARM

  DO(23)=0

  A%=A%+1

  IF A%=33 THEN

  A%=1

  GOTO *A

  ENDIF

  GOTO *MAIN

  [GEP]

  GP1

  MODE=1

  IPADRS=192.168.0.5

  PORT=5

  EOL=0

  TYPE=0

  [END]

                  

更多相关内容
喷涂机器人的种类特点——雅马哈 喷涂机器人的种类特点——雅马哈

1、有气喷涂机器人   有气喷涂机器人也称低压有气喷涂,喷涂机依托低压空气使油漆在喷出枪口后构成雾化气流作用于物体外表(墙面或木器面),有气喷涂相对于手刷而言无刷痕,并且平面相对均 ...

工业机器人关节减速器作用——雅马哈 工业机器人关节减速器作用——雅马哈

工业机器人要害减速器的作用   工业机器人的操作主要靠伺服电机、减速器和操控器三个部件进行操控,其中减速器用于精准操控机器人关节的运动,传递更大的扭矩。目前,常见的减速器主要分为两 ...

AGV与AMR的区别——雅马哈机器人 AGV与AMR的区别——雅马哈机器人

两种自动化体系是客户进行货品/托盘移动的首选:自动导向车(AGV)和自主移动机器人(AMR)。AGV现已存在了很长一段时间,随着时间的推移,其功能和技能都在大幅度进步,而AMR在逐步受到关注。    ...

工业机器人应用误区——雅马哈机器人 工业机器人应用误区——雅马哈机器人

机器人出资一般从几万到百万美元,在第一时间作出正确的挑选并且防止常见的过错是十分重要的,因为过错将导致不必要的开支或许任务的延期。   误区一:轻视了有用负荷和惯性   机器人用户 ...

工业机器人预防性保养——雅马哈机器人 工业机器人预防性保养——雅马哈机器人

每台机器人都需求预防性保养,这样能够确保它们在出产线上保持最佳性能和完成一致性。当机器人没有进行定期的预防性保养查看,可能会导致零部件损坏或故障,然后致使出产怠慢乃至停机。对机器人 ...

雅马哈能花式开摩托的机器人 雅马哈能花式开摩托的机器人

不是放了个机器人上去,是真的在开车!   据科技网站Engadget报道,雅马哈近来发布了一款名为MotoBot的机器人,它可以像人类一样驾驭超级摩托车。也许不必 ...

雅马哈机器人伺服器设置步骤 雅马哈机器人伺服器设置步骤

1、测验一下电机,任何电路也不必衔接,把电机的三根线恣意两根短路在一起,用手滚动电机轴,感觉起来有阻力,那就OK。   2、把伺服驱动器按图纸接上电源(例如用了调压器,从100V调到220V, ...

雅马哈机器人14.501报警处理方式 雅马哈机器人14.501报警处理方式

14.501 数据接收过错 14.502 成帧过错 14.503 奇偶过错 的处理方式,为什么要把这三个报警放到一起讲呢,由于这三个报警基本上原因都区别不大。   1. 首 ...

雅马哈示教器维修故障 雅马哈示教器维修故障

YAMAHA 雅马哈示教器修理常见故障:按键损坏、电源板问题、高压板问题、液晶问题、主板坏,上电黑屏、 花屏、蓝屏、白屏,上电无反响、上电烧baoxian,不能正常开机、进入不了体系、接触问题、按 ...

RGV、AGV、IGV搬运机器人区别 RGV、AGV、IGV搬运机器人区别

跟着人工智能的兴起,科技迅速发展,越来越多的搬运机器人替代了人工作业,在移动机器人市场上,除了咱们熟知的AGV之外,还有RGV和IGV也在自动化物流体系中发挥着各自的效果。那么RGV、AGV、IGV ...

焊接机器人外轴介绍——雅马哈机器人 焊接机器人外轴介绍——雅马哈机器人

1.焊接变位器。焊接变位器有多种规格,常见的焊接变位器有单轴焊接变位器.双轴焊接变位器.三轴焊接变位器等。,可根据不同的型号应用于不同的范畴。焊接机器人和焊接变位器协调运动。焊接机器人 ...

码垛机器人维修的注意事项——雅马哈 码垛机器人维修的注意事项——雅马哈

码垛机器人是输送机输送来的料袋、纸箱或是其它包装材料依照客户工艺要求的工作方式主动堆叠成垛,并将成垛的物料进行输送的设备。码垛机器人在码垛行业有着适当广泛的运用,大大节约了劳动力, ...

雅马哈志在跟人飙车技的机器人 雅马哈志在跟人飙车技的机器人

雅马哈方案将在构建Motobot过程中学到的东西运用起来,改善其包括摩托车、雪地车、沙滩车、工业机器人在内的各种产品。雅马哈清晰说到,“先进的车手安全系统”或许便是Motobot能帮助推动的领域 ...

工业机器人处理错误编程方法 工业机器人处理错误编程方法

过错例程剖析1   先看一段代码:   *AA:   MOVE P,P101,Z=0.0   WAIT ARM   FOR I=1 TO 1000   MOVE P,P102,Z=0.0   WAIT ARM   DO2(0)=1   GOTO *TSA //过错 ...

焊接机器人介绍——雅马哈机器人 焊接机器人介绍——雅马哈机器人

焊接机器人是集机械、计算机、电子、传感器、人工智能等多个方面知识于一体的现代化、主动化设备。焊接机器人主要有机器人和焊接设备两大部分构成。机器人由机器人本身和操控体系组成。焊接设备 ...

雅马哈水平多关节机器人助力电子产品组装领域 雅马哈水平多关节机器人助力电子产品组装领域

日本雅马哈发动机公司推出了水平多关节机器人(Scara robot)的新机型,可用于电子产品拼装等。与此前比较提高了功能,例如作业时间可缩短约1成等。在*大的工业机器人商场我国,本土企业兴起 , ...

工业机器人码垛系统的组成——雅马哈 工业机器人码垛系统的组成——雅马哈

工业机器人码垛体系并非在实际应用中由机器人独立运转,而是与主动化设备合作执行体系作业。工业机器人码垛体系一般由4个子体系组成,电气操控子体系操控整个码垛体系的作业流程和节拍。物料传 ...

工业机器人三大核心部件 工业机器人三大核心部件

能够替代人类去做一些深重重复性的作业,做到运动和指令的精确传输,各部位紧密配合完结复杂的作业,那么这些灵动的5轴6轴机器人是怎么精准灵敏的完结这些指令的呢? ...

雅马哈发动机选择西门子软件解决方案建设数字化企业 雅马哈发动机选择西门子软件解决方案建设数字化企业

来自日本的多元化发动机制作商雅马哈发动机株式会社近来宣布,选择了Siemens PLM Software的产品生命周期办理(PLM)软件来支撑其数字化。雅马哈发动机将在其支柱业务摩托车的全部研发部门中布 ...

立柱机器人码垛机的应用优势 立柱机器人码垛机的应用优势

1.作业效率高   立柱机器人码垛机每小时抓取300——400次,您能够挑选单爪手和双爪手,速度和质量远高于手人工。   2.操作精度高,作业范围大。   立柱机器人码垛机占地面积小,动作 ...

栏目导航
客服中心

在线咨询:QQ


联系方式联系方式

联 系 人:黄经理

联系QQ:3271883383

联系电话:13522565663


扫码添加微信(手机端请先保存图片)

工作时间工作时间

工作日:9:00-17:00

节假日:仅处理紧急事件

Contact us

联系我们

联系电话 QQ咨询
QQ咨询

3271883383

公司地址
返回顶部