K1: Mode group, channel, program operation, reset response
9.15 Replacing functions by subprograms
Basic Functions
654 Function Manual, 09/2011, 6FC5397-0BP40-2BA0
Replacement subprogram "LANG_SUB", version 1
Optimized for simplicity and velocity by directly addressing the spindles (S1: Leading spindle, S2: Following
spindle).
Replacement subprogram "LANG_SUB", version 2
Flexibility through indirect addressing using the system variable (leading spindle: $P_SUB_LA, following spindle:
$P_SUB_CA).
Programming Comment
N1000 PROC LANG_SUB DISPLOF SBLOF
N1100 IF($P_SUB_AXFCT ==1) ; Replacement due to gear stage change
N1140 DELAYFSTON ; Start stop delay area
N1150 COUPOF(S2,S1) ; Open synchronous spindle coupling
N1160 ;gear stage change separately for leading and following spindles
N1170 M1=$P_SUB_GEAR M2=$P_SUB_GEAR
N1180 DELAYFSTON ; End of stop delay area
N1190 COUPON(S2,S1) ; Close the synchronous spindle coupling
N1200 ENDIF
...
N9999 RET
Programming Comment
N1000 PROC LANG_SUB DISPLOF SBLOF
N1010 DEF AXIS _LA ; Bit memory for leading axis / leading spindle
N1020 DEF AXIS _CA ; Bit memory for following axis / following
spindle
N1030 DEF INT _GEAR ; Bit memory for gear stage
N1100 IF($P_SUB_AXFCT==1) ; Replacement due to gear stage change
N1110 _GEAR=$P_SUB_GEAR ; gear stage to be activated
N1120 _LA=$P_SUB_LA ; Axis identifier of the leading spindle
N1130 _CA=$P_SUB_CA ; Axis identifier of the following spindle
N1140 DELAYFSTON ; Start stop delay area
N1150 COUPOF(_CA,_LA) ; Open synchronous spindle coupling
N1160 ;gear stage change for leading and following spindles
N1170 M[AXTOSPI(_LA)]=_GEAR M[AXTOSPI(_CA)]=_GEAR
N1180 DELAYFSTOF ; End of stop delay area
N1190 COUPON(_CA,_LA) ; Close the synchronous spindle coupling
N1200 ENDIF
...
N9999 RET