High Speed function in MISC VALUE

[PcRobotic]

Hello everyone,

   I'm using MISC VALUE as MR1$ for High Speed function as G8 P1 and G8 P0 for FANUC control.  However, I'm trying to tell the post that "TOOL TYPE" is SPOT DRILL, DRILL, TAP, COUNTER SINK, REAMER than don't show G8 P1 and G8 P0 at the beginning and ending of the tool-path.  However, I tried to figure out and I failed to do so. 

 

 

Please help,

   Thank you

 

This is my screen shot link:

https://drive.google.com/file/d/0B4UZsmondnEzYi1iVjNDMUFkZWs/view?usp=sharing

 

This is how I defined:

 

Under...

#Region Tool change common blocksptlchg_com      #Tool change common blocks

pbld, no_spc$, no_spc$, pgear, e$ pcan1, pbld, no_spc$, no_spc$, *sgcode, sgplane, [if not(index), sgabsinc, pwcs], pfcout, strcantext,# FIRST WORK OFFSET HERE 

        phsm1_on

    [if gcode$ = 1, sgfeed], [if swcsplname <> stoolplname, pfcout, else, ""],e$          pstock, no_spc$, padoc2, e$        pfxout, pfyout, [if speed <> 0, pfspindleout], [if gcode$ = 1, *feed], strcantext, e$        ]      pcan1, pbld, no_spc$, strcantext, e$ #ADD M0 HERE       phsm1_on        #must remain before G43

Under.....

#region Null tool change

ptlchg0$         #Call from NCI null tool change (tool number repeats)

phsm1_on #must remain before G43

      pbld, no_spc$, "G43", [if (comp_type = two | PocketFinishEnable) & opcode$ <> 3 & opcode$ <> 16, spaces$ = 0, "(",*tloffno$,")"], *tlngno$, spaces$ = sav_spc,      pfzout, next_tool$, [if mr3$ = 1, no_spc$, *sslash, *scoolant, else, scoolant],

      phsm1_on        #must remain before G43      pbld, no_spc$, "G43", [if (comp_type = two | PocketFinishEnable) & opcode$ <> 3 & opcode$ <> 16, spaces$ = 0, "(",*tloffno$,")"], *tlngno$, spaces$ = sav_spc,      pfzout, next_tool$, [if mr3$ = 1, no_spc$, *sslash, *scoolant, else, scoolant], e$      phsm2_on        #must remain after G43

