Siemens SINUMERIK 840D Programming Manual page 187

03.96
08.99
3
3.15 Pocket milling with islands - CYCLE73, CYCLE74, CYCLE75
Programming example
Sample program 1.mpf (pocket with islands)
%_N_SAMPLE_MPF
;$PATH=/_N_MPF_DIR
; Example_1: Pocket with islands
;
$TC_DP1[5,1]=120 $TC_DP6[5,1]=6 $TC_DP3[5,1]=111
$TC_DP1[2,2]=120 $TC_DP6[2,2]=5 $TC_DP3[2,2]=130
N100 G17 G40 G90
N110 T5 D1
N120 M6
N130 S500 M3 F2000 M8
GOTOF _MACHINE
;
N510 _EDGE:G0 G64 X25 Y30 F2000
N520 G1 X118 RND=5
N530 Y96 RND=5
N540 X40 RND=5
N545 X20 Y75 RND=5
N550 Y35
N560 _ENDEDGE:G3 X25 Y30 CR=5
;
N570 _ISLAND1:G0 X34 Y58
N580 G1 X64
N590 _ENDISLAND1:G2 X34 Y58 CR=15
;
N600 _ISLAND2:G0 X79 Y73
N610 G1 X99
N620 _ENDISLAND2:G3 X79 Y73 CR=10
;
_MACHINE:
;Programming contours
SAMPLE_CONT:
CYCLE74 ("SAMPLE1","_EDGE","_ENDEDGE")
CYCLE75 ("SAMPLE1","_ISLAND1","_ENDISLAND1")
CYCLE75 ("SAMPLE1","_ISLAND2","_ENDISLAND2")
ENDLABEL:
 Siemens AG 2000 All rights reserved.
SINUMERIK 840D/840Di/810D/FM-NC Programming Guide, Cycles (PGZ) - 04.00 Edition
Y
98
73
58
30
A
34
20 79
All radii on R5 corners
;Tool offset mill T5 D1
;Initial conditions G code
;Load milling tool
;Define edge contour
;Define bottom island
;Define top island
;Transfer edge contour
;Transfer island contour 1
;Transfer island contour 2
Milling Cycles
3
Y
A
A - A
X Z
17.5
3-187