35
D453 ;bipolar spindle drive - command
signal
Z
NF090 ;if spinle drive unipolar (CONST3=0)
U453 ;always + command signal
Z
LRH053 ;valid coolant code
=8
U002 ;if 8, coolant on
Z
LRH000 ;programmed S code from NC to PLC
SRH050 ;feedback of S code to NC
U452 ;spindle command signal output enable
C053 ;command signal output according to S
code
1
W ;waiting for 100ms
:026
NI450 ;has spindle reached the commanded speed?
G026 ;waiting for I450=1
Z
LRH002 ;programmed spindle code (M3, 4, 5) NC ->
PLC
SRH052 ;spindle code feedback to the NC
R ;end of module :005
Coolant on/off module
:006
=9 ;coolant code =9 (M09)?
D002 ;coolant pump off
E ;if not 9, then 8
NY001 ;not M05, spindle is on
U002 ;coolant pump on
Z
Z
SRH053 ;coolant code feedback to the NC
R ;end of module :006
Module of spindle gear range change
:007
=LRH054 ;OP = current gear range code?
SF12 ;stores new gear range code in F12
R
Z ;if not equal to the current code
5
C005 ;calling :005, spindle stop
LRH004 ;loads gear range code into OP
BCD ;converts it into BCD for display purposes
PBM"!RANGE" ;blinking message "RANGE 001x" on display
C150 ;waiting for activating START button
BIN ;converts it back into BIN for feedback
SRH054 ;gear range code feedback to the NC
SF12 ;stores gear range code in F12
R ;end of module :007