Macro pour usinage

[raphaelm]

Bonjour, j'ai un petit problème. Je voudrais usiner une ellipse conique(15°) en iso-paramétré cela fait 3 jours que je cherche la syntaxe pour pouvoir la faire. Etant nouveau sur du fanuc j'ai reussi a faire le programme de l'ellipse seul qui n'etait pas tres bien compliqué. Mais pour faire le cone c'est different si quelqu'un pourrai me donner un petit coup de main ce serai bien gentil. meme une reponse partielle je suis preneur
Je vous donne le programme de l'ellipse que j'ai fait

G0 Z8
#12= 3 (valeur z)
While[#12 GE -50] DO1
G1 Z#12 F200
#12= #12-1 (incrémentation en z)
#1= 0 (angle de départ d'ellipse)
#2= 14.6 (demi axe x)
#3= 9.1 (demi axe y)
N10
#4= #2*Cos[#1]
#5= #3*Sin[#1]
#10= #4*Cos[0]-#5*Sin[0]
#11= #4*Sin[0]+#5*Cos[0]
G1 X#10 Y#11
#1= #1+1
IF[#1 LT 370] GOTO10
END1

du N10 au IF c'est ce qui me permet d'avoir mon ellipse.

voila mon programme d'ellipse qui marche très bien ^^
Je vous remercie d'avance si vous pouvais m'aider. Bonne journée

 

[JLuc69]

Il serait bien que tu commentes un peu tes variables, à quoi sont elles sensées servir ?
A la place du N10 et du IF, j'aurais mis un deuxième WHILE

 

[raphaelm]

Oui dsl je vien d'editer mon poste!! Ca ce n'est que l'ellipse de base. Sachant quel fonctionne très bien, maintenant personnellement je cherche a faire le cone mais n 'ayant jamais fait de macro on va dire que je suis en mode galérien ^^

 

[JLuc69]

Je n'ai pas testé, mais je l'écrirais comme ça :

Vous devez être connecté pour voir ce contenu.

L'indentation n'est là que pour la lecture

 

[raphaelm]

D'accord!! Déjà je te remercie pour la reponse je testerais cela la semaine prochaine!! Je ne peux le tester cette semaine etant en apprentissage donc 1semaine/2 a l'école

Je repasserais sur le forum quand le test sera fait.

Encore merci

 

[raphaelm]

je m'excuse pour la reponse tardive. Toute la semaine dernière et ce week end j'ai chercher une solution et j'ai finalement trouver. je pose mon programme sur le forum sachant qu'il fonctionne bien. Après je pense qu'il doit y avoir des erreurs et que l'on peux mieux ecrire la syntaxe.

...
..
.
G0 G90 G54 X0 Y0 S4500 M03;
G43 H14 Z20 M08 F5000;
D14;
M98 P11004 (Sous Prog Ellipse);
M5 M9;
G0 Z20;
Go G90 G54 X0 Y0 S4500 M03;
G43 H14 Z20 M08 F5000;
D14;
M98 P11001 (Sous Prog Ellipse Conique)
M5 M9;
G0 Z20;
...
..
.

1004 (Sous Prog Ellipse)
#26=3
While [#26GE-15]DO1;
G1 Z#26;
#26=#26-0.5;
#1=0 (Angle de départ);
#2= 14.6 (Demi axe X);
#3= 9.1 (Demi axe Y);
N26;
#4= #2xcos[#1];
#5= #3x sin[#1];
#10= #4xcos[0]-#5xsin[0];
#11= #4xsin[0]+#5xcos[0];
G1 X#10 Y#11;
#1= #1+1;
IF [#1LT370] GOTO26;
END1;
M99;


1001 (Sous Prog Ellipse Conique)
#1= 0 (Angle de depart);
#10= 22 (Demi axe X debut);
#11= 16.5 (Demi axe Y début);
#12= 14.6 (Demi axe X fin);
#13= 9.1 (Demi axe Y fin);
#14= 28 (Hauteur d'usinage);
#15= 0.25 (Incrementation Z);
#16= #10-#12 (A PR X);
#17= #11-#13 (A PR Y);
#18= #16/#14 (Tang & PR X);
#19= #17/#14 (Tang & PRy);
#20= #18x#15 (Incrementation A PR X);
#21= #19x#15 (Incrementation A PR Y);
N10;
#4= #10xcos[#1];
#5= #11xsin[#1];
#6= #4xcos[0]-#5xsin[0];
#7= #4xsin[0]+#5xcos[0];
G1 X#6 Y#7;
#1= #1+1;
IF [#1LT370] GOTO10;
X0 Y0
#10= #10-#20;
#10= #11-#21;
#22= #22+#15;
Z-#22;
IF [-#22NE-#23] GOTO10;
M99;

Voila en vous remerciant pour les reponses que j'ai obtenu.