Siemens SINUMERIK 810D Manual De Funciones página 38

Información Máquina
2.5 Ejecución en la máquina
Código de programa
PROC EPS_PROLOGEPILOG(BOOL doProlog, STRING[32] testType, STRING[32] measSeriesName,
INT intParam1, INT intParam2, INT intParam3, INT intParam4, INT intParam5, INT
intParam6, REAL realParam1, REAL realParam2, REAL realParam3, REAL realParam4, REAL
realParam5, REAL realParam6, AXIS axParam1, AXIS axParam2, AXIS axParam3, AXIS
axParam4, AXIS axParam5, AXIS axParam6)
IF (doProlog == TRUE)
MSG("Start of Prolog ... ")
ELSE
AX[axParam1]=realParam1
AX[axParam2]=realParam2
38
IF ( testType == "FRAME")
MSG("Frame Prolog ...")
T0 M6
POSICIÓN BÁSICA
TRAFOOF
G94
DIAMOF
G90
MSG(testType << " Prolog ...")
IF (axParam1 == C) OR (axParam1 == A)
IF ($AA_IW[Q]!=0)
ENDIF
ENDIF
IF (axParam1 == U) OR (axParam1 == W)
IF ($AA_IW[Q]!=180)
ENDIF
ENDIF
IF (testType == "CIRCULARITY")
G1 F1000 SUPA
G1 F1000 SUPA
IF (measSeriesName == "KFT_FFWON")
; user DEF area
; start of Prolog - user section start
; Frame Prolog user section Acciones al inicio de
una serie de pruebas
; Descargar herramienta
; Todos los ejes en la posición segura
; Desactivar transformada
; En tornos está preajustado frecuentemente G95
; Prólogo específico para una serie de
mediciones
; Tratamiento independiente del tipo de medición
; Tratamiento en la medición de determinados
ejes:
; Si se quiere medir el eje A o el C, Q tiene que
ser 0
; Código M para la rotación de Q
; Si se quiere medir el eje U o el W, Q tiene que
ser 180
; Código M para la rotación de Q
; Tratamiento específico en el test de circularidad
; Acciones para todos los tests de circularidad:
para evitar colisiones, los dos ejes se desplazan
sucesivamente al centro del círculo.
Posiblemente se necesite un orden especial.
; SUPA, para posición de destino en
coordenadas de máquina
ePS Network Services
Manual de funciones, 11/2006, --