NewScene( null, false );

var oRoot = Application.ActiveProject.ActiveScene.Root;

var oSpot = oRoot.AddLight( "Spot", true ,"MySpotLight" );

var oInterest1 = oSpot.Interest;

Application.LogMessage( "original interest: " + oInterest1 );

var cone3DObj = oRoot.AddGeometry( "Cone", "MeshSurface" );

oSpot.Interest = cone3DObj;

var oInterest2 = oSpot.Interest;

Application.LogMessage( "new interest: " + oInterest2 );

// Expected results:

//INFO : original interest: SpotInterest

//INFO : new interest: cone

app = Application

app.NewScene( "", 0 )

root = Application.ActiveProject.ActiveScene.Root

spot = root.AddLight( "Spot", True ,"MySpotLight" )

intrst1 = spot.Interest

app.LogMessage( "interest: " + intrst1.Name )

cone3DObj = root.AddGeometry( "Cone", "MeshSurface" )

spot.Interest = cone3DObj

intrst2 = spot.Interest

app.LogMessage( "new interest: " + intrst2.Name )

# Expected results:

#INFO : interest: SpotInterest

#INFO : new interest: cone

NewScene , false

set oRoot = Application.ActiveProject.ActiveScene.Root

set oSpot = oRoot.AddLight( "Spot", True ,"MySpotLight" )

set oInterest = oSpot.Interest

Application.LogMessage "interest: " & oInterest

set cone3DObj = SIGetPrim("Cone").value("Value")

SIConvert "MeshSurface", cone3DObj

oSpot.Interest = cone3DObj

set oInterest = oSpot.Interest

Application.LogMessage "new interest: " & oInterest

' Expected results:

'INFO : interest: SpotInterest

'INFO : new interest: cone