Ejemplo: Desbastar y repasar una cajera con ciclos SL

0 BEGIN PGM 1078634 MM

1 BLK FORM 0.1 Z X+0 Y+0 Z-20

2 BLK FORM 0.2 X+100 Y+100 Z+0

3 TOOL CALL 15 Z S4500

; Llamada de herramienta de desbaste previo, diámetro 30

4 L Z+100 R0 FMAX M3

; Retirar la herramienta

5 CYCL DEF 14.0 CONTORNO

6 CYCL DEF 14.1 LABEL CONTORNO 1

7 CYCL DEF 20 DATOS DEL CONTORNO ~

Q1=-5

;PROFUNDIDAD FRESADO ~

Q2=+1

;SOLAPAM. TRAYECTORIA ~

Q3=+0

;SOBREMEDIDA LATERAL ~

Q4=+0

;SOBREMEDIDA PROFUND. ~

Q5=+0

;COORD. SUPERFICIE ~

Q6=+2

;DISTANCIA SEGURIDAD ~

Q7=+50

;ALTURA DE SEGURIDAD ~

Q8=+0.2

;RADIO DE REDONDEO ~

Q9=+1

;SENTIDO DE GIRO

8 CYCL DEF 22 DESBASTE ~

Q10=-5

;PASO PROFUNDIZACION ~

Q11=+150

;AVANCE PROFUNDIDAD ~

Q12=+500

;AVANCE PARA DESBASTE ~

Q18=+0

;HERRAM. PREDESBASTE ~

Q19=+200

;AVANCE OSCILACION ~

Q208=+99999

;AVANCE SALIDA ~

Q401=+90

;FACTOR DE AVANCE ~

Q404=+1

;ESTRATEGIA PROFUND.

9 CYCL CALL

; Llamada al ciclo Desbaste previo

10 L Z+200 R0 FMAX

; Retirar la herramienta

11 TOOL CALL 4 Z S3000

; Llamada de herramienta de desbaste fino, diámetro 8

12 L Z+100 R0 FMAX M3

13 CYCL DEF 22 DESBASTE ~

Q10=-5

;PASO PROFUNDIZACION ~

Q11=+150

;AVANCE PROFUNDIDAD ~

Q12=+500

;AVANCE PARA DESBASTE ~

Q18=+15

;HERRAM. PREDESBASTE ~

Q19=+200

;AVANCE OSCILACION ~

Q208=+99999

;AVANCE SALIDA ~

Q401=+90

;FACTOR DE AVANCE ~

Q404=+1

;ESTRATEGIA PROFUND.

14 CYCL CALL

; Llamada al ciclo Desbaste fino

15 L Z+200 R0 FMAX

; Retirar la herramienta

16 M30

; Final del programa

17 LBL 1

; Subprograma de contorno

18 L X+5 Y+50 RR

19 L Y+90

20 RND R19

21 L X+60

22 RND R8

23 L X+90 Y+80

24 RND R10

25 L Y+40

26 RND R20

27 L X+60 Y+10

28 RND R8

29 L X+5

30 RND R10

31 L X+5 Y+50

32 LBL 0

33 END PGM 1078634 MM