Siemens SINUMERIK 840D sl Funktionshandbuch Seite 429

Das ProgEvent-Programm hat folgenden groben Aufbau:
N1000 DEF INT TNO1, TNO2
N1010 DEF INT MTH_SAVE, D_NO_SAVE, SELTNO_SAVE, EXETNO_SAVE
N1020 DEF INT SELTNO1_SAVE, EXETNO1_SAVE, TH_OF_D_SAVE
; Sichern des aktuell erreichten Zustandes am Ende von Satzsuchlauf
N1100 MTH_SAVE = $P_MTHNUM D_NO_SAVE=$P_TOOL TH_OF_D_SAVE =
$P_TH_OF_D
N1110 GETSELT( SELTNO_SAVE, $P_TH_OF_D)
N1120 GETEXET( EXETNO_SAVE, $P_TH_OF_D)
; Daten zum Zustand vor dem Satzsuchlauf holen
N1150 GETSELT(TNO1,$P_MTHNUM_BEFORE_SEARCH, "S" )
N1160 GETEXET(TNO2,$P_MTHNUM_BEFORE_SEARCH, "S" )
N1170 GETSELT(SELTNO1_SAVE,$P_MTHNUM_BEFORE_SEARCH )
N1180 GETEXET(EXETNO1_SAVE,$P_MTHNUM_BEFORE_SEARCH )
; Alte Korrektur noch einmal anwählen.
N1200 SETMTH($P_MTHNUM_BEFORE_SEARCH)
N1210 T=TNO2
N1220 IF (EXETNO1_SAVE == TNO2 )
; Altes Werkzeug ist noch auf Werkzeughalter
N1230 M6 M=spez; Zusatzinfo, dass M6 kein WZW durch PLC benötigt
N1240 D=$P_D_NO_BEFORE_SEARCH
N1250 X=x_sicher Y=y_sicher Z=z_sicher G0 N1260 ELSE
....
N1300 ENDIF
; gewünschtes Werkzeug entsprechend des Zielsatzes einwechseln
N1400 SETMTH(TH_OF_D_SAVE)
N1500 T=EXETNO_SAVE
N1510 M6
N1520 D=D_NO_SAVE
; Master–Toolholder gemäß Zielsatz wiederherstellen
N1600 SETMTH(MTH_SAVE)
REPOS
MTh MThS SelT(2)
Vor N1200:
1 3 9
Werkzeugverwaltung
Funktionshandbuch, 08/2018, 6FC5397-6BP40-6AA2
SelTS(2 ExeT(2) ExeTS(
) 2)
* 8 *
7.4 Werkzeugwechsel Flächen-, Ketten-, Revolvermagazine
SelT(3) SelTS(3
)
* 6
Funktionsbeschreibung
ExeT(3) ExeTS( DNo
3)
* 5 3
DNoS
2
429