$$ NET_DMIS_20160720
$$ MADE IN DE 2023-2-23 9:25:24
INCLUD/DMIS,'NET_DMIS_DEFINES.DMI'
INCLUD/DMIS,'VARDEFINE'
DMESW/COMAND,'PROBE_VAL/INIT'
UNITS/MM,ANGDEC
D(MACHINE)=DATSET/MCS
DMESW/COMAND,'COORDSYS/ALIGN'
WKPLAN/XYPLAN
PRCOMP/ON
PRCOMP/ON
FEDRAT/POSVEL,MMPS,300.0000
ACLRAT/POSACL,MMPSS,100.0000
FEDRAT/MESVEL,MMPS,20.0000
ACLRAT/MESACL,MMPSS,100.0000
SNSET/RETRCT,1.0000
SNSET/SEARCH,5.0000
SNSET/APPRCH,1.0000
DMESW/COMAND,'SNSET/MANRETRCT,1.0000'
DMESW/COMAND,'REPORT/CLEAR'
MODE/MAN
DID(D2L40)=DEVICE/STOR,'D2L40'
OPEN/DID(D2L40),SNS
S(A45B-90)=SNSDEF/PROBE,INDEX,POL,45.0,-90.0,0.0000,0.0000,1.0000,189.6500,2.0000
SNSLCT/SA(A45B-90)
GEOALG/PLANE,LSTSQR
F(平面1)=FEAT/PLANE,CART,75.5185,0.2722,-15.5185,0.70710678,0,0.70710678
MEAS/PLANE,F(平面1),4
PTMEAS/CART,71.7600,-12.2326,-11.7600,0.70710678,0,0.70710678
PTMEAS/CART,79.0131,-13.7268,-19.0131,0.70710678,0,0.70710678
PTMEAS/CART,79.2176,11.9486,-19.2176,0.70710678,0,0.70710678
PTMEAS/CART,72.0832,15.0995,-12.0832,0.70710678,0,0.70710678
ENDMES
DATDEF/F(平面1),DAT(A_平面1)
D(坐标系1_S)=DATSET/DAT(A_平面1),ZDIR
D(坐标系1_T)=TRANS/ZORIG,FA(平面1)
SAVE/DA(坐标系1)
SNSET/DEPTH,0
GEOALG/CIRCLE,LSTSQR
DMESW/COMAND,'CONST/SET_PROJ_VEC,FA(XY),1'
F(圆1)=FEAT/CIRCLE,INNER,POL,63.6396,0,-2.1066,-0.24939946,-0.01022272,0.96834674,10.0000
MEAS/CIRCLE,F(圆1),4
PTMEAS/POL,58.9521,1.6277,-2.1066,0.94225491,-0.33489652,0
PTMEAS/POL,64.4288,4.4189,-2.1066,-0.11954284,-0.99282904,0
PTMEAS/POL,68.6202,359.6185,-2.1066,-0.99581536,0.09138800,0
PTMEAS/POL,63.7277,355.5011,-2.1066,0.02165177,0.99976557,0
ENDMES