Fagor CNC 8060, Installation Manual

Page: 481 / 698

Installation manual.
CNC 8060
CNC 8065
TOOL
A
ND MA
GAZIN
E
MANAGEMEN
T.
7.
Synch
ro
nou
s maga
zine wi
tho
u
t
ch
ange
r
arm.
·481·
(R
EF
: 1709)
7.8.4 Program of the M06 subroutine.
%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]
; Message for the operator to extract the tool.
M0 ; Wait for the operation to be completed.
#MSG [""] ; Remove message.
V.PLC.M[1107]=1 ; SPDLTOGR mark to the tool manager.
#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]
; Message for the operator to insert the tool.
M0 ; Wait for the operation to be completed.
#MSG [""] ; Remove message.
V.PLC.M[1108]=1 ; GRTOSPDL mark to the tool manager.
#WAIT FOR [V.PLC.M[1108]==0]
#RET
%L SUB_MZ_TO_SPD ; Take the tool from the magazine and insert it in the spindle.
M109 ; Auxiliary function to execute an action.
V.PLC.M[1109]=1 ; MZTOSPDL mark to the tool manager.
#WAIT FOR [V.PLC.M[1109]==0]
#RET
%L SUB_SPD_TO_MZ ; Leave the spindle tool in the magazine.
M110 ; Auxiliary function to execute an action.
V.PLC.M[1110]=1 ; SPDLTOMZ mark to the tool manager.
#WAIT FOR [V.PLC.M[1110]==0]
#RET
%L SUB_SPD_GMCHG ; Move the spindle to the manual tool change point.
G1 Z_ F_ ; Move the spindle.
#RET
%L SUB_SPD_AUTCHG ; Move the spindle to the automatic tool change point
G1 Z_ F_ ; Move the spindle.
#RET
%SUB_M6.nc
#ESBLK ; Begin of single block activation
#DSTOP ; STOP key disable
M6 ; Order the tool manager to start the tool change.
$IF [[[V.G.FULLSTATUS & 255]<9] | [[V.G.FULLSTATUS & 255]>13]]
$IF [[V.G.CNCAUTSTATUS & 4096] | [V.G.CNCAUTSTATUS & 8192]]
V.S.EXECUTION = 0 ; Simulated Theorical or G
$ELSE
V.S.EXECUTION = 1 ; Execution
$ENDIF
$ELSE
V.S.EXECUTION = 0 ; Simulation
$ENDIF
$IF [V.S.EXECUTION == 1] ; CNC in execution
$SWITCH V.PLC.TMOPERATION ; It analyzes the type of operation.
$CASE 1 ; Take a tool from the magazine and insert it in the
spindle.
LL SUB_SPD_AUTCHG ; Move the spindle to the automatic tool change point
LL SUB_MZ_TO_SPD ; Take the tool from the magazine to the spindle.
$BREAK