/*

	This example demonstrates how to find all sources in the scene

	by using the Model.Sources property on every model returned from

	the X3DObject.Models property, given this structure:

	    Scene_Root (Model)

	        |- Herb (Model)

	        |    |- Mixer		(animation clip on null.posx)

	        |    |- null 		(null.size = FCurve)

	        |

	        |- Jesse (Model)

	        |    |- Mixer		(animation clips on null.scly,null.sclz,null.rotz)

	        |    |- null

	        |

	        |- Sally (Model)

	             |- Mixer		(audio clip)

	             |- grid		(image on its texture projection)

*/

function FindSourcesUnderModel( in_model )

{

	// We will return a comma-delimited string of the names of all sources found 

	var foundsrcs = "";

	Application.LogMessage( "\n\tSearching " + in_model.FullName + " for sources...", siComment );

	// Loop through the collection of sources found under this model to print the

	// name and add its name to the result string

	if ( in_model.Sources.Count > 0 ) {

		var s = new Enumerator( in_model.Sources );

		for ( ; !s.atEnd(); s.moveNext() ) {

			var src = s.item();

			Application.LogMessage( "\t" + src.FullName + " is a " + ClassName(src), siComment );

			// Shorthand for making sure we don't add an extra comma to the start of the list

			foundsrcs += ( foundsrcs == "" ) ? src.FullName : "," + src.FullName;

		}

	} else {

		Application.LogMessage( "\tNo sources found on " + in_model.FullName, siComment );

	}

	// Return empty strings too; the caller will handle testing for no data

	return foundsrcs;

}

// Set up the scene (see end of example for details)

SetTheScene();

// Search through all models in the scene for sources

var models = new ActiveXObject( "XSI.Collection" );

models.AddItems( ActiveSceneRoot.Models(true) );

models.Add( ActiveSceneRoot );

Application.LogMessage( "SEARCHING MODELS: " + models.GetAsText(), siComment );

// Build a collection of sources

var sources = new ActiveXObject( "XSI.Collection" );

for ( var m=0; m<models.Count; m++ ) {

	var results = FindSourcesUnderModel( models(m) );

	if ( results != "" ) { 

		sources.AddItems(results); 

	}

}

// Now this source collection contains all sources in the scene,

// regardless of which model they are under

Application.LogMessage( "\nFINAL SCORE: Found " + sources.Count + " sources: ", siComment );

Application.LogMessage( sources.GetAsText(), siComment );

// And just for bonus marks, get the list of external files

var extfiles = ActiveProject.ActiveScene.ExternalFiles;

Application.LogMessage( "\nBONUS: Found " + extfiles.Count + " external file(s)", siComment );

for ( var f=0; f<extfiles.Count; f++ ) {

	Application.LogMessage( "\t" + extfiles(f).ResolvedPath, siComment );

}

// Expected results:

//SEARCHING MODELS: Herb,Jesse,Sally,Scene_Root

//

//	Searching Herb for sources...

//	Sources.Herb.Shuffle is a ActionSource

//

//	Searching Jesse for sources...

//	Sources.Jesse.Zinging is a ActionSource

//	Sources.Jesse.Thwacking is a ActionSource

//

//	Searching Sally for sources...

//	No sources found on Sally

//

//	Searching Scene_Root for sources...

//	No sources found on Scene_Root

//

//FINAL SCORE: Found 3 sources: 

//Sources.Herb.Shuffle,Sources.Jesse.Zinging,Sources.Jesse.Thwacking

//

//BONUS: Found 2 external file(s)

//	C:\Program Files\Messenger\ONLINE.WAV

//	<factory_path>\Application\rsrc\noIcon.pic

// Helper function to make this example more readable

function SetTheScene()

{

	NewScene( null, false );

	// ~~~~ HERB'S SETUP ~~~~ 

	var herb = ActiveSceneRoot.AddModel();

	herb.Name = "Herb";

	var obj = herb.AddNull();

	// Make the icon a diamond

	obj.primary_icon = 7;

	// Set up an fcurve on the size of the null

	var keys = new Array( 1, 1,  34, 12,  73, 38 );

	obj.size.AddFCurve2( keys );	

	// Set up another fcurve on the null's position in X

	keys = new Array( 3, 0.5,  22, 1.0,  75, 3.5,  80, -2.0 );

	var fc = obj.posx.AddFCurve2( keys );

	// Store the fcurve on posx as an action source

	herb.AddActionSource( "Shuffle", new Array(obj.posx.FullName), 

		new Array(fc), new Array(true) );

	// ~~~~ JESSE'S SETUP ~~~~ 

	var jess = ActiveSceneRoot.AddModel();

	jess.Name = "Jesse";

	obj = jess.AddNull();

	// Create an action source on the null's scaling in Y and Z (fcurves)

	keys = new Array( 5, 1.2,  20, 1.7,  45, 2.0,  90, 2.5 );

	targets = new Array( obj.scly.FullName, obj.sclz.FullName );

	sources = new Array( obj.scly.AddFCurve2(keys), obj.sclz.AddFCurve2(keys) );

	actives = new Array( true, true );

	jess.AddActionSource( "Zinging", targets, sources, actives );

	// Add a rotation source too

	keys = new Array( 6, 0,  36, -30,  99, 0 );

	targets = new Array( obj.rotz.FullName );

	sources = new Array( obj.rotz.AddFCurve2(keys) );

	actives = new Array( true );

	jess.AddActionSource( "Thwacking", targets, sources, actives );

	// ~~~~ SALLY'S SETUP ~~~~ 

	var sal = ActiveSceneRoot.AddModel();

	sal.Name = "Sally";

	obj = sal.AddGeometry( "Grid", "MeshSurface" );

	// Create a grid with a texture projection

	ApplyShader( obj, null, null, siUnspecified, siLetLocalMaterialsOverlap );

	CreateProjection( obj, siTxtSpherical, siTxtDefaultSpherical, "", "Texture_Projection", null, siRelDefault, "" );

	// Applying an image to the texture projection creates an image source

	BlendInTextureLayers( "Image", obj, 1, false, siReplaceAndBlendInPreset, true, true, false, false );

	// Also add an audio source and instantiate it in the mixer

	var aud = ImportAudio( sal, null, "Wavy" );

	AddAudioClip( sal, aud );

}