以下是我用的CODE,若发现有错误请指出:
STARTUP =ALIGNMENT/START,RECALL:, LIST= YES
ALIGNMENT/END
MODE/MANUAL
LOADPROBE/2_2_3X20
TIP/T1A0B0, SHANKIJK=0, 1, 0, ANGLE=0
MODE/DCC
SCN1 =FEAT/SCAN,PATCH,SHOWHITS=YES,SHOWALLPARAMS=NO
MEAS/SCAN
BASICSCAN/LINE,SHOWHITS=NO,SHOWALLPARAMS=NO
ENDSCAN
BASICSCAN/LINE,SHOWHITS=NO,SHOWALLPARAMS=NO
ENDSCAN
BASICSCAN/LINE,SHOWHITS=NO,SHOWALLPARAMS=NO
ENDSCAN
BASICSCAN/LINE,SHOWHITS=NO,SHOWALLPARAMS=NO
ENDSCAN
BASICSCAN/LINE,SHOWHITS=NO,SHOWALLPARAMS=NO
ENDSCAN
ENDMEAS/
FORMAT/TEXT,OPTIONS,HEADINGS, , ;MEAS,MAXMIN, , , , ,
DIM LOC1= LOCATION OF SET SCN1 UNITS=MM ,$
GRAPH=OFF TEXT=OFF MULT=1.00 OUTPUT=BOTH
AX MEAS MAX MIN
X 276.414 284.959 267.929
Y -20.722 -12.464 -29.401
Z 75.278 75.830 74.718
END OF DIMENSION LOC1
HIGH =GENERIC/POINT,DEPENDENT,RECT,$
NOM/XYZ,0,0,0,$
MEAS/XYZ,LOC1.X.MEAS,LOC1.Y.MEAS,LOC1.Z.MAX,$
NOM/IJK,0,0,1,$
MEAS/IJK,0,0,1
DIM LOC2= LOCATION OF POINT HIGH UNITS=MM ,$
GRAPH=OFF TEXT=OFF MULT=1.00 OUTPUT=BOTH
AX MEAS MAX MIN
X 276.414 276.414 276.414
Y -20.722 -20.722 -20.722
Z 75.830 75.830 75.830
END OF DIMENSION LOC2
ASSIGN/NUM = SCN1.NUMHITS
N =LOOP/START, ID = YES, NUMBER = NUM, START = 1, SKIP = ,
OFFSET: XAXIS = 0, YAXIS = 0, ZAXIS = 0, ANGLE = 0
COMMENT/OPER,N
,HIGH.Z
,SCN1.HIT[N].Z
IF/ABS(SCN1.HIT[N].Z-HIGH.Z)<=0.001
ASSIGN/MAXPT = N
F1 =GENERIC/POINT,DEPENDENT,RECT,$
NOM/XYZ,-2208.447,5,1123.562,$
MEAS/XYZ,SCN1.HIT[N].X,SCN1.HIT[N].Y,SCN1.HIT[N].Z,$
NOM/IJK,0,1,0,$
MEAS/IJK,0,1,0
COMMENT/OPER,YES
,MAXPT
END_IF/
LOOP/END
DIM LOC3= LOCATION OF POINT F1 UNITS=MM ,$
GRAPH=OFF TEXT=OFF MULT=1.00 OUTPUT=BOTH
AX MEAS MAX MIN
X 273.167 273.167 273.167
Y -14.409 -14.409 -14.409
Z 75.830 75.830 75.830
END OF DIMENSION LOC3
当然在扫描之前先建立座标(我省略了).SCAN的尺寸中其实已得到了最高值,GENERIC POINT 是为了在图形中得到一点,但注意这点的XY是形心的XY而不是那个"最高值"的XY,所以我又加了F1来找到它.
我后来又想了想SESAME所说的HIGH POINT并查了HELP 觉得也可以找到最高值.问题是当曲线在XY偏离太大时可能会有麻烦.除非把搜索区域扩大并加细但会费时,因为HIGH POINT 会不断地自我比较并重新调整搜索区域而不象SCAN是一次完成的.