max9.0-选择重名物体

原来有不少人需要这个,源码: (local sameobj01=#();local sameobj02=#();local sameobj03=#();local sameobj04=#();sameobj01=for i in objects collect i.name;sameobj02=#(sameobj01[1]);for n in 2 to sameobj01.count do(if (finditem sameobj02 sameobj01[n]==0) then(append sameobj02 sameobj01[n];)else(append sameobj03 sameobj01[n];);) ;if sameobj03.count>0 then(sameobj04=#(sameobj03[1]);for n=2 to sameobj03.count do(if finditem sameobj04 sameobj03[n]==0 then append sameobj04 sameobj03[n];););if sameobj04.count>0 then(sameobj01=#();for i=1 to sameobj04.count do(join sameobj01 (getnodebyname sameobj04[i] all:true ););select sameobj01;)else (messagebox"没有同名物体"title:"tips");)