macroScript SmartGroup category:"DLS" toolTip:"SmartGroup" ( -- if at leas 2 objects selected if selection[2] != undefined do ( -- generate unique name groupName = uniquename "Group_" -- group selected group (GetCurrentSelection() as array) name:groupName -- select group dummy Sgroup if isvalidNode (getNodeByName groupName) do ( Sgroup = getnodebyname groupName ) select Sgroup -- Group open setGroupOpen Sgroup on -- group pivot Z to minimum Sgroup.pivot = [Sgroup.center.x,Sgroup.center.y,Sgroup.min.z] -- close group setGroupOpen Sgroup off -- free memory free groupName free Sgroup ) )