Adding ASCII character to string?

[Matthew Hajicek - Singularity]

We've got a lathe here that won't retract the tailstock while the spindle's turning unless it gets an "M31" first.  I've gotten this far:

# --------------------------------------------------------------------------
# Tailstock M code selection
sm26    : "M79"
sm26 = "M31" + sm26      #Tailstock retracted
sm25    : "M78"      #Tailstock engaged
stlstk  : ""         #Target string

fstrsel sm26 tlstk stlstk 2 -1
# --------------------------------------------------------------------------

and it will concatenate the M31 and M79, but now I need an EOB, or e$ between them since they need to be on separate lines.  Any takers?

 

Thanks,

 

-Matt

 

[bd41612]

You could add to your tailstock postblock a simple argument to output your M31 as needed...

 

ptailstock$      #NCI code = 904 available variables:
                #tlstck_on, stck_init_z, stck_final_z
                if toolchng <> two, ptoolend$
                toolend_flg = zero  #Do not execute ptoolend again after xfer
                [
                 !spaces$
                 spaces$ = zero
                 if speed > 0, "M31", e$                                                  #add this line
                 if prv_spaces$ > 0, " ",e$
                 if tlstck_on$ = 0, pbld, *sm26, "(Retract Tailstock)", e$
                 if tlstck_on$ = 1, pbld, *sm25, "(Engage Tailstock)", e$
                 spaces$ = prv_spaces$
                ]