program park

[skit]

Hi guys!

 

I have been working with Mastercam since version 6.I am currently running on version 9.1.Can anyone tell me how the heck to program in a program park.On my machine that would be an M0.

[Rekd™]

I use Misc Values. Toggle MI10 to 1 and it parks the machine. It also prompts for a comment to put with the M00.

 

Define the variable for comment prompt

code:

---

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

# User Defined Questions

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

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

---

Make the sub..

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, *cabs, E

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

absinc = sav_absinc

---

Call the sub (last line in my case)

code:

---

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

pcorner_round

if mi7 <> 0, pdump

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

---

Results

code:

---

N2722 G01 G40 Y1.9688

N2723 G00 Z1.

N2724 M09

N2725 G91 G28 Y0. Z0.

N2726 G90

N2727 M00 ( RETENSION )

N2728 M03 S6800

N2729 G00 G90 X.3713 Y3.2288 A0.

N2730 G43 H2 Z1. M08

(OPERATION: 47 POCKET)

N2731(OP 1)

N2732(UPPER POCKETS RETENSION)

(T2: 3/16 CB EM 4FL TICN)

( TOOLPATH - POCKET)

( STOCK LEFT ON X & Y = 0.)

( STOCK LEFT ON Z = 0.)

N2733(OP ID: 8)

---

(I may not have shown all the variables)

 

Or you could use Manual Toolpaths, but that's not as robust.