Siemens SINUMERIK 840D sl Funktionshandbuch Seite 702

K1: BAG, Kanal, Programmbetrieb, Reset-Verhalten
10.18 Ersetzung von Funktionen durch Unterprogramme
Programmierung
N2280
N2285
N2290
N2410 ELSE
N2420
...
N3300 ENDIF
...
N9999 RET
LABEL_ERR: SETAL(61000)
Ersetzungsunterprogramm "LANG_SUB", Variante 2
Flexibilität durch indirekte Adressierung über Systemvariable (Leitspindel: $P_SUB_LA,
Folgespindel: $P_SUB_CA).
Programmierung
N1000 PROC LANG_SUB DISPLOF SBLOF
N1010 DEF AXIS _LA
N1020 DEF AXIS _CA
N1030 DEF INT _LSPI
N1040 DEF INT _CSPI
...
N2100 IF($P_SUB_AXFCT==2)
N2110 ;Ersetzung von SPOS/SPOSA/M19 bei aktiver ; Synchronspindelkopplung
N2120
N2130
N2140
N2180
N2185
N2190
N2200
N2210
N2220
N2230
LABEL1_DC:
702
ENDIF
DELAYFSTOF
COUPON(S2,S1)
;ab hier Bearbeitung weiterer Ersetzungen
_LA=$P_SUB_LA
_CA=$P_SUB_CA
_LSPI=AXTOSPI(_LA)
_CSPI=AXTOSPI(_LA)
DELAYFSTON
COUPOF(_CA,_LA)
IF($P_SUB_SPOS==TRUE) OR ($P_SUB_SPOSA==TRUE)
;SPOS und SPOSA werden auf SPOS abgebildet
CASE $P_SUB_SPOSMODE OF
0 GOTOF LABEL1_DC \
1 GOTOF LABEL1_IC \
2 GOTOF LABEL1_AC \
3 GOTOF LABEL1_DC \
4 GOTOF LABEL1_ACP \
5 GOTOF LABEL1_ACN \
DEFAULT GOTOF LABEL_ERR
SPOS[_LSPI]=DC($P_SUB_SPOSIT) SPOS[_CSPI]=DC($P_SUB_SPOSIT)
GOTOF LABEL1_CONT
Kommentar
; Ende Ersetzung SPOS, SPOSA
; Ende Stopp-Delay-Bereich
; Synchronspindelkopplung aktivieren
; Ende Ersetzungen
; Normales Programmende
; Fehler aufgetreten
Kommentar
; Leitachse/-spindel
; Folgeachse/-spindel
; Leitspindelnummer (programmierte
; Spindel)
; Folgespindelnummer
; Achsname der Leitspindel
; Achsname der Folgespindel
; Nummer der Leitspindel
; Nummer der Folgepindel
; Beginn Stopp-Delay-Bereich
; Synchronspindelkopplung deaktivieren
; Leit- und Folgespindel positionieren:
Funktionshandbuch, 12/2018, A5E40870716A AB
Grundfunktionen