实现工件程序的重复执行,使得满足工件的批量测量要求。DMIS5.2标准如下: 使用DO循环语句可以多次反复执行同一段程序,执行的次数可以是设定的数字、变量。DO…ENDDO语句块 DO…ENDDO语句块以DO开头,ENDDO结尾,可以反复多次执行一组程序行,支持嵌套。格式如下:DO/变量, 初始值, 结束值, 步长$$ DMIS语句ENDDO语法格式为:DO/变量,启始值,终止值,步幅那么一个语句如果为DO/I,1,10,1的意义就为,执行一个循环,I的值+1,增加10次之后,循环结束.来看一个实例.假设我的工件有一个孔,名为CIR1,我需要把它测量5次,取其中的最小值.那么测量部分的循环语句即为AUTO/AUTO,PROG,MANDO/I,1,5MEAS/CIRCLE,CIR1,4ENDMESENDDO运行这段语句,测量机就会自动去测量圆CIR1,直到5次结束后位置.需要注意的地方: 1. 所有的变量在使用前都必须声明,上面的I是一个整型变量,每循环一次,I+12.每一个DO语句都必须跟一个ENDDO表示该循环的结束.3.步幅表示每次循环I的增量,如果步副是2,那么下次I就为3,再循环一个为5,以此类推. RationalDMIS程序编辑区右键模版里面——其他——高级语言——DO循环 ,里面有DO语句的模版供拖放参考。DO循环在DMIS语句编程中是常用的语句,其语法为: DO/index,initial,limit,increment 循环体 ENDDO 语句中,index是一个整型变量,initial是这个变量的起始值,limit是这个变量的结束值,increment是这个变量的增幅。例如语句 DO/I,2,30,3 循环体 ENDDO意义即为 I开始的值为2,运行第一遍循环后I的值变为5,第2遍后变为8,第三遍后变为11…………,到I的值大于30后结束循环 最后一个参数increment可以不写,默认为1。RationalDMIS高级指令(DO循环语句)DMIS5.2标准示例:RationalDMIS高级指令(DO循环语句)示例一: 圆循环名称自动变化程序DECL/COMMON,INTGR,IDECL/COMMON,CHAR,255,C1DO/I,1,3,1C1 = ASSIGN/CONCAT('J','-',STR(I))F(@C1)=FEAT/CIRCLE,OUTER,CART,-0.0000,0.0000,-3.2790,0.0000,0.0000,1.0000, 48.0000$$ Measurement points are created through nominal pointsMEAS/CIRCLE, F(@C1), 4 PTMEAS/CART, 24.0000, 0.0000, -3.2790, 1.0000, 0.0000, 0.0000 GOTO/CART, 24.9447, 10.3325, -3.2790 GOTO/CART, 19.0919, 19.0919, -3.2790 GOTO/CART, 10.3325, 24.9447, -3.2790 PTMEAS/CART, -0.0000, 24.0000, -3.2790, 0.0000, 1.0000, 0.0000 GOTO/CART, -10.3325, 24.9447, -3.2790 GOTO/CART, -19.0919, 19.0919, -3.2790 GOTO/CART, -24.9447, 10.3325, -3.2790 PTMEAS/CART, -24.0000, 0.0000, -3.2790, -1.0000, 0.0000, 0.0000 GOTO/CART, -24.9447, -10.3325, -3.2790 GOTO/CART, -19.0919, -19.0919, -3.2790 GOTO/CART, -10.3325, -24.9447, -3.2790 PTMEAS/CART, -0.0000, -24.0000, -3.2790, -0.0000, -1.0000, 0.0000ENDMESENDDO注意:1. 元素名称要应用变量时,在变量名前必须加“@”。2.添加DO语句时使用的变量名称不用提前定义变量,在DO语句中默认包含了定义变量的指令。示例二: 下面的例子将提示语句循环执行4次,每次提示循环到第几遍DO/KNPTN1,1,4,1$$将数字转化为字符并与提示合并KNPTC1=ASSIGN/CONCAT('这是第',STR(KNPTN1),'遍循环')TEXT/OPER, KNPTC1ENDDO示例三:下面的程序控制机器在500X500的范围内走S形轨迹DECL/LOCAL,REAL,XPOS,YPOSDECL/LOCAL,INTGR,XN,YNDO/YN,0,500,100 $$RL函数将整数转换为实数 YPOS=ASSIGN/RL(YN) DO/XN,0,500,100 XPOS=ASSIGN/RL(XN) GOTO/XPOS,YPOS,50 ENDDOENDDO示例四: 重复测量圆孔十次DO/KNPTN1, 1, 10, 1 F(CIR1)=FEAT/CIRCLE,INNER,CART,90.0000,-0.0000,-38.3986,0.0000,0.0000,1.0000, 8.0000$$ Measurement points are created through nominal pointsMEAS/CIRCLE, F(CIR1), 4 PTMEAS/CART, 86.1687, -1.1494, -38.3986, 0.9578, 0.2873, 0.0000 PTMEAS/CART, 91.1494, -3.8313, -38.3986, -0.2873, 0.9578, 0.0000 PTMEAS/CART, 93.8313, 1.1494, -38.3986, -0.9578, -0.2873, 0.0000 PTMEAS/CART, 88.8506, 3.8313, -38.3986, 0.2873, -0.9578, 0.0000ENDMESENDDO示例五:DECL/INTGR,IDECL/CHAR,20,elnmDECL/DOUBLE,xx,yy,zzDO/I,1,3,1elnm=ASSIGN/CONCAT('poi_',STR(i))xx=OBTAIN/FA(@elnm),3yy=OBTAIN/FA(@elnm),4zz=OBTAIN/FA(@elnm),5elnm=ASSIGN/CONCAT('newpoi_',STR(i))F(@elnm)=FEAT/POINT,CART, xx,yy,zz, 0,0,0FA(@elnm)=FEAT/POINT,CART, xx,yy,zz, 0,0,0ENDDO以上表示 DO 和ENDDO之间的内容循环3次。每循环一次,变量I的值加1,到3后结束。 来源:山涧果子