' 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"