POINT toolpath with MANY POINTS

[PcRobotic]

Hello everyone,
   I always use the POINT toolpath as my PIN STOP but I got limited.  Like I want as many as G1 X Y points but before the G0 X Y should be M0 then I got problem.  Below here this is how I defined:

#CUSTOM STRINGS
sPoint : ""# M0 Pin Stop Here

 

pncoutput       #Movement output
 if sPoint <> snull,
        [
        pbld, no_spc$, *sPoint, no_spc$ , "(AGAINST STOCK TO PIN STOP HERE)", e$
        sPoint = snull
        ]

pcant_out       #Canned text - build the string for output
      #Assign string select type outputs
      if cant_pos < three, #cant_pos indicates canned text output
        [
        if cantext$ = three, bld = one
        if cantext$ = four, bld = zero
        #Build the cantext string ADD M0 HERE
        if cantext$ = one,
          [
          if tool_op$ = 19 & can1_flg, sPoint = sm00
          else, strcantext = strcantext + sm00
          ]

 

pcan1           #Canned text - with move
      strcantext = sblank
      can1_flg = 1 # ADD M0 HERE
      if cant_no$ > zero,
        [
        if cant_pos1$ = one | cant_pos1$ = four, pcant_1
        if cant_pos2$ = one | cant_pos2$ = four, pcant_2
        if cant_pos3$ = one | cant_pos3$ = four, pcant_3
        if cant_pos4$ = one | cant_pos4$ = four, pcant_4
        if cant_pos5$ = one | cant_pos5$ = four, pcant_5
        if cant_pos6$ = one | cant_pos6$ = four, pcant_6
        if cant_pos7$ = one | cant_pos7$ = four, pcant_7
        if cant_pos8$ = one | cant_pos8$ = four, pcant_8
        if cant_pos9$ = one | cant_pos9$ = four, pcant_9
        if cant_pos10$ = one | cant_pos10$ = four, pcant_10
        if cant_pos11$ = one | cant_pos11$ = four, pcant_11
        if cant_pos12$ = one | cant_pos12$ = four, pcant_12
        if cant_pos13$ = one | cant_pos13$ = four, pcant_13
        if cant_pos14$ = one | cant_pos14$ = four, pcant_14
        if cant_pos15$ = one | cant_pos15$ = four, pcant_15
        if cant_pos16$ = one | cant_pos16$ = four, pcant_16
        if cant_pos17$ = one | cant_pos17$ = four, pcant_17
        if cant_pos18$ = one | cant_pos18$ = four, pcant_18
        if cant_pos19$ = one | cant_pos19$ = four, pcant_19
        if cant_pos20$ = one | cant_pos20$ = four, pcant_20
        ]
      if cstop$, strcantext = strcantext + sm00
      if cgstop$, strcantext = strcantext + sm01
      can1_flg = 0 # ADD M0 HERE
      #Output of strcantext occurs at the end of the output line

 

=========================== G-CODEs=====================

N1( .5000,1/2 EM, CB, USED TOOL,)
(3FLTS .750LOC, 1.00LOH)
G0 G17 G40 G49 G80 G90
G91 G28 Z0 M19
G28 Y0 
T1 M6(PIN STOP WITH MULTIPLE POINTS, CUT#1)
G90 G54 X3.9198 Y-.1655
G43 H1 Z0. (DOC= Z0.)
G1 X1.9204 Y-.2423 F10.
M0(AGAINST STOCK TO PIN STOP HERE) ======================> WRONG PLACE
X1.4077 Y-.8148
M0(AGAINST STOCK TO PIN STOP HERE) ======> SHOULD BE HERE
G0 X4.0992 Y-1.3873
G91 G28 Z0.
G28 Y0.
G0 G90 G54 X0.
M30
%

[PcRobotic]

I guess I found the answer... Just do this and you'll be good.

 

prapidout       #Output to NC of linear movement - rapid 
      sav_gcode = gcode$
      if convert_rpd$ = one,
        [
        gcode$ = one
        feed = maxfeedpm
        ipr_type = zero
        ]
    #"DEBUG: ", ~mr3$, ~nextop$, e$
	  if tool_op$ = 19, "M0(AGAINST PIN STOP HERE)", e$
      pcan1, pbld, n$, [if prv_sgplane <> sgplane, sgplane], `sgcode, [if prv_sgplane <> sgplane, sgabsinc], pccdia, #, [if gcode$ = 1, sgfeed]
        pxout, pyout, pzout, pcout, [if gcode$ = 1, `feed], strcantext, scoolant, e$
      gcode$ = sav_gcode

 

[crazy^millman]

I didn't realize you were asking for help. I thought you were just posting up a process that someone could use like in the other topic you recently posted. Glad you sorted it out.

[PcRobotic]

Thank you 5th Axis CGI,
    I guess my English sucks, and thank you for responding my questions ever since.

[crazy^millman]

54 minutes ago, PcRobotic said:

Thank you 5th Axis CGI,
    I guess my English sucks, and thank you for responding my questions ever since.

Well yours is better than mine so guess that makes us even.