Siemens SINUMERIK 828D Function Manual page 101

Example
Program code
; Initialization of the global counter for the technology cycle CTSWEC
N100 $AC_MARKER[0]=0
N110 ID=1 DO CTSWEC
NEXT:
N200 G0 X30 Z1
N210 G95 F.5
N220 M3 S1000
N230 G0 X25
N240 G1 Z-10
N250 G0 X30
N260 M5
; Enable of the axis container rotation for container spindle S1.
N270 AXCTSWE(S1)
N200 GOTO NEXT
Program code
PROC CTSWEC( STRING _ex_CT="CT1"
INT _ex_CTsl_BITmask=1H
INT _ex_CT_SL_Number=1
INT _ex_WAIT_number_of_IPOs=1000
) DISPLOF ICYCOF
DEFINE _ex_number_of_IPOs AS $AC_MARKER[0]
IF ($AC_STOP_COND[0] + $AC_STOP_COND[1] + $AC_STOP_COND[2] + $AC_STOP_COND[3] +
$AC_STOP_COND[4] + $AC_STOP_COND[5] + $AC_STOP_COND[6] + $AC_STOP_COND[7] +
$AC_STOP_COND[8] + $AC_STOP_COND[9] + $AC_STOP_COND[10]) > 0)
; Increment IPO cycle counter
_ex_number_of_IPOs = _ex_number_of_IPOs + 1
; If a stop condition for longer than "_ex_WAIT_number_of_IPOs"
; IPO cycles is present AND its own slot has not been enabled
IF ( _ex_number_of_IPOs >= _ex_WAIT_number_of_IPOs) AND
($AN_AXCTSWEC[_ex_CT] == _ex_CTsl_BITmask )
AXCTSWEC
ENDIF
ELSE
; Reset IPO cycle counter
_ex_number_of_IPOs = 0
ENDIF
RET
Synchronized actions
Function Manual, 07/2012, 6FC5397-5BP40-3BA0
Comment
;
Comment
; Cancel the enable of the axis container rotation.
2.7 Actions in synchronized actions
For technology cycle CTSWEC, see below.
Detailed description
101