Repeating code in canned cycle

[Threept82]

Hi Guys,

I post out this;

G82 G99 Z6.24 R6.535 P100 F20.
X-.75 Y6.1622 P100
X1.125 Y5.5372 P100
Y3.2872 P100
X.25 Y3.0122 P100
X-1.125 Y3.2872 P100
G0 G80
Z7.435
M9
G49 G53 Z0. M19

 

I want to post out this;

G82 G99 Z6.24 R6.535 P100 F20.
X-.75 Y6.1622
X1.125 Y5.5372
Y3.2872
X.25 Y3.0122
X-1.125 Y3.2872
G0 G80
Z7.435
M9
G49 G53 Z0. M19

 

The dwell cycle is the only issue . The peck cycle only spits out the first "Q"

 

Thanks

[CJep]

can you copy the post block you're modifying

are you forcing the dwell with an "asterisk"

[Leon82]

Check the additional holes post block

Pdrill_2 for example

[Threept82]

I am not modifying yet.

I am looking to see why it spits out multiple dwells and I see no * to forcing.

 

 

pdrill$          #Canned Drill Cycle
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        dwell$, *feed, strctxt, e$
      pcom_movea

ppeck$           #Canned Peck Drill Cycle
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        *peck1$, *feed, strctxt, e$
      pcom_movea

pchpbrk$         #Canned Chip Break Cycle
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        *peck1$, *feed, strctxt, e$
      pcom_movea

ptap$            #Canned Tap Cycle
      pdrlcommonb
      pbld, n$, "G95", e$
      if met_tool$, pitch = n_tap_thds$   #Tap pitch (mm  per thread)
      else, pitch = 1/n_tap_thds$        #Tap pitch (inches per thread)
      if peck1$,
        [
        if drlgsel = 6, gtap = 84#184
        else, gtap = 74#174
        ]
      else,
        [
        if drlgsel = 6, gtap = 84
        else, gtap = 74
        ]
      pbld, n$, "M80", *speed, e$
      pcan1, pbld, n$, *gtap, *sgdrlref, sgabsinc, prdrlout,
        [if peck1$, *peck1$], *pitch, !feed, strctxt, e$
      pcom_movea

pbore1$          #Canned Bore #1 Cycle
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        dwell$, *feed, strctxt, e$
      pcom_movea

pbore2$          #Canned Bore #2 Cycle
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        *feed, strctxt, e$
      pcom_movea

pmisc1$          #Canned Misc #1 Cycle (Finish Bore)
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        shftdrl$, dwell$, *feed, strctxt, e$
      pcom_movea

pmisc2$          #Canned Misc #2 Cycle (Floating Tap)
      pdrlcommonb
      pcan1, pbld, n$, *sgdrill, *sgdrlref, sgabsinc, prdrlout,
        shftdrl$, dwell$, *feed, strctxt, e$
      pcom_movea

pdrill_2_cmn    #Canned Drill Cycle, additional points
      pdrlcommonb
      punclamp
      pcan1, pbld, n$, sgplane, prdrlout, dwell$, feed, strctxt, e$
      pclamp
      pcom_movea

[CJep]

pdrill_2_cmn    #Canned Drill Cycle, additional points
      pdrlcommonb
      punclamp
      pcan1, pbld, n$, sgplane, prdrlout, dwell$, feed, strctxt, e$  << you're calling the dwell again here in the additional positions as Leon mentioned
      pclamp
      pcom_movea

[Threept82]

So I should make it?

pdrill_2_cmn    #Canned Drill Cycle, additional points
      pdrlcommonb
      punclamp
      pcan1, pbld, n$, sgplane, prdrlout, feed, strctxt, e$  << you're calling the dwell again here in the additional positions as Leon mentioned
      pclamp
      pcom_movea

[CJep]

Yes remove the second dwell call in the additional positions.

[Threept82]

Works good.

Thanks Guys

 

[Leon82]

Just make sure that you don't need it.

 

On a FANUC, repreats need to go on each point, but the dwell doesnt