mi10$ Program Stop at end of toolpath

[tsaladyga]

Can anyone show me how to make the mi10$ give a M00 or M01 at the end of a toolpath and not at the beginning? Right now it says: "M00 Before Operation [0=No,1=Yes]"

I would like it to be: "M00 After Operation [0=No,1=Yes]"

We do a lot of program stops to check tool length, insert checks etc. and It is kind of a pain to remember that if you want to output M00, you have to go into the "next" toolpath to turn it on instead of just doing it in the current one.

My post shows this:

It doesn't have the "plast" line in it.

if posttype$ = two, pl_retract

else, pm_retract

 

if mi10$ = 0, n$, sm01, e$

else, n$, sm00, e$

 

 

Thanks guys,

Todd

[Craig-B]

Save a copy of your post and add the following in pl_retract, and pm_retract this should give you what you want.

 

if mi10$ = 0,[ n$, sm01, e$

]

else,[n$, sm00, e$

]

 

 

Example

---------------------------------------------------------------------------------------

pl_retract #Retract tool based on next tool gcode, lathe (see ptoolend)

cc_pos$ = zero

if home_type = one,

[

pmap_home #Get home position, xabs

ps_inc_calc #Set inc.

pbld, n$, psccomp, e$

pcan1, pbld, n$, *sgcode, pfxout, pfyout, pfzout, *toolno, e$

pbld, n$, pnullstop, strcantext, e$

]

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

else,

[

#Retract to reference return

pbld, n$, `sgcode, psccomp, e$

if home_type = m_one, pbld, n$, *toolno, e$

pcan1, pbld, n$, *sg28ref, "U0.", [if y_axis_mch, "V0."], "W0.",

pnullstop, strcantext, e$

if home_type > m_one, pbld, n$, *toolno, e$

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

pm_retract #Retract tool based on next tool gcode, mill (see ptoolend)

if home_type = one,

[

pmap_home #Get home position, xabs

if frc_cinit, cabs = zero

ps_inc_calc #Set inc.

pbld, n$, psccomp, e$

pcan1, pbld, n$, *sgcode, pfxout, pfyout, pfzout, protretinc,

*toolno, strcantext, e$

pbld, n$, pnullstop, e$

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

else,

[

#Retract to reference return

pbld, n$, `sgcode, psccomp, e$

if home_type = m_one, pbld, n$, *toolno, e$

pcan1, pbld, n$, *sg28ref, "U0.", [if y_axis_mch, "V0."], "W0.",

protretinc, pnullstop, strcantext, e$

if home_type > m_one, pbld, n$, *toolno, e$

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

[tsaladyga]

Save a copy of your post and add the following in pl_retract, and pm_retract this should give you what you want.

 

if mi10$ = 0,[ n$, sm01, e$

]

else,[n$, sm00, e$

]

 

 

Example

---------------------------------------------------------------------------------------

pl_retract #Retract tool based on next tool gcode, lathe (see ptoolend)

cc_pos$ = zero

if home_type = one,

[

pmap_home #Get home position, xabs

ps_inc_calc #Set inc.

pbld, n$, psccomp, e$

pcan1, pbld, n$, *sgcode, pfxout, pfyout, pfzout, *toolno, e$

pbld, n$, pnullstop, strcantext, e$

]

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

else,

[

#Retract to reference return

pbld, n$, `sgcode, psccomp, e$

if home_type = m_one, pbld, n$, *toolno, e$

pcan1, pbld, n$, *sg28ref, "U0.", [if y_axis_mch, "V0."], "W0.",

pnullstop, strcantext, e$

if home_type > m_one, pbld, n$, *toolno, e$

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

pm_retract #Retract tool based on next tool gcode, mill (see ptoolend)

if home_type = one,

[

pmap_home #Get home position, xabs

if frc_cinit, cabs = zero

ps_inc_calc #Set inc.

pbld, n$, psccomp, e$

pcan1, pbld, n$, *sgcode, pfxout, pfyout, pfzout, protretinc,

*toolno, strcantext, e$

pbld, n$, pnullstop, e$

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

else,

[

#Retract to reference return

pbld, n$, `sgcode, psccomp, e$

if home_type = m_one, pbld, n$, *toolno, e$

pcan1, pbld, n$, *sg28ref, "U0.", [if y_axis_mch, "V0."], "W0.",

protretinc, pnullstop, strcantext, e$

if home_type > m_one, pbld, n$, *toolno, e$

if mi10$ = 0,[ n$, sm01, e$<------------See

]<------------See

else,[n$, sm00, e$<------------See

]<------------See

]

 

Thanks Craig!

That was the ticket!

[Craig-B]

No problem glad I could help