Siemens SINUMERIK 840D sl Function Manual page 625

Programming
...
N10 T1 D1 M6
...
N90 M30
Subprogram "SUB_M6"
Programming
PROC SUB_M6
N110 IF $C_T_PROG==TRUE
N120
N130 ENDIF
N140 M[$C_ME]=6
N150 IF $C_D_PROG==TRUE
N160
N170 ENDIF
N190 M17
Example 2
The new tool is prepared for changing with the T function. The tool change is only realized
with function M6. The T function is replaced by calling the subprogram "MY_T_CYCLE". The
D / DL number is transferred to the subprogram.
Parameterization
Parameterization
MD22550 $MC_TOOL_CHANGE_MODE = 1
MD10717 $MN_T_NO_FCT_CYCLE_NAME = "MY_T_CYCLE"
MD10719 $MN_T_NO_FCT_CYCLE_MODE = 0
Main program
Program code
N210 D1
N220 G90 G0 X100 Y100 Z50
N230 D2 X110 Z0 T5
N240 M6
Example 3
The new tool is prepared for changing with the T function. The tool change is only realized
with function M6. The T function is replaced by calling the subprogram "MY_T_CYCLE". The
D / DL number is not transferred to the subprogram.
Basic Functions
Function Manual, 01/2015, 6FC5397-0BP40-5BA2
K1: Mode group, channel, program operation, reset response
T[$C_TE]=$C_T
D=$C_D
9.17 Replacing functions by subprograms
Comment
;
; M6 is replaced by subroutine "SUB_M6"
;
;
Comment
; IF address T is programmed
; Execute T selection
; ENDIF
; Execute tool change.
; IF address D is programmed
; Execute D selection
; ENDIF
Comment
;
; D1 is active.
; D1 remains active, programmed D2 is transferred
; to the subprogram as variable
; Execute tool change
Meaning
Tool change prepared with T
function
Replacement subprogram
Transfer of the D/DL number
625