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 498
Jeannotv6
J
J
Réponses
7
Affichages
391
JLuc69
J
T
Réponses
0
Affichages
575
toulousain
T
P
Réponses
9
Affichages
655
pro-ms
P
PL50
Réponses
14
Affichages
1 072
Squal112
Squal112
J
Réponses
6
Affichages
868
lolo
S
Réponses
4
Affichages
1 173
CRA2
T
Réponses
7
Affichages
980
lolo
J
Réponses
3
Affichages
775
lolo
D
Réponses
0
Affichages
225
djames82
D
V
Réponses
5
Affichages
613
Vincent84
V
mg850t3
Réponses
1
Affichages
373
mg850t3
mg850t3
lolo
Réponses
0
Affichages
309
lolo
PL50
Réponses
25
Affichages
895
dh42
S
Réponses
6
Affichages
883
Steph53
S
Haut