程序进行了小改动，再次运行2-3次的然后取平均值的部分没有做，有兴趣的自己做着玩吧。 ASSIGN/V1 = 0 ASSIGN/PA = 0 DO/ FPTR =FILE/OPEN,J:\11.TXT,READ AA =FILE/READLINE,FPTR,{PR} ASSIGN/DI = -COS(DEG2RAD(PA)) ASSIGN/DJ = -SIN(DEG2RAD(PA)) L1 =LABEL/ D =AUTO/SURFACE POINT, SHOWALLPARAMS=YES THEO/PR,PA,0,DI,DJ,0 ACTL/0,0,0,-1,0,0 TARG/PR,PA,0,DI,DJ,0 THEO_THICKNESS = 0, POLAR, SNAP = YES ,$ AUTO MOVE = NO, DISTANCE = 235, RMEAS = None ,$ INIT = 3, PERM = 3, SPACER = 3 ASSIGN/DI = D.I ASSIGN/DJ = D.J IF_GOTO/ABS(D.TI-D.I>0.00001) AND ABS(D.TJ-D.J>0.00001),GOTO = L1 ASSIGN/V1 = V1+1 ASSIGN/PA = PA+22.5 COMMENT/REPT,"点"+V1+"的XYZ为:"+D.XYZ UNTIL/AA=="EOF" FILE/CLOSE,FPTR

高手!就是高手!一出手就知道高!向各位版主学习!{/qiang}

感谢各位的支持，尤其感谢wsyzxxn版主和STAR老师的指正，我的编程思路存在法向矢量补偿不准确问题，我用VECTOR POINT和SURFACE POINT分别测量同一个工件，发现两者最大误差为0.0294mm。应该用SURFACE POINT测量各点会更准确些。

是啊，可是我们公司昨天来人修机器的时候，有不懂得地方，想问维修人员，但是他不是很明白，要我们把数模给他带回去，可是……领导不同意：这是技术资料！！！自己想法解决吧！ 天啦，我会，还问？

各位老大,想请教你们个问题.一个程序里能不能用多个测头,也就是说我们的工件需要星形和加长杆的,能不能在一个程序里.这样误差有多少?谢谢各位给我好的建议

如果你有多个吸盘，而没有自动更换架，可以先把要使用的测头校验好，也可以在更换吸盘以后再进行一次校验，在程序中加入注释提示，然后手动更换就可以了。。理论来说不会影响精度。。

我们的测座是手动,你说的吸盘是什么啊.我不懂,

经过校验的测头在一个程序里可以随意调用,星形测头当然也如此. 其误差在机器允许的测量误差范围内. 　　　　　　　　　　　　　　　　　　[此贴子已经被作者于2007-1-18 21:10:54编辑过]

学习

超级斑竹（STAR）前辈，你能再说详细一点么~ 曲面的矢量怎么赋予的呢？ 你说的2-5次循环是指循环2到5个点吗？