DECL/CHAR,20,Cir_name DECL/INTGR,kk DECL/DOUBLE,step kk=ASSIGN/80 Step=ASSIGN/(360/80) DO/1,kk,1 Cir_name=ASSIGN/CONCAT('Cir_name',STR(kk)) F(@Cir_name)=FEAT/CIRCLE,INNER,POL,32.0423,360,-4.6346,0.00000000,0.00000000,1.00000000,13.9566 MEAS/CIRCLE,F(@Cir_name),4 ENDMES D(DAT_2) = ROTATE/ZAXIS,step*kk ENDDO

对高级编程语句不太了解，所以没看懂！能给讲解一下吗？谢谢

DECL/CHAR,20,Cir_name // 定义字符型变量 DECL/INTGR,kk //定义整型变量KK,用来控制循环的次数 DECL/DOUBLE,step //定义双精度型变量 STEP 用来控制坐标系每次旋转的角度 kk=ASSIGN/80 //因为有80个孔，所以kk赋值80 Step=ASSIGN/(360/80) //用360度除以80，算出每次需要旋转的角度，赋值给step DO/1,kk,1 //循环的开始，初始为1，循环80次，每次递增1 Cir_name=ASSIGN/CONCAT('Cir_name',STR(kk)) //字符串的拼接语句，如果kk=1 cir_name=cir_name1 //@cir_name 是个变量，kk=1的时候 F(@Cir_name）=f(cir_name1) F(@Cir_name)=FEAT/CIRCLE,INNER,POL,32.0423,360,-4.6346,0.00000000,0.00000000,1.00000000,13.9566 MEAS/CIRCLE,F(@Cir_name),4 ENDMES D(DAT_2) = ROTATE/ZAXIS,step*kk //测量完一个圆后，将坐标系旋转到下个圆心上 ENDDO

解释的非常清楚，我看明白了，非常感谢

[b]回复 [url=http://bbs.hexagonmetrology.com.cn:7080/showtopic.aspx?topicid=13470&postid=104209#104209]3楼[color=Olive]sddzlm[/color]的帖子[/url][/b] 解释的很强大。