2 Maschine information 12/2008
2.3 Test series on the machine
© Siemens AG 2008 All Rights Reserved
2-58 ePS Network Services, Function Manual (FH) - Release 12/2008
PROC EPS_PROLOGEPILOG(BOOL doProlog, ePS_error,
ePS_errMsg, 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)
; user DEF area
IF (doProlog == TRUE)
MSG("Start of Prolog ... ")
; start of Prolog - user section start
IF ( testType == "FRAME")
MSG("Frame Prolog ...")
; Frame prolog user section actions at the
start of a test series
T0 M6
; Unload tool
BASIC POSITION
; all axes to safe position
TRAFOOF
; Deactivate transformation
G94
; for lathes, G95 is often placed in front
DIAMOF
G90
ELSE
MSG(testType << " Prolog ...")
; prolog for a specific series of
measurements
; handling irrespective of type of
measurement
; procedure when measuring specific axes:
IF (axParam1 == C) OR
(axParam1 == A)
; if axis A or C are to be measured, Q must
be set to 0
IF ($AA_IW[Q]!=0)
; M code for rotation of Q
ENDIF
ENDIF
IF (axParam1 == U) OR
(axParam1 == W)
; if axis U or W are to be measured, Q must
be set to 180
IF ($AA_IW[Q]!=180)
; M code for rotation of Q
ENDIF
ENDIF
IF (testType == "CIRCULARITY")
; specific procedure for circularity test
; actions for all circularity tests: to avoid
collision, the two axes are moved to the
circle center one after the other. A particular
sequence may be required.
G1 F1000 SUPA AX[axParam1]=realParam1
; SUPA, therefore target position in the
machine coordinates
G1 F1000 SUPA AX[axParam2]=realParam2
IF (measSeriesName == "KFT_FFWON")
FFWON
; specifically this series of measurements
should be performed using the pre-control
FFWON
ENDIF
ENDIF
To Next Page
Loading...
