rollout ExportObj "输出单文件" width:232 height:137
(
    global inputPath
    global outputPath
    button btnExport "导出" pos:[139,101] width:81 height:25 
    button btnMaxBrowse "输入" pos:[174,11] width:46 height:20
    button btn3DSBrowse "输出" pos:[174,52] width:46 height:20
    button btnCancel "退出" pos:[10,100] width:81 height:28
    label lblShuRu "输入文件" pos:[5,14] width:57 height:18
    label lbl2 "输出文件" pos:[8,46] width:57 height:18
    editText edtInput "" pos:[72,10] width:80 height:21
    editText edtOutput "" pos:[73,46] width:80 height:21
    on btnMaxBrowse pressed do
    (
    if inputPath == undefined then 
    (inputPath = ""
    inputPath = getSavePath()
    )
    else
    (
    inputPath = (getSavePath initialDir:inputPath)
    )
    if(inputPath==undefined) do
    (
         messagebox "请选择合适的输入文件夹"
    )
    edtInput.text = inputPath as string
    ) 
     on btn3DSBrowse pressed do
     (
        if outputPath == undefined then 
        (
        outputPath = ""
        outputPath = getSavePath()
        ) 
        else
        (
        outputPath = (getSavePath initialDir:outputPath)
        )
        if(outputPath==undefined) do
        (
         messagebox("请选择合适的输出文件夹")
        )
        edtOutput.text = outputPath
        )
        on btnExport pressed do
    (
    if(inputPath==undefined) do
    (
    messagebox "输入文件夹为空或未定义"
    )
    if(inputPath=="") do
    (
    messagebox "输入文件夹为空或未定义"
    )
    if(outputPath==undefined) do
    (
    messagebox "输出文件夹为空或未定义"
    )
    if(outputPath=="") do
    (
    messagebox "输出文件夹为空或未定义"
    )
    maxfiles = #()
    inpath = edtInput.text + "\\*.max"
    maxfiles = getFiles inpath
    messagebox inpath
    for f in maxfiles do 
    (
    loadMAXFile f
     print objects
    for i in geometry do 
    (
    select i
    theClasses = exporterPlugin.classes
    strFile = edtOutput.text+"\\"+i.name as string+".3DS"
    exportFile strFile #noPrompt selectedOnly:true using:theClasses[1]
    clearSelection()
    )
    )    
    )
)
createdialog ExportObj