-- -- 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