Siemens Sinumerik 840D sl Programming Manual page 276

Special Motion Commands
4.8 Extended measuring function (MEASA, MEAWA, MEAC) (option)
Examples
Example 1: Axial measurement with deletion of distance-to-go in mode 1 (evaluation in
chronological sequence)
a) with 1 measuring system
Program code
...
N100 MEASA[X]=(1,1,-1) G01 X100 F100
N110 STOPRE
N120 IF $AC_MEA[1]==FALSE GOTOF END
N130 R10=$AA_MM1[X]
N140 R11=$AA_MM2[X]
N150 END:
b) with 2 measuring systems
Program code
...
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:
276
Comments
; Measuring in mode 1 with active
measuring system. Wait for
measuring signal with rising/
falling edge from probe 1 for
travel path to X=100.
; Preprocessing stop
; Check that the measurement was
successful.
; Save measured value acquired at
the first programmed trigger event
(rising edge).
; Save measured value acquired at
the second programmed trigger
event (falling edge).
Comments
; Measuring in mode 1 with both
measuring systems. Wait for
measuring signal with rising/
falling edge from probe 1 for
travel path to X=100.
; Preprocessing stop
; Check that the measurement was
successful.
; Save measured value of measuring
system 1 at rising edge.
; Save measured value of measuring
system 2 at rising edge.
; Save measured value of measuring
system 1 at falling edge.
; Save measured value of measuring
system 2 at falling edge.
Programming Manual, 02/2011, 6FC5398-2BP40-1BA0
Job planning