Mazak vtc post MPfan

[anilkp]

 Hi all Mastercam post   gurus,

 

 We have a mazak vtc milling with Mazatrol 640 M pc fusion control. Last 10 years we have been using Esprit for programming this machine. We have been using Mastercam X4 for programming other CNC  milling  machines.

 

I am not very good on mastercam posts. I modified  MPMASTER post for x4 for  using on  the mazak milling. I almost done except couple of problems.

 

 

I need the tool change format as shown  in red below in the sample program.

ie   M06 followed by tool number and next tool number.

 

and  the last tool change should be  M06 followed by tool number and  tool zero.

 

 

I got the first step correct.   But when I call the last tool it is always followed by first tool.  Any one  can give any guidance.

Part of my post processer is given below the program

 

 

 

Sample program

 

(CHANGING TO Tool 15  VTC         1/2 INCH BSW TAP )
N84 M06 T15 T09
N85 G54 X-49.213 Y-85.244
N86 M03 S100
N87 M08 G43 H15 Z50.000
N88 G00 X-49.213 Y-85.244
N89 Z10.000
N90 G95 G99 G84 X-49.213 Y-85.244 Z-15. R10. F2.12
N91 G80
N92 G94
N93 M05
N94 M09
N95 M01
(CHANGING TO Tool 9   VTC         25MM U DRILL )
N96 M06 T09 T0
N97 G54 X33.074 Y26.075
N98 M03 S2200
N99 M51 G43 H09 Z10.000
N100 G00 X33.074 Y26.075
N101 Z10.000
N102 G98 G83 Z-29. Q10. R2. F130.00
N103 Y-48.024 F130.00
N104 X-36.590 Y-37.901 F130.00
N105 Y36.199 F130.00
N106 G80
N107 M06 T0 T0
N108 G00 G91 G28 Z0.0 M09
N109 G28 X0.0 Y0.0 M05
N110 M02
%

 

Actual post

 

 

ptlchg_com #Tool change common blocks

if force_output | sof,

[

result = force(ipr_type,ipr_type)

result = force(absinc$,absinc$)

result = force(plane$,plane$)

]

pcom_moveb

pcheckaxis #Check for valid rotary axis

c_mmlt$ #Multiple tool subprogram call

#ptoolcomment

if sof & scomm_sav <> snull,

[

spaces$ = 0

n$, pspc, scomm_str, *scomm_sav, scomm_end, e$

spaces$ = sav_spc

]

if sof = 0, scomm_sav = snull

comment$

pcomment3

pmisccheck

pcan

if stagetool >= zero,

[

if omitseq$ = 1 & tseqno > 0,

[

if tseqno = 2, n$ = t$

pbld, *n$,*t$, "M06", ptoolcomm, e$

]

else, pbld, n$,"M06", *t$,*next_tool$, ptoolcomm, e$

]

spaces$=0

if output_z = yes$,

[

preadbuf5

if (opcode$ > 0 & opcode$ < 16) | opcode$ = 19,

[

n$, pspc, scomm_str, "MAX - ", *max_depth, scomm_end, e$

n$, pspc, scomm_str, "MIN - ", *min_depth, scomm_end, e$

]

 

[djstedman]

We have a Mazak with the 640 control.. we always just do toolchanges like this.. which is a pretty easy post mod of the MPMaster post..  as an added bonus this method works on the Mazak 640M controls as well as the M-32 control, the Mazak Matrix Controls, and the Smart controls as well as on Fanuc..

 

So long as your at toolchange position this works fine..

 

Sounds like your jumping through hoops you don't really need to by trying to get the code to look like the toolchange command out of the control.

 

T1
M6
G0G17G90G54X1.5613Y1.1514S375M3
G43H1Z2.M8T2

[anilkp]

We have a Mazak with the 640 control.. we always just do toolchanges like this.. which is a pretty easy post mod of the MPMaster post..  as an added bonus this method works on the Mazak 640M controls as well as the M-32 control, the Mazak Matrix Controls, and the Smart controls as well as on Fanuc..

 

So long as your at toolchange position this works fine..

 

Sounds like your jumping through hoops you don't really need to by trying to get the code to look like the toolchange command out of the control.

 

T1

M6

G0G17G90G54X1.5613Y1.1514S375M3

G43H1Z2.M8T2

 Thank you very much for your  advice.   I made the changes as you  pointed out. It works beautifully.   Great help.