Mpmaster - Horizontal B output

[Brian Pallas]

Hello,

 

I am using the Mpmaster post with a horizontal machine.  If I don't have any rotations in the program, I am not getting a B axis output at the beginning of the tools.  How do I change get it to have a B axis output all the time?

 

 

[bd41612]

pfcout

 

You should see multiple instances of this in the ptlchg_com postblock.

 

Also in # General Output Settings:

force_wcs   : yes$  #Force WCS output at every toolchange?

 

What version are you running?

 

[Brian Pallas]

The force_wcs is set to "yes$".  I looked in the ptlchg_com block.  I put the pfcout in a few places and never got any B output still with the one plane.

 

The post version is V16.00 P0 E1 W16.00 T1369940991 M16.00 I0 O1, and I am using MCAM X7.

 

Here is the ptlchg_com postblock:

 

I was wondering if the line that is "if plane$ < 0 | opcode$ = 3 | opcode$ = 16, plane$ = 0" has something to do with it, but don't undertand what that line is doing yet.

 

 

ptlchg_com      #Tool change common blocks

       pbld, " ", e$

       pbld, " ", e$

       pbld, " ", e$

      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

      if sof, uninhibit_probe$

      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$, ptoolcomm, e$

          ]

        else, pbld, n$, *t$, ptoolcomm, e$

        ]

      spaces$=0

      pbld, "M01", e$

      pbld, "M98 P8000", e$

      pbld, "M06", e$

      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$

          ]

        ]

      spaces$=sav_spc

      pstock

      if plane$ < 0 | opcode$ = 3 | opcode$ = 16, plane$ = 0

      sav_absinc = absinc$

      if wcstype > one, absinc$ = zero

      pindex

      if safe_index,

        [

        if lock_codes = one & not(index) & rot_on_x, pbld, n$, *sunlock, sunlockcomm, e$

        pbld, n$, pgear, e$

        pcan1, pbld, n$, *sgcode, sgplane, [if not(index), sgabsinc, pwcs], pfcout, strcantext, e$

        if lock_codes = one & not(index) & rot_on_x & cuttype = 0, pbld, n$, *slock, slockcomm, e$

        if convert_rpd$ = one,

          [

          gcode$ = one

          feed = maxfeedpm

          ipr_type = zero

          ]

        pbld, n$, sgcode, [if gcode$ = 1, sgfeed], pfxout, pfyout, pfcout, pfspindleout, [if gcode$ = 1, *feed], e$

        ]

      else,

        [

        if lock_codes = one & not(index) & rot_on_x, pbld, n$, *sunlock, sunlockcomm, e$

        pbld, n$, pgear, e$

        if convert_rpd$ = one,

          [

          gcode$ = one

          feed = maxfeedpm

          ipr_type = zero

          ]

        pcan1, pbld, n$, *sgcode, sgplane, [if not(index), sgabsinc, pwcs], [if gcode$ = 1, sgfeed], pfcout, pfxout, pfyout,

          pfspindleout, [if gcode$ = 1, *feed], strcantext, e$

        if lock_codes = one & not(index) & rot_on_x & cuttype = 0, pbld, n$, *slock, slockcomm, e$

        ]

      phsm1_on        #must remain before G43

      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$

      pcan2           #Added so M and G codes in canned text will output before phsm2_on

      phsm2_on        #must remain after G43

      sav_coolant = coolant$

      if coolant$ = 1, sm09 = sm09_0

      if coolant$ = 2, sm09 = sm09_1

      if coolant$ = 3, sm09 = sm09_2

      absinc$ = sav_absinc

      pcom_movea

      toolchng = zero

      c_msng$ #Single tool subprogram call

      plast

[MIL-TFP-41]

In the pwrtt$ section

 

this is likely commented out

 

           sav_rot_on_x = rot_on_x    #Uncomment this line to output rotary axis value even when it's not used

[bd41612]

Come on, nobody ever posts just one index, right?  I got the same thing if I only post one toolpath at B0.

I would bypass the pfcout with something like:

 

fmt  "B" 2  babs        #B position output

 

babs = cabs

*babs, etc, etc, e$

 

  

[Brian Pallas]

The sav_rot_on_x was commented out.  Removing the # and it works now like I would like. Thank You.

[bd41612]

Thanks MIL-TFP-41, that works for me too.  A lot easier than writing logic to get around it.