Siemens SINUMERIK 840Di Function Manual page 688

Detailed Description
2.11 Subroutine call with M, T, and D functions
N170 ENDIF
N190 M17
A comprehensive example for M/T function replacement with tool change including the
associated replacement subroutines can be found in the next section.
2.11.3.3 Example of M/T function replacement for tool change
Replacement of T address and D or DL addresses at block start
• Tool change occurs with address T (thus without M code).
• Tool management not active.
• B axis as indexing axis with Hirth tooth system.
Configuration of machine data:
MD11717 $MN_D_NO_FCT_CYCLE_NAME = "D_T_SUB_PROG" ; D replacement cycle
MD10717 $MN_T_NO_FCT_CYCLE_NAME = "D_T_SUB_PROG" ; T replacement cycle
MD10719 $MN_T_NO_FCT_CYCLE_MODE = 'H2'
MD22550 $MC_TOOL_CHANGE_MODE = 0
MD10718 $MN_M_NO_FCT_CYCLE_PAR = -1
Programming with main and replacement subroutine
N410 G01 F1000 X10 T1 = 5 D1
N1000 PROC D_T_SUB_PROG DISPLOF
SBLOF
...
N4100 IF $C_T_PROG == TRUE
N4110
N4120 POS[B] = CAC($C_T)
N4130 T[$C_TE] = $C_T
N4140 ENDIF
N4300 IF $C_D_PROG == TRUE
N4300
N4310 D = $C_D
N4320 ENDIF
N4400 IF $C_DL_PROG == TRUE
N4410
N4420 D = $C_DL
N4430 ENDIF
...
N9999 RET
2-152
; Main program
; Replacement subroutine
Scan whether address T has been
programmed
; Replacement for address T with tool no.
; Move revolver to indexing position
; Select tool (T selection)
; Scan whether address D has been
programmed
; Replacement for address D
; Select offset (D selection)
; Scan whether address DL has been
programmed
; Replacement for address DL
; Select insert offset
Mode Group, Channel, Program Operation, Reset Response (K1)
Function Manual, 08/2005 Edition, 6FC5397-0BP10-0BA0