' This example demonstrates how to use the ConnectToProjection command.
NewScene , false
' Create an object with a projection an a texture.
CreatePrim "Sphere", "MeshSurface"
CreateProjection "sphere", siTxtCylindrical, siTxtDefaultCylindrical, , "Texture_Projection"
Scale "Texture_Support", 3, 1, 3, siAbsolute, siPivot, siObj, siXZ, , , , , , , , 0
SIApplyShaderToCnxPoint "Image", "Sources.Materials.DefaultLib.Material.Phong.diffuse"
' Create a second object
CreatePrim "Torus", "MeshSurface"
Translate "torus", 10, 0, 0, siAbsolute, siPivot, siObj, siX, , , , , , , , , , 0
' Creates a new projection and shares the sphere texture projection definition
ConnectToProjection "torus", "Texture_Projection", "sphere.polymsh.cls.Texture_Coordinates_AUTO.Texture_Projection.Texture_Projection_Def"
SetDisplayMode "Camera", "textured"
|