cone-parametré

  • Auteur de la discussion dams19
  • Date de début
D

dams19

Nouveau
bonjour a tous j'aimerai savoir si vous avez déja creer des programmes de cone externe parametré sans sortie d'outils,avec correction du rayon en bout suivant angle de la pente.

je propose ceci et qu'en pensez vous?

0 BEGIN PGM HELOI-EXT1 MM P
1 BLK FORM 0.1 Z X-30 Y-30 Z-40
2 BLK FORM 0.2 X+30 Y+30 Z+0
3 TOOL CALL "T125E" Z S3600 F15000 DL+0 DR+0
4 * -
5 FN 0: Q30 = +0.8 ; R TORIQUE
6 FN 0: Q1 = +0 ; DEPART/Z
7 FN 0: Q19 = +1 ; PASSE AU TOUR
8 FN 0: Q0 = -8.879 ; PROFONDEUR EXT-CONE
9 FN 0: Q2 = +35 ; ANGLE.CONE
10 FN 0: Q3 = +2 ; ANGLE ANG PLAN XY
11 FN 0: Q4 = +26 ; DIAMETRE PLAN Z0
12 * - -------*******---------
13 * - -------*******---------
14 * - -------*******---------
15 CALL LBL 10 ; CORRECTION SUIVANT PENTE
16 * - -------*******---------
17 * - -------*******---------
18 * - -------*******---------
19 FN 0: Q1 = -Q1
20 FN 0: Q0 = -Q0
21 Q4 = ((Q4 / 2) + Q108) - Q96
22 FN 0: Q5 = -Q3
23 Q11 = ((Q19 * TAN Q2) / (360 / Q5)) ;
24 FN 0: Q19 = -Q11
25 Q5 = Q5 + Q3
26 Q12 = (COS Q5 * (Q4))
27 Q13 = (SIN Q5 * (Q4))
28 Q14 = (Q1 * TAN Q2)
29 Q15 = (Q14 * COS Q5)
30 Q16 = (Q14 * SIN Q5)
31 Q17 = Q12 + Q15
32 Q18 = Q13 + Q16
33 Q1 = Q1 + Q19
34 * - -------*******---------
35 * - -------*******---------
36 * - -------*******---------
37 * - POSITIONNEMENT
38 L X+Q17 Y+Q18 R0 F MAX
39 L Z-Q1 R0 F MAX
40 CALL LBL 1
41 * - -------*******---------
42 * - -------*******---------
43 * - -------*******---------
44 STOP M2
45 LBL 1
46 Q5 = Q5 + Q3
47 Q1 = Q1 + Q19
48 Q12 = (COS Q5 * (Q4))
49 Q13 = (SIN Q5 * (Q4))
50 Q14 = (Q1 * TAN Q2)
51 Q15 = (Q14 * COS Q5)
52 Q16 = (Q14 * SIN Q5)
53 Q17 = Q12 + Q15
54 Q18 = Q13 + Q16
55 L X+Q17 Y+Q18 Z-Q1 R0 F MAX
56 Q20 = Q1 + Q19
57 FN 12: IF +Q20 LT +Q0 GOTO LBL 1
58 FN 9: IF +Q1 EQU +Q0 GOTO LBL 99
59 Q21 = Q20 - Q0
60 Q19 = Q21 - Q19
61 FN 0: Q19 = -Q19
62 FN 12: IF +Q1 LT +Q0 GOTO LBL 1
63 L Z+100 R0 F MAX
64 CC X+0 Y+0
65 CP IPA+360 DR-
66 L Z+0 R0 F MAX M91
67 LBL 0
68 LBL 99
69 CC X+0 Y+0
70 CP IPA+360 DR-
71 LBL 0
72 LBL 10
73 Q91 = (COS Q2 * Q30)
74 Q92 = (SIN Q2 * Q30)
75 Q93 = (TAN Q2 * Q92)
76 Q94 = (Q93 + Q91) - Q30
77 Q95 = Q30 * TAN Q2
78 Q96 = (Q95 - Q94)
79 FN 0: Q97 = +Q96
80 LBL 0
81 END PGM HELOI-EXT1 MM P



63 END PGM HELOI-CONE2 MM
 
P

pachanga

Apprenti
Personellement je trouve que c'est trop long comme programme.
j'usine souvent des cones et mes programmes ne depassent jamais 25 lignes
repetition de 1 ou 2 labels, interpollations à 360, données en incrementales. c'est tout.
 
D

dams19

Nouveau
tu les écris comment comme ceci genre?
0 BEGIN PGM CONE MM
1 BLK FORM 0.1 Z X-60 Y-60 Z-60
2 BLK FORM 0.2 X+60 Y+60 Z+0
3 TOOL CALL "T1400" Z S1400 F1400 DL+0 DR+0
4 FN 0: Q1 = +0
5 FN 0: Q19 = +1
6 FN 0: Q0 = +20
7 L Z+100 R0 F MAX M13
8 LBL 1
9 Q1 = Q1 + Q19
10 Q2 = ((30 / 2) + (Q1 * TAN 25)) + Q108
11 Q3 = (30 / 2) + (Q1 * TAN 25)
12 L X+0 Y+Q2 R0 F MAX
13 L Z-Q1 R0 F MAX
14 L Y+Q3 RL F AUTO
15 CC X+0 Y+0
16 CP IPA+360 DR-
17 FN 12: IF +Q1 LT +Q0 GOTO LBL 1
18 L Z+50 R0 F MAX
19 LBL 0
20 STOP M2
21 END PGM CONE MM
 
P

pachanga

Apprenti
dams19 a dit:
tu les écris comment comme ceci genre?
0 BEGIN PGM CONE MM
1 BLK FORM 0.1 Z X-60 Y-60 Z-60
2 BLK FORM 0.2 X+60 Y+60 Z+0
3 TOOL CALL "T1400" Z S1400 F1400 DL+0 DR+0
4 FN 0: Q1 = +0
5 FN 0: Q19 = +1
6 FN 0: Q0 = +20
7 L Z+100 R0 F MAX M13
8 LBL 1
9 Q1 = Q1 + Q19
10 Q2 = ((30 / 2) + (Q1 * TAN 25)) + Q108
11 Q3 = (30 / 2) + (Q1 * TAN 25)
12 L X+0 Y+Q2 R0 F MAX
13 L Z-Q1 R0 F MAX
14 L Y+Q3 RL F AUTO
15 CC X+0 Y+0
16 CP IPA+360 DR-
17 FN 12: IF +Q1 LT +Q0 GOTO LBL 1
18 L Z+50 R0 F MAX
19 LBL 0
20 STOP M2
21 END PGM CONE MM

Sans les données "Q". que des données incrementales. Pour ce qui est de l'angles et compensations, la calculatrice est ma meilleure amie. Juste une habitude.

0 BEGIN PGM CONE INCH
1 BLK FORM 0.1 Z X-60 Y-60 Z-60
2 BLK FORM 0.2 X+60 Y+60 Z+0
3 ; POUR CONE INTERIEUR
3 TOOL CALL 4 S2000
4 L X+5 Y+0 F MAX M3
5 L Z+2 F MAX
6 L Z+0 F500
7 LBL 1
8 CC X+0 Y+0
9 CP IPA+360 DR+ F100 (DR+ SI DONNÉE ANGLE+ )
10 L IX-0.001 IZ-0.01 F50 ; ANGLE DETERMINÉ ICI.
11 CALL LBL 1 REP 100/100
12 L X+0 Y+0 F500
13 L Z+2 F MAX M5
14 L M2
15 END PGM CONE INCH
 
D

dams19

Nouveau
oki,questions d'habitude mais je trouve que le parametrage est mieux il y a moins de source d'erreur,tu peux controler la profondeur,parametrer les diametre,rajouter un angle c'est moins dangereux que le "call lbl/rep" ,il va le repeter 101 fois le lbl 1 c'est ca? en plus tu peux le faire dans le cycle de poche,evidement,finition diametre.....
voici un exemple avec un cycle de poche pour un cone a 45 dg

