HEIDENHAIN TNC 406 - 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