Siemens SINUMERIK 840D sl Programming Manual page 259

Example 2: Axial measurement with delete distance-to-go in mode 2 (evaluation in
programmed sequence)
Program code
...
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:
Example 3: Continuous axial measurement in mode 1 (evaluation in chronological
sequence)
a) Measurement of up to 100 measured values
Program code
...
N110 DEF REAL MEASVALUE[100]
N120 DEF INT loop=0
N130 MEAC[X]=(1,1,-1) G01 X1000 F100
N135 STOPRE
N140 MEAC[X]=(0)
N150 R1=$AC_FIFO1[4]
N160 FOR loop=0 TO R1-1
Job Planning
Programming Manual, 03/2013, 6FC5398-2BP40-3BA1
4.8 Axial measurement (MEASA, MEAWA, MEAC) (option)
Comment
; Measuring in mode 2 with active measuring
system. Wait for measuring signal in the
sequence rising edge probe 1, falling edge
probe 1, rising edge probe 2, falling edge
probe 2 while traversing path to X=100.
; Preprocessing stop
; Check that the measurement with probe 1 is
successful.
; Save measured value acquired at the first
programmed trigger event (rising edge of probe
1).
; Save measured value acquired at the second
programmed trigger event (rising edge of probe
1).
; Check that the measurement with probe 2 is
successful.
; Save measured value acquired at the third
programmed trigger event (rising edge of probe
2).
; Save measured value acquired at the fourth
programmed trigger event (rising edge of probe
2).
Comment
; Measurement in mode with active measuring system,
save measured values under $AC_FIFO1, wait for
measuring signal with falling edge of probe 1 while
traversing path to X=1000.
; Terminate measurement when axis position is reached.
; Save number of accumulated measured values in
parameter R1.
Special motion commands
259