Move to X0 Y0 after 1st toolchange

[rterpstra]

How do I get rid of the G00 X0 Y0 after the 1st Toolchange on block number N160 below. I'm using X6 and the post is Generic Haas 4X Mill.pst

 

%

O14451( )

( 04-09-12 10:39 )

N100 G20

N110 G00 G17 G40 G49 G80 G90

( 3/4 CARBIDE FLAT ENDMILL | TOOL - 1 | DIA. OFF. - 1 | LEN. - 1 | TOOL DIA. - .75 )

N120 M08

N130 T1 M06

N140 G00 G90 G54 X-6.6148 Y-10.0834 A0. S500 M03

N150 G43 H1 Z8.

N160 X0. Y0. Z4.2

N170 X-6.6148 Y-10.0834

N180 G01 Z3.625 F20.

N190 G41 D1 X-6.24 Y-10.0739 F8.

N200 G03 X-5.8745 Y-9.699 I-.0095 J.3749

N210 X-5.8746 Y-9.6895 I-.375 J0.

N220 G01 X-5.8841 Y-9.3125

[K2csq7]

Run the post debugger to see where that line is coming from.

Are you familiar with the debugger?

[Guest]

If you've not tweaked anything in that post, I'm not sold it's a post issue

 

Might have to post up your mcx file so someone can take a peek

[rterpstra]

debugger says pxout and pyout but the next toolchange dosen't output an X0 Y0 on the first Z move. Is there a switch in the MD or CD to output an X0 Y0 after the 1st toolchange?

[PcRobotic]

look for "sgcode", "pxout", ",pyout"

 

sgcode means switching from G01 to G00

pxout means X movement output

pyout means Y movement output

 

You should look for these lines

 

 

pcan1, pbld, n$, sgplane, `sgcode, [if gcode$ = 1, sgfeed], sgabsinc, pccdia,

pxout, pyout, pzout, pcout, [if gcode$ = 1, `feed], strcantext, scoolant, e$

gcode$ = sav_gcode

 

 

 

I have a perfect haas post, let me know if I can help you.

[rterpstra]

I think I found it. When I un-commented the call to pcom_movea, the post stop outputing the rapid move to X0Y0.

Thanks PC for the offer.

 

 

psof$ #Start of file for non-zero tool number

prv_tloffno$ = c9k

pcuttype

toolchng = one

if ntools$ = one,

[

#skip single tool outputs, stagetool must be on

stagetool = m_one

!next_tool$

]

pbld, n$, *smetric, e$

pbld, n$, *sgcode, *sgplane, scc0, sg49, sg80, *sgabsinc, e$

sav_absinc = absinc$

if mi1$ <= one, #G92 Local Work coordinate system

[

absinc$ = one

pfbld, n$, sgabsinc, *sg28ref, "Z0.", e$

pfbld, n$, *sg28ref, "X0.", "Y0.", e$

pfbld, n$, sg92, *xh$, *yh$, *zh$, e$

absinc$ = sav_absinc

]

if mi1$ = three | mi1$ = four, #G52 Work Shift

[

absinc$ = one

pfbld, n$, sgabsinc, *sg28ref, "Z0.", e$

pbld, n$, sg52, *xh$, *yh$, *zh$, e$

if xh$ | yh$ | zh$, shft_flg = one

else, shft_flg = zero

absinc$ = sav_absinc

]

pcom_moveb

pcheckaxis

c_mmlt$ #Multiple tool subprogram call

ptoolcomment

comment$

pcan

pbld, n$, *t$, sm06, e$

pindex

if mi1$ > one, absinc$ = zero

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

*speed, *spindle, pgear, strcantext, e$

pbld, n$, sg43, *tlngno$, pfzout, pstagetool, e$

pbld, n$, scoolant, e$

absinc$ = sav_absinc

pbld, n$, sgabsinc, e$

pcom_movea #9-5-12 was commented out

toolchng = zero

c_msng$ #Single tool subprogram call