获取贴图及IES文件

最近看了一下以前写的关于收集贴图的函数...又完善了一下,老链接:http://www.cnblogs.com/3dxy/p/3988751.html

fn saveusedmaps spath sel:#false = 

(

    makedir spath

    case sel of

    (

        #true:

        (

            all_obj = selection;all_maps = #()

            for i in all_obj do

            all_maps = makeUniqueArray (join all_maps (usedmaps (i)))

        )

        #false:(all_obj = objects;all_maps = usedmaps())

    )

    for map = 1 to all_maps.count do

    (

        new_map = spath + "\\" + filenamefrompath all_maps[map]

        copyfile all_maps[map] new_map

    )

)--拷贝使用中的贴图或选中物体的贴图到指定目录

增加了个选项,用来控制是否单独收集选中模型的贴图或IES文件.