我想做的是在程序内在圆心中获取一个手动虚拟点，并使用该点对该点进行RMEAS圆.
$$
RECALL/D(MCS)
UNITS/INCH, ANGDEC
MODE/MAN
TEXT/OPER,move head to a safe place'
SNSLCT/S(1X37_1_27_1)
MODE/PROG,MAN
DMESW/COMAND,'IPPDME:GOTO(Tool.Alignment(-0.000000,-1.000000,0.000000,$
0.000000,0.000000,1.000000))'
MODE/MAN
TEXT/OPER,'place probe at center of hole'
DMESW/COMAND,'IPPDME:SetProp(Tool.PtmeasPar.HeadTouch(0))'
MODE/PROG,MAN
F(PT12) = FEAT/POINT,CART, 17.701478, 18.988897, 1.974567, 0.000000,$
0.000000, 1.000000
MEAS/POINT, F(PT12), 0
ENDMES
D(ORG_PT12) = TRANS/XORIG, FA(PT12), YORIG, FA(PT12), ZORIG, FA(PT12)
MODE/MAN
TEXT/OPER, '请将测头移动到圆孔中心处！'
MODE/PROG,MAN
F(PT1)=FEAT/POINT,CART,0.0000,0.0000,0.0000,0.0000,0.0000,1.0000
MEAS/POINT, F(PT1), 0
ENDMES
D(CRD1) = TRANS/XORIG, FA(PT1), YORIG, FA(PT1), ZORIG, FA(PT1)
SNSET/APPRCH, 3
SNSET/RETRCT, 3
SNSET/DEPTH, 3
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, 20.0000
F(CIR1) = FEAT/CIRCLE,INNER,CART, 0,0,0, 0,0,1, 55
$$ Measurement points are created through nominal points
RMEAS/CIRCLE, F(CIR1), 4, VECBLD, 2.0000, 3
RPTMEAS/CART, 29.5000, 0.0000, 0.0000, 0.0000, 0.0000, 1.0000
RPTMEAS/CART, -14.7500, 25.5477, 0.0000, 0.0000, 0.0000, 1.0000
RPTMEAS/CART, -14.7500, -25.5477, 0.0000, 0.0000, 0.0000, 1.0000
GOTO/CART, 23.5000, 0.0000, 7.0000
PTMEAS/CART, 27.5000, 0.0000, -3.0000, -1.0000, -0.0000, -0.0000
GOTO/CART, 21.7112, 8.9931, -3.0000
GOTO/CART, 16.6170, 16.6170, -3.0000
GOTO/CART, 8.9931, 21.7112, -3.0000
PTMEAS/CART, 0.0000, 27.5000, -3.0000, -0.0000, -1.0000, -0.0000
GOTO/CART, -8.9931, 21.7112, -3.0000
GOTO/CART, -16.6170, 16.6170, -3.0000
GOTO/CART, -21.7112, 8.9931, -3.0000
PTMEAS/CART, -27.5000, 0.0000, -3.0000, 1.0000, -0.0000, -0.0000
GOTO/CART, -21.7112, -8.9931, -3.0000
GOTO/CART, -16.6170, -16.6170, -3.0000
GOTO/CART, -8.9931, -21.7112, -3.0000
PTMEAS/CART, 0.0000, -27.5000, -3.0000, -0.0000, 1.0000, -0.0000
ENDMES
