在max保存的目录下创建的maps文件夹

这个脚本想实现
1、在max保存的目录下创建的maps文件夹
2、自动打通路径
代码有点乱
现在打通路径有问题，这样写只能打通普通的标准材质，
而且执行出来有问题
哪位朋友知道支个招！

1. checkForSave()
   
2.         Maps_Floder = #("Maps") [1]  
   
3.         now_path = maxFilePath
   
4.         maps_path = maxFilePath + Maps_Floder + "\"
   
5.         makeDir maps_path
   
6.         
   
7. 
   
8.         maps_in_scene = usedMaps()
   
9.         max_ini_file = getMAXIniFile()
   
10.         get_last_open_file = getinisetting max_ini_file "FileList" "File1"
    
11.         path_of_file = getFilenamePath get_last_open_file
    
12.         path_of_collection = maps_path
    
13.         
    
14.         
    
15. --路径设置函数
    
16.         fn editMaps item thePath =
    
17.         (
    
18.                 local Props = getClassInstances BitmapTexture,vraymtl
    
19.                 try ( props=getPropNames item )
    
20.                         catch ( return undefined )
    
21.                                 for aProp in props do
    
22.                                 (
    
23.                                         newItem=item
    
24.                                         aProp="newItem.'"+aProp+"'"
    
25.                                         aProp=execute aProp
    
26.                                                 try (
    
27.                                                         if (classof aProp)== BitmapTexture do
    
28.                                                                 (
    
29.                                                                         aProp.filename=(thePath + "\" + getFilenameFile(aProp.filename) +
    
30.                                                                         getFilenameType(aProp.filename))
    
31.                                                                 )
    
32.                                                         ) catch ()
    
33. 
    
34.                                                         editMaps aProp thePath
    
35.                                 )
    
36.         )        
    
37.         
    
38. --复制文件到max目录下脚本创建的maps文件夹
    
39.         if path_of_collection != undefined do
    
40.                 (
    
41.                         rollout cellect_map_floater "Archive Scene" width:250 height:88
    
42.                         (
    
43.                                 progressBar prog_bar_copy "ProgressBar" pos:[4,16] width:240 height:16 color:(color 0 40 180)
    
44.                                 label file_copy_text "" pos:[16,40] width:240 height:32
    
45.                                 
    
46.                                 on cellect_map_floater open do
    
47.                                 (
    
48.                                         for i in 1 to maps_in_scene.count do
    
49.                                                 (
    
50.                                                         prog_bar_copy.value = 100.*i/maps_in_scene.count
    
51.                                                         file_copy_text.text = maps_in_scene[i]
    
52.                                                         copyfile maps_in_scene[i] (path_of_collection + "\" + getFilenameFile maps_in_scene[i] + getFilenameType maps_in_scene[i])
    
53.                                                 )
    
54.                                         copyfile get_last_open_file (path_of_collection + "\" + getFilenameFile get_last_open_file + getFilenameType get_last_open_file)
    
55.                                         DestroyDialog cellect_map_floater
    
56.                                 --设置路径
    
57.                                         ObjArray = #()
    
58.                                         newpath = maxFilePath + Maps_Floder + "\"
    
59.                                         editMaps sceneMaterials newpath               
    
60.                                        
    
61.                                 )
    
62.                         )
    
63.                         createdialog cellect_map_floater --style:#(#style_toolwindow)
    
64.                 )
    

复制代码

不错啊，强烈支持楼主ing……

本来在潜水，看到LZ的矿世奇功，实在忍不住出来冒个泡泡！

我楼主朋友，我就是特地来顶楼主的！，嘿嘿

有竞争才有进步嘛

简洁，明了，然后执行效率还很高。这样的代码就是我们应该追求的吧？我估计

看到这个，我和我的小伙伴们都惊呆了...

大家一起多交流啊，集思广益

小手一抖，积分到手！不过这里没积分的我也顶楼主～我就是特地来顶楼主的！

我只是来回帖的，无回帖，不论坛，这才是人道。

如果有代码的部分，可以详细介绍下代码的意思吗？谢谢