-- 2021/05/27
-- Comando muovi un asse

-- Intestazioni
require( 'EgtBase')
_ENV = EgtProtectGlobal()
EgtEnableDebug( false)

-- Tavola di passaggio valori
local CMD = {}
CMD.CMDSTRING = ""
_G.CMD = CMD
local SecureZ = 50

function CmdString()
   local nDec = 3
   local sMove
   -- se movimento assi lineari
   sMove = 'X' .. EgtNumToString( CMD.X_AXISMOVE, nDec) ..
          ' Y' .. EgtNumToString( CMD.Y_AXISMOVE, nDec) ..
          ' Z' .. EgtNumToString( CMD.Z_AXISMOVE + SecureZ, nDec) ..
          ' C' .. EgtNumToString( CMD.C_ANGMOVE, nDec) ..
          ' B' .. EgtNumToString( CMD.B_ANGMOVE, nDec) ..
          '<br/>M02'

   -- comando
   CMD.CMDSTRING = "G0 G52 "..sMove
end
_G.CmdString=CmdString