' create a 3D object
CreatePrim "Sphere", "MeshSurface"
' set some keyframes
SetValue "PlayControl.Key", 1
SetValue "PlayControl.Current", 1
Translate , -5, 0, 0, siRelative, siView, siObj, siXYZ
SaveKey "sphere.kine.local.posx,sphere.kine.local.posy,sphere.kine.local.posz", 1
SetValue "PlayControl.Key", 30
SetValue "PlayControl.Current", 30
Translate , 10, 0, 0, siRelative, siView, siObj, siXYZ
SaveKey "sphere.kine.local.posx,sphere.kine.local.posy,sphere.kine.local.posz", 30
SetValue "PlayControl.Key", 15
SetValue "PlayControl.Current", 15
' enable ghosting in view
SetValue "Camera.camdisp.animghostenable", True
' toggle ghosting on sphere
ToggleGhosting |