PROCEDURE OUTMEM BOOLEAN FSTPRN=TRUE XUPT=0.25 XLOWT=-0.25 YUPT=0.25 YLOWT=-0.25 IF FIRPRN THEN PRN("X.NOM X.MEA X.DEV X.OOT") FIRPRN=FALSE END_IF . . . END PROCEDURE 先要判断是否合格。若不合格则输出超差部分，否则输出“OK” 现OK不好输出因为是字符串类型，请版主帮我

不是DEA/PPL语句格式吧?若是能编译过去吗?

我的意思是说可以用如下形式判断X,Y是否超差： FORMAT(CIRCLE,X=OOT,Y=OOT) THEO(X=20,LX=-0.2,UX=0.2,Y=20,LY=0.2,UY=-0.2) OUTPUT PRN WM1 其中的OOT我认为是个条件判断处理，不知道是否能够用于自己定义的变量中

你在测量特征前加上一条[oot_cond]指令可能就解决问题了. 这个函数的功能是当有一个值出现超差时才输出.你试试. 再补充一点: 若要取消该输出操作,则要插入[no_oot_cond]指令.

PROGRAM OUTMEM[WM1,WM2] BOOLEAN FSTPRN=TRUE REAL XUPT,XLOWT,YUPT,YLOWT,XNOM,YNOM,XDEV,YDEV VECTOR TEMP COORD P XUPT=0.25 XLOWT=-0.25 YUPT=0.25 YLOWT=-0.25 P={20,20,0} ME_CIR //自己编的测孔子程序// TEMP=WM1 XNOM=P|X YNOM=P|Y XDEV=ABS(TEMP|X)-ABS(XNOM) YDEV=ABS(TEMP|Y)-ABS(YNOM) !!先要判断是否超差，能否直接用上如下的输出方法 !!THEO(X=XNOM,LX=-0.25,YX=0.25,Y=YNOM,LY=-0.25,UY=0.25) !!FORMAT(X=OOT,Y=OOT) !!OUTPUT PRN WM1 //若合格输出OK，不合格输出XOOT,YOOT,对不合格输出已经解决，合格的时候相要输出"OK"// //好难，请大家帮帮我 . . //若是第一次输出，输出如下表头 IF FIRPRN THEN PRN("X.NOM X.MEA X.DEV X.OOT Y.NOM Y.MEA Y.DEV Y.OOT") FIRPRN=FALSE END_IF PRN(XNOM:8:3,TEMP|X:8:3,XDEV:8:3,YNOM:8:3,TEMP|Y:8:3,YDEV:8:3)

希望STAR再出题，那几个高手呢？gcl 、zyj、houjinpin等 我是临时的替补人员（原来搞三坐标的跑了），没有经过培训 请大家多多帮帮我

我过去是负责国内WTUTOR软件的出国前或出国后的再培训的,上面就有我的学生.不少用户都是现场培训的,因此,效果可能更好些. 应该说,TUTOR的高手是很多的,他们都能自己搞开发,所以,即便软件没有功能都能自己做.

PROGRAM OUTMEM[WM1,WM2] ELEMENT_ARRAY MEM[300] BOOLEAN FSTPRN=TRUE REAL XUPT,XLOWT,YUPT,YLOWT,XNOM,YNOM,XDEV,YDEV,XOOT,YOOT VECTOR TEMP COORD P XUPT=0.25 XLOWT=-0.25 YUPT=0.25 YLOWT=-0.25 P={20,20,0} ME_CIR //自己编的测孔子程序// TEMP=WM1 XNOM=P|X YNOM=P|Y XDEV=ABS(TEMP|X)-ABS(XNOM) YDEV=ABS(TEMP|Y)-ABS(YNOM) !!先要判断是否超差，能否直接用上如下的输出方法 !!THEO(X=XNOM,LX=-0.25,YX=0.25,Y=YNOM,LY=-0.25,UY=0.25) !!FORMAT(CIRCLE,X=OOT,Y=OOT) !!OUTPUT PRN WM1 //若合格输出OK，不合格输出XOOT,YOOT,对不合格输出已经解决，合格的时候相要输出"OK"// //好难，请大家帮帮我 . .//以下判断误差值是否低于下偏差 IF(ABS(XDEV) LE ABS(XLOWT)) THEN XOOT=ABS(XDEV)-ABS(XLOWT) ELSE XOOT=0 //此处想要输出OK而不是0 END_IF IF(ABS(XDEV) GE ABS(XUPT)) THEN XOOT=ABS(XDEV)-ABS(OOT) ELSE XOOT=0 //此处想要输出OK而不是0 END_IF //若是第一次输出，输出如下表头,以后不需要输出 IF FSTPRN THEN PRN("X.NOM X.MEA X.DEV X.OOT Y.NOM Y.MEA Y.DEV Y.OOT") FIRPRN=FALSE END_IF PRN(XNOM:9:3,TEMP|X:9:3,XDEV:9:3,XOOT:9:3,YNOM:9:3,TEMP|Y:9:3,YDEV:9:3,YOOT:9:3) ENDSTAT END_PROGRAM

"XOOT=0 //此处想要输出OK而不是0" ----------------------------------------------------------- 要想将0变成"OK"用字符串变量即可; ...... [color=red]string xoot[2] [/color]...... [color=red]xoot="OK" [/color] ---------------------------------------------------------------- "//若是第一次输出，输出如下表头,以后不需要输出 ". ----------------------------------------------------------------- 可改成: [color=#ff0000]nn=0[/color] IF FSTPRN THEN [color=red]if nn eq 0 then[/color] [color=#ff0000] [/color]PRN("X.NOM X.MEA X.DEV X.OOT Y.NOM Y.MEA Y.DEV Y.OOT") FIRPRN=FALSE [color=red]nn=1 end_if[/color] [color=#ff0000] [/color]END_IF

谢谢STAR的指点 1、OOT_COND我试过了，意思是超差才输出，不超差不输出 用于FORMAT语句中，好像不适合我这种输出要求 2、将XOOT设为字符串变量，合格情况下能够输出OK，但不合格的情况下想要输出超差多少，又不好办了，这个语言是否支持变量类型强制转换，若是这样就可以实现了。 3、请STAR 继续指点我。呵呵我感觉快要成功了