Tapping with M135

[mtnflyr]

I have A88 Makinos with FANUC PRO3 control. These machines need to have the M3 command before the G84 canned cycle is called. The post puts the M3 out at the beginning of the tool call. The problem is if there are additional tapping cycles with the same tool I get the M135 again but no M3 prior to the M135. This makes the machine alarm.

 

How can I get the M3 to post at every tap cycle?

 

Thanks in advance.

[mtnflyr]

FYI

 

This is my current tapping post...

 

ptap$ #Canned Tap Cycle

pdrlcommonb

#RH/LH based on spindle direction

if use_pitch = 0,

[

if rigid_tap, pbld, n$, "M135", *speed, e$

pcan1, pbld, n$, *sgdrlref, *sgdrill, pdrlxy, pfzout, pcout, pindexdrl,

prdrlout, *feed, strcantext, e$

]

else,

[

if met_tool$, pitch = n_tap_thds$ # Tap pitch (mm per thread)

else, pitch = 1/n_tap_thds$ # Tap pitch (inches per thread)

if rigid_tap, pbld, n$, "M135", *speed, e$

pcan1, pbld, n$, *sgdrlref, *sgdrill, pdrlxy, pfzout, pcout, pindexdrl,

prdrlout, *pitch, !feed, strcantext, e$

]

pcom_movea

[Mgrenier]

Chris,

 

try adding this line in the post block right after the M135 outut line.

 

if rigid_tap, pbld, n$, *spindle$, e$

 

Hope that helps,

 

Martin

[mtnflyr]

Hi Martin,

I tried adding the line, but I don't see any change.

 

Thanks anyhow.

[Mgrenier]

Chris,

 

Try removing the $ after the spindle word. My mistake.

[mtnflyr]

Thanks Martin.

 

That looks like that got it!

 

[Mgrenier]

Glad to help

[specv]

Weird we have many Makinos and none of them have M3's for the M135 tapping cycle

[mtnflyr]

I think it's odd also. I suspect there is a parameter setting in the machine that makes it this way. I'm going to look into it when I have time.

[specv]

it has to be a parameter

here is our code:

S1008

S1008M135

G98G84Z-1.6633R-.29F63.

 

code:

---

    ptap$            #Canned Tap Cycle

pdrlcommonb

pbld, n$, *speed, e$

pbld, n$, *speed, "M135", e$

pcan1, pbld, n$, *sgdrlref, *sgdrill, pxout, pyout, pfzout, pcout,

prdrlout, *feed, strcantext, e$

pcom_movea

---