HEIDENHAIN TNC 320 (340 55x-04) ISO programming - Manual (Page 255)

HEIDENHAIN TNC 320 255
8.12 Pr
ogr
amming Examples
N200 G00 G40 Z+250 M2 * Retract in the tool axis, 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)
N270 G73 G90 H+Q8 * Account for rotational position in the plane
N280 G00 G40 X+0 Y+0 * Pre-position in the plane to the cylinder center
N290 G01 Z+5 F1000 M3 * Pre-position in the tool axis
N300 G98 L1 *
N310 I+0 K+0 * Set pole in the Z/X plane
N320 G11 R+Q16 H+Q24 FQ11 * Move to starting position on cylinder, plunge-cutting obliquely into
the material
N330 G01 G40 Y+Q7 FQ12 * Longitudinal cut in Y+ direction
N340 D01 Q20 P01 +Q20 P02 +1 * Update the counter
N350 D01 Q24 P01 +Q24 P02 +Q25 * Update solid angle
N360 D11 P01 +Q20 P02 +Q13 P03 99 * Finished? If finished, jump to end
N370 G11 R+Q16 H+Q24 FQ11 * Move in an approximated “arc” for the next longitudinal cut
N380 G01 G40 Y+0 FQ12 * Longitudinal cut in Y– direction
N390 D01 Q20 P01 +Q20 P02 +1 * Update the counter
N400 D01 Q24 P01 +Q24 P02 +Q25 * Update solid angle
N410 D12 P01 +Q20 P02 +Q13 P03 1 * Unfinished? If not finished, return to LBL 1
N420 G98 L99 *
N430 G73 G90 H+0 * Reset the rotation
N440 G54 X+0 Y+0 Z+0 * Reset the datum shift
N450 G98 L0 * End of subprogram
N99999999 %CYLIN G71 *