$$ NET_DMIS_20160720
$$ MADE IN DE 2023-2-9 12:59:58
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,2'
DMESW/COMAND,'REPORT/CLEAR'
MODE/MAN
DID(D2L40)=DEVICE/STOR,'D2L40'
OPEN/DID(D2L40),SNS
S(A0B0)=SNSDEF/PROBE,INDEX,POL,0.0,0.0,0.0000,0.0000,1.0000,189.6500,2.0000
SNSLCT/SA(A0B0)
DMESW/COMAND,'SNSET/MANRETRCT,2.0000'
GEOALG/PLANE,LSTSQR
F(平面1)=FEAT/PLANE,CART,76.0287,192.8169,0,0,0,1.00000000
MEAS/PLANE,F(平面1),3
PTMEAS/CART,7.5414,47.7680,0,0,0,1.00000000
PTMEAS/CART,8.1091,263.3654,0,0,0,1.00000000
PTMEAS/CART,212.4357,267.3174,0,0,0,1.00000000
ENDMES
SNSET/DEPTH,0
DMESW/COMAND,'CONST/SET_PROJ_VEC,FA(平面1),1'
F(直线1)=FEAT/LINE,UNBND,CART,34.3779,0,-3.3053,0.99999659,0,-0.00261299,0,-1.00000000,0
MEAS/LINE,F(直线1),2
PTMEAS/CART,34.3779,0,-3.4570,0,-1.00000000,0
PTMEAS/CART,150.4931,0,-3.4570,0,-1.00000000,0
ENDMES
F(点1)=FEAT/POINT,CART,0,23.5265,-6.5252,-1.00000000,0,0
MEAS/POINT,COMP,DME,F(点1),1
PTMEAS/CART,0,23.5265,-6.5252,-1.00000000,0,0
ENDMES
DATDEF/F(平面1),DAT(A_平面1)
D(坐标系1_S)=DATSET/DAT(A_平面1),ZDIR
D(坐标系1_R)=ROTATE/ZAXIS,FA(直线1),XDIR
D(坐标系1_T)=TRANS/ZORIG,FA(平面1)
D(坐标系1_T)=TRANS/YORIG,FA(直线1)
D(坐标系1_T)=TRANS/XORIG,FA(点1)
DMESW/COMAND,'COORDSYS/CAD=PART'
SAVE/DA(坐标系1)
MODE/AUTO,PROG,MAN
SNSET/RETRCT,1.0000
SNSET/APPRCH,1.0000
DMESW/COMAND,'CLEARP/ZDIR,16.3500,ZDIR,16.3500,ON'
F(平面2)=FEAT/PLANE,CART,115.4396,164.0308,0,0,0,1.00000000
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_PLANEPOINTS_1006),AUTOFIGURE,F(平面2),PLANE,CART,LSTSQR,115.4396,164.0308,$
0,0,0,1.00000000,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,POINTS,'15,7.2047,41.9974,0,0,0,1.00000000,$
4.8898,132.0474,0,0,0,1.00000000,4.1513,196.1882,0,0,0,1.00000000,3.2635,268.1064,0,0,0,1.00000000,97.9666,$
267.2889,0,0,0,1.00000000,117.9679,299.7366,0,0,0,1.00000000,180.4967,301.2118,0,0,0,1.00000000,218.8148,$
301.9191,0,0,0,1.00000000,250.7712,255.6899,0,0,0,1.00000000,130.4285,199.4061,0,0,0,1.00000000,129.0168,$
106.3228,0,0,0,1.00000000,244.2170,41.5178,0,0,0,1.00000000,160.6365,37.3103,0,0,0,1.00000000,146.2703,$
4.5891,0,0,0,1.00000000,35.4984,7.1308,0,0,0,1.00000000',TOUCH,0.3000,XYPLAN
F(直线2)=FEAT/LINE,BND,CART,23.1238,0,-10.0000,226.3325,0,-10.0000,0,-1.00000000,0
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_LINE_1007),AUTOFIGURE,F(直线2),LINE_BND,CART,23.1238,0,-10.0000,1.00000000,$
0,0,203.2087,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,-1.00000000,0,4,0,0,0,TOUCH,0.3000,XYPLAN,0,$
0,LINE,"","","EXT1","EXT2","EXT3",ENDCAL
F(直线3)=FEAT/LINE,BND,CART,0,23.9537,-10.0000,0,268.3748,-10.0000,-1.00000000,0,0
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_LINE_1007),AUTOFIGURE,F(直线3),LINE_BND,CART,0,23.9537,-10.0000,0,1.00000000,$
0,244.4211,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,-1.00000000,0,0,4,0,0,0,TOUCH,0.3000,XYPLAN,0,0,$
LINE,"","","EXT1","EXT2","EXT3",ENDCAL
F(点2)=FEAT/POINT,CART,0,0,-10.0000,0,0,-1.00000000
CONST/POINT,F(点2),INTOF,FA(直线2),FA(直线3)
DATDEF/F(平面2),DAT(A_平面2)
D(坐标系2_S)=DATSET/DAT(A_平面2),ZDIR
D(坐标系2_R)=ROTATE/ZAXIS,FA(直线2),XDIR
D(坐标系2_T)=TRANS/XORIG,FA(点2),YORIG,FA(点2)
D(坐标系2_T)=TRANS/ZORIG,FA(平面2)
SAVE/DA(坐标系2)
F(圆1)=FEAT/CIRCLE,INNER,CART,57.1500,81.2800,0,0,0,1.00000000,50.8000
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_CIRCLE_1007),AUTOFIGURE,F(圆1),CIRCLE,INNER,CART,LSTSQR,57.1500,81.2800,$
0,0,0,1.00000000,50.8000,0.87758256,-0.47942554,0,5,-3.0000,0,0,0,0,360.0000,TOUCH,CIRCLE,0.3000,0,FALSE,$
FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,FA(VECBLD),10.0000,2.5000,3,XYPLAN,"",'7,0,0,0,0,3.0000,0,10',$
'0,1,0,5.0000',"EXT3",ENDCAL
DMESW/COMAND,'MOVE/CLEARPLANE'
F(点3)=FEAT/POINT,CART,111.8012,40.7703,0,0,0,1.00000000
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_POINT_1007),AUTOFIGURE,F(点3),POINT,CART,DME,111.8012,40.7703,0,0,0,1.00000000,$
0,0,0,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,FA(VECBLD),10.0000,2.5000,3,XYPLAN,"","EXT1","EXT2",$
"EXT3",ENDCAL
F(点4)=FEAT/POINT,CART,208.0548,102.4514,-6.9929,0,-0.04649603,0.99891847
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_POINT_1007),AUTOFIGURE,F(点4),POINT,CART,DME,208.0548,102.4514,-6.9929,$
0,-0.04649603,0.99891847,0,0,0,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,FA(VECBLD),10.0000,2.5000,$
3,XYPLAN,"","EXT1","EXT2","EXT3",ENDCAL