Siemens Sinumeric 802D Handbuch Seite 225

Beispiel:
DEF INT state ; Am Programmanfang Variable für Status−Rückmeldung definieren
...
N100 RESETMON(state,12,1,2)
...
Programmierbeispiel
DEF INT state
ren
;
G0 X...
T7
$TC_MOP3[$P_TOOLNO,$P_TOOL]=100 ; Vorwarngrenze 100 Stück
$TC_MOP4[$P_TOOLNO,$P_TOOL]=700 ; Rest−Stückzahl
$TC_MOP13[$P_TOOLNO,$P_TOOL]=700 ; Sollwert Stückzahl
; Aktivierung nach dem Setzen:
$TC_TP9[$P_TOOLNO,$P_TOOL]=2
STOPRE
ANF:
BEARBEIT
SETPIECE(1)
M0
IF ($TC_MOP4[$P_TOOLNO,$P_TOOL]]>1) GOTOB ANF
MSG("Werkzeug T7 verschlissen − Bitte wechseln")
M0
RESETMON(state,7,1,2)
IF (state<>0) GOTOF ALARM
GOTOB ANF
ALARM: ; Fehler zur Anzeige bringen:
MSG("Fehler RESETMON: " <<state)
M0
M2
SINUMERIK 802D, 802D bl Bedienen und Programmieren Drehen (BP−D), Ausgabe 08/2005
6FC5 698−2AA00−1AP4
;Sollwertaktualisierung des Stückzählers für T12, D1
; Variable für Status−Rückmeldung von RESETMON() definie-
; frei fahren
; neues Werkzeug, evt. mit M6 einwechseln
; Aktivierung Stückzahlüberwachung, aktives WZ
; Unterprogramm zur Werkstückbearbeitung
; Zähler aktualisieren
; nächstes Werkstück, weiter mit NC−Start
; nach WZ−Wechsel weiter mit NC−Start
;Sollwertaktualisierung Stückzähler
8.12 Zeitgeber und Werkstückzähler
Programmieren
8-225