# Programmierbeispiel

Restmaterial entfernen

T20 D20 ( Tool data )

M6 ( Tool change )

G90 G54 S6000 M03 F5000 ( Technology data )

G00 Z100 ( Go to z start position )

#VAR

V.L.SurfacePosition = 0 ( Z-Position of workpiece surface )

V.L.RetractionPlane = 50 ( Z-Position of retraction plane )

V.L.SafetyClearance = 2 ( relative value of safety clearance )

V.L.Depth = 10 ( depth of pocket )

V.L.MachiningMode = 1 ( roughing )

V.L.MaxIncrementZ = V.L.Depth ( maximal infeed in Z )

V.L.FeedRateZ = 80 ( plunging feedrate )

V.L.MaxIncrementXY = 2.2 ( maximal infeed in XY )

V.L.ReferenceCycle = 1 ( Reference cycle (1/2) )

V.L.RadiusReferenceCycle = 4 ( Radius of tool in reference cycle )

V.L.ContourID = 1 ( Idendification number pocket contour)

V.L.FinishingOffsetXY = 0.2 ( Finishing offset XY (Standard = 0) )

V.L.IsleID1 = 2 ( Idendification number isle 1 )

#ENDVAR

; circual pocket definition:

#CONTOUR BEGIN[ID = 1]

G1 G90 X30 Y0

G02 G161 X-30 Y0 I0 J0

G02 G161 X30 Y0 I0 J0

#CONTOUR END

; island (with residual material) definition:

#CONTOUR BEGIN[ID = 2]

G1 G90 X-10 Y-10

G1 X10 Y-10

G1 X10 Y-3

G1 X-5 Y-3

G1 X-5 Y3

G1 X10 Y3

G1 X10 Y10

G1 X-10 Y10

G1 X-10 Y-10

#CONTOUR END

G0 ZV.L.RetractionPlane

; polynomial contouring for smooth movements

#CONTOUR MODE [DEV, PATH_DEV = V.G.WZ_AKT.R / 100]

G261

; pocket milling cycle call:

L CYCLE [NAME = SysMillContourPocket.ecy \

@P1 = V.L.SurfacePosition \

@P2 = V.L.RetractionPlane \

@P3 = V.L.SafetyClearance \

@P4 = V.L.Depth \

@P5 = V.L.MaxIncrementZ \

@P6 = V.L.MaxIncrementXY \

@P16 = V.L.FinishingOffsetXY \

@P21 = V.L.FeedRateZ \

@P31 = V.L.MachiningMode \

@P50 = V.L.ContourID \

@P51 = V.L.IsleID1 \

]

T13 D13 ( Tool data )

M6 ( Tool change )

G00 G90 M03 S8000 F5000 ( Technology data )

; residual milling cycle call:

V.L.MaxIncrementXY = V.G.WZ_AKT.R ( adapt increment to new tool )

V.L.MaxIncrementZ = 3 ( maximal infeed in Z )

L CYCLE [NAME = SysMillContourResidual.ecy \

@P1 = V.L.SurfacePosition \

@P2 = V.L.RetractionPlane \

@P3 = V.L.SafetyClearance \

@P4 = V.L.Depth \

@P5 = V.L.MaxIncrementZ \

@P6 = V.L.MaxIncrementXY \

@P16 = V.L.FinishingOffsetXY \

@P21 = V.L.FeedRateZ \

@P35 = V.L.ReferenceCycle \

@P36 = V.L.RadiusReferenceCycle \

@P50 = V.L.ContourID \

@P51 = V.L.IsleID1 \

]

G260

M05

M30