37 lines
1011 B
Lua
37 lines
1011 B
Lua
-- 2016/02/10 09:30:00
|
|
-- Comando tastatura grezzo
|
|
|
|
-- Intestazioni
|
|
require( 'EgtBase')
|
|
_ENV = EgtProtectGlobal()
|
|
EgtEnableDebug( false)
|
|
|
|
-- Tavola di passaggio valori
|
|
local CMD = {}
|
|
CMD.MIDRAWX=0
|
|
CMD.MIDRAWY=0
|
|
CMD.THICK=0
|
|
CMD.TABLEX=0
|
|
CMD.TABLEY=0
|
|
CMD.TABLEZ=0
|
|
CMD.INCHES=nil
|
|
CMD.ERR = 0
|
|
_G.CMD = CMD
|
|
|
|
function CMD.CmdString()
|
|
local nDec = 3
|
|
local dCoeff = 1
|
|
if CMD.INCHES then
|
|
nDec = 4
|
|
dCoeff = 1 / GEO.ONE_INCH
|
|
end
|
|
CMD.CMDSTRING= "L100=" .. EgtNumToString(CMD.MIDRAWX*dCoeff,nDec ) .. "<br/>" ..
|
|
"L101=" .. EgtNumToString(CMD.MIDRAWY*dCoeff,nDec ) .. "<br/>" ..
|
|
"L102=" .. EgtNumToString(CMD.THICK*dCoeff,nDec ) .. "<br/>" ..
|
|
"L103=" .. EgtNumToString(CMD.TABLEX*dCoeff,nDec ) .. "<br/>" ..
|
|
"L104=" .. EgtNumToString(CMD.TABLEY*dCoeff,nDec ) .. "<br/>" ..
|
|
"L105=" .. EgtNumToString(CMD.TABLEZ*dCoeff,nDec ) .. "<br/>" ..
|
|
"L108=0 <br/>" ..
|
|
"G77 H7810<br/>M02"
|
|
end
|