获取贴图及IES文件

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
    )
)--拷贝使用中的贴图或选中物体的贴图到指定目录