M5: Measurement
7.8 Channels - only 840D sl
Extended Functions
530 Function Manual, 03/2013, 6FC5397-1BP40-3BA1
Continuous measurement on completion of programmed traversing movement
Program code Comment
N1 DEF REAL MESSWERT[100]
N2 DEF INT INDEX=0
N3 MEAC[x]=(1, 1, -1) G01 X1000 F100
N4 MEAC[X]=(0) ; Abort
N5 R1=$AC_FIFO1[4] ;Number of measured values
N6 FOR INDEX=0 TO R1
N7 MESSWERT[INDEX]=$AC_FIFO1[0] ; Read out measured values
N8 ENDFOR:
Continuous measurement with deletion of distance-to-go
Delete distance-to-go after last measurement.
Program code Comment
N1 DEF INT ANZAHL=100
N2 DEF REAL MESSWERT[ANZAHL]
N3 DEF INT INDEX=0
N4 WHEN $AC_FIFO1[4]==ANZAHL DO DELDTG (X) MEAC[X] =(0)
N5 MEAC[X]=(1, 1, -1) G01 X1000 F100 ; Start measurement
N6 R1=$AC_FIFO1[4] ;Number of measured
values
N7 FOR INDEX=0 TO R1
N8 MESSWERT[INDEX]=$AC_FIFO1[0] ; Read out measured
values
N9 ENDFOR:
Continuous modal measurement over several blocks
Program code Comment
N1 DEF INT ANZAHL=100
N2 DEF REAL MESSWERT[ANZAHL]
N3 DEF INT INDEX=0
N4 ID=1 MEAC[X]=(1, 1, -1) ; Start measurement
N5 ID=2 WHEN $AC_FIFO1[4]==ANZAHL DO MEAC[X]=(0)
CANCEL(2)
N6 G01 X1000 Y100
N7 X100 Y100
N8 R1=$AC_FIFO1[4] ;Number of measured
values
N9 FOR INDEX=0 TO R1
N10 MESSWERT[INDEX]=$AC_FIFO1[0] ; Read out measured
values
N11 ENDFOR: