Prog de taillage en parametre

[john44]

bonjour, j'ai créer un prog paramètre,
je voudrais mettre une condition pour définir une alarme entre le Q9 et le Q29

Q9 = nbres de dent d'une couronne et Q29 pour dire si le prog a venir est paire ou impaire, je voudrais mettre une relation entre les deux mais heidenhain en paramètre c'est un peu la merde... il fau dire.

en Fanuc je peux faire un truc du style:

IF [[#1 GT 50]AND[#2 LT 30]] THEN #3=40

C’est impossible à faire en heidenhain (si mais il fau le décomposer en 3 fois ou plus)

si quelqu'un a une idée,

merci


BEGIN PGM PROG-PARAMETRE-COURONNE MM
;
;PRG PARAMETRE COURONNES POUR NB DENT IMPAIRE
;
;PROG H DU 14.12.2009
; ------ LISTE PARAMETRE PROGRAMME A MODIFIER -----
Q0 = 20 ;ORIGINE PIECE
Q1 = 5 ;NUMERO OUTIL
Q2 = 350 ; DIAMETRE DE LA FRAISE
Q3 = 14 ; NBR DTS FRAISE
Q4 = 153 ;VC
Q5 = 0.08 ; Fz
Q6 = 1129 ; DIAMETRE DE TETE
Q7 = 1188.4 ; DIAMETRE DE FOND DE DENT
Q8 = 120 ; HAUTEUR PIECE
Q9 = 83 ; NBR Dts PIECE
Q10 = 1 ; DEPART NUMERO DENT
Q11 = 3 ; NUMERO DE LA PASSE? 1,2 OU 3 = FINITION
Q29 = 1 ; 0= NB DENT PAIRE / 1= NB DENT IMPAIRE
;
M0 ;!!! Y0 TOUJOURS SUR PLAN DE POSE !!!
;
M0 ;!!! ATTENTION AU Q29 "0" OU "1" !!!
;
; ------- NE PAS MODIFIER --------
;
FN 9: IF +Q29 EQU +0 GOTO LBL 2
FN 9: IF +Q11 EQU +1 GOTO LBL 1
LBL 1
CALL PGM COURONNE-IMPAIRE
LBL 0
CALL LBL 3
LBL 2
CALL PGM COURONNE-PAIRE
LBL 0
LBL3
STOP M2
END PGM PROG-PARAMETRE-COURONNE MM

 

[dufus31]

tu peux juste me dire quelle heidenain utilise tu

 

[5axes]

PAIRE / IMPAIRE

Bon c'est vrai que heidenhain c'est pas super au niveau prog mais il y a de la ressource.
Si je comprend ton problème tu veux savoir si ton nombre de dents est paire ou impaire. Dans ce cas tu peux utiliser la fonction de calcul de valeur de modulo ( reste de division ) si tu divise ton nombre de dents par deux et que le reste est nulle alors le nombre est paire un exemple rapide ( sur iTNC 530)

0 BEGIN PGM PAIRE_IMPAIRE MM
1 ;--------------------------------
2 ; PAIRE/IMPAIRE
3 ;--------------------------------
4 Q9 = 82 ; NBR Dts PIECE
5 Q10 = Q9 % 2 ; Fonction MOD Calcul valeur modulo (reste de division)
6 FN 9: IF +Q10 EQU +0 GOTO LBL "PAIRE"
7 LBL "IMPAIRE"
8 Q29 = 1 ; 1= NB DENT IMPAIRE
9 CALL LBL "FIN"
10 LBL "PAIRE"
11 Q29 = 0 ; 0= NB DENT PAIRE
12 LBL "FIN"
13 END PGM PAIRE_IMPAIRE MM

 

[5axes]

ET pour faire encore plus simple

0 BEGIN PGM PAIRE_IMPAIRE MM
1 ;--------------------------------
2 ; PAIRE/IMPAIRE
3 ;--------------------------------
4 Q9 = 82 ; NBR Dts PIECE
5 Q29 = Q9 % 2 ; On a directe 0= NB DENT PAIRE / 1= NB DENT IMPAIRE
6 END PGM PAIRE_IMPAIRE MM

Il est pas Smart le langage heidenhain