G110 - 125 MPMASTER

[Programinator]

I Have a mpmaster post that I have been updating to the new releases since v9. I have it tweaked in almost perfect. I just cant seem to get it to output g110-g125 instead of g54.1 p1 and so on.

 

Is there a way to make it like this:

 

Zero thru 5 ouput G54 thru G59 respectively

 

If workoffset = 6 , this will output G110

If workoffset = 7, this will output G111 etc etc

 

This is what my post has.

 

pwcs #G54+ coordinate setting at toolchange

if wcstype = two | wcstype > three,

[

sav_frc_wcs = force_wcs

if sub_level$ > 0, force_wcs = zero

if sav_mi9 = 1, workofs$ = sav_workofs

if workofs$ <> prv_workofs$ | (force_wcs & toolchng),

[

if workofs$ < 6,

[

g_wcs = workofs$ + 54

*g_wcs

]

else,

[

p_wcs = workofs$ - five

"G54.1", *p_wcs

]

]

force_wcs = sav_frc_wcs

!workofs$

]

 

Does anyone know what needs to be changed. I messed with it for a while and cant seem to crack it.

 

thanks

[Guest]

Have you looked in the generic Haas post that installs with MCAM to see how they're doing it?

[Programinator]

Nevermind. Chris Parish from optipro just hooked me up with the solution.

[Programinator]

This is what the old code looks like:

 

code:

---

 pwcs            #G54+ coordinate setting at toolchange

if wcstype = two | wcstype > three,

[

sav_frc_wcs = force_wcs

if sub_level$ > 0, force_wcs = zero

if sav_mi9 = 1, workofs$ = sav_workofs

if workofs$ <> prv_workofs$ | (force_wcs & toolchng),

[

if workofs$ < 6,

[

g_wcs = workofs$ + 54

*g_wcs

]

else,

[

p_wcs = workofs$ - five

"G54.1", *p_wcs

]

]

force_wcs = sav_frc_wcs

!workofs$

]

---

And this is the new:

 

code:

---

 pwcs            #G54+ coordinate setting at toolchange

if wcstype = two | wcstype > three,

[

sav_frc_wcs = force_wcs

if sub_level$ > 0, force_wcs = zero

if sav_mi9 = 1, workofs$ = sav_workofs

if workofs$ <> prv_workofs$ | (force_wcs & toolchng),

[

if workofs$ < 6,

[

g_wcs = workofs$ + 54

*g_wcs

]

else,

[

p_wcs = workofs$ + 104

#p_wcs = workofs$ - five

#"G54.1", *p_wcs

*p_wcs

]

]

force_wcs = sav_frc_wcs

!workofs$

]

---

Thanks Chris

[Programinator]

quote:

---

Have you looked in the generic Haas post that installs with MCAM to see how they're doing it?

 

---

That was the first thing i did. Copied the code and pasted it into my post but it didnt work right.

[Chris Parish]

Programinator:

 

Glad to help just as long as I e-mail back the corrected post... Nice catch