Programmierbeispiel

Programmierbeispiel

Außendurchmesser mit 3 Punkten

; touchprobe activtion

T1 D1

; deactivation of the zero offset

G53

; positioning to the starting point

G0 X0 Y0 Z5

#VAR

  ;input parameters

  V.L.SpigotDiameter   = 20

  V.L.ZeroOffsetNumber = 54

  V.L.SafetyDistance   = 10

  V.L.FirstAngle       = 30

  V.L.SecondAngle      = 150

  V.L.ThirdAngle       = 270

  V.L.PositioningZ     = -10

  V.L.CrossOver        = 10

  ;output variables

  V.CYC.SysRetX

  V.CYC.SysRetY

  V.CYC.SysRetDiameter

#ENDVAR

;cycle call

L CYCLE [NAME="SysMeasWcs11.ecy"\

        @P2=V.L.SpigotDiameter\

        @P7=V.L.ZeroOffsetNumber\

        @P13=V.L.SafetyDistance\

        @P14=V.L.FirstAngle\

        @P15=V.L.SecondAngle\

        @P16=V.L.ThirdAngle\

        @P19=V.L.PositioningZ\

        @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]

M30

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