HEIDENHAIN TNC 426 B, TNC 430
277
20 LBL 10
21 CYCL DEF 7.0 DATUM SHIFT
22 CYCL DEF 7.1 X+Q1
23 CYCL DEF 7.2 Y+Q2
24 CYCL DEF 10.0 ROTATION
25 CYCL DEF 10.1 ROT+Q8
26 Q35 = (Q6 - Q5) / Q7
27 Q36 = Q5
28 Q37 = 0
29 Q21 = Q3 * COS Q36
30 Q22 = Q4 * SIN Q36
31 L X+Q21 Y+Q22 R0 F MAX M3
32 L Z+Q12 R0 F MAX
33 L Z-Q9 R0 FQ10
34 LBL 1
35 Q36 = Q36 + Q35
36 Q37 = Q37 + 1
37 Q21 = Q3 * COS Q36
38 Q22 = Q4 * SIN Q36
39 L X+Q21 Y+Q22 R0 FQ11
40 FN 12: IF +Q37 LT +Q7 GOTO LBL 1
41 CYCL DEF 10.0 ROTATION
42 CYCL DEF 10.1 ROT+0
43 CYCL DEF 7.0 DATUM SHIFT
44 CYCL DEF 7.1 X+0
45 CYCL DEF 7.2 Y+0
46 L Z+Q12 R0 F MAX
47 LBL 0
48 END PGM ELLIPSE MM
Subprogram 10: Machining operation
Shift datum to center of ellipse
Account for rotational position in the plane
Calculate angle increment
Copy starting angle
Set counter
Calculate X coordinate for starting point
Calculate Y coordinate for starting point
Move to starting point in the plane
Pre-position in tool axis to setup clearance
Move to working depth
Update the angle
Update the counter
Calculate the current X coordinate
Calculate the current Y coordinate
Move to next point
Unfinished? If not finished, return to LBL 1
Reset the rotation
Reset the datum shift
Move to setup clearance
End of subprogram
1
0.1
1 Pr
ogr
amming Examples
MKAP10.PM6
30.06.2006, 07:04
277
www.EngineeringBooksPdf.com
Summary of Contents for TNC 426 B
Page 3: ...BAUSKLA PM6 30 06 2006 07 03 2 www EngineeringBooksPdf com ...
Page 4: ...BAUSKLA PM6 30 06 2006 07 03 3 www EngineeringBooksPdf com ...
Page 6: ...CINHALT PM6 30 06 2006 07 03 2 www EngineeringBooksPdf com ...
Page 16: ...CINHALT PM6 30 06 2006 07 03 12 www EngineeringBooksPdf com ...
Page 17: ...Introduction 1 Dkap1 pm6 30 06 2006 07 03 1 www EngineeringBooksPdf com ...
Page 29: ...Manual Operation and Setup 2 Dkap2_3 pm6 30 06 2006 07 03 13 www EngineeringBooksPdf com ...
Page 83: ...Programming Tools 5 Fkap5 pm6 30 06 2006 07 03 67 www EngineeringBooksPdf com ...
Page 106: ...Fkap5 pm6 30 06 2006 07 03 90 www EngineeringBooksPdf com ...
Page 107: ...Programming Programming Contours 6 Gkap6 pm6 30 06 2006 07 04 91 www EngineeringBooksPdf com ...
Page 165: ...Hkap7 pm6 30 06 2006 07 03 150 www EngineeringBooksPdf com ...
Page 166: ...Programming Cycles 8 kkap8 pm6 30 06 2006 07 03 151 www EngineeringBooksPdf com ...
Page 253: ...kkap8 pm6 30 06 2006 07 04 238 www EngineeringBooksPdf com ...
Page 265: ...LKAP9 PM6 30 06 2006 07 04 250 www EngineeringBooksPdf com ...
Page 266: ...Programming Q Parameters 10 MKAP10 PM6 30 06 2006 07 04 251 www EngineeringBooksPdf com ...
Page 297: ...MKAP10 PM6 30 06 2006 07 04 282 www EngineeringBooksPdf com ...
Page 298: ...Test Run and Program Run 11 NKAP11 PM6 30 06 2006 07 04 283 www EngineeringBooksPdf com ...
Page 312: ...MOD Functions 12 Okap12 pm6 30 06 2006 07 04 297 www EngineeringBooksPdf com ...
Page 332: ...Tables and Overviews 13 Pkap13 pm6 30 06 2006 07 04 317 www EngineeringBooksPdf com ...