0 BEGIN PGM CONE-CYCLE MM
1 BLK FORM 0.1 Z X-60 Y-60 Z-60
2 BLK FORM 0.2 X+60 Y+60 Z+2
3 TOOL CALL "T110E" Z S2000 F2000 DL+0 DR+0.2
4 L Z+100 R0 F MAX M3
5 FN 0: Q1 = +2 ; APPRO
6 FN 0: Q0 = -12 ; ARRIVE Z
7 FN 0: Q20 = +1 ; PASSE
8 FN 0: Q98 = +800 ; AVANCE Z-
9 FN 0: Q61 = +40 ; R D'USINAGE
10 FN 0: Q19 = +0
11 L Z+100 R0 F MAX M13
12 L X+0 Y+0 R0 F MAX
13 LBL 1
14 Q19 = Q19 + Q20
15 Q60 = Q61 - (Q19 * TAN 45)
16 CYCL DEF 5.0 POCHE CIRCULAIRE
17 CYCL DEF 5.1 DIST. +Q1
18 CYCL DEF 5.2 PROF. -Q19
19 CYCL DEF 5.3 PASSE +Q19 FQ98
20 CYCL DEF 5.4 RAYON Q60
21 CYCL DEF 5.5 F AUTO DR+
22 L X+0 Y+0 Z+2 R0 F MAX M99
23 FN 12: IF +Q19 LT -Q0 GOTO LBL 1
24 LBL 0
25 L Z+0 R0 F MAX M91
26 STOP M2
27 END PGM CONE-CYCLE MM
 
P

pachanga

Apprenti
dams19 a dit:
oki,questions d'habitude mais je trouve que le parametrage est mieux il y a moins de source d'erreur,tu peux controler la profondeur,parametrer les diametre,rajouter un angle c'est moins dangereux que le "call lbl/rep" ,il va le repeter 101 fois le lbl 1 c'est ca? en plus tu peux le faire dans le cycle de poche,evidement,finition diametre.....
voici un exemple avec un cycle de poche pour un cone a 45 dg

0 BEGIN PGM CONE-CYCLE MM
1 BLK FORM 0.1 Z X-60 Y-60 Z-60
2 BLK FORM 0.2 X+60 Y+60 Z+2
3 TOOL CALL "T110E" Z S2000 F2000 DL+0 DR+0.2
4 L Z+100 R0 F MAX M3
5 FN 0: Q1 = +2 ; APPRO
6 FN 0: Q0 = -12 ; ARRIVE Z
7 FN 0: Q20 = +1 ; PASSE
8 FN 0: Q98 = +800 ; AVANCE Z-
9 FN 0: Q61 = +40 ; R D'USINAGE
10 FN 0: Q19 = +0
11 L Z+100 R0 F MAX M13
12 L X+0 Y+0 R0 F MAX
13 LBL 1
14 Q19 = Q19 + Q20
15 Q60 = Q61 - (Q19 * TAN 45)
16 CYCL DEF 5.0 POCHE CIRCULAIRE
17 CYCL DEF 5.1 DIST. +Q1
18 CYCL DEF 5.2 PROF. -Q19
19 CYCL DEF 5.3 PASSE +Q19 FQ98
20 CYCL DEF 5.4 RAYON Q60
21 CYCL DEF 5.5 F AUTO DR+
22 L X+0 Y+0 Z+2 R0 F MAX M99
23 FN 12: IF +Q19 LT -Q0 GOTO LBL 1
24 LBL 0
25 L Z+0 R0 F MAX M91
26 STOP M2
27 END PGM CONE-CYCLE MM



Bien sûr
comme je disais, c'est juste une habitude que j'ai pris. Il est très rare que je programme un truc à partirde la tnc. j'utilise ezcam et je fais quelques corrections
au besoin. je modifie les posts aussi en consequence de que j'ai besoin
:)
 
D

damy

Compagnon
On peut aussi paramétré un cône ou une pente avec la "touche" Q

un Ex : Un cône avec Diamètre de 20 au dessus et une conicité de 20°sur 15 de hauteur

