/*

	This example illustrates how to use the FCurveKey.Set method to translate keys.

*/

// Create new scene

Application.NewScene( "", false );

var empty;

var nullobj = Application.ActiveSceneRoot.AddNull();

var cpset = nullobj.AddProperty( "Custom_parameter_list", empty, "CustomPSet" );

var x = cpset.AddParameter( "X", siDouble, empty, siAnimatable, "X", "X", empty, 0.25, -100, 100 );

var y = cpset.AddParameter( "Y", siDouble, empty, siAnimatable, "Y", "Y", empty, 0.25, -100, 100 );

// Create some fcurves

var fc1 = x.AddFCurve();

var fc2 = y.AddFCurve();

// Start editing fcurve

fc1.BeginEdit();

fc2.BeginEdit();

// Add keys to the fcurves

fc1.Resample();

fc2.Resample();

// Assign some values to keys

for ( i=0; i<fc1.GetNumKeys(); i++ ) {

	var calcX = ((i+1)-10)/10;

	fc1.GetKeyAtIndex(i).Value = Math.atan(calcX / Sqr(-calcX * calcX + 1));

	// Copy the value to fc2 for comparison

	fc2.GetKeyAtIndex(i).Value = fc1.GetKeyValue(i);

}

var ckeys = fc1.GetNumKeys();

var tangents = new Array(ckeys*4);

var itan=0;

// Save tangents

for ( var i=0; i<ckeys; i++ ) {

	var fckey = fc1.GetKeyAtIndex(i);

	// Save the tangents

	tangents[itan++] = fckey.LeftTanX;

	tangents[itan++] = fckey.LeftTanY;

	tangents[itan++] = fckey.RightTanX;

	tangents[itan++] = fckey.RightTanY;

}

// Translate the keys

for ( var i=0; i<ckeys; i++ ) {

	var frame = fc1.GetKeyFrame(i);

	var val = fc1.GetKeyValue(i);

	var fckey = fc1.GetKey(frame);

	fckey .set( frame-100, val * 1.25 );

}

// Reset the tangents

fc1.SetKeyTangents(tangents);

// End editing fcurve

fc2.EndEdit();

fc1.EndEdit();

// Convenience function

function Sqr( x ) 

{

	return x * x;

}