35
D453
;bipolar
spindle
drive - command
signal
Z
NF090
;if spinle drive unipolar (CONST3=0)
U453
; 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