Hello Guest it is August 13, 2022, 03:06:19 AM

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - pedropin

Pages: « 1 2
11
General Mach Discussion / Auto Tool Zero Help with USB Joypad
« on: May 01, 2012, 10:43:21 PM »


Greetings to all.
This is my code for Auto Tool Zero
CurrentFeed = GetOemDRO(818) 'Get the current feedrate.
PlateThickness =12

If GetOemLed (825)=0 Then
DoOEMButton (1010)
Code "G4 P3" 'Time to get to the z-plate, 3 seconds
Code "G90 G31 Z-20 F600" ' probing move, can set the feed rate here as well as how far to move
While IsMoving()
Wend
ZProbePos = GetVar(2002)
Code "G1 Z" &ZProbePos
While IsMoving ()
Wend
Call SetDro (2, PlateThickness)
Sleep(120)
Code "G0 Z20" 'Change the Z retract height here to what you want, must be higher than touch plate
Code "(Z axis is now zeroed)"
Code "F" &CurrentFeed 'returns to prior feedrate
Else
Code "(Z-Plate is grounded, check connection and try again)"
End If
Exit Sub
 


works perfectly, my problem is I have a USB joypad and I can not
activate the Auto Tool Zero function from the USB Joypad.
code for Joypad file M800

If SL And (Button = BE) Then
 DoOEMButton 1017
Message "Goto Zero"
End If
If SL And (Button = BW) Then
DoOEMButton 707
Message "Auto Tool ZEro"
End If
End



Change the code many times but I have good results, thanks for help
thank you very much
pedropin

12

area 51
Thanks for your prompt help.
The message Joypad SL + BW pressed! shown for 5 seconds.
but the function is not active (Auto Tool Zero)
You said that     (Mach will not allow macros to call macros)   



thanks for your help
pedropin

13
Good day to all.
Install the USB joypad all very well but I can not activate with the USB joypad function (Auto Tool Zero).
Some of you can help me
File part of M800

'==========================================================================
' <-- Put your own script code here.
If SL And (Button = BE) Then
DoOEMButton 1017
Message "Todos los ejes cero"
End If

If SL And (Button = BW) Then
DoOEMButton 707
 Message "Eje Z = 0"
End If
End


The code blue function good (Goto Zero)
The red code does not activate the function (Auto Tool Zero)

Thank you very much.
Pedropin

14
Area51
thank you very much for the contribution of the plugin good job.
I have poblem example:
To  Cycle Star (Alt-R)      macro M801   DoButton 0 push buttons 1 and perfect.
To  Rewind     (Ctrl-W)   macro M802   DoButton 2 press button 2 and perfect.
To Stop         (Alt S)      macro M803  DoButton 3 Press button 3 does not work.
To Reset                       macro M804  DoButton 21 push buttons 4 and runs but 4 pulse again and reset button does not return to normal.
use the version R3.042.020
 4 axis 12 buttons

Thank you very much
A special greeting to all.

pedropin

15
Spanish / ayuda angulos rectos
« on: September 07, 2010, 09:50:40 PM »
Me presento y un saludo para todos
Tengo la version R3.043.000.
El problema es que cuando mecanizo el perimetro de un rectangulo las esquinas me las deja con curvas, a mayor velocidad
el radio de la curva es mayor

gracias por sus comentarios
 :o

16
Spanish / Re: Engraving Trigger for Laser or Impact
« on: January 25, 2010, 10:05:54 PM »
Hola Stitos el LASER que usas es contruido en casa o vino con la maquina? mi pregunta es por que necesito un láser CNC para mi hobby
saludos a todos

Pages: « 1 2