/* ******************************************************************************** Macro Scripts for Modelling Purpose ( tested in max 2014 ) GroupToMesh v1.0 This script ungroup all elements and attach them into one editable poly. Written by Robin Aleno (Fev 2017) -- last update (Fev 2017) rob.in@free.fr ******************************************************************************** */ MacroScript GroupToMesh category: "ARTools" tooltip: "GroupToMesh" ( for obj in selection WHERE isGroupHead obj DO groupName = obj.name ungroup $ selArray = selection as array polyToAttach = #() shapeToAttach = #() for i in selArray do ( if (superClassOf i) == GeometryClass then ( append polyToAttach i convertToPoly i ) else if (superClassOf i) == shape then ( append shapeToAttach i convertToSplineShape i ) ) for i = 2 to polyToAttach.count do ( polyToAttach[1].name = (groupName + "_000") polyToAttach[1].attach polyToAttach[i] polyToAttach[1] ) for i = 2 to shapeToAttach.count do ( shapeToAttach[1].name = (groupName + "_001") addAndWeld shapeToAttach[1] shapeToAttach[i] -1 ) )