Siemens SINUMERIK 802D sl - Programming; 10.1 Fundamental principles of NC programming

Programming
8.11 Language commands for tool monitoring
8-193
SINUMERIK 802D sl Operation and Programming Nibbling (BP-N), 06/2006 Edition
6FC5 398-3CP10-0BA0
Example:
DEF INT state ; Define variable for status feedback at the beginning of the pro-
gram
...
N100 RESETMON(state,12,1,2) ; Workpiece counter setpoint refreshed for T12, D1; setpoint 2
...
Programming example
DEF INT state ; Define variable for the status checkback mes-
sage from
RESETMON()
;
G0 X... ; Retract
T7 ; Load new tool using M6 as necessary
$TC_MOP3[$P_TOOLNO,$P_TOOL]=100 ; Warning limit, 100 workpieces
$TC_MOP4[$P_TOOLNO,$P_TOOL]=700 ; Remaining quantity
$TC_MOP13[$P_TOOLNO,$P_TOOL]=700 ; Required quantity (setpoint)
; Activation after setting:
$TC_TP9[$P_TOOLNO,$P_TOOL]=2 ; Activate monitoring of required quantity, active
tool
STOPRE
ANF:
BEARBEIT ; Subroutine for workpiece machining
SETPIECE(1) ; Refresh counter
M0 ; Next workpiece; press NC START to continue
IF ($TC_MOP4[$P_TOOLNO,$P_TOOL]]>1) GOTOB ANF
MSG(“Tool T7 worn – please change”)
M0 ; After tool change, press NC START to continue
RESETMON(state,7,1,2) ; Workpiece counter setpoint refreshed
IF (state<>0) GOTOF ALARM
GOTOB ANF
ALARM: ; Display errors:
MSG(“error RESETMON: ” <<state)
M0
M2