Moving the Max exporters to Nenya.
git-svn-id: svn+ssh://src.earth.threerings.net/narya/trunk@4429 542714f4-19e9-0310-aa3c-eee0fc999fb1
This commit is contained in:
Andrzej Kapolka
@@ -1,98 +0,0 @@
|
|||||||
--
|
|
||||||
-- $Id$
|
|
||||||
--
|
|
||||||
-- Narya library - tools for developing networked games
|
|
||||||
-- Copyright (C) 2002-2004 Three Rings Design, Inc., All Rights Reserved
|
|
||||||
-- http://www.threerings.net/code/narya/
|
|
||||||
--
|
|
||||||
-- This library is free software; you can redistribute it and/or modify it
|
|
||||||
-- under the terms of the GNU Lesser General Public License as published
|
|
||||||
-- by the Free Software Foundation; either version 2.1 of the License, or
|
|
||||||
-- (at your option) any later version.
|
|
||||||
--
|
|
||||||
-- This library is distributed in the hope that it will be useful,
|
|
||||||
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
-- Lesser General Public License for more details.
|
|
||||||
--
|
|
||||||
-- You should have received a copy of the GNU Lesser General Public
|
|
||||||
-- License along with this library; if not, write to the Free Software
|
|
||||||
-- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
||||||
|
|
||||||
macroScript TRAnimationExporter category:"File" \
|
|
||||||
buttonText:"Export Animation as XML..." toolTip:"Export Animation as XML" (
|
|
||||||
|
|
||||||
-- Writes a point3-valued attribute to the file
|
|
||||||
fn writePoint3Attr attr p outFile =
|
|
||||||
(
|
|
||||||
format "%=\"%, %, %\"" attr p.x p.y p.z to:outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a quat-valued attribute to the file
|
|
||||||
fn writeQuatAttr attr q outFile =
|
|
||||||
(
|
|
||||||
format "%=\"%, %, %, %\"" attr q.x q.y q.z q.w to:outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a single node transform
|
|
||||||
fn writeTransform node outFile = (
|
|
||||||
format " <transform name=\"%\"" node.name to:outFile
|
|
||||||
xform = node.transform
|
|
||||||
if node.parent != undefined do (
|
|
||||||
xform = xform * (inverse node.parent.transform)
|
|
||||||
)
|
|
||||||
writePoint3Attr " translation" xform.translationPart outFile
|
|
||||||
writeQuatAttr " rotation" (inverse xform.rotationPart) outFile
|
|
||||||
writePoint3Attr " scale" xform.scalePart outFile
|
|
||||||
format "/>\n" to:outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a single animation frame
|
|
||||||
fn writeFrame nodes outFile = (
|
|
||||||
format " <frame>\n" to:outFile
|
|
||||||
for node in nodes do in coordsys world (
|
|
||||||
writeTransform node outFile
|
|
||||||
)
|
|
||||||
format " </frame>\n\n" to:outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes animation to the named file
|
|
||||||
fn writeAnimation fileName =
|
|
||||||
(
|
|
||||||
outFile = createfile fileName
|
|
||||||
format "<?xml version=\"1.0\" standalone=\"yes\"?>\n\n" to:outFile
|
|
||||||
format "<animation frameRate=\"%\">\n\n" frameRate to:outFile
|
|
||||||
objs = objects as array
|
|
||||||
sels = selection as array
|
|
||||||
if sels.count > 0 do (
|
|
||||||
objs = sels
|
|
||||||
)
|
|
||||||
for t = animationRange.start to animationRange.end do at time t (
|
|
||||||
writeFrame objs outFile
|
|
||||||
)
|
|
||||||
if sels.count > 0 do (
|
|
||||||
select sels
|
|
||||||
)
|
|
||||||
format "</animation>\n" to:outFile
|
|
||||||
close outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
--
|
|
||||||
-- Main entry point
|
|
||||||
--
|
|
||||||
|
|
||||||
-- Get the target filename
|
|
||||||
persistent global xmlAnimFileName
|
|
||||||
local fileName
|
|
||||||
if (xmlAnimFileName == undefined) then (
|
|
||||||
fileName = maxFilePath + (getFilenameFile maxFileName) + ".mxml"
|
|
||||||
) else (
|
|
||||||
fileName = xmlAnimFileName
|
|
||||||
)
|
|
||||||
fileName = getSaveFileName caption:"Select File to Export" \
|
|
||||||
filename:fileName types:"XML Animations (*.MXML)|*.mxml|All|*.*"
|
|
||||||
if fileName != undefined do (
|
|
||||||
xmlAnimFileName = fileName
|
|
||||||
writeAnimation fileName
|
|
||||||
)
|
|
||||||
)
|
|
||||||
@@ -1,192 +0,0 @@
|
|||||||
--
|
|
||||||
-- $Id$
|
|
||||||
--
|
|
||||||
-- Narya library - tools for developing networked games
|
|
||||||
-- Copyright (C) 2002-2004 Three Rings Design, Inc., All Rights Reserved
|
|
||||||
-- http://www.threerings.net/code/narya/
|
|
||||||
--
|
|
||||||
-- This library is free software; you can redistribute it and/or modify it
|
|
||||||
-- under the terms of the GNU Lesser General Public License as published
|
|
||||||
-- by the Free Software Foundation; either version 2.1 of the License, or
|
|
||||||
-- (at your option) any later version.
|
|
||||||
--
|
|
||||||
-- This library is distributed in the hope that it will be useful,
|
|
||||||
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
-- Lesser General Public License for more details.
|
|
||||||
--
|
|
||||||
-- You should have received a copy of the GNU Lesser General Public
|
|
||||||
-- License along with this library; if not, write to the Free Software
|
|
||||||
-- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
||||||
|
|
||||||
macroScript TRModelExporter category:"File" \
|
|
||||||
buttonText:"Export Model as XML..." toolTip:"Export Model as XML" (
|
|
||||||
|
|
||||||
-- Writes a point3-valued attribute to the file
|
|
||||||
fn writePoint3Attr attr p outFile =
|
|
||||||
(
|
|
||||||
format "%=\"%, %, %\"" attr p.x p.y p.z to:outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a quat-valued attribute to the file
|
|
||||||
fn writeQuatAttr attr q outFile =
|
|
||||||
(
|
|
||||||
format "%=\"%, %, %, %\"" attr q.x q.y q.z q.w to:outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a skinned vertex's bone weights to the file
|
|
||||||
fn writeSkinBoneWeights skin vidx outFile =
|
|
||||||
(
|
|
||||||
weightCount = skinOps.getVertexWeightCount skin vidx
|
|
||||||
for i = 1 to weightCount do (
|
|
||||||
bone = skinOps.getBoneName skin (skinOps.getVertexWeightBoneID \
|
|
||||||
skin vidx i) 0
|
|
||||||
weight = skinOps.getVertexWeight skin vidx i
|
|
||||||
format " <boneWeight bone=\"%\" weight=\"%\"/>\n" bone \
|
|
||||||
weight to:outFile
|
|
||||||
)
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a physiqued vertex's bone weights to the file
|
|
||||||
fn writePhysiqueBoneWeights node vidx outFile =
|
|
||||||
(
|
|
||||||
boneCount = physiqueOps.getVertexBoneCount node vidx
|
|
||||||
for i = 1 to boneCount do (
|
|
||||||
bone = physiqueOps.getVertexBone node vidx i
|
|
||||||
weight = physiqueOps.getVertexWeight node vidx i
|
|
||||||
format " <boneWeight bone=\"%\" weight=\"%\"/>\n" bone.name \
|
|
||||||
weight to:outFile
|
|
||||||
)
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a mesh's vertices to the file
|
|
||||||
fn writeVertices mesh outFile =
|
|
||||||
(
|
|
||||||
for i = 1 to mesh.numfaces do (
|
|
||||||
face = getFace mesh i
|
|
||||||
normals = meshop.getFaceRNormals mesh i
|
|
||||||
local tvface
|
|
||||||
if mesh.numtverts > 0 do (
|
|
||||||
tvface = getTVFace mesh i
|
|
||||||
)
|
|
||||||
for j = 1 to 3 do (
|
|
||||||
format " <vertex" to:outFile
|
|
||||||
writePoint3Attr " location" (getVert mesh face[j]) outFile
|
|
||||||
local normal
|
|
||||||
if normals[j] != undefined then (
|
|
||||||
normal = normals[j]
|
|
||||||
) else (
|
|
||||||
normal = getNormal mesh face[j]
|
|
||||||
)
|
|
||||||
writePoint3Attr " normal" normal outFile
|
|
||||||
if tvface != undefined do (
|
|
||||||
tvert = getTVert mesh tvface[j]
|
|
||||||
format " tcoords=\"%, %\"" tvert[1] tvert[2] to:outFile
|
|
||||||
)
|
|
||||||
if isProperty mesh #skin or isProperty mesh #physique then (
|
|
||||||
format ">\n" to:outFile
|
|
||||||
if isProperty mesh #skin then (
|
|
||||||
writeSkinBoneWeights mesh.skin face[j] outFile
|
|
||||||
) else (
|
|
||||||
writePhysiqueBoneWeights mesh face[j] outFile
|
|
||||||
)
|
|
||||||
format " </vertex>\n" to:outFile
|
|
||||||
) else (
|
|
||||||
format "/>\n" to:outFile
|
|
||||||
)
|
|
||||||
)
|
|
||||||
)
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes a node to the file
|
|
||||||
fn writeNode node outFile =
|
|
||||||
(
|
|
||||||
local kind
|
|
||||||
isMesh = false
|
|
||||||
if isKindOf node Editable_Mesh and not node.boneEnable then (
|
|
||||||
isMesh = true
|
|
||||||
if isProperty node #skin or isProperty node #physique then (
|
|
||||||
kind = "skinMesh"
|
|
||||||
) else (
|
|
||||||
kind = "triMesh"
|
|
||||||
)
|
|
||||||
) else (
|
|
||||||
kind = "node"
|
|
||||||
)
|
|
||||||
format " <% name=\"%\"" kind node.name to:outFile
|
|
||||||
xform = node.transform
|
|
||||||
if node.parent != undefined do (
|
|
||||||
xform = xform * (inverse node.parent.transform)
|
|
||||||
format " parent=\"%\"" node.parent.name to:outFile
|
|
||||||
)
|
|
||||||
writePoint3Attr " translation" xform.translationPart \
|
|
||||||
outFile
|
|
||||||
writeQuatAttr " rotation" (inverse xform.rotationPart) \
|
|
||||||
outFile
|
|
||||||
writePoint3Attr " scale" xform.scalePart outFile
|
|
||||||
if isMesh then in coordsys local (
|
|
||||||
writePoint3Attr " offsetTranslation" node.objectOffsetPos outFile
|
|
||||||
writeQuatAttr " offsetRotation" node.objectOffsetRot outFile
|
|
||||||
writePoint3Attr " offsetScale" node.objectOffsetScale outFile
|
|
||||||
format " solid=\"%\"" node.backFaceCull to:outFile
|
|
||||||
if node.material != undefined and
|
|
||||||
isKindOf node.material.diffuseMap BitmapTexture do (
|
|
||||||
format " texture=\"%\"" (filenameFromPath \
|
|
||||||
node.material.diffuseMap.filename) to:outFile
|
|
||||||
format " transparent=\"%\"" \
|
|
||||||
(node.material.diffuseMap.bitmap.hasAlpha or \
|
|
||||||
node.material.opacityMap != undefined) to:outFile
|
|
||||||
)
|
|
||||||
format ">\n" to:outFile
|
|
||||||
if isProperty node #skin do (
|
|
||||||
setCommandPanelTaskMode mode:#modify
|
|
||||||
modPanel.setCurrentObject node.skin node:node
|
|
||||||
)
|
|
||||||
writeVertices node outFile
|
|
||||||
format " </%>\n\n" kind to:outFile
|
|
||||||
|
|
||||||
) else (
|
|
||||||
format "/>\n\n" to:outFile
|
|
||||||
)
|
|
||||||
)
|
|
||||||
|
|
||||||
-- Writes the model to the named file
|
|
||||||
fn writeModel fileName =
|
|
||||||
(
|
|
||||||
outFile = createfile fileName
|
|
||||||
format "<?xml version=\"1.0\" standalone=\"yes\"?>\n\n" to:outFile
|
|
||||||
format "<model>\n\n" to:outFile
|
|
||||||
objs = objects as array
|
|
||||||
sels = selection as array
|
|
||||||
if sels.count > 0 do (
|
|
||||||
objs = sels
|
|
||||||
)
|
|
||||||
for node in objs do in coordsys world (
|
|
||||||
writeNode node outFile
|
|
||||||
)
|
|
||||||
if sels.count > 0 do (
|
|
||||||
select sels
|
|
||||||
)
|
|
||||||
format "</model>\n" to:outFile
|
|
||||||
close outFile
|
|
||||||
)
|
|
||||||
|
|
||||||
--
|
|
||||||
-- Main entry point
|
|
||||||
--
|
|
||||||
|
|
||||||
-- Get the target filename
|
|
||||||
persistent global xmlModelFileName
|
|
||||||
local fileName
|
|
||||||
if (xmlModelFileName == undefined) then (
|
|
||||||
fileName = maxFilePath + (getFilenameFile maxFileName) + ".mxml"
|
|
||||||
) else (
|
|
||||||
fileName = xmlModelFileName
|
|
||||||
)
|
|
||||||
fileName = getSaveFileName caption:"Select File to Export" \
|
|
||||||
filename:fileName types:"XML Models (*.MXML)|*.mxml|All|*.*"
|
|
||||||
if fileName != undefined do (
|
|
||||||
xmlModelFileName = fileName
|
|
||||||
writeModel fileName
|
|
||||||
)
|
|
||||||
)
|
|
||||||
Reference in New Issue
Block a user