@line
; Handle GPP direct call to Line Movement (G01)
; We not use this procedure to output code
; We create our own procedure for this so that we may...
; Sync with @line, @line_5x, @line_4x, @line4x_polar, @line4x_cartesian
call @usr_line
endp
@usr_line
; Handle output for line movement (G01)
if bFeedoutput
change(feed) = true
bFeedoutput = false
endif
iMotionmode = 1
{nb,['G'iMotionmode:mcode_f ' '],['G'iMplane' '],['G'iDiametercomp' '],[cWo,iWorkoffset' '],['G'iAbsincmode ' ']}
{['D'iDiameteroffset' '],
['X'xpos ' '],['Y'ypos ' '],['Z'zpos ' '],['F'feed ' ']}
change(cWo) = FALSE ;!@#$%AC Fix for ChangeBit Intermittent problem
endp