# Programmierbeispiel

Vermessung Werkstück

; touchprobe activtion

T1 D1

; deactivation of the zero offset

G53

; positioning to the starting point

G00 X50 Y20

G00 Z-10

#VAR

;input parameters

V.L.HoleDiameter = 20

V.L.ZeroOffsetNumber = 54

V.L.SafetyDistance = 1

V.L.StartAngle = 20

V.L.IncrementalAngle = 70

V.L.CrossOver = 0

;output variables

V.CYC.SysRetX

V.CYC.SysRetY

V.CYC.SysRetDiameter

#ENDVAR

;cycle call

L CYCLE[NAME="SysMeasWcs36.ecy"\

@P2=V.L.HoleDiameter\

@P7=V.L.ZeroOffsetNumber\

@P13=V.L.SafetyDistance\

@P14=V.L.StartAngle\

@P15=V.L.IncrementalAngle\

@P33=V.L.CrossOver]

; print result

#FILE NAME [MSG="SysMeasWcsResult.txt"]

#MSG SAVE ["V.CYC.SysRetX =%f", V.CYC.SysRetX ]

#MSG SAVE ["V.CYC.SysRetY =%f", V.CYC.SysRetY ]

#MSG SAVE ["V.CYC.SysRetDiameter =%f", V.CYC.SysRetDiameter]

G00 Z10

M30

Ein weiteres Beispiel zur Handhabung der SysMeasWcs-Zyklen ist im Übersichtskapitel im Unterpunkt Programmierung zu finden.