Siemens SINUMERIK 840Di sl Handbuch Seite 683

g1 x0 y3
$AA_MEAS_POINT2[x] = $AA_IW[x]
$AA_MEAS_POINT2[y] = $AA_IW[y]
$AA_MEAS_POINT2[z] = $AA_IW[z]
g1 x3 y0
$AA_MEAS_POINT3[x] = $AA_IW[x]
$AA_MEAS_POINT3[y] = $AA_IW[y]
$AA_MEAS_POINT3[z] = $AA_IW[z]
$AA_MEAS_SETPOINT[x] = 0
$AA_MEAS_SETPOINT[y] = 0
$AA_MEAS_SETPOINT[z] = 0
$AC_MEAS_ACT_PLANE = 0
$AC_MEAS_FRAME_SELECT = 0
$AC_MEAS_T_NUMBER = 1
$AC_MEAS_D_NUMBER = 1
$AC_MEAS_TYPE = 8
RETVAL = MEASURE()
if RETVAL <> 0
setal(61000 + RETVAL)
endif
if $AC_MEAS_DIAMETER <> 10
setal(61000 + $AC_MEAS_WP_ANGLE)
endif
$P_SETFRAME = $AC_MEAS_FRAME
$P_SETFR = $P_SETFRAME
g1 x-3 y0
g2 I = $AC_MEAS_DIAMETER / 2
m30
Erweiterungsfunktionen: Messen (M5)
Funktionshandbuch, 11/2006, 6FC5397-1BP10-2AA0
2.3 Setzen von Nullpunkten, Werkstückvermessung und Werkzeugvermessung
; 2. Messpunkt anfahren
;
;
;
;
; 3. Messpunkt anfahren
;
;
;
;
; Sollposition der Mitte setzen
;
;
;
; Ebene für die Messung ist G17
; Frame auswählen - SETFRAME
; Werkzeug auswählen
;
;
; Messtype auf Bohrung setzen
; Berechnung ausführen
;
; bekannten Durchmesser abfragen
; Systemframe in der Datenhaltung beschreiben
; Fahre P1 an
; Bohrung bezüglich Kreismittelpunkt abfahren
Ausführliche Beschreibung
2-35