BLK Form
tool caal (frai tor diam 10 R2=0.5)
L X+ 20 Y0 RO F Max M3
L Z+10 RO F Max
L Z 0 RO F Auto
(Touche Q) Q1= 9.96(Rayon de 20 - correction du rayon torique) Environ .
Label 1
L IZ -0.5 RO F MAX
Q1=Q1+(0.5xTg10°) ... ce dialogue se trouvant en formule a l'aide du sofkey
LX +Q1 RL F Auto
CC. X 0 Y 0
C X +Q1 Y0 DR-
L X+20 RO F MAX
Label 0
Call Label 1 REP 29/29
L Z+ 150 RO FMAX.
M 2
Ceci est un exemple tapé de mémoire Pour un cône inverse (Creux) dans le dialogue de forme par la touche Q ,changer la valeur de Q1 et son enchainement" Q1=(Q1-0.5xTg10)

Avec cette fonction on peut attribuer plusieurs Q = Q1 Q2 Q3 a chaque Q a sa formule on peut paramétré (en ex) un rectangle avec des dépouilles différentes a chaque coté .

J'espère avoir été clair dans mon explication sans fausse note car montrer sans avoir sous les yeux le pupitre !!!
En tout les cas essayez en simulation (test)

CDt
 
P

phil77

Nouveau
slt,je vois pas pour quel raison tu ns demandes ça,apparemment tu sais le faire???? ou essaies-tu d'en mettre plein la vue!!! attention a toi il y a des vieux de la vieille qui risque eux de t'en mettre plein la vue,mais ce n'est pas le but hein!!!
cdl
philippe
 
D

damy

Compagnon
phil77 a dit:
slt,je vois pas pour quel raison tu ns demandes ça,apparemment tu sais le faire???? ou essaies-tu d'en mettre plein la vue!!! attention a toi il y a des vieux de la vieille qui risque eux de t'en mettre plein la vue,mais ce n'est pas le but hein!!!
cdl
philippe

Ce message est adresser a Qui ?

Un vieux de la veille :-D
 
P

pachanga

Apprenti
phil77 a dit:
slt,je vois pas pour quel raison tu ns demandes ça,apparemment tu sais le faire???? ou essaies-tu d'en mettre plein la vue!!! attention a toi il y a des vieux de la vieille qui risque eux de t'en mettre plein la vue,mais ce n'est pas le but hein!!!
cdl
philippe

Pas besoin de t'emballer.
Ici on est pas dans un gym plein de douchbag. On est des confrères machinistes ou programmeurs qui s'aident.
certains, des vieux de la veille, mais jamais parfaits, d'autres petits nouveaux, dynamiques, mais à qui il reste quand même du du chemin.
 
D

damy

Compagnon
Et c'est un plaisir de transmettre aux petits nouveaux dynamiques ! :smt023 :smt041

Car aujourd'hui le métier est considéré a la baisse ,avant on parlais de nous en tant que compagnon ,maintenant en tant qu"opérateur"..

Damy ( mouliste depuis 39 ans) la quille...la quille :-D
 
P

phil77

Nouveau
slt,mon message etait pour dam19.mais apparement aucune reponse,mais,vous avez raison ,restons cool,je vois que des petis jeunes sont bientot a la retraite ,quel chance!pour ma part il doit me rester 15 ans a faire...dur dur (enfin jespere ,au plus tot)
cdl
philippe
 
P

phil77

Nouveau
a propos, quel machine utilsez-vous ? car ce language me parait ancien.... lol
cdl
 
D

damy

Compagnon
Un peut d'Humour :-D

C'est une machine qui :
Il faisait "Zip" quand il roulait
"Bap" quand il tournait
"Brrr" quand il marchait
Je ne sais pas ce que c´était
Et je crois que je ne le saurai jamais

:lol: Le jouet extraordinaire
by Claude François Mdrr

Damy
 
D

dams19

Nouveau
coucou j'ai 10ans de moule sur 3et 5axes ,ouep je sais faire phil mais des fois on passe a coté de details ou de bug.tu as essayé?

montre moi ce que un vieux de la vieille sait faire phil j'aimerai progresser
 

Sujets similaires

01power
Réponses
3
Affichages
11 750
01power
01power
R
Réponses
0
Affichages
1 781
Rémi39
R
D
Réponses
4
Affichages
3 627
D
R
Réponses
33
Affichages
25 321
rogerlan
R
U
Réponses
0
Affichages
1 864
U
L
Réponses
1
Affichages
1 364
Labuze
L
J
Réponses
3
Affichages
1 983
5axes
5axes
Haut