;REINA_EMCO
;Sinumerik 840D
G54 TRANS Z82 ;COMPROBAR
F0.1 S5000 T1 D1 M4
G0 X35 Z1
CYCLE95("reina_emco_p",1.5,0.2,0.2,0.2,0.1,0.1,0.05,9,0,0,0)
G0 X80 M30


;subprograma REIINA-EMCO.SPF
G1 X14 Z0
X18 RND=1.5
X15 Z-7
G3 Z-17 CR=9
G1 X12 Z-22
X15 Z-26
X12 Z-30
G2 X28 Z-65 CR=80
G1 X30 Z-66
M17