[partage]macro palpeur et changement d'outil

[v tec]

bonjour a tous

voici ma macro de palpeur, je l ai bidouiller a taton en modifiant l ancienne elle marche tres bien


en echange est ce que quelqu'un aurait une macro pour juste palper, c est pour cherche mon zmin, afin de pas abimer ma table, quand j ai un doute


en gros,le z monte au z securité, va au dessus du palpeur, palpe, comme je connais la hauteur de mon palpeur, ca me modifie mon z0, en z surface table



voici ma macro de changement d outil

POSPALPX = GETOEMDRO(1010)
POSPALPY = GETOEMDRO(1011)
DECPALPX = GETOEMDRO(1020)
DECPALPY = GETOEMDRO(1021)
PALPX = POSPALPX + DECPALPX
PALPY = POSPALPY + DECPALPY
VPALP = GETOEMDRO(1060)
HSECU = GETOEMDRO(1051)
CODE "G00 G53 Z"& HSECU
WHILE ISMOVING()
WEND
CODE "G00 G53 X"& PALPX &" Y"& PALPY
WHILE ISMOVING()
Wend
code "g00 g53 z-15"
CODE "G31 Z-200 F"& VPALP
WHILE ISMOVING()
WEND
SLEEP(250)
ZPALP = GETVAR(2002)
code "g01 g53 z25 f4000"
CODE "G00 G53 x-250 y-250"
MACHMSG("CHANGEZ L'OUTIL ET APPUYEZ SUR OK", "CHANGEMENT D'OUTIL",1)
CODE "G00 G53 X"& PALPX &" Y"& PALPY & "z" & HSECU
code "g00 g53 z-15"
CODE "G31 Z-200 F"& VPALP
WHILE ISMOVING()
WEND
ZPALP2 = GETVAR(2002)
DIFF = ZPALP - ZPALP2
ANCIENZ = GETOEMDRO(802)
NOUVEAUZ = ANCIENZ + DIFF
SETOEMDRO(802,NOUVEAUZ)
SLEEP(250)
code "g01 g53 z25 f4000"
CODE "G00 g53 x-250 y-250"
WHILE ISMOVING()
WEND



donc en gros, elle se deplace au coordonnée machine uniquement, elle va au dessus du palpeur , elle descend un peu (pour gagner du temps), puis elle palpe doucement, remonte, retourne au milieu de ma table, demande le changement d outil, puis retourne au palpeur, repalpe, et retourne au milieu de la table

 

[v tec]

Re: [partage]macro palpeur et changement d outil

la macro du palpeur a la base c est ca:

VPALP = GETOEMDRO(1060)
HPALPEUR = GETOEMDRO(1040)
HSURFACE = GETOEMDRO(1050)
NOUVEAUZ = HPALPEUR+HSURFACE
HFIN = GETOEMDRO(1051)
IF HFIN < NOUVEAUZ THEN
MACHMSG("!!! HAUTEUR DE RETOUR PLUS BASSE QUE LE PALPEUR !!!", "! ALERTE !",0)
MACHMSG("MODIFICATION DE LA HAUTEUR DE RETOUR A 5MM AU DESSUS DU PALPEUR","CORRECTION Z RETOUR",0)
HFIN = NOUVEAUZ+5
SETOEMDRO(1051,HFIN)
END IF
CODE "G31 Z-200 F"& VPALP
WHILE ISMOVING()
WEND
SLEEP(250)
ZPALP = GETVAR(2002)
SLEEP(250)
CODE "G00 Z"& ZPALP
WHILE ISMOVING()
WEND
SETOEMDRO(802,NOUVEAUZ)
SLEEP(250)
CODE "G00 Z"& HFIN
WHILE ISMOVING()
WEND



mais je la comprend pas


moi mon hfin, c est -5, puisque c est mon z machine, ma table doit etre a environ z-40 machine

 

[JLN]

Bonjour,
Quelle version de Mach3 utilises-tu ?
Car moi j'ai la version Mach3fr et il existe un onglet dédié qui a à peu de choses près la même procédure, mais c'est vrai qu'il manque des fonctions comme retrouver le centre d'un trou par exemple.

 

[v tec]

POSPALPX = GETOEMDRO(1010)
POSPALPY = GETOEMDRO(1011)
VPALP = GETOEMDRO(1060)
HPALPEUR = GETOEMDRO(1040)
HSURFACE = GETOEMDRO(1050)
NOUVEAUZ = HPALPEUR+HSURFACE
HSECU = GETOEMDRO(1051)
CODE "G00 G53 Z"& HSECU
While ISMOVING()
Wend
CODE "G00 G53 X"& POSPALPX &" Y"& POSPALPY
While ISMOVING()
Wend
code "g00 g53 z-15"
CODE "G31 Z-200 F"& VPALP
While ISMOVING()
Wend
SLEEP(250)
ZPALP = GETVAR(2002)
SLEEP(250)
CODE "G00 Z"& ZPALP
While ISMOVING()
Wend
SETOEMDRO(802,NOUVEAUZ)
SLEEP(250)
CODE "G00g53 Z"& hsecu
CODE "g00g53x-5y-5"
While ISMOVING()
Wend



voila ca marche