Programming examples 9.12 – HEIDENHAIN TNC 640 (34059x-04) ISO programming User Manual
Page 323

Programming examples 9.12
9
TNC 640 | User's Manual for DIN/ISO Programming | 3/2014
323
Example: Concave cylinder machined with spherical
cutter
Program sequence
This program functions only with a spherical cutter.
The tool length refers to the sphere center.
The contour of the cylinder is approximated by many
short line segments (defined in Q13). The more
line segments you define, the smoother the curve
becomes.
The cylinder is milled in longitudinal cuts (here: parallel
to the Y axis).
The milling direction is determined with the starting
angle and end angle in space :
Machining direction clockwise:
Starting angle > end angle
Machining direction counterclockwise:
Starting angle < end angle
The tool radius is compensated automatically.
%CYLIN G71 *
N10 D00 Q1 P01 +50 *
Center in X axis
N20 D00 Q2 P01 +0 *
Center in Y axis
N30 D00 Q3 P01 +0 *
Center in Z axis
N40 D00 Q4 P01 +90 *
Starting angle in space (Z/X plane)
N50 D00 Q5 P01 +270 *
End angle in space (Z/X plane)
N60 D00 Q6 P01 +40 *
Cylinder radius
N70 D00 Q7 P01 +100 *
Length of the cylinder
N80 D00 Q8 P01 +0 *
Rotational position in the X/Y plane
N90 D00 Q10 P01 +5 *
Allowance for cylinder radius
N100 D00 Q11 P01 +250 *
Feed rate for plunging
N110 D00 Q12 P01 +400 *
Feed rate for milling
N120 D00 Q13 P01 +90 *
Number of cuts
N130 G30 G17 X+0 Y+0 Z-50 *
Definition of workpiece blank
N140 G31 G90 X+100 Y+100 Z+0 *
N150 T1 G17 S4000 *
Tool call
N160 G00 G40 G90 Z+250 *
Retract the tool
N170 L10.0 *
Call machining operation
N180 D00 Q10 P01 +0 *
Reset allowance
N190 L10.0
Call machining operation
N200 G00 G40 Z+250 M2 *
Retract the tool, end program
N210 G98 L10 *
Subprogram 10: Machining operation
N220 Q16 = Q6 - Q10 - Q108 *
Account for allowance and tool, based on the cylinder radius
N230 D00 Q20 P01 +1 *
Set counter
N240 D00 Q24 P01 +Q4 *
Copy starting angle in space (Z/X plane)
N250 Q25 = ( Q5 - Q4 ) / Q13 *
Calculate angle increment
N260 G54 X+Q1 Y+Q2 Z+Q3 *
Shift datum to center of cylinder (X axis)