Beispielprogramm - Siemens SINUMERIK 840D sl Programmierhandbuch

Bewegungssynchronaktionen
10.4 Aktionen in Synchronaktionen
Beispiel

Beispielprogramm:

Programmcode
N100 Id=1 DO CTSWEC
; init
NEXT:
N200 G0 X30 Z1
N210 G95 F.5
N220 M3 S1000
N230 G0 X25
N240 G1 Z-10
N250 G0 X30
N260 M5
N270 AXCTSWE(S1)
N280 GOTO NEXT
Technologiezyklus CTSWEC:
Programmcode
CTSWEC PROC(_ex_CT="CT1" STRING _ex_CTsl_BITmask=1H LONG _ex_CT_SL_Number=1
_ex_WAIT_number_of_IPOs=1000) DISPLOF ICYCOF
DEFINE _ex_CT[3]
DEFINE _ex_CTsl_BITmask
DEFINE _ex_CT_SL_Number LONG =1
DEFINE _ex_WAIT_number_of_IPOs INTEGER =1000
DEFINE _ex_number_of_IPOs $AC_MARKER[0]
N110 IF (($A_STOP_COND[0] OR $A_STOP_COND[1] OR $A_STOP_COND[2] OR $A_STOP_COND[3] OR $A_STOP_COND[4]
OR $A_STOP_COND[5] OR $A_STOP_COND[6] OR $A_STOP_COND[7] OR $A_STOP_COND[8] OR $A_STOP_COND[9] OR
$A_STOP_COND[10]) is true))
N120 _ex_number_of_IPOs=_ex_number_of_IPOs+1
N130 IF _ex_number_of_IPOs >= _ex_WAIT_number_of_IPOs
AND $AN_AXCTSWEC[_ex_CT] == _ex_CTsl_BITmask
N140 AXCTSWEC
; ... ELSE
N150 ENDIF
N160 ELSE
N170 _ex_number_of_IPOs=0
N180 ENDIF
N190 RET
618
Kommentar
; Technologiezyklus siehe unten.
; Freigabe der Achscontainer-Drehung über die im Kanal bekannte
Containerspindel S1.
Kommentar
; Containername
; Slot-Bit
; Wenn irgendeine Haltebedingung länger
als 1000 IPO-Takte vorliegt
; und die Freigabe des eigenen Slots noch
nicht erfolgt ist:
; Freigabe zurücknehmen.
; Warten, ob sich Haltebedingung nicht von
alleine auflöst.
Programmierhandbuch, 02/2011, 6FC5398-2BP40-1AA0
Arbeitsvorbereitung