HEIDENHAIN TNC 426 (280 460) Training Advanced - Manual (Page 80)

HEIDENHAIN HEIDENHAIN
Solution:
Advanced course TNC 4xx
Toggle joint with 2 tools, constant climb-cut
761261/3
D02
Main program
Tool 1
Tool 2
Retract tool, end
0 BEGIN PGM 761261 MM
1 BLK FORM 0.1 Z X-50 Y+0 Z-52
2 BLK FORM 0.2 X+50 Y+100 Z+0
3 TOOL DEF 1 L+0 R+10
4 TOOL CALL 1 Z S2800
5 FN 1: Q1 = +Q108 + +5
6 L Z+50 R0 F9999 M3
7 CYCL DEF 7.0 DATUM SHIFT
8 CYCL DEF 7.1 X+Q1
9 CYCL DEF 7.2 Y+0
10 CYCL DEF 7.3 Z+5
11 CALL LBL 1 .............................................................. RIGHT
12 CYCL DEF 7.0 DATUM SHIFT
13 CYCL DEF 7.1 X-Q1
14 CYCL DEF 7.2 Y+100
15 CYCL DEF 7.3 Z+5
16 CYCL DEF 10.0 ROTATION
17 CYCL DEF 10.1 ROT+180
18 CALL LBL 1 .............................................................. LEFT
19 TOOL DEF 2 L+0 R+10
20 TOOL CALL 2 Z S4000
21 L Z+50 R0 F MAX M6
22 CYCL DEF 7.0 DATUM SHIFT
23 CYCL DEF 7.1 X+Q108
24 CYCL DEF 7.2 Y+0
25 CALL LBL 1 .............................................................. RIGHT
26 CYCL DEF 7.0 DATUM SHIFT
27 CYCL DEF 7.1 X-Q108
28 CYCL DEF 7.2 Y+100
29 CYCL DEF 10.0 ROTATION
30 CYCL DEF 10.1 ROT+180
31 CALL LBL 1 .............................................................. LEFT
32 L Z+50 R0 F MAX M2
33 LBL 1
34 L X+55 Y-4 R0 F9999 M3
35 L Z-51 F1000
36 LBL 2
37 L IY+2 F100
38 L X+39 Z-51 F250
39 L X+28,354 Z-20,2
40 CT X+0 Z+0
41 L Z+5 R0 F9999
42 L X+55 Z+5
43 L X+55 Z-51 F MAX
44 CALL LBL 2 REP 50/50
45 L Z+5 R0 F MAX
46 CYCL DEF 7.0 DATUM SHIFT
47 CYCL DEF 7.1 X+0
48 CYCL DEF 7.2 Y+0
49 CYCL DEF 7.3 Z+0
50 CYCL DEF 10.0 ROTATION
51 CYCL DEF 10.1 ROT+0
52 LBL 0
53 END PGM 761261 MM
SPGM,
Contour Z/X