HEIDENHAIN TNC 320 (340 551-01) - Manual (Page 311)

˜ ˜¢¬ 311
9.6 Pr
ogr
amming Examples
10 L Z+250 R0 FMAX M6
ppd˜4^"mVF
11 TOOL CALL 2 Z S4000 "dd˜›ppd9˜=add
12 FN 0: Q201 = -25
F§˜=Fz›^˜Op˜=addamV
13 FN 0: Q202 = +5
F§˜zd¤mVamV˜=Fz›^˜Op˜=addamV
14 CALL LBL 1 "dd˜’¤*zpV"h˜s˜Op˜›^F˜Fm›aF˜^pdF˜z"››Fm
15 L Z+250 R0 FMAX M6
ppd˜4^"mVF
16 TOOL CALL 3 Z S500 "dd˜›ppd9˜F"hF
17 CYCL DEF 201 REAMING ©4dF˜=FOama›apm9˜
Q200=2 ;SET-UP CLEARANCE
Q201=-15 ;DEPTH
Q206=250 ;FEED RATE FOR PLNGNG
Q211=0.5 ;DWELL TIME AT DEPTH
Q208=400 ;RETRACTION FEED RATE
Q203=+0 ;SURFACE COORDINATE
Q204=10 ;2ND SET-UP CLEARANCE
18 CALL LBL 1 "dd˜’¤*zpV"h˜s˜Op˜›^F˜Fm›aF˜^pdF˜z"››Fm
19 L Z+250 R0 FMAX M2
m=˜pO˜h"am˜zpV"h
20 LBL 1
FVammamV˜pO˜’¤*zpV"h˜s9˜ m›aF˜^pdF˜z"››Fm
21 L X+15 Y+10 R0 FMAX M3 p¦F˜›p˜’›"›amV˜zpam›˜Op˜Vp¤z˜s
22 CALL LBL 2 "dd˜’¤*zpV"h˜¢˜Op˜›^F˜Vp¤z
23 L X+45 Y+60 R0 FMAX
p¦F˜›p˜’›"›amV˜zpam›˜Op˜Vp¤z˜¢
24 CALL LBL 2 "dd˜’¤*zpV"h˜¢˜Op˜›^F˜Vp¤z
25 L X+75 Y+10 R0 FMAX
p¦F˜›p˜’›"›amV˜zpam›˜Op˜Vp¤z˜
26 CALL LBL 2
"dd˜’¤*zpV"h˜¢˜Op˜›^F˜Vp¤z
27 LBL 0 m=˜pO˜’¤*zpV"h˜s
28 LBL 2 FVammamV˜pO˜’¤*zpV"h˜¢9˜p¤z˜pO˜^pdF’
29 CYCL CALL s’›˜^pdF˜§a›^˜"4›a¦F˜Oa¨F=˜4©4dF
30 L 9X+20 R0 FMAX M99
p¦F˜›p˜¢m=˜^pdF:˜4"dd˜4©4dF
31 L IY+20 R0 FMAX M99 p¦F˜›p˜=˜^pdF:˜4"dd˜4©4dF
32 L IX-20 R0 FMAX M99
p¦F˜›p˜T›^˜^pdF:˜4"dd˜4©4dF
33 LBL 0 m=˜pO˜’¤*zpV"h˜¢
34 END PGM UP2 MM