Heidenhain, Solution, Main program – HEIDENHAIN TNC 426 (280 460) Training Advanced User Manual
Page 123: Spgm, bolt hole circle

HEIDENHAIN
HEIDENHAIN
Advanced course TNC 4xx
1 Bolt hole circle (parametric),
1 tool, 1 cycle (center)
7416/3
C05
Main program
0 BEGIN PGM 7416 MM
1 ................................................................................. 1 BOLT HOLE CIRCLE
2 BLK FORM 0.1 Z X+0 Y+10 Z-22
3 BLK FORM 0.2 X+100 Y+90 Z+0
4 TOOL DEF 1 L+0 R+3,5
5 TOOL CALL 1 Z S1000
6 L Z+10 R0 F9999 M3
7 CYCL DEF 1.0 PECKING .......................................... CYCLE TYPE AND CYCLE VALUES
8 CYCL DEF 1.1 SET UP -Q6
9 CYCL DEF 1.2 DEPTH -2
10 CYCL DEF 1.3 PECKG -2
11 CYCL DEF 1.4 DWELL 0
12 CYCL DEF 1.5 F100
13 FN 0: Q1 = +50 ......................................................... X-CENTER
14 FN 0: Q2 = +50 ......................................................... Y-CENTER
15 FN 0: Q3 = +20 ......................................................... RADIUS
16 FN 0: Q4 = +10 ......................................................... NUMBER
17 FN 0: Q5 = +0 ........................................................... STARTING ANGLE
18 FN 0: Q6 = +2 ........................................................... Z-SETUP CLEARANCE
19 CALL LBL 1
20 L Z+20 R0 F9998 M2 ................................................ RETURN JUMP
21 LBL 1
22 FN 0: Q25 = +Q5
23 FN 0: Q24 = +1
24 CC X+Q1 Y+Q2
25 FN 4: Q26 = +360 DIV +Q4
26 LP PR+Q3 PA+Q5 R0
27 L Z+Q6 M99
28 LBL 2
29 FN 1: Q25 = +Q25 + +Q26
30 FN 1: Q24 = +Q24 + +1
31 LP PR+Q3 PA+Q25 M99
32 FN 12: IF +Q24 LT +Q4 GOTO LBL 2
33 LBL 0
34 END PGM 7416 MM
SPGM,
Bolt hole circle
Center
Geometry values
Retract tool, end
100
22
0
100
0
50
50
0
R20
10 x
0°
2
7