Program Of The M06 Subroutine - Fagor CNC 8060 Installation Manual

I n s t a l l a t i o n m a n u a l .
7.9.4

Program of the M06 subroutine.

%L SUB_MZ_TO_CH1 ; Take the tool from the magazine with holder 1.
M101
V.PLC.M[1101]=1
#WAIT FOR [V.PLC.M[1101]==0]
#RET
%L SUB_CH1_TO_SPD ; Take the tool of holder 1 to the spindle.
M102
V.PLC.M[1102]=1
#WAIT FOR [V.PLC.M[1102]==0]
#RET
%L SUB_SPD_TO_CH1 ; Take the spindle tool with holder 1.
M103
V.PLC.M[1103]=1
#WAIT FOR [V.PLC.M[1103]==0]
#RET
%L SUB_CH1_TO_MZ ;
M105
V.PLC.M[1105]=1
#WAIT FOR [V.PLC.M[1105]==0]
#RET
%L SUB_SPD_TO_GR ; Remove the tool from the spindle (take it to ground).
#MSG ["Extract tool T%D and press START", V.TM.TOOL]
M0
#MSG [""]
V.PLC.M[1107]=1
#WAIT FOR [V.PLC.M[1107]==0]
#RET
%L SUB_GR_TO_SPD ; Insert the ground tool in the spindle.
#MSG ["Insert tool T%D and press START", V.TM.NXTOOL]
M0
#MSG [""]
V.PLC.M[1108]=1
#WAIT FOR [V.PLC.M[1108]==0]
#RET
%L SUB_SPD_GMCHG ; Move the spindle to the manual tool change point.
G1 Z_ F_
#RET
%L SUB_SPD_AUTCHG ; Move the spindle to the automatic tool change point
G1 Z_ F_
#RET
%SUB_M6.nc
#ESBLK
#DSTOP
M6
$IF [[[V.G.FULLSTATUS & 255]<9] | [[V.G.FULLSTATUS & 255]>13]]
$IF [[V.G.CNCAUTSTATUS & 4096] | [V.G.CNCAUTSTATUS & 8192]]
V.S.EXECUTION = 0
$ELSE
V.S.EXECUTION = 1
$ENDIF
$ELSE
V.S.EXECUTION = 0
$ENDIF
; Auxiliary function to execute an action.
; MZTOCH1 mark to the tool manager.
; Auxiliary function to execute an action.
; CH1TOSPDL mark to the tool manager.
; Auxiliary function to execute an action.
; SPDLTOCH1 mark to the tool manager.
Take the tool of holder 1 to the magazine.
; Auxiliary function to execute an action.
; CH1TOMZ mark to the tool manager.
; Message for the operator to extract the tool.
; Wait for the operation to be completed.
; Remove message.
; SPDLTOGR mark to the tool manager.
; Message for the operator to insert the tool.
; Wait for the operation to be completed.
; Remove message.
; GRTOSPDL mark to the tool manager.
; Move the spindle.
; Move the spindle.
; Begin of single block activation
; STOP key disable
; Order the tool manager to start the tool change.
; Simulated Theorical or G
; Execution
; Simulation
7.
CNC 8060
CNC 8065
(R : 1709)
EF
·491·