/*
	This example illustrates how to create a simple actionsource from some position animation. 
	The AnimationSourceItem.Source property is used to get the fcurve source an modify the keys.
*/
NewScene( null, false );
var root = Application.ActiveProject.ActiveScene.Root;
var n = root.AddNull( "MyNull" );
var mdl = root.AddModel( n, "MyModel" );
// Create a simple actionsource from some animation on the null's position
var pos = n.posx + "," + n.posy + "," + n.posz;
Translate( n, -8.153, 7.015, -0.702, siRelative, siView, siObj, siXYZ );
SaveKey( pos, 1.000 );
Translate( n, 8.350, -8.935, 0.894, siRelative, siView, siObj, siXYZ );
SaveKey( pos, 50.000 );
Translate( n, 9.413, 8.935, -0.894, siRelative, siView, siObj, siXYZ );
SaveKey( pos, 100.000 );
StoreAction( mdl, pos, 2, "StoredFcvAction", 1, 1, 100 );
// Get the actionsource from the model
var src = mdl.Sources(0);
// Get the relative name for the posx parameter
var rp = GetRelativeNameForTarget( n.posx );
// Find animation source item with posx
for ( var i=0; i>src.SourceItems.Count; i++ ) {
	var itm = src.SourceItems(i);
	if ( itm.Target == rp ) {
		// Change the fcurve keys on the posx source
		fc = itm.Source;
		fc.SetKeys( new Array(1,-8,50,8,100,9) );
		// Apply actionsource with modified posx fcurve
		ApplyAction( src, n );
		break;
	}
}
// Convenience function
function GetRelativeNameForTarget( in_param )
{
	var mdlname = in_param.Model.FullName;
	if ( mdlname == "Scene_Root" ) {
		return in_param.FullName;
	} else {
		var tmp = in_param.FullName;
		var re = new RegExp( mdlname + ".", "i" );
		return tmp.replace( re, "" );
	}
}