Siemens SINUMERIK 840D sl Programming Manual page 193

Example of measuring with delete distance-to-go in mode 1
b) with 2 measuring systems
...
N200 MEASA[X] = (31,1-1) G01 X100 F100
N210 STOPRE
N220 IF $AC_MEA[1] == FALSE gotof END
N230 R10 = $AA_MM1[X]
N240 R11 = $AA_MM2[X]
N250 R12 = $AA_MM3[X]
N260 R13 = $AA_MM4[X]
N270 END:
Example of measuring with delete distance-to-go in mode 2
(evaluation in programmed sequence)
...
N100 MEASA[X] = (2,1,-1,2,-2) G01 X100 F100
N110 STOPRE
N120 IF $AC_MEA[1] == FALSE gotof
PROBE2
N130 R10 = $AA_MM1[X]
N140 R11 = $AA_MM2[X]
N150 PROBE2:
N160 IF $AC_MEA[2] == FALSE gotof END
N170 R12 = $AA_MM3[X]
N180 R13 = $AA_MM4[X]
N190 END:
Job planning
Programming Manual, 03/2006 Edition, 6FC5398-2BP10-1BA0
5.8 Extended measuring function (MEASA, MEAWA, MEAC) (option)
Special Motion Commands
;Measurement in mode 1 with both
;measuring systems. Wait for measuring
;signal with rising/falling edge from
;probe 1 on travel path to X = 100.
;Preprocessing stop
;Check success of measurement.
;Save measured value of the
;measuring system 1 for rising edge.
;Save measured value of the
;measuring system 2 for rising edge.
;Save measured value of the
;measuring system 1 for falling edge.
;Save measured value of the
;measuring system 2 for falling edge.
;Measurement in mode 2 with active
;measuring system. Wait for measuring
;signal in the following order:
;Rising edge of probe 1,
;falling edge of probe 1,
;rising edge of probe 2,
;falling edge of probe 2,
;on travel path to X = 100.
;Preprocessing stop
;Check success of measurement
;with probe 1
;Store measured value acquired on
;first programmed trigger event
;(rising edge probe 1).
;Store measured value acquired on
;second programmed trigger event
;(rising edge probe 1).
;Check success of measurement
;with probe 2
;Store measured value acquired on
;third programmed trigger event
;(rising edge probe 2).
;Store measured value acquired on
;fourth programmed trigger event
;(rising edge probe 2).
5-29