Siemens SINUMERIK 840D Programming Manual page 224

3 3
Milling Cycles 12.97
10.00
3.15 Pocket milling with islands – CYCLE73, CYCLE74, CYCLE75
;Machining contours pocket 1
GOTOF ENDLABEL
POCKET1_CONT:
CYCLE74("EDGE"," "," ")
CYCLE75("ISLAND1"," "," ")
CYCLE75("ISLAND2"," "," ")
ENDLABEL:
;Machining contours pocket 2
GOTOF ENDLABEL
SAMPLE2_CONT:
CYCLE74("EDGEA01",,)
CYCLE75("ISL11A01",,)
CYCLE75("ISL1A01",,)
CYCLE75("ISL2A01",,)
CYCLE75("ISL3A01",,)
ENDLABEL:
;Drill
T2 M6
D1 M3 F6000 S4000
MCALL CYCLE81(10,0,1,-8,)
REPEAT POCKET1_MACH POCKET1_MACH_END
MCALL
G55
MCALL CYCLE81(10,0,1,-8,)
REPEAT SAMPLE2_MACH SAMPLE2_MACH_END
MCALL
;Removing pocket 1
T3 M6
G54 D1 M3 S3300
GOTOF POCKET1_MACH_END
POCKET1_MACH:
REPEAT POCKET1_CONT ENDLABEL
CYCLE73(1025,"POCKET1_DRILL","POCKET1_MILL1","3",10,0,1,-8,0,0,2,0,0,2000,400,0,0,0,3,4)
POCKET1_MACH_END:
REPEAT POCKET1_CONT ENDLABEL
_
CYCLE73(1021,"POCKET1 DRILL","POCKET1_MILL1","3",10,0,1,-8,0,0,2,0,0,2000,400,0,0,0,3,4)
;Removing pocket 2
G55
GOTOF SAMPLE2_MACH_END
SAMPLE2_MACH:
REPEAT SAMPLE2_CONT ENDLABEL
CYCLE73(1015,"SAMPLE2_DRILL","SAMPLE2_MILL1","3",10,0,1,-8,0,0,2,0,0,2000,400,0,0,0,3,4)
SAMPLE2_MACH_END:
REPEAT SAMPLE2_CONT ENDLABEL
CYCLE73(1011,"SAMPLE2_DRILL","SAMPLE2_MILL1","3",10,0,1,-8,0,0,2,0,0,2000,400,0,0,0,3,4)
© Siemens AG, 2002. All rights reserved
3-224
SINUMERIK 840D/840Di/810D Programming Guide Cycles (PGZ) – 11.02 Edition