karol12 pisze:Witam, używa ktoś funkcji monitorowania narzędzia $TC_MOP1,$TC_MOP2, $TC_MOP3.
Jest możliwe odczytanie czasu roboczego narzędzia?, bądź zliczanie czasu?.

Swego czasu na maszynie DMC przerobiłem program wymiany narzędzia tak aby po upływie czasu życia narzędzia wrzeciono podjechało do drzwi zamiast blokować narzędzie w magazynie.

Zliczanie czasu musi być włączone w liście narzędzi.


%_N_TOOLCHK3_SPF
;$PATH=/_N_CST_DIR
;SPRAWDZANIE CZASU ZYCIA NARZEDZIA
;28.02.2007
DEF REAL TIMELEFT=0
DEF INT WZ

;IF($P_TOOLNO<=0) GOTOF NCONT1
;IF($P_TOOL<=0) GOTOF NCONT1
STOPRE
WZ=$TC_MPP6[9998,1]
IF WZ<=0 GOTOF NCONT1
TIMELEFT=500-$TC_MOP2[WZ,1]
R200=R200-TIMELEFT
IF(R200>0) GOTOF NSAVE
STOPRE
$TC_MOP2[WZ,1]=1
IF $P_SEARCH GOTOF NCONT1
M9
SUPA G0 G40 G90 Z=$MA_POS_LIMIT_PLUS[Z]-0.5/_B_SCALE D0 M19 S0
SUPA G0 X-277. Y=300.

NLOP1:
STOPRE
IF($TC_MOP2[WZ,1]>1) GOTOF NCONT2
MSG("SKONCZYL SIE CZAS ZYCIA NARZEDZIA")
G4 F3
MSG("SPRAWDZ NARZEDZIE I EWENTUALNIE WYMIEN")
G4 F3
GOTOB NLOP1

NSAVE:
STOPRE
$TC_MOP2[WZ,1]=R200
GOTOF NCONT1

NCONT2: G0 SUPA X230.

NCONT1: MSG("")
M17