Siemens SINUMERIK 840D sl Function Manual page 632

Detailed description
2.6 Block search Type 5 SERUPRO
In addition, machine data setting
MD18080 $MA_TOOL_MANAGEMENT_MASK Bit 11 = 1 is required because the ASUB
may have to repeat a T selection.
Systems with tool management and auxiliary spindle are not supported by SERUPRO!
Example
Tool change subroutine
PROC L6
N500 DEF INT TNR_AKTUELL
N510 DEF INT TNR_VORWAHL
N520 STOPRE
N530 IF $P_ISTEST
N540 TNR_AKTUELL = $P_TOOLNO
N550 ELSE
N560 TNR_AKTUELL = $TC_MPP6[9998,1]
N570 ENDIF
N580 GETSELT(TNR_VORWAHL)
N590 IF TNR_AKTUELL <> TNR_VORWAHL
N600 G0 G40 G60 G90 SUPA X450 Y300 Z300 D0
N610 M206
N620 ENDIF
N630 M17
74
Basic logic functions: Mode group, channel, program operation, reset response (K1)
; Tool change routine
; Variable for active T number
; Variable for preselected T
number
; Determine current tool
; In program testing
; from the program context
; the "current" tool is read.
; Otherwise, the tool of the
spindle is read out.
; Read tool T number on the
spindle
; Read T number of preselected
tool of the master spindle.
Execute tool change only if
tool not yet current.
; Approach tool change position
; Execute tool change
Function Manual, 11/2006, 6FC5397-0BP10-2BA0