以下是我用的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是一次完成的.