4 er osion cy cles – HEIDENHAIN TNC 406 User Manual
Page 172

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