如何用maxscript将数据导出成纯文本格式的文件？

[xiaoyao888]

如何用maxscript将数据导出成纯文本格式的文件？
有没有相关的例子或连接

[sandsea]

MacroScript ExportMesh category:"HowTo"

(

fn GetGeometry o = (

Superclassof o == Geometryclass and classof o != TargetObject )

obj = pickobject filter:GetGeometry

if isValidNode obj then

(

tmesh = snapshotAsMesh obj

out_name = GetSaveFileName()

if out_name != undefined then

(

out_file = createfile out_name

num_verts = tmesh.numverts

num_faces = tmesh.numfaces

format "%,%\n" num_verts num_faces to:out_file

for v = 1 to num_verts do

format "%," (getVert tmesh v) to:out_file

format "\n" to:out_file

for f = 1 to num_faces do

(

face = getFace tmesh f

sgroup = getFaceSmoothGroup tmesh f

matid = getFaceMatId tmesh f

edge1 = getEdgeVis tmesh f 1

edge2 = getEdgeVis tmesh f 2

edge3 = getEdgeVis tmesh f 3

format "%,%,%,%,%,%\n" face sgroup matid edge1 edge2 edge3 to:out_file

)

close out_file

edit out_name

)

)

)

[sandsea]

就这样了,看了应该就明白了吧,不想多加解释了

[xiaoyao888]

都快5个月了，才有人看，我早都编了插件实现了，不过还是要感谢你的回答，等我试试你的这个成功了就加分