5 - 12
fr-938872/2
Exemple 3
Cycle de perçage débourrage créé par la société NUM et appelé par la fonction G83
Le cycle %10083 appelle le sous programme %10080 permettant l'analyse de tous
les cycles créés par NUM (Voir sous programme %10080 à la suite du sous
programme %10083).
Rappel de la syntaxe du cycle G83 en fraisage
%10083:
(cycle debourrage)
VAR [M3/4][M998][G90/1][G0/1][RF][garde]=1 [diam]
[IX][IY][IZ][LZ][I][cote][prof][Gplan][E]
ENDV
[diam]=E11005 E11005=0
G77 H10080(appeler module analyse)
(verification syntaxe: presence P si bloc precedent G80)
IF [..BG80]=1 AND [.IBP(1)]=0
THEN E.889
ENDI
(chargement P et Q si programmes)
IF [.IBP(1)]=1 THEN 'P=[.IRP(1)]
IF [.IBP(2)]=0 THEN 'Q='P
ENDI
ENDI
IF [.IBP(2)]=1 THEN 'Q=[.IRP(2)]
ENDI
(conversion garde si INCH)
IF [.BG70]=1 THEN [garde]=[garde]/25.4
ENDI
(sens garde selon orientation outil)
IF [.RDX]<0 THEN [garde]=-[garde]
ENDI
(preparer le positionnement des axes)
IF [.BG95]=1 THEN G0
ELSE F5000
ENDI
IF [I]<>0 THEN G9 G998
[cote] = 'ER [I]=[IZ]+10 G0 G77 H10080 N[I] N[I]
(donner signe correct a P et Q si programmes)
IF 'P < 0 THEN 'P = -'P
ENDI
IF 'Q < 0 THEN 'Q = -'Q
N.. G83 X.. Y.. Z.. ER.. P.. Q.. F..