'

'	This example demonstrates how to set the current pass. It also 

'	shows how to get a collection of all passes in the scene.

'

' Create a new scene 

NewScene , false

' Create a few dummy passes to play with

CreatePass , "Sneezy"

CreatePass , "Grumpy"

CreatePass , "Wimpy"

' Which one is the current pass and what type of object is it?

Set oPass = GetCurrentPass 

Application.LogMessage oPass.Name & " is the current pass."

' Get the collection of all passes in the scene

Set oPassList = CreateObject( "XSI.Collection" )

oPassList.SetAsText "Passes.*"

' Loop through the collection to get the one named "Sneezy"

For Each p In oPassList

	If p.Name = "Sneezy" Then

		Set oNewPass = p

		Exit For

	End If

Next

' Change the current pass to Sneezy

SetCurrentPass oNewPass 

' Which one is the current pass and what type of object is it?

Set oPass = GetCurrentPass 

Application.LogMessage oPass.Name & " is the current pass."

' Output of above script:

'INFO : "Wimpy is the current pass."

'

'INFO : "Sneezy is the current pass."