Fagor CNC 8037 M Manuel De Programmation page 262

13.
CNC 8037
M ·M·
ODÈLE
S : V01.4
OFT X
·262·
L'un des modes utilisation de cet exemple pourrait être:
G00 X0 Y0
G93
(PCALL 2, A0, B30, C5, D500)
M30
Sous-routine de génération du programme.
(SUB 2)
(OPEN P12345)
(WRITE FP3)
N100 (P10=P1*(ABS(COS(P0/2))))
(WRITE G01 G05 RP10 QP0)
(P0=P0+P2)
(IF (P0 LT 365) GOTO N100)
(WRITE M30)
(RET)
Ma nu el de pr ogra mm at io n
; Commence l'édition du programme P12345
; Sélectionne l'avance d'usinage
; Calcule R
; Bloc de déplacement
; Nouvel angle
; Si l'angle est inférieur à 365º, calcule le
nouveau point
; Bloc de fin de programme
; Fin de sous-routine