'
' This example shows how to set the reference plane from the
' data stored in the refplane transform
'
NewScene
TranslateTool
'Create a sphere
CreatePrim "Sphere", "MeshSurface"
'Use reference plane XZ
SetCurrentReferencePlane "RefPlanes.XZ"
'Set-up snapping to the reference plane
'Set plane reference mode in MCP
SetValue "Preferences.SnapProperties.Enable", True
SetValue "Preferences.SnapProperties.EnableGrid", True
SetUserPref "3D_TRANSFO_REFERENTIAL_CHANGED", 7
MsgBox "Translate the sphere - note it is locked to the XZ reference plane."
'NOTE: you can set back the current reference plane to
'the one created from CreateReferencePlane or SetTransientReferencePlane
'by doing SetCurrentReferencePlane "RefPlanes.Transform" |