1、Point01点实际测值是X=-59.0000,Y=-54.0000,Z=-125.5000;
2、Point01点理论值是X=-57.0000,Y=-58.0000,Z=,-134.5000;各个方向公差是±1.5。
想法:从上面的Point01点可以看出实测值超差,编一段程序将Point01点的Z向实测值取出来(整个的或者是其中的一个方向值),Point01点的Z向坐标值要在-136~-133之间材算合格。将Z向坐标值取出后先判断它是否符合以上的条件。如果不符合就加一个运算,使之达到合格即在公差范围内。再将运算后的结果重写入到Point01点再输出。
以下的程序我是这样写的,但是有问题,请教各位大侠给指点指点,谢谢!!!
程序:
OUTPUT/FA(Point01)
DECL/DOUBLE,ZZ
DECL/DOUBLE,Var1
Var1=OBTAIN/FA(Point01),5
IF/(Var1<(-136))
ZZ=(-134.5)+(Var1)/100
ELSE
IF/(Var1>(-133))
ZZ=-133+(Var1)/100
ENDIF
ZZ=Var1
ENDIF
WRITE/DID(DidTerm),'POINT01-Z.',ZZ
MEAS/POINT,F(Point01),1
PTMEAS/CART,-59.0000,-54.0000,ZZ,0,0,1
ENDMES
MODE/PROG,MAN
OUTPUT/FA(Point01)
F(Point01)=FEAT/POINT,CART,100.0000,110.0000,-134.5000,$
0.0000,0.0000,0.0000
T(CorTol01)=TOL/CORTOL,ZAXIS,-0.5000,0.5000
OUTPUT/FA(Point01),TA(CorTol01)
$$End of this file