programmation macro pour faire plusieur piece

  • Auteur de la discussion haja130
  • Date de début
H

haja130

Nouveau
bonjour je cherche un programme macro pour fair plusieur sur tournage merci d avance de m aider
 
D

Dodore

Compagnon
???
Un peu plus de precisionss
Machine armoir genre de pièces
Etc etc
 
H

haja130

Nouveau
alors armoir fanuc commencer par i65 a confirmer je voudrais juste faire plusieur piece a la suite des rondel
 
J

JLuc69

Compagnon
J' ai fait un programme de ce genre, et ce n'est pas si simple à développer.
As tu déjà une première ébauche d'un programme qu'il faudrait peaufiner ou tu voudrais du "clé en main" ?
 
H

haja130

Nouveau
Clé en main serait le top s'il vous plaît mais je donnerai des précisions sur la machine demain
 
J

JLuc69

Compagnon
Voilà celui que j'utilise :
%
:1010
(RONDELLES PARAMETREES)
(NOM PRG RONDELLE-PARAMETRE)
#650=0
#500=30(DIAMETRE BRUTE)
#520=3(1=PE 2=PTFE 3=PA6 NAT)
#501=16(DIAMETRE RONDELLE)
#502=3(EPAISSEUR RONDELLE)
#503=.2(CHANFRIEN EXT)
#504=6.3(DIAMETRE DE PERCAGE)
#521=1(EBAUCHE EXTER 1=OUI 0=NON)
#522=5(PASSE MAXI RAYON)
#510=2(PROFONDEUR PASSE EBAUCHE)
#508=1(0=G01 1=CYCLE)
#509=10(PROFONDEUR PASSE PERCAGE)
#505=0(REPRISE 0=NON 1=OUI)
#506=3(LARGEUR OUTIL TRONCONNAGE)
#511=3
#512=.5
(PROFONDEUR PASSE TRONCONNAGE)
#507=2(NOMBRE DE PIECE PAR SORTIE BARRE)

