HEIDENHAIN TNC 407 (280 580) User Manual User Manual
Page 204
7-19
TNC 425/TNC 415 B/TNC 407
7
Programming with Q Parameters
27 LBL 1 ..................................................................... Subprogram bolt hole circle
28 FN 0: Q10 = +0 .................................................... Set the counter for finished holes
29 FN 10: IF +Q6 NE +0 GOTO LBL 10 ................... If the hole angle increment has been entered, jump to LBL 10
30 FN 4: Q6 = +360 DIV +Q3 ................................... Calculate the hole angle increment, distribute holes over 360°
31 LBL 10
32 FN 1: Q11 = +Q5 + +Q6 ...................................... Calculate second hole position from the start angle and hole
angle increment
33 CC X+Q1 Y+Q2 .................................................... Set pole at bolt hole circle center
34 LP PR+Q4 PA+Q5 R0 F MAX M3 ........................ Move in the plane to 1st hole
35 L Z+Q7 R0 F MAX M99 ....................................... Move in Z to setup clearance, call cycle
36 FN 1: Q10 = +Q10 + +1 ...................................... Count finished holes
37 FN 9: IF +Q10 EQU +Q3 GOTO LBL 99.............. Finished?
38 LBL 2
39 LP PR+Q4 PA+Q11 R0 F MAX M99.................... Make a second and further holes
40 FN 1: Q10 = +Q10 + +1 ...................................... Count finished holes
41 FN 1: Q11 = +Q11 + +Q6 .................................... Calculate angle for next hole
(update)
42 FN 12: IF + Q10 LT + Q3 GOTO LBL 2 ................ Not finished?
43 LBL 99
44 L IZ+200 R0 F MAX .............................................. Retract in Z
45 LBL 0 .................................................................... End of subprogram
46 END PGM K71 MM