Siemens Sinumerik 840D sl Programming Manual page 604

Motion synchronous actions
10.4 Actions in synchronized actions
Examples
Example 1: Selecting the tool length compensation
Program code
N10 TRAORI(1)
N20 TOFFON(Z)
N30 WHEN TRUE DO $AA_TOFF[Z]=10 G4 F5
N40 TOFFON(X)
N50 ID=1 DO $AA_TOFF[X]=$AA_IW[X2] G4 F5
...
N100 XOFFSET=$AA_TOFF_VAL[X] N120 TOFFON(X,-XOFFSET) G4 F5
Example 2: Deselect the tool length compensation
Program code
N10 TRAORI(1)
N20 TOFFON(X)
N30 WHEN TRUE DO $AA_TOFF[X]=10 G4 F5
...
N80 TOFFOF(X)
604
Comment
; Transformation on.
; Activation of online tool length compensation for
the Z tool direction.
; A TLC of 10 is interpolated for the Z tool
direction.
; Activation of online tool length compensation for
the X tool direction.
; For the X tool direction compensation is
implemented depending on the position of axis X2.
; Assigns actual compensation in the X direction.
For the X tool direction, the TLC is reduced back
to 0:
Comment
; Transformation on.
; Activation of online tool length compensation for
the X tool direction.
; A TLC of 10 is interpolated for the X tool
direction.
; Position offset of the X tool direction is
deleted:
...$AA_TOFF[X]=0
No axis is moved.
The position offset is added to the actual
position in the Work corresponding to the actual
orientation.
Programming Manual, 02/2011, 6FC5398-2BP40-1BA0
Job planning