Messages

31

General Mach Discussion / Re: Help with code problem

« on: April 04, 2010, 06:27:42 PM »

Gerry

Adding the While Moving fixed my problem.  Thanks for the suggestion.

32

General Mach Discussion / Re: Help with code problem

« on: April 04, 2010, 03:10:37 PM »

Gerry,

I should know better sorry about your name.

I will add a while move and see if that helps.

Thanks
Nils

33

General Mach Discussion / Re: Help with code problem

« on: April 04, 2010, 02:02:22 PM »

Greg,

I found that also, the 800 number.  When I setup through the code it works and the X gets set to zero but when I run the macro it does not get set to zero.  I have even put a pause to give it time to update but that does not help either.

SetDro does the same thing.

34

General Mach Discussion / Re: Help with code problem

« on: April 04, 2010, 12:18:48 PM »

Greg,

Thanks for the suggestion but that did not work.

35

General Mach Discussion / Re: Help with code problem

« on: April 04, 2010, 11:08:22 AM »

The last statement, "Code SetDro(0,0) is not setting X to zero.

Does that help?

36

General Mach Discussion / Help with code problem

« on: April 04, 2010, 08:24:13 AM »

The code I have included is part of X & Y Zero.

When I use the debugger and step through the code, Dro(0) get set to zero.  When I run the code, it does not get set to zero.  I have tried Call SetDro and Code....

What am I doing wrong.
Thanks

Code: [Select]

Rem
Rem  Test Code For X And Y Zero routine
Rem 

XCurrent = GetDro(0) 'Get current X position
YCurrent = GetDro(1) 'Get current Y position
ZCurrent = GetDro(2) 'Get current Z position
FeedRateCurrent = GetOEMDro(818) 'Get the current Feed Rate
NewFeedRate = 10 'Set Feed Rate for macro


    Call SetOEMDro(818, NewFeedRate)
   

    Code "(Zero X and Y Macro Running)"

    Rem Find the X negative
   
    XNew = XCurrent - 2
    Code "G31 X" &XNew
    While IsMoving()
    Wend
    XPos1 = GetVar(2000)
   
    Code "G0 X" &XCurrent
   
    Rem Find the X positive
   
    XNew = XCurrent + 2
    Code "G31 X" &XNew
    While IsMoving()
    Wend
    XPos2 = GetVar(2000)
   
    XCenter = (XPos1 + XPos2)/2
    Code "G0 X" &XCenter
 
    Code SetDro(0,0)


37

General Mach Discussion / Re: Why not G54 instead of G52 for multiple parts?

« on: January 04, 2010, 12:13:00 PM »

Maybe I am missing some thing but why wouldn't you set that up in Cut2D.  One cut file for each differenct bit that cuts all the parts.  You would run each of the five files once.  Change bits in between.

38

General Mach Discussion / Re: One Macro calling another Macro.

« on: January 01, 2010, 03:31:20 PM »

Ray,

Thanks, I will give that a try.

Regards,
Nils

39

General Mach Discussion / One Macro calling another Macro.

« on: January 01, 2010, 02:48:08 PM »

Please tell how or point me in the direction for some document that explains how one Macro can call another Macro.

Thanks

40

General Mach Discussion / Re: Conflict between my Zero Touch Plate and Laser move to X, Y position macros

« on: December 29, 2009, 08:34:26 AM »

Overloaded,

Thanks for the suggestion to seperating the G90 and M9 commands.  I reversed your suggestion and placed the G90 first and finished with M9 to turn off the laser.

Now both of my macros are working.  I just have to replace my touch plate with a new one so it doesn't look like a war zone from the bits being driven into the thin copper.

Thanks