27.9.09

Auto null

oObj = Application.Selection(0)
Application.LogMessage( oObj.FullName )
Application.GetPrim("Null", "", "", "")
Application.SetValue("null.null.shadow_icon", 1, "")
Application.SetValue("null.null.primary_icon", 1, "")
Application.SetValue("null.null.shadow_colour_custom", True, "")
Application.SetValue("null.null.R", 1, "")
Application.SetValue("null.null.B", 0.5, "")
Application.SetValue("null.Name", "oTARGET" , "")
Application.MatchTransform ("oTARGET", oObj)
Application.LogMessage( "MatchTransform_done" )
Application.SetValue("oTARGET.Name", "mastercnst_" + oObj.FullName, "")
Application.LogMessage( "rename done" )
Application.LogMessage( "all DONE" )

cara penggunaan
1. select object
2. jalankan scriptnya