Hello Guest it is April 23, 2024, 09:37:03 AM

Author Topic: AutoPark Function for Plasma users  (Read 4376 times)

0 Members and 1 Guest are viewing this topic.

Offline BR549

*
  •  6,965 6,965
    • View Profile
AutoPark Function for Plasma users
« on: June 05, 2010, 09:39:06 PM »
This Is a simple function that has proven very handy for plasma users. Its purpose is to park the torch at a handy spot to be able to pick the parts out AND be in a good position to start the next cut. This code bases the Park position to be at the left edge of the part  and at the top LH side +.250". It uses the Min Xextents AND the Max yextents.

This code runs at teh end of your Gcode file and does not involve the actual Gocde file. It will park the head based on the PART extents so it does not care if it is a small part or large part. It parks in the same spot in relation to the part.

You can set a button and led on the run screen to turn the function on or off as needed, set the led as UserLed(1199),

OR you can call the function as a VAR call from the mdi line.  #450=999 will turn it on   #450=0 will turn it off

This code runs from inside of the M1030 macro. The M1030 is called automatically from the Mach M30 call used at the end of file to reset mach.

Add this code to your M1030 macro, IF you do not have one you will have to save as M1030 in the macro directory

USE the correct section of code depending on how you wish to turn it on/off. Button or Var call from the MDI line.
HOPE it Helps

***********************************************************
,M1030 Auto Park WITH SCREEN BUTTON/LED setting on/off

If GetUserLed(1199)<>0 Then
SetVar(401,GetOemDro(4))
SetVar(402,GetOemDro(11))
Code" G0 Z1.00"
While IsMoving()
Wend
Code"X#401 Y[#402+0.250]"
While IsMoving()
Wend
End If
End
************************************
'M1030 macro For AutoPark with MDI setting on/off

If GetVar(450)=999 Then
SetVar(401,GetOemDro(4))
SetVar(402,GetOemDro(11))
Code" G0 Z1.00"
While IsMoving()
Wend
Code"X#401 Y[#402+0.250]"
While IsMoving()
Wend
End If
End
« Last Edit: June 05, 2010, 09:46:18 PM by BR549 »