SIMPLE MOO

[billystein]

Does anyone have a cool routine for putting M00 in program.

It should look something like this.

 

G91G28Z0M5

G28Y0

M00(CHANGE CLAMPS)

G54

G90G0X----Y----S---M3

G43Z1.H--M8

 

Manual entry will do most of it but I still have to edit the offset numbers,x,y and spindle speed

[Christian Raebild]

You could use a canned cycle, combined with a check in the ptlchg postblock to ensure that the usual toolchange sequence isn't output.

[DavidB]

This is good question and it got me thinking.It can be done on the first page of toolpath parameters with ticking canned text and add a M00 after toolpath.

 

I started playing with it you have to edit the .txt file for your post to add what text you want.

 

Im sure someone in here as a better method.

 

HTH

 

[Rekd™]

I do it using Misc Values. When posted, you don't have to do anything 'cept type a comment if you so choose. In the operation before the M0, just change the int from 0 to 1 and bada boom, bada bing!

 

I'll let you see the code tomorrow when I get to work.

[DavidB]

Rekd,

 

I changed the .txt file so my Misc #3 says M00 0=No,1=Yes.

Now how do I get the post to add the M00 to posted file if I make Misc Int 1?

 

 

[Rekd™]

code:

---

 # --------------------------------------------------------------------------

# User Defined Questions

# --------------------------------------------------------------------------

fq 3 stopcomment M00 found for: //t//; //strtool//. Enter a Comment...

---

code:

---

 pstop      # Stop routine

pretract

q3 #Stop Comment?

stopcomment = ucase(stopcomment)

if stopcomment = "", n, "M00", e

if stopcomment <> "", n, "M00", "(", *stopcomment, ")", e

# n, "M00", e

if wcstype > one, absinc = zero

n, *spindle, *speed, pgear, strcantext,e

pcan1, pbld, n, *sgcode, *sgabsinc, pwcs, pfxout, pfyout, pfcout, e

pbld, n, "G43", *tlngno, pfzout, scoolant, next_tool, e

absinc = sav_absinc

 

# --------------------------------------------------------------------------

# Misc. Output

# --------------------------------------------------------------------------

---

code:

---

 ptlchg          #Tool change

pcorner_round

pcuttype

toolchng = one

toolcount = toolcount + 1

if toolcountn <= tooltotal, nexttool = rbuf(4,toolcountn)

else, nexttool = first_tool

if wcstype = one, #Work coordinate system

[

pfbld, n, "G28", "X0.", "Y0.", e

pfbld, n, "G92", *xh, *yh, *zh, e

]

# pbld, n, "M01", e

if mi10=one,

[

pbld, n, "G91", "G28", "Z0.", e

pbld, n, "G91", "G28", "Y0.", e

pbld, n, "G90", e

q3 #Stop Comment?

stopcomment = ucase(stopcomment)

if stopcomment = "", n, "M00", e

if stopcomment <> "", n, "M00", "(", *stopcomment, ")", e

#n, "M00"

]

ptlchg_com

---

code:

---

 ptlchg0         #Call from NCI null tool change (tool number repeats)

pcorner_round

pcuttype

pcom_moveb

toolcount = toolcount + 1

prvtp = rbuf(3,toolcountp)

if toolcountn <= tooltotal, nexttool = rbuf(4,toolcountn)

else, nexttool = first_tool

if mi10=one & op_id<>last_op_id, pstop

---

Try that..

[billystein]

Rekd

I get error message for last_op_id .

Do you have a list of these op_id variables?

 

Billy

[Rekd™]

You have to declare it, sorry.

 

code:

---

#Misc variables

last_op_id : 0 # Previous internal operation id

---

You'll need to declare this, too.

 

code:

---

stopcomment	   # Stop Comment

---

[billystein]

Does the value of last_op_id change anytime?

[Rekd™]

Yes. If the current op IS NOT the last op, it will stay at 0. (It initializes at 0 )

 

If the current of IS the last op, it changes to 1.

 

code:

---

      last_op_id = op_id

 

if mi10=one & op_id<>last_op_id, pstop

 

if op_id<>last_op_id, pstock

 

last_op_id = op_id

---