Publicité
Création de sous programmes appelés par fonctions G
Représentation de l'usinage
1 (6 trous)
Y
X
Sous programme du cycle
%10199: (Perçages équidistants sur cercle)
VAR
[G0/1] [RETOUR] [FEED] [G94/5]
ENDV
[G0/1]=3 * [..BG03] [G0/1]=2 * [..BG02] + [G0/1]
[G0/1]=1 * [..BG01] + [G0/1]
[FEED]=[.RF]
[G94/5]= 94 * [.BG94]
[G94/5]= 95 * [.BG95] + [G94/5]
PUSH L0 - L7
(Test si P et R programmés dans le bloc d'appel)
IF [..G80]= 1 THEN
L0= [.IBP(1)] * [.IBP(3)]
G79 L0= 0 N100
ENDI
IF [.IBP(1)] = 1 THEN
L100= [.IRP(1)]
ENDI
L100= [.IRP(1)]
G79 L100 < 1 N101
IF [.IBX(3)] = 1 THEN L925 = [.IRX(3)]
ENDI
3 (6 trous)
2 (4 trous)
4 (4 trous)
Mémo G0, G1, G2 ou G3
Mémo G94 ou G95
Premier bloc du cycle ?
Erreur si P ou R absents
Prise en compte d'un nouveau P éventuel
Mémo valeur P
Erreur si P n'est pas un nombre entier
positif
Cote fond de perçage
5 (6 trous)
5 - 7
fr-938872/2
5
Publicité
