HEIDENHAIN TNC 640 (34059x-01) Cycle programming - Manual (Page 364)

364 Cycles: Turning
13.25 Example pr
ogr
am
11 CYCL DEF 812 SHOULDER LONG. EXTENDED. Cycle definition shoulder longitudinal
Q215=+0 ;MACHINING OPERATION
Q460=+2 ;SET-UP CLEARANCE
Q491=+160 ;DIAMETER AT CONTOUR START
Q492=+0 ;CONTOUR START IN Z
Q493=+150 ;DIAMETER AT END OF CONTOUR
Q494=-40 ;CONTOUR END IN Z
Q495=+0 ;ANGLE OF CYLINDER SURFACE
Q501=+1 ;TYPE OF STARTING ELEMENT
Q502=+2 ;SIZE OF STARTING ELEMENT
Q500=+1 ;RADIUS OF CONTOUR EDGE
Q496=+0 ;ANGLE OF FACE
Q503=+1 ;TYPE OF END ELEMENT
Q504=+2 ;SIZE OF END ELEMENT
Q463=+2.5 ;MAX. CUTTING DEPTH
Q478=+0.25 ;ROUGHING FEED RATE
Q483=+0.4 ;OVERSIZE IN DIAMETER
Q484=+0.2 ;OVERSIZE IN Z
Q505=+0.2 ;FEED RATE FOR FINISHING
12 CYCL CALL M8 Cycle call
13 M305 Turning spindle off
14 TOOL CALL 15 Tool call
15 M140 MB MAX Retract the tool
16 FUNCTION TURNDATA SPIN VCONST:ON VC:100 Constant surface speed
17 CYCL DEF 800 ADAPT ROTARY COORDINATE
SYSTEM Cycle definition adapt rotary coordinate system
Q497=+0 ;PRECESSION ANGLE
Q498=+0 ;REVERSE TOOL
18 L X+165 Y+0 R0 FMAX Move to starting point in the plane
19 L Z+2 R0 FMAX M304 Set-up clearance, turning spindle on