14 pr ogr amming examples – HEIDENHAIN TNC 640 (34059x-01) Cycle programming User Manual
Page 499

HEIDENHAIN TNC 640
499
1
7.14 Pr
ogr
amming Examples
Q285=0
;MIN. LIMIT 1ST SIDE
Q286=0
;MAX. LIMIT 2ND SIDE
Q287=0
;MIN. LIMIT 2ND SIDE
Q279=0
;TOLERANCE 1ST CENTER
Q280=0
;TOLERANCE 2ND CENTER
Q281=0
;MEASURING LOG
No measuring log transmission
Q309=0
;PGM STOP IF ERROR
Do not output an error message
Q330=0
;TOOL NUMBER
No tool monitoring
9 FN 2: Q1 = +Q1 - +Q164
Calculate length in X including the measured deviation
10 FN 2: Q2 = +Q2 - +Q165
Calculate length in Y including the measured deviation
11 L Z+100 R0 FMAX
Retract the touch probe, change the tool
12 TOOL CALL 1 Z S5000
Tool call for finishing
13 CALL LBL 1
Call subprogram for machining
14 L Z+100 R0 FMAX M2
Retract in the tool axis, end program
15 LBL 1
Subprogram with fixed cycle for rectangular stud
16 CYCL DEF 213 STUD FINISHING
Q200=20
;SET-UP CLEARANCE
Q201=-10
;DEPTH
Q206=150
;FEED RATE FOR PLUNGING
Q202=5
;PLUNGING DEPTH
Q207=500
;FEED RATE FOR MILLING
Q203=+10
;SURFACE COORDINATE
Q204=20
;2ND SET-UP CLEARANCE
Q216=+50
;CENTER IN 1ST AXIS
Q217=+50
;CENTER IN 2ND AXIS
Q218=Q1
;1ST SIDE LENGTH
Length in X variable for roughing and finishing
Q219=Q2
;2ND SIDE LENGTH
Length in Y variable for roughing and finishing
Q220=0
;CORNER RADIUS
Q221=0
;ALLOWANCE IN 1ST AXS
17 CYCL CALL M3
Cycle call
18 LBL 0
End of subprogram
19 END PGM BEAMS MM