Files
Carlo Baronchelli 741791a0e4 Copia locale Iniziale
2022-05-19 16:04:07 +02:00

40 lines
996 B
Lua

-- HideAll.lua by Egaltech s.r.l. 2019/03/16
-- Gestione nascondimento di tutte le Travi non selezionate
-- Intestazioni
require( 'EgtBase')
_ENV = EgtProtectGlobal()
EgtEnableDebug( false)
-- se non ci sono pezzi selezionati, esco
if not EgtGetFirstSelectedObj() then return end
-- nascondo tutti i pezzi non selezionati
local bCurrPL = false
local nPartId = EgtGetFirstPart()
while nPartId do
local nStat = GDB_ST.ON
local nLayId = EgtGetFirstLayer( nPartId)
while nLayId do
local nEntId = EgtGetFirstInGroup( nLayId)
if nEntId then
nStat = EgtGetCalcStatus( nEntId)
break
else
nLayId = EgtGetNextLayer( nLayId)
end
end
if nStat ~= GDB_ST.SEL then
EgtSetMode( nPartId, GDB_MD.HIDDEN)
else
EgtDeselectPartObjs( nPartId)
if not bCurrPL then
bCurrPL = EgtSetCurrPartLayer( nPartId, EgtGetFirstLayer( nPartId))
end
end
nPartId = EgtGetNextPart( nPartId)
end
EgtZoom( SCE_ZM.ALL)
-- end