Siemens SINUMERIK 840Di Function Manual page 595

N600 G0 G40 G60 G90 SUPA X450 Y300 Z300 D0
N610 M206
N620 ENDIF
N630 M17
ASUB for calling the tool change routine after block search type 5
PROC ASUPWZV2
N1000 DEF INT TNR_SPINDEL
N1010 DEF INT TNR_VORWAHL
N1020 DEF INT TNR_SUCHLAUF
N1030 TNR_SPINDEL = $TC_MPP6[9998,1]
N1040 TNR_SUCHLAUF = $P_TOOLNO
N1050 GETSELT(TNR_VORWAHL)
N1060 IF TNR_SPINDEL ==TNR_SUCHLAUF GOTOF
ASUP_ENDE1
N1070 T = $TC_TP2[TNR_SUCHLAUF]
N1080 L6
N1085 ASUP_ENDE1:
N1090 IF TNR_VORWAHL == TNR_SUCHLAUF GOTOF
ASUP_ENDE
N1100 T = $TC_TP2[TNR_VORWAHL]
N1110 ASUP_ENDE:
N1110 M90
N1120 REPOSA
In both of the programs PROC L6 and PROC ASUPWZV2, the tool change is programmed
with M206 instead of M6.
ASUB program "ASUPWZV2" uses different system variables to detect the progress of the
program ($P_TOOLNO) and represent the current status of the machine
($TC_MPP6[9998,1] ).
Mode Group, Channel, Program Operation, Reset Response (K1)
Function Manual, 08/2005 Edition, 6FC5397-0BP10-0BA0
Detailed Description
2.6 Block search Type 5 SERUPRO
; Execute tool change
; Variable for active T number
; Variable for preselected T number
; Variable for T number determined in
block search
; Read tool T number on the spindle
; read T number determined by search
run, i.e., that tool determines the
current tool offset.
; Read T number of preselected tool
;
; T selection by tool name
; Call tool change routine
;
;
;
; Restore T preselection by tool name
;
;
; Feedback to PLC
; ;ASUB end
2-59