Jump to content

Welcome to eMastercam

Register now to participate in the forums, access the download area, buy Mastercam training materials, post processors and more. This message will be removed once you have signed in.

Use your display name or email address to sign in:

Manual entery toolpath


mktchevelle
 Share

Recommended Posts

ptoolcomment #Comment for tool

tnote = t$, toffnote = tloffno$, tlngnote = tlngno$

if tool_info = 1 | tool_info = 3,

sopen_prn, pstrtool, sdelimiter, *tnote, sdelimiter, *toffnote, sdelimiter, *tlngnote, sdelimiter, *tldia$, sclose_prn, e$

 

ptooltable #Tooltable output

sopen_prn, *t$, sdelimiter, pstrtool, sdelimiter, *tlngno$,

[if comp_type > 0 & comp_type < 4, sdelimiter, *tloffno$, sdelimiter, *scomp_type, sdelimiter, *tldia$],

[if xy_stock <> 0 | z_stock <> 0, sdelimiter, *xy_stock, sdelimiter, *z_stock],

sclose_prn, e$

 

pstrtool #Comment for tool

if strtool$ <> sblank,

[

strtool$ = ucase(strtool$)

*strtool$

]

 

pcomment$ #Comment from manual entry (must call pcomment2)

pcomment2 #Required if doing boolean 'if' logic testing!

 

pcomment2 #Output Comment from manual entry

scomm$ = ucase (scomm$)

if gcode$ = 1005, sopen_prn, scomm$, sclose_prn, e$ #Manual entry - as comment

if gcode$ = 1006, scomm$, e$ #Manual entry - as code

if gcode$ = 1007, sopen_prn, scomm$, sclose_prn #Manual entry - as comment with move NO e$

if gcode$ = 1026, scomm$ #Manual entry - as code with move NO e$

if gcode$ = 1008, sopen_prn, scomm$, sclose_prn, e$ #Operation comment

if gcode$ = 1051, sopen_prn, scomm$, sclose_prn, e$ #Machine name

if gcode$ = 1052, sopen_prn, scomm$, sclose_prn, e$ #Group comment

if gcode$ = 1053, sopen_prn, scomm$, sclose_prn, e$ #Group name

if gcode$ = 1054, sopen_prn, scomm$, sclose_prn, e$ #File Descriptor

Link to comment
Share on other sites

If your post was updated to VX from V9 or earlier you will have to edit pcomment2 as stated above for "as code" to work.

 

Always back up your post before editing!

 

I had to change mine to read like this:

 

 

pcomment2 #Comment from manual entry

scomm$ = ucase (scomm$)

if gcode$ = 1006, scomm$, E$

else, "(", scomm$, ")", e$

Link to comment
Share on other sites
  • 11 years later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.

Join us!

eMastercam - your online source for all things Mastercam.

Together, we are the strongest Mastercam community on the web with over 56,000 members, and our online store offers a wide selection of training materials for all applications and skill levels.

Follow us

×
×
  • Create New...