Files
datadoors/Main_Assemb.lua
Dario Sassi cc55202ec5 DataDoors 2.7c1 :
- primo commit con versione corrente.
2025-03-18 17:02:20 +01:00

61 lines
1.8 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.lua by EgalWare s.r.l. 2017.10.01
-- Main disposizione assemblato a raggruppamento
-- 2022.07.27 V1.002 FM Modification to use compiled code
-- Intestazioni
require( 'EgtBase')
_ENV = EgtProtectGlobal()
EgtEnableDebug( false)
if not _G.DGD then
_G.DGD = {}
end
-- 2022/12/27 commentate queste 4 linee perchè funziona anche senza il require EgtDoorsBase e EgtDoorsData
-- local sBaseDir = DGD.BASEDIR -- EgtGetSourceDir()
-- EgtAddToPackagePath( sBaseDir .. 'LuaLibs\\?.lua')
-- require( 'EgtDoorsBase')
-- require( 'EgtDoorsData')
-- Tavola di passaggio valori
local STU = {}
-- i parametri passati durante la creazione di una nuova componente
STU.Assembl = 1
_G.STU = STU
-----------------------------------------------------------------
-- *** Main function ***
-----------------------------------------------------------------
--se true raggruppato se false disposto
function STU.Assembled()
local sNgeFile = EgtGetCurrFilePath()
local sRequireCompoName = '_AssemblyDisp'
-- lancio il componente base
local MHgen = require( sRequireCompoName)
local bOkD = MHgen.AssemblyDispose( STU.Assembl)
-- EgtDraw()
EgtZoom( SCE_ZM.ALL, false)
EgtSaveFile( sNgeFile)
end
DGD.Assembled = Assembled
return {}