GOTO[#520*1000]

N1000(PE)
#130=50(VITESSE COUPE EBAUCHE)
#131=.3(AVANCE EBAUCHE)
#132=75(VITESSE COUPE FINITION)
#133=.2(AVANCE FINITION)
#134=50(VITESSE COUPE PERCAGE)
#135=.3(AVANCE PERCAGE)
#136=35(VITESSE COUPE TRONCONNAGE)
#137=.15(AVANCE TRONCONNAGE)
#138=8(ARROSAGE)
GOTO1234

N2000(PTFE)
#130=500(VITESSE COUPE EBAUCHE)
#131=0.4(AVANCE EBAUCHE)
#132=500(VITESSE COUPE FINITION)
#133=0.2(AVANCE FINITION)
#134=500(VITESSE COUPE PERCAGE)
#135=0.2(AVANCE PERCAGE)
#136=500(VITESSE COUPE TRONCONNAGE)
#137=0.2(AVANCE TRONCONNAGE)
#138=8(ARROSAGE)
GOTO1234

N3000(PA6 NAT)
#130=100(VITESSE COUPE EBAUCHE)
#131=.5(AVANCE EBAUCHE)
#132=100(VITESSE COUPE FINITION)
#133=.2(AVANCE FINITION)
#134=50(VITESSE COUPE PERCAGE)
#135=.4(AVANCE PERCAGE)
#136=50(VITESSE COUPE TRONCONNAGE)
#137=.2(AVANCE TRONCONNAGE)
#138=8(ARROSAGE)
GOTO1234


N1234G50S2000
G99
G28U0
G53Z-150.

IF[#650GT0]GOTO#650

N8T0808(EBAUCHE EXTERIEUR)
#140=#500-[#501+1](DIFF DES DIAM)
#150=FUP[#140/[#522*2]](NOMBRE PASSE ENTIERE)
#151=#140/#150(VALEUR DE LA PASSE)
#155=#500-#151(X PASSE)
IF[#140LE[#522*2]]THEN#155=#501+1
G97M3S[[#130*1000]/[#501*3.14]]
G0X[#500+4]Z2
G1Z0.4F.2
X-1.6
G0X[#500+4]Z2
IF[#521EQ0]GOTO8888

WHILE[#155GE[#501+1]]DO1
X#155Z2
#100=[[#502+#506]*#507]+[#505*.5]+5.(LONGUEUR TOTALE USINEE)
#101=FUP[[#100+5]/#510](NOMBRE DE PASSES)
#102=#100/#101(VALEUR DE LA PASSE EFFECTIVE)
#101=#101+1
WHILE[#101GT0]DO2
G1W-#102F#131
W2
W-2
#101=#101-1
END2
G0Z2.
#155=#155-#151
END1
X[#500+5]
G0Z1.
X[#501+4]Z0.5
G1X-1.6F.2
M8
G0Z10.
N8888G28U0
G53Z-150.


(GOT09)

N1T0101(PERCAGE)
G97M3S[[#134*1000]/[#504*3.14]]
G0Z50
X0.3Z20M#138
G1Z-1.F.1
G0Z15
#100=[[#502*#507]+[#506*[#507-1]]+[#504/4]+1](LONGUEUR TOTALE PERCEE)
IF[#508EQ1]GOTO111
#101=FUP[[#100+5]/#509](NOMBRE DE PASSES)
#102=#100/#101(VALEUR DE LA PASSE EFFECTIVE)
WHILE[#101GT0]DO2
G1W-#102F#135
W.5
W-.5
#101=#101-1
END2
GOTO112
N111(CYCLE DE PERCAGE)
G83Z-#100Q[#509*1000]F#135
G80
N112
G28U0
G53Z-150.


(GOT07)

N9T0909(FINITION EXTERIEUR)
G97M3S[[#132*1000]/[#501*3.14]]
#100=[[#502+#506]*#507]+[#505*.5](LONGUEUR TOTALE USINEE)
G0Z-#100
X[#500+2]
Z-#100M#138
G1X#501F#133
Z0
X#511
G0Z10.
G28U0
G53Z-150.


(GOT01)

N10T1010(CHANFREINAGE)
G97M3S[[#132*1000]/[#501*3.14]]
G0Z[[#506/2]+#502+#506+[#505/2]]M#138
X#500
#100=#507+1(NOMBRE DE CHANFREIN)
WHILE[#100GT0]DO3
G0W-[#502+#506+[0.5*#505]]
G1X[#501-[#506+#503+#503-0.34]]F#137
G4F.5
G0X#500
#100=#100-1
END3
G0G28U0
G53Z-150.


N7T0707(TRONCONNAGE)
G97M3S[[#136*1000]/[#500*3.14]]
G0Z0

X[#500+2]Z0M#138
M68
#100=#507(NOMBRE DE TRONCONNAGE)
WHILE[#100GT0]DO1
G97M3S[[#136*1000]/[#500*3.14]]
G0W-[#502+#506+[0.5*#505]]
G1X#501F#137
#101=#501-[#504+1](DIFFERENCE DES DIAMETRES)
#102=FUP[#101/#512](NOMBRE DE PASSE)
#103=#101/#102(VALEUR DE LA PASSE EFFECTIVE)
WHILE[#102GT0]DO2
G1U-#103F#137
G0U3.
U-3.
#102=#102-1
END2
S500F.15
G1X#511
G0X#500
#100=#100-1
END1
M69

N1111G0G28U0
G53Z-150.
G65P8010Z3R-10T1111
/M30
M99
%
Pour les chanfreins exterieurs, j'utilise un outil plaquette carré inclinée à 45° : de type PSSNL/R
 
Dernière édition:
H

haja130

Nouveau
Je te remercie de ta réponse mais mon souci actuellement c'est de faire répéter la pièce
Et pour cela je pense qu'il faut passer par un programme macro pour indiquer le décalage après chaque pièce en z ou x
 
L

leen

Ouvrier
bonjour,
O0070;
N0001.
M98P??;
G55;
M98P??;
G56;
M98P??;
etc.....
après le P n° de programme usinage de la rondelle,en fin de programme usinage de la rondelle tu mes un M99;M30; ;
en fin de programme de répétition tu mes G54; M30; ;

j’espère que cela va t'aider
 

Sujets similaires

J
Réponses
13
Affichages
1 554
Jeannotv6
J
J
Réponses
7
Affichages
490
JLuc69
J
T
Réponses
0
Affichages
643
toulousain
T
P
Réponses
9
Affichages
707
pro-ms
P
PL50
Réponses
14
Affichages
1 185
Squal112
Squal112
J
Réponses
12
Affichages
1 063
JLuc69
J
S
Réponses
4
Affichages
1 305
CRA2
T
Réponses
7
Affichages
1 024
lolo
J
Réponses
3
Affichages
833
lolo
D
Réponses
0
Affichages
273
djames82
D
V
Réponses
5
Affichages
670
Vincent84
V
mg850t3
Réponses
1
Affichages
426
mg850t3
mg850t3
lolo
Réponses
0
Affichages
378
lolo
PL50
Réponses
25
Affichages
929
dh42
S
Réponses
6
Affichages
926
Steph53
S
Haut