-------------------------------------------------------------------------- /* Modified by Hansel Moniz thanks to Pierre Felix Breton 2011 for the original code Why: Revit FBXfiles don't import on layers and we want to use them. What: Set each object from a revit FBX model onto a layer based on the name of the Category and Family */ -------------------------------------------------------------------------- (--script begin ------------------------------------------------------------------------------------------------------ -- FUNCTIONS ------------------------------------------------------------------------------------------------------ -- pass a node and a layer name --if layer don't exists, it is created, otherwise, the node is added to it function setObjectToLayer strLayerName obj = ( local theLayer = undefined --if undefined, create the layer theLayer = LayerManager.newLayerFromName strLayerName --attempt to use the existing layer theLayer = LayerManager.getLayerFromName strLayerName --move the nod to the desired layer if theLayer != undefined do theLayer.AddNode obj )-- ------------------------------------------------------------------------------------------------------ -- MAIN ------------------------------------------------------------------------------------------------------ --to prevent delays and ui refreshes max create mode local boolRestoreLayerManager = false if LayerManager.isDialogOpen() do ( LayerManager.closeDialog() boolRestoreLayerManager = true ) --clears maxscript listener clearlistener() --stamping information in the listener format "%\n" "---------------------------------------------------------" format "%\n\n" "Looping through scene entities......" --loop through all scene objects to build a string useful for layer naming -- ex: Revit Category + Revit Family == One Layer -- ex: Revit Familiy + Revit Type == One Layer for obj in Objects do ( --extract Revit Basic Properties from Custom Attributes -- this only works with data imported from FBX -- this only works if Combine By options from File Link has not destroyed some of those properties --initialize the an array containing extractd properteis -- those properties will be used to build a layer name local arStrObjPropertyValues = #() --extract custom attributes from node local objCustAttribs = custAttributes.get obj 1 baseobject:false --check if the object has custom attributes if (objCustAttribs != undefined) do ( --------------------------------------------------------------------------------------- -- BEGIN HACK HACK HACK -- The following is a band aid fix to workaround the fact that the FBX Reader of max -- Leaves Parts with empty meta data. As a result, they would all end up into the same -- Layer. The following copies the Original Part Properties into the Category Properties -- in order to land on the appropriate layers. --END HACK HACK HACK --------------------------------------------------------------------------------------- /* Typical Revit Properties: .Category_Name : string */ --------------------------------------------------------------------------------------- --extract a few basic properties from the object to use a a way to build the appropriate layer name local arPropertiesToExtract = #(#Category_Name) --- CHANGE ME TO ANY OTHER PROPERTY NAME --loop through properties to be extracted from nodes for theProperty in arPropertiesToExtract do ( if (hasProperty objCustAttribs theProperty) do ( --concatenate the string with the value contained in the property append arStrObjPropertyValues (getProperty obj theProperty) )--end if )--end loop through properties --------------------------------------------------------------------------------------- --------------------------------------------------------------------------------------- -- concatenate layer name from collected properties and move node to the desired layer --------------------------------------------------------------------------------------- local strObjTargetLayerName = "" local indexCount = 1 for i in arStrObjPropertyValues do ( strObjTargetLayerName =strObjTargetLayerName + i if indexCount != arStrObjPropertyValues.count do strObjTargetLayerName = strObjTargetLayerName + " | " indexCount = indexCount + 1 ) --------------------------------------------------------------------------------------- -- move node to the desired layer --create a layer name and move the node on it, only if properties where extracted from the node if (strObjTargetLayerName != "") do ( format "%\n" strObjTargetLayerName setObjectToLayer strObjTargetLayerName obj )--end if --------------------------------------------------------------------------------------- )--end if ((objCustAttribs != undefined) )--end for loop, move to next object if boolRestoreLayerManager == true do ( layermanager.editlayerbyname "" ) )--script ends