Fagor CNC 8025 Serie Manual De Programación página 261

Ejemplo de utilización de subrutinas estándar con parámetros
Programamos el perfil teórico sin tener en cuenta el diámetro de la herramienta
N10 P0=K48 P1=K24
N20 G1 X40 Y32 F0
N30 G22 N10 ............................... (Definición de subrutina estándar)
N40 G91 XP0 F500
N50 YP1
N60 X-P0
N70 Y-P1
N80 G24 ....................................... (Fin de subrutina)
N90 G90 X-6 Y72
N100 P0=K24 P1=K16
N110 G20 N10.1 ........................... (Llamada subrutina estándar)
N120 G01 G90 X0 Y0 F0
N130 M30 ...................................... (Fin de programa)
242 MANUAL PROGRAMACION CNC 8025/8030