Messages

3721

General Mach Discussion / Re: Plasma Consumable Tracking

« on: November 01, 2012, 08:38:33 AM »

The problem is that MACH3 has a mind of its own with macros and scripts when combined with Gcode. It seems to loose control of the script threads and CAN on "some" systems just fly through the Script before each segment of Gcode is completed.

It seems to be the case with your machine. Here it runs fine. Loops through the gcode and updates the countdown.

SO I guess that cool stuff that combines Scripting and GCODE is out for the masses.  

A a double check can you run the script from the Script editor to see if it runs correct from there??

Load the Gcode open the editor select the macro code and then press run.

I guess I can try using semaphores

(;-) TP

3722

General Mach Discussion / Re: Plasma Consumable Tracking

« on: October 31, 2012, 10:14:56 PM »

OK this fixes it here, give it a whirl.  ALSO I put in a countdown for ya. You will have to add a userdro(2002) to your screen. I tried to write it to the status BAR but when mach3 reruns the Gcode it writes  the gcode messages over the to go message(;-). SO if you want a countdown add the dro.

(;-)TP

'Macro M3007 Auto Batch Load Horizonal
Dim fname As String
Dim Cuts As Single
Dim Xext As Double
Dim Yext As Double
Dim Test As String
Dim Cdown As Single

Test = ("No File Loaded.")
Fname = FileName()
While Ismoving()
Wend
Message"" &Fname
While Ismoving()
Wend
If Fname = Test Then
MsgBox("No File Loaded, PLEASE LOAD FILE and RESTART")
 End
 End If
Cuts = Question("How Many Horizonal Parts UP TO 10 ?")
If Cuts >10 Or  Cuts <1 Then
MsgBox(" Number Out Of Range 1-10 Retry Again ")
 End

End If

Cdown = Cuts

SetUserDro(2002,Cdown)

Message" Parts to Go: "& Cdown

For x = 1 To Cuts
If x = 1 Then RunFile()
If x = 2 Then RunFile()
If x = 3 Then RunFile()
If x = 4 Then RunFile()
If x = 5 Then RunFile()
If x = 6 Then RunFile()
If x = 7 Then RunFile()
If x = 8 Then RunFile()
If x = 9 Then RunFile()
If x = 10 Then RunFile()

While Ismoving()
Wend
COde"G4P1"


Xext= GetOemDro(10)
While Ismoving()
Wend
Yext= GetOemDro(5)
While Ismoving()
Wend
Code" G0 Z1.00"
While IsMoving()
Wend
Code"X" & (Xext + .250)
While Ismoving()
Wend
Code"Y"& Yext
While IsMoving()
Wend
DoButton(8)
While Ismoving()
Wend
DoButton(9)
While Ismoving()
Wend

Cdown=(Cdown-1)

SetUserDro(2002,Cdown)
While Ismoving()
Wend

Next x

Message("End Of Batch Load")
End

 

3723

General Mach Discussion / Re: Plasma Consumable Tracking

« on: October 31, 2012, 09:38:45 PM »

OK I SEE what it is. It was developed on and OLDER version of MACH back when it actually had control over the threads . I will have to remake it to work with the newer versions.

countdown ? it could have.

(;-) TP

3724

General Mach Discussion / Re: Plasma Consumable Tracking

« on: October 31, 2012, 09:18:38 PM »

Are you running the machine or just looking at the pretty picture(toolpath) on the toolpath you will only see 1 as it always starts based on 0,0.

(;-) TP

3725

General Mach Discussion / Re: Plasma Consumable Tracking

« on: October 31, 2012, 09:02:23 PM »

RIng the bell for the next episode(;-)

(;-) TP

3726

General Mach Discussion / Re: Plasma Consumable Tracking

« on: October 31, 2012, 08:35:06 PM »

OK we interrupt your normal show for this special "As the Plasma World Turns".

Auto Stackumup.  This is your button code.  To run load your material,  then load your Gcode and set X0Y0. NOW press the button. NOW if you forgot to load the program it will squeal on ya and make you go back and load it(;-). It will also ask how many copies(1-10) you want. You need to make sure you have enough room for the parts to cut.

'Macro M3007 Auto Batch Load Horizonal
Dim fname As String
Dim Cuts As Single
Dim Xext As Double
Dim Yext As Double
Dim Test as String

Test = ("No File Loaded.")
Fname = FileName()
While Ismoving()
Wend
Message"" &Fname
While Ismoving()
Wend
If Fname = Test Then
MsgBox("No File Loaded, PLEASE LOAD FILE and RESTART")
 End
 End If
Cuts = Question("How Many Horizonal Parts UP TO 10 ?")
If Cuts >10 Or  Cuts <1 Then
MsgBox(" Number Out Of Range 1-10 Retry Again ")
 End

End If

For x = 1 To Cuts
If x = 1 Then RunFile()
If x = 2 Then RunFile()
If x = 3 Then RunFile()
If x = 4 Then RunFile()
If x = 5 Then RunFile()
If x = 6 Then RunFile()
If x = 7 Then RunFile()
If x = 8 Then RunFile()
If x = 9 Then RunFile()
If x = 10 Then RunFile()

While Ismoving()
Wend

Xext= GetOemDro(10)
While Ismoving()
Wend
Yext= GetOemDro(5)
While Ismoving()
Wend
Code" G0 Z1.00"
While IsMoving()
Wend
Code"X" & (Xext + .250)
While Ismoving()
Wend
Code"Y"& Yext
While IsMoving()
Wend
DoButton(
While Ismoving()
Wend
DoButton(9)
While Ismoving()
Wend

Next x

Message("End Of Batch Load")
End

 
                     

3727

General Mach Discussion / Re: Plasma Consumable Tracking

« on: October 31, 2012, 07:33:47 PM »

OH GEZZ the "As the plasma Turns" show only comes on on tuesday night right after NCIS. (;-)

What do you want to try next auto scale  or auto stackumup.

Auto Scale is a simple and easy way to adjust the G code scale functions.  It ask what size is your current part AND what size do you want it. YOU can only pick one axis to do the scaling from and it scales BOTH axis from that so that it maintains the same aspect ratio of the part.

Auto Stackumup is a function to cut multiple parts with the same file. Load your program then hit the button and tell it HOW MANY parts (1-10) that you want. AND make sure it has enough room on the material to cut them all out.  Say you have a part "Turtle Card Holder" and it is 4x6" . The order comes in for 6 of them.  Load the material, load the G code Set X0Y0  . The first part will cut then the machine moves OVER to the far right extents of the first part and adds .250" resets the X0Y0 and cuts the part again, and again,and again until 6 parts are cut. Then it stops.  In the meantionme you are free to do other work while IT does all the work.

There are 2 versions one for horizonal and one for vertical  (L/R and Up/Down).

(;-) TP

3728

General Mach Discussion / Re: a simple MDI move not working??

« on: October 31, 2012, 07:21:06 PM »

You do NOT use machine home for this move reference. You use  X0Y0(userHome) You move to a spot on the table then Zero X/Y. THEN make your MDI move of say G1X10 F10.  It should move from X0.000 to X10.000 AND that move should be 10mm if in metric or 10" if in imperial. Make SURE you are in G90 mode (absolute)

BUT if you want to do it your way then you need to set G91 to switch over to incremental moves. That way each time you call G1 X10 it moves 10 units to the right. Call it again and it moves 10 more units to the right.

(;-) TP

3729

Mach SDK plugin questions and answers. / Re: Plugin or Script to Modify Gcode

« on: October 31, 2012, 05:37:03 PM »

DO you have the Mach Plugin bible "Mach3Mysteries.pdf"  It was written by Art himself. It "seems" all you have to do is call a "macro" and in that macro contain the CB code to Loadfile() or runfile() or loadrun() .

OR NOT(;-)



Thanks, (;-) TP

3730

Mach SDK plugin questions and answers. / Re: Plugin or Script to Modify Gcode

« on: October 31, 2012, 04:44:29 PM »

I can tell you how to do it from a CB script. Just don't know beans about plugin coding. You can use LoadFile() and then have teh OP hit cycle start OR then use RunFile() to auto start the function  or  LoadRUN() to an auto load and start of the file.

Could you post the CB version of your Gcode parser script. I would be interested in learning how you did it.

(;-) TP