beautypg.com

4 er osion cy cles – HEIDENHAIN TNC 406 User Manual

Page 172

background image

HEIDENHAIN TNC 406, TNC 416

151

8.4 Er

osion Cy

cles

Cycle 16 ORBIT in the part program, example 2

14 FN4: Q8 = +Q9 DIV +2

Calculation of the expansion radius RAD

15 FN3: Q7 = +Q10 * +0.8

Calculation of the vertical gap

16 FN2: Q6 = +Q1 - +Q7

Decrease incremental depth by the vertical gap

17 CYCL DEF 16.0 ORBIT

Cycle ORBIT (see ”Cycle 16 ORBIT” on page 139)

18 CYCL DEF 16.1 IZ–Q6 M36

Incremental eroding depth IZ=–Q6, eroding ON

19 CYCL DEF 16.2 RAD=Q8 DIR=0

Expansion radius RAD=Q8, erosion movement

counterclockwise DIR=0

20 CYCL DEF 16.3 PAT=0 SPO=0

Circular expansion PAT=0, spark-out mode SPO=0

21 IF +Q99 EQU +Q151 GOTO LBL 99

Inquiry if minimum power stage has been reached

22 FN 2: Q99= +Q99 - +1

Decrease current power stage by 1

23 FN 9: IF +0 EQU +0 GOTO LBL 1

Jump to LBL1, machine again with lower power stage

24 LBL 99

LBL 99 is reached when machining with the lowest

power stage is completed

25 L Z+50 R0 F MAX M37

Retract to set-up clearance, eroding OFF

26 END PGM EXORB1 MM

0 BEGIN PGM EX2 MM

1 BLK FORM 0.1 Z X+0 Y+0 Z–20

2 BLK FORM 0.2 X+100 Y+100 Z+0

3 CYCL DEF 1.0 GENERATOR

Cycle GENERATOR (see ”Cycle 1 GENERATOR” on page 133)

4 CYCL DEF 1.1 P-TAB CUST1

Desired erosion table

5 CYCL DEF 1.2 MAX=10 MIN=5

Maximum power stage = 10, minimum power stage = 5

6 TOOL DEF 1 L+0 R+9.9

Electrode radius

7 TOOL CALL 1 Z U+4.2

Undersize

8 L Z+50 C+0 R0 F MAX M37

Pre-position to setup clearance, eroding OFF

9 L X+50 Y+50 Z+1 R F MAX

Pre-position over the workpiece surface

10 FN 0: Q1 = +11

Assign incremental depth to Q1

11 LBL1

Label number

12 FN16: Q10 = Q200(Q99)

The diametrical gap according to the current power stage is

assigned to Q10 (see ”Indexed assignment” on page 198)

13 FN2: Q9 = +Q158 - +Q10

Electrode undersize UM minus electrode undersize UNS

14 FN4: Q8 = +Q9 DIV +2

Calculation of the expansion radius RAD

15 FN3: Q7 = +Q10 * +0.8

Calculation of the vertical gap

16 FN2: Q6 = +Q1 - +Q7

Decrease incremental depth by the vertical gap

17 L IZ - +Q6 R0 F M36

Erode to end depth, eroding ON

18 CYCL DEF 16.0 ORBIT

Cycle ORBIT (see ”Cycle 16 ORBIT” on page 139)

19 CYCL DEF 16.1 IZ+0 M36

Erode to end depth, eroding ON

This manual is related to the following products: