20 min de lectura
Nivel Intermedio

Parámetros del Ciclo

Argumento Variable Descripción Requerido
X #24 Posición X
Y #25 Posición Y
Z #26 Profundidad final
R #18 Plano de retorno
Q #17 Incremento de peck
F #6 Avance
P #16 Pausa en fondo (ms) No

Código Completo

O9100
O9100 (PECK DRILL PERSONALIZADO)
; LLAMADA: G65 P9100 X_ Y_ Z_ R_ Q_ F_ [P_]

; --- VERIFICACION ---
IF[#24 EQ #0] THEN #3000 = 101 (ERROR - FALTA X)
IF[#25 EQ #0] THEN #3000 = 102 (ERROR - FALTA Y)
IF[#26 EQ #0] THEN #3000 = 103 (ERROR - FALTA Z)
IF[#18 EQ #0] THEN #3000 = 104 (ERROR - FALTA R)
IF[#17 EQ #0] THEN #3000 = 105 (ERROR - FALTA Q)
IF[#6 EQ #0] THEN #3000 = 106 (ERROR - FALTA F)
IF[#26 GE #18] THEN #3000 = 107 (Z DEBE SER MENOR QUE R)

; --- VALORES POR DEFECTO ---
IF[#16 EQ #0] THEN #16 = 0

; --- VARIABLES INTERNAS ---
#100 = #18          ; Z actual = R
#101 = #26          ; Z final
#102 = #17          ; Incremento Q

; --- POSICIONAMIENTO ---
G00 X#24 Y#25
G00 Z#18

; --- CICLO DE PECK ---
WHILE[#100 GT #101] DO1
  #100 = #100 - #102
  IF[#100 LT #101] THEN #100 = #101
  G01 Z#100 F#6
  IF[#100 GT #101] THEN G00 Z#18
END1

; --- PAUSA ---
IF[#16 GT 0] THEN G04 P#16

; --- RETORNO ---
G00 Z#18
M99

Uso de la Macro

; Llamada básica
G65 P9100 X50. Y30. Z-25. R3. Q5. F200

; Con pausa en fondo
G65 P9100 X50. Y30. Z-25. R3. Q5. F200 P500