Messages

6511

Galil / Re: Mesa card plugin

« on: July 27, 2010, 06:54:08 PM »

HIYA Steve, at the moment I don't have any extra mesa stuff except for the emc2 machines we run. I did not see any need to invest in hardware IF there was no plugin (;-).

can you give me an update on where the plugin is function wise?

(;-)

6512

Show"N"Tell ( What you have made with your CNC machine.) / Re: 3D Printing.

« on: July 25, 2010, 10:39:13 AM »

Tweaky have you tried powered sugar*********X

6513

General Mach Discussion / Re: New Plasma Function In Mach TOOL BOX

« on: July 22, 2010, 11:02:04 PM »

Just an update , we have the Scam post working to insert the DTHC update values into the Gcode so that MACH can update the DTHC on the fly.

No more forgetting to change the voltage settings for each cut. IT IS IN the gcode now(;-)

(;-)

6514

VB and the development of wizards / Re: Auto Batch Loader(;-)

« on: July 21, 2010, 06:52:09 PM »

It would be best IF you can do a gracefull exit and it ALL be self contained in the one script. AND it NOT be a wait loop.

You can exit easy BUT then it attempts to run the NEXT program in line. AND you have to deal with the Gcode side as well as the VB side. SOmetimes they don't play nice together when you try to stop and it locks up mach.

6515

VB and the development of wizards / Re: How to get the current subroutine file name?

« on: July 21, 2010, 06:43:38 PM »

HIya Jason glad you got it working, I think the auto loader was meant for unatended use where you load up a batch of programs and walk away.  Any interaction beyound that is TRICKY. Even just stopping the routine can be tricky(;-) Working on that part. I ran another long test today and it is due to finish about 8am tommorrow. So far so good.

The next test will be to see IF it can handle programs with SUBs. Then test for Users macros  That ought to be interesting

(;-)

6516

VB and the development of wizards / Re: Auto Batch Loader(;-)

« on: July 20, 2010, 10:32:29 PM »

We do need an excape routine from the program though. (;-)

6517

General Mach Discussion / Re: True 4 axis milling

« on: July 20, 2010, 10:24:10 PM »

It would be interesting to see a picture of your setup.

6518

General Mach Discussion / Re: True 4 axis milling

« on: July 20, 2010, 07:48:15 PM »

MUMMMM don't think so(;-), Think about the relationship of all 4 axis. ONE of the XY axis has to remain on the rotary axis centerline to make cutting senseable. AND you gain nothing by moving off of it.

Now IF you are 3 axis plus 4th indexing then you have 3 1/2axis control. But cutting is still 3 axis. Even 3d 4th is still 3 axis movement. Maybe a 4 axis where the 4th is atrunnion on the spindle. But never saw one that did not have the 5th as well.

I don't every recall seeing a true 4 axis machine that was not a 5 axis control. But I could be wrong. (;-)

6519

VB and the development of wizards / Re: Auto Batch Loader(;-)

« on: July 20, 2010, 07:34:48 PM »

(;-) Lookin Mighty FINE .  I ran it for hours on end last night (;-) It was still running this morning. I also tested what would happen IF you did not need the total number files(;-) only needed 3 file instead of 5. that work fine as well. just enter throught the rest of the questions and set the defaults.

So you could actually create a macro that did say 10 files. OR perhaps could create the number of files on the fly that you need to run??

Just a thought

6520

VB and the development of wizards / Auto Batch Loader(;-)

« on: July 20, 2010, 12:25:00 AM »

Here is some code to play with for an Auto Batch Loader This idea came from another thread(ya-nvr-no) I just brought it here to expand on the idea (;-)

Code: [Select]

'Auto Batch Loader

Dim fname1,fname2,fname3,fname4,fname5 As String
Dim F1offset,F2offset,F3offset,F4offset,F5offset As Double

fname1 ="c:\mach3\gcode\" & AskTextQuestion("File#1 Name?")
F1offset= "" & Question("File#1 Offset#")
Message(Fname1  & "  AND  G" & F1offset)


                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
fname2 ="c:\mach3\gcode\" & AskTextQuestion("File#2 Name?")
F2offset= "" & Question("File#2 Offset#")
Message(Fname2  & "  AND  G" & F2offset)

fname3 ="c:\mach3\gcode\" & AskTextQuestion("File#3 Name?")
F3offset= "" & Question("File#3 Offset#")
Message(Fname3  & "  AND  G" & F3offset)

fname4 ="c:\mach3\gcode\" & AskTextQuestion("File#4 Name?")
F4offset= "" & Question("File#4 Offset#")
Message(Fname4  & "  AND  G" & F4offset)

fname5 ="c:\mach3\gcode\" & AskTextQuestion("File#5 Name?")
F5offset= "" & Question("File#5 Offset#")
Message(Fname5  & "  AND  G" & F5offset)

For x = 1 To 5

If x = 1 Then loadfile(fname1)
While Isloading()
Sleep(1000)
Wend
If X = 1 Then  Code"G" & F1offset
Sleep(1000)
  
If x = 2 Then loadfile(fname2)
While Isloading()
Sleep(1000)
Wend
If X = 2 Then  Code"G" & F2offset
Sleep(1000)

If x = 3 Then loadfile(fname3)
While Isloading()
Sleep(1000)
Wend
If X = 3 Then  Code"G" & F3offset
Sleep(1000)

If x = 4 Then loadfile(fname4)
While Isloading()
Sleep(1000)
Wend
If X = 4 Then Code"G" & F4offset
Sleep(1000)

If x = 5 Then loadfile(fname4)
While Isloading()
Sleep(1000)
Wend
If X = 5 Then  Code"G" & F5offset
Sleep(1000)

Message(filename)

While Isloading()
Sleep(5000)
Wend

runfile()
Sleep(2000)

While IsMoving()
Sleep(2000)
Wend

'Insert STOP code here

Next x
Message("thats all folks")

End