Siemens SINUMERIK 828D Funktionshandbuch Seite 591

Beispiel
Werkstück-Koordinatensystem auf der schrägen Ebene
Programmcode
DEF INT RETVAL
DEF AXIS _XX, _YY, _ZZ
T1 D1
G54
$AC_MEAS_VALID = 0
$AC_MEAS_TYPE = 18
$AC_MEAS_ACT_PLANE = 0
_XX=$P_AXN1
_YY=$P_AXN2
_ZZ=$P_AXN3
G17 G1 _XX=10 _YY=10 F1000
MEAS = 1 _ZZ=...
$AA_MEAS_POINT1[_xx] = $AA_MW[_xx]
$AA_MEAS_POINT1[_yy] = $AA_MW[_yy]
$AA_MEAS_POINT1[_zz] = $AA_MW[_zz]
G1 _XX=20 _YY=10 F1000
MEAS = 1 _ZZ=...
$AA_MEAS_POINT2[_xx] = $AA_MW[_xx]
$AA_MEAS_POINT2[_yy] = $AA_MW[_yy]
$AA_MEAS_POINT2[_zz] = $AA_MW[_zz]
G1 _XX=20 _YY=20 F1000
MEAS = 1 _ZZ=...
$AA_MEAS_POINT3[_xx] = $AA_MW[_xx]
$AA_MEAS_POINT3[_yy] = $AA_MW[_yy]
$AA_MEAS_POINT3[_zz] = $AA_MW[_zz]
$AA_MEAS_SETPOINT[_xx] = 10
$AA_MEAS_SETPOINT[_yy] = 10
$AA_MEAS_SETPOINT[_zz] = 10
$AC_MEAS_FRAME_SELECT = 102
$AC_MEAS_T_NUMBER = 1
Erweiterungsfunktionen
Funktionshandbuch, 08/2018, 6FC5397-1BP40-6AA2
9.5 Setzen von Nullpunkten, Werkstückvermessung und Werkzeugvermessung
Kommentar
; Messtaster aktivieren
; alle Frames und G54 aktivieren
; alle Eingangswerte ungültig setzen
; Messtyp für schräge Ebene setzen
; Ebene für die Messung ist G17
; Achsen entsprechend der Ebene festlegen
; 1. Messpunkt anfahren
; Messwert Abszisse zuweisen
; Messwert Ordinate zuweisen
; Messwert Applikate zuweisen
; 2. Messpunkt anfahren
; Messwert Abszisse zuweisen
; Messwert Ordinate zuweisen
; Messwert Applikate zuweisen
; 3. Messpunkt anfahren
; Messwert Abszisse zuweisen
; Messwert Ordinate zuweisen
; Messwert Applikate zuweisen
; Sollwerte für P1 vorgeben
; Ziel-Frame auswählen - G55
; Werkzeug auswählen
M5: Messen
591