移动茶壶例子：
global pickedModel
property pButtonPressed
property pLastPt
property pHeight
property pWidth
property pMember
property pSprite
property pModelTransform

--------------------------------------------------------------------------------
--Sprite Handlers---------------------------------------------------------------
--------------------------------------------------------------------------------

on beginSprite(me)

pSprite = sprite(me.spritenum)

pMember = pSprite.member

pAzimuth = 0
pElevation = 0

pButtonPressed = false
myRect = sprite(me.spriteNum).rect
pWidth = myRect.width
pHeight = myRect.height
end


on enterFrame(me)
if pButtonPressed then

if(pLastPt.locH <> the mouseH or pLastPt.locV <> the mouseV) then

deltaX = float(the MouseH - pLastPt.locH)
deltaY = float(pLastPt.locV-the MouseV)

pModelTransform.translate(deltaX,deltaY,0)

pLastPt = point(the MouseH, the MouseV)
end if
end if
end

on mouseDown(me)
pSprite = sprite(me.spritenum)
tOffset = point(pSprite.left, pSprite.top)
spriteToWorld = pSprite.camera.spriteSpaceToWorldSpace(the mouseLoc - tOffset)
pickedModel = pSprite.camera.ModelUnderLoc(the mouseLoc-tOffset)

if pickedModel<>void then
tModel = pMember.model(pickedModel.name)
pModelTransform = tModel.transform
pButtonPressed = true
pLastPt = clickLoc()
end if
put spriteToWorld into member "v"
put pickedModel into member "v2"
end

on mouseUp(me)
pButtonPressed = false
end

on mouseUpOutside(me)
pButtonPressed = false
end

on exitFrame
go to the frame
end

on mouseWithin

tOffset = point(sprite(1).left, sprite(1).top)
spriteToWorld = sprite(1).camera.spriteSpaceToWorldSpace(the mouseLoc - tOffset)
pickedModel = sprite(1).camera.ModelUnderLoc(the mouseLoc-tOffset)

if pickedModel <> void then
cursor 260
else
cursor -1
end if

end mouseWithin
需要编程；麻烦些，可测试过


顺便多说一句：谁能帮我crack一个软件：vr toolbox

crack是什么

MAX的茶壶导出w3d文件，在D85中使用一个简单行为就可以了