
C.CUSTOMIZATION BY THE MACHINE TOOL BUILDER B-63874EN-1/02
- 316 -
Sample program
The sample program below, O2099, measures the centers of two
circular pockets and finds the distance between the centers.
O2099(SAMPLE)
G2024Q1.D80.H0.V0.L-20.R30.F50.P4.M2.
Circle centering measurement 1
G2024Q1.D80.H100.V100.L-20.R30.F50.P4.M2.
Circle centering measurement 2
(CENTER 1)
G110Q2.
Acquire measurement results of circle centering measurement 1
#131=#109 Center X coordinate obtained by measurement
#132=#110 Center Y coordinate obtained by measurement
(CENTER 2)
G110Q1.
Acquire measurement results of circle centering measurement 2
#133=#109 Center X coordinate obtained by measurement
#134=#110 Center Y coordinate obtained by measurement
(CALCULATE)
#135=ABS[#133-#131]
#136=ABS[#134-#132]
#137=SQRT[#135*#135+#136*#136]
Calculate distance between centers
M02
%
(Additional information)
User macro program
This sample program calls a user macro program with the G code
(G110) to acquire measurement results.
Code of the user macro program
O9010 G65P3890 Q[#17]
#1 = P12383
#99100 = #[#1+50] /* Measure ID */
#99101 = #[#1+51] /* Manual / Auto */
#99102 = #[#1+52] /* Date */
#99103 = #[#1+53] /* Time */
#99104 = #[#1+54] /* Judgement Code */
#99105 = #[#1+55] /* Set Data Type */
#99106 = #[#1+56] /* Set Data Kind */
#99107 = #[#1+57] /* Set Offset Type */
#99108 = #[#1+58] /* Set Data Number */
#99109 = #[#1+59] /* Result X */
#99110 = #[#1+60] /* Result Y */
#99111 = #[#1+61] /* Result Z */
#99112 = #[#1+62] /* Result C */
#99113 = #[#1+63] /* Result D */
#99114 = #[#1+66] /* Target X */
#99115 = #[#1+67] /* Target Y */
#99116 = #[#1+68] /* Target Z */