Dario Sassi
56 lines
1.7 KiB
Lua
56 lines
1.7 KiB
Lua
--
|
|
-- EEEEEEEEEE GGGGGG wwww wwww
|
|
-- EEEEEEEEEE GGGGGGGGGG wwww wwww
|
|
-- EEEE GGGG GGGG wwww wwww wwww
|
|
-- EEEE GGGG wwww wwww wwww
|
|
-- EEEEEEE GGGG GGGGGGG wwww wwwwww wwww
|
|
-- EEEEEEE GGGG GGGGGGG wwww wwwwww wwww
|
|
-- EEEE GGGG GGGG wwww wwwwwwww wwww
|
|
-- EEEE GGGG GGGG wwww wwww wwww wwww
|
|
-- EEEEEEEEEE GGGGGGGGGG wwwwwwww wwwwwwww
|
|
-- EEEEEEEEEE GGGGGG wwwwwww wwwwwww
|
|
--
|
|
-- Main_Assemb_l.lua by EgalWare s.r.l. 2016.05.28
|
|
-- Main disposizione assemblato a raggruppamento
|
|
|
|
-- Intestazioni
|
|
EgtEnableDebug( false)
|
|
|
|
-----------------------------------------------------------------
|
|
local function InteractiveChoice()
|
|
|
|
-- chiedo dato all'iutente
|
|
local tsDisp = EgtDialogBox( ' 0 = dispose, 1 = assembled, 2 = explode', {'disp mode:', '0'})
|
|
local sDisp = '0'
|
|
local nDisposeMain = 0
|
|
|
|
if tsDisp then
|
|
sDisp = tsDisp[1]
|
|
end
|
|
|
|
if sDisp ~= nil then
|
|
if sDisp == '0' then nDisposeMain = 0
|
|
elseif sDisp == '1' then nDisposeMain = 1
|
|
elseif sDisp == '2' then nDisposeMain = 2
|
|
else nDisposeMain = 0 end
|
|
end
|
|
|
|
local sRequireCompoName = '_AssemblyDisp'
|
|
-- lancio il componente base
|
|
local MHgen = require( sRequireCompoName)
|
|
local bOkD = MHgen.AssemblyDispose( nDisposeMain)
|
|
|
|
return bOkD
|
|
end
|
|
|
|
-----------------------------------------------------------------
|
|
-- *** Main function ***
|
|
-----------------------------------------------------------------
|
|
local sNgeFile = EgtGetCurrFilePath()
|
|
|
|
InteractiveChoice()
|
|
EgtDraw()
|
|
EgtSaveFile( sNgeFile)
|
|
|
|
return true
|