Siemens SINUMERIK 840D sl Handbuch Seite 636

M5: Messen
8.4 Setzen von Nullpunkten, Werkstückvermessung und Werkzeugvermessung
$AC_MEAS_D_NUMBER = 1
$AC_MEAS_TYPE = 4
RETVAL = MEASURE()
if RETVAL <> 0
setal(61000 + RETVAL)
endif
if $AC_MEAS_CORNER_ANGLE <> 90
setal(61000 + $AC_MEAS_CORNER_ANGLE)
endif
$P_SETFRAME = $AC_MEAS_FRAME
$P_SETFR = $P_SETFRAME
g1 x0 y0
g1 x10
y10
x0
y0
m30
636
; Messtyp auf Ecke 1 setzen
; Messvorgang starten
; bekannten Sollschnittwinkel ϕ abfragen
; Systemframe in der Datenhaltung
beschreiben
; Fahre die Ecke an
; Rechteck abfahren
Funktionshandbuch, 03/2010, 6FC5397-1BP20-1AA0
Erweiterungsfunktionen