if retractflg = 0 & op_id$ <> last_op_id, #output if not forced output above with the G43

        [        if mr2$ = 1 | (mr2$ <> last_mr2), phsm1_on # if mr1$ <> 2 | (mr1$ = 2 & mr2$ <> last_mr2), phsm1_on        phsm2_on        ]

Under...

#Regionplast      last_op_id = op_id$      last_cuttype = cuttype      last_rotary_type = rotary_type$      last_tlplnno = tlplnno$      last_mr1 = mr1$      last_mr2 = mr2$      last_mr3 = mr3$      last_mi10 = mi10$ # ADD M0 Herephsm1_on         #High speed functions before G43       if opcode$ = 3 | opcode$ = 16,        [        mr1$ = 0		mr2$ = 0		#mr3$ = 0 # Disable MR3$ here        ]      if mr1$ = 1 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) & opcode$ <> 3 & tool_typ$ > 6, #Advanced Preview (look-ahead) control - G08 P1        [        pbld, no_spc$, "G8 P1",         mr1_flg = 1        ]		      if mr1$ = 2 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) & opcode$ <> 3 & tool_typ$ > 6, #AI-NANO 2, AI(nano)CC output (Artificial Intelligence Contour Control) - G5.1 Q1        [        #pbld, no_spc$, *sg49, e$                                            #Must be in G49 and remain before G43        if ipr_type > 1, ipr_type = 0 & opcode$ <> 3 & tool_typ$ > 6,                                #Must be in G94        #pbld, no_spc$, sgfeed, e$        pbld, no_spc$, "G61(HAAS HIGH SPEED MODE ON)",  #[if mr1$ = 1, "R", no_spc$, *mr1$], e$    #Mr2 gives accel/decel value/coefficient, usually R or P        mr1_flg = 2        ]#      HPCC is working when called before G43.4 on Fanuc 31i#      if mr1$ = 3 & mr1_flg <> 3, #AI-HPCC and AI-nanoHPCC (High Precision Contour Control) - G5 P10000#        [#        if ipr_type > 1, ipr_type = 0                                  #Must be in G94#        pbld, no_spc$, sgfeed, e$#        pbld, no_spc$, "G5", "P10000", [if mr2$, "R", no_spc$, *mr2$], e$#        #pbld, no_spc$, "G5.1", "Q2", e$                                   #auto arc filtering #        mr1_flg = 3#        ]        phsm2_on         #High speed functions after G43         if opcode$ = 3 | opcode$ = 16,        [        mr1$ = 0        #mr2$ = 0        ]#      HPCC is working when called before G43.4 on Fanuc 31i, see phsm_1 above           if mr1$ = 3 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) & (tool_typ$ > 6 | opcode$ <> 3), #AI-HPCC and AI-nanoHPCC (High Precision Contour Control) - G5 P10000        [        if ipr_type > 1, ipr_type = 0 & (tool_typ$ > 6 | opcode$ <> 3),                        #Must be in G94        #pbld, no_spc$, sgfeed, e$        pbld, no_spc$, "G5", "P1(MAZAK HIGH SPEED MODE ON)", e$ #[if mr1$, "R", no_spc$, *mr1$], e$        #pbld, no_spc$, "G5.1", "Q2", e$                                   #auto arc filtering         mr1_flg = 3        ]      if mr1$ = 4 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) & (tool_typ$ > 6 | opcode$ <> 3), #Mazak Geometry Compensation/Accuracy G61.1, Mazak High Speed Machining Mode - G5 P2        [        #pbld, no_spc$, sgfeed, e$                                           #Mazak can be in G94 or G95 but it must be called before G5 P2        if mr1$ = 2, pbld, no_spc$, "G61.1", ",K", no_spc$, *mr1$, e$           #Mr2 gives accel/decel value/coefficient, K        else, pbld, no_spc$, "G61.1", e$        pbld, no_spc$, "G5", "P2", e$        mr1_flg = 4        !convert_rpd$                                                  #Mazak Fusion requires high feed motion only, comment out for Matrix        convert_rpd$ = one                         #Mazak Fusion requires high feed motion only, comment out for Matrix        ]phsm_off         #High speed functions off      if mr1_flg = 1 & tool_typ$ > 6 & mr1$ = 1 & mr2$ = 1 & (tool_typ$ > 6 | opcode$ <> 3), #Advanced Preview (look-ahead) control - G08 P1        [        pbld, no_spc$, "G8 P0"        mr1_flg = 0        ]	         if mr1$ = 2 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) &  (tool_typ$ > 6 | opcode$ <> 3), #AI-NANO 2, AI(nano)CC output (Artificial Intelligence Contour Control) - G5.1 Q1        [        pbld, no_spc$, "G64(HAAS HIGH SPEED MODE OFF)", e$        mr1_flg = 0        ]      if mr1$ = 3 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) &  (tool_typ$ > 6 | opcode$ <> 3), #AI-HPCC and AI-nanoHPCC (High Precision Contour Control) - G5 P10000        [        #pbld, no_spc$, "G5.1", "Q0", e$                                   #auto arc filtering         pbld, no_spc$, "G5", "P0(MAZAK HIGH SPEED MODE OFF)", e$        mr1_flg = 0        ]      if mr1$ = 4 & mr1_flg <> 1 & (mr2$ = 1 & mr2_flg <> 1) &  (tool_typ$ > 6 | opcode$ <> 3), #Mazak Geometry Compensation/Accuracy G61.1, Mazak High Speed Machining Mode - G5 P2        [        pbld, no_spc$, "G5", "P0(MAZAK HIGH SPEED MODE OFF)", e$        pbld, no_spc$, "G64(HAAS HIGH SPEED MODE OFF)", e$        mr1_flg = 0        convert_rpd$ = prv_convert_rpd$                                #Mazak Fusion requires high feed motion only, comment out for Matrix        ]#EndRegion

===================== G-CODE OUTPUT===========

%

N2(3.0000, 3.000 SHELL MILL, CB, .125RAD,)

(5FLTS .500LOC, 2.10LOH)

G0 G17 G40 G49 G80 G90

G53 Z0. M19

T2 M6(SKIM TOP SURFACE, CUT#7)

G0 G17 G90 G54 M43(MIST BUSTER ON)

G8 P1 M45(CEILING/ BASE COOLANT ON) ==================> THIS IS GOOD

X11.3999 Y2.1 S5000 M3

G43 H2 Z1. T15 /M8(DOC= Z0.)

M81(POT DOWN)

Z.0625

G1 Z0. F50.

Y-10.3

X8.8874

Y1.8

X6.375

Y-10.3

X3.8626

Y1.8

X1.3501

Y-10.6

G0 Z1. M9

G8 P0 M44(MIST BUSTER OFF)==================> THIS IS GOOD

G90 G53 Z0. M5

G53 Y0. M46(CEILING/ BASE COOLANT OFF) 

G54 X0. M82(POT UP)

M1

(*)

N15(.5000, 1/2 C'SINK, HSS,)

(1FLT .250LOC, 1.00LOH)

G0 G17 G40 G49 G80 G90

G53 Z0. M19

T15 M6(SPOT 4X  1/2-13 THRU, CUT#8)

G0 G17 G90 G54 M43(MIST BUSTER ON)

M45(CEILING/ BASE COOLANT ON)

X.884 Y-1.884 S1146 M3

G43 H15 Z1. T10 /M8(DOC= Z-.211)

M81(POT DOWN)

(TDOC= -.1485)

G98 G81 Z-.211 R.0625 F5.73

Y-6.616

X5.616

Y-1.884

G80

(.5000, 1/2 C'SINK, HSS,)

(1FLT .250LOC, 1.00LOH)

(SPOT 2X 1/4-20 BLIND HOLE, CUT#9)

(G54 DOC= Z-.1045)

X1.594 Y-4.25

G8 P1 (TDOC= -.042) =====================> THIS IS NOT GOOD

G98 G81 Z-.1045 R.0625 F5.73

X4.906

G80

[crazy^millman]

Download the latest MPMASTER all of the logic is correct and sorted out.