# Programmierbeispiel

Rechteck innen

; touchprobe activtion

T1 D1

; deactivation of the zero offset

G53

; positioning to the starting point

G0 X0 Y0

G0 Z-15

#VAR

;input parameters

V.L.ZeroOffsetNumber = 54

V.L.SafetyDistance = 5

V.L.PocketLengthX = 40

V.L.PocketLengthY = 60

V.L.CrossOver = 5

;output variables

V.CYC.SysRetX

V.CYC.SysRetY

V.CYC.SysRetLengthX

V.CYC.SysRetLengthY

#ENDVAR

;cycle call

L CYCLE [NAME="SysMeasWcs28.ecy" \

@P7=V.L.ZeroOffsetNumber\

@P13=V.L.SafetyDistance \

@P31=V.L.PocketLengthX \

@P32=V.L.PocketLengthY \

@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.SysRetLengthX =%f", V.CYC.SysRetLengthX]

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

G0 Z10

M30

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