Force tool change check

[wdg5555]

I'm trying to get an error to pop up during posting when force tool change button is not checked. Below is the code I am using.

if force_tlchg$ = no$, result = mprint(swdgftchg)

 

My problem is I can't find a good place to put it in the post where it correctly gives me the error when the tool change button is not checked or it gives me the error when the button is checked. I've tried ptlchg, ptlchg0, and the pwrtt sections. It seems the variable force_tlchg does not work as I think it does. I'm using the generic 5x post. Closest I came was it would correctly give the warning with drilling cycles but for some reason not on milling toolpaths.

[wdg5555]

The problem was using the variable force_tlchg$. I found the parameter 15108 which also looks at the force tool change button. Then captured it in pparameter and it now it works.

[PcRobotic]

This is what i did...

ForceToolChange: 0

#region Force Tool Change Check
sForceToolChange = "CUT# "+sToolPathNumber+" * You have FORCE TOOL CHANGE"
                   +no2asc(13)+"TOOL#"+no2str(t$)
                   +" ("+no2str(tldia$)+", "+s20001+")"
                   +no2asc(13)
                   +no2asc(13)+"Feed Rate: "+no2str(feed)+ " ***** #Teeth x Chip Load x RPM"
                   +no2asc(13)+"Plunge Rate: "+no2str(plunge)
                   +no2asc(13)+"RPM: "+no2str(speed)+" ***** (SFM x 3.82) / Tool Dia"
                   +no2asc(13)+"SFM: "+no2str(sfm)+" ***** .26 x RPM x Tool Dia"
                   +no2asc(13)+"ChipLoad: "+no2str(fpt)+" ***** Feed Rate (RPM x Flutes)"
                   +no2asc(13)
                   +no2asc(13)+"If you feel this is a mistake, do these following steps:"
                   +no2asc(13)+"Step 1 = Click on PARAMETERS"
                   +no2asc(13)+"Step 2 = Click on TOOL tab"
                   +no2asc(13)+"Step 3 = uncheck FORCE TOOL CHANGE"
                   +no2asc(13)
                   +no2asc(13)+"                                      OK to proceed posting."
                   +no2asc(13)+"                                      CANCEL to abort posting."
#endregion 

 

if ForceToolChange = 1, [if mprint(sForceToolChange, 2) = 2, exitpost$] #Force Tool change

if prmcode$ = 15108, ForceToolChange = rpar(sparameter$, 1)