/*

	This example demonstrates how to set an fcurve on the posx parameter

	and then how to access the keys through the FCurveKey object

*/

NewScene( null, false )

var oRoot = Application.ActiveProject.ActiveScene.Root;

var oNull = oRoot.AddNull();

var oPosX = oNull.posx;

// Create and connect an fcurve to the position x

var oFCurve = oPosX.AddFCurve2( new Array(1, 10, 50, 0, 100, 10) );

// Set the zero slopes on the key tangents

oFCurve.SetKeyTangents( new Array( 

	-10.5, 0, 10.5, 0, 

	-10.5, 0, 10.5, 0, 

	-10.5, 0, 10.5, 0 

));

// Get the keys on the fcurve

for ( var i=0; i<oFCurve.Keys.Count; i++ ) {

	var oFCKey = oFCurve.Keys(i);

	Application.LogMessage( "oFCKey[" + oFCKey.Index + "] at frame " + oFCKey.Time + " = " + oFCKey.Value );

}

// Expected results:

//INFO : oFCKey[0] at frame 1 = 10

//INFO : oFCKey[1] at frame 50 = 0

//INFO : oFCKey[2] at frame 100 = 10

'

' This example demonstrates how to set an fcurve on the posx parameter

' and then how to access the keys through the FCurveKey object

'

set oRoot = Application.ActiveProject.ActiveScene.Root

set oNull = oRoot.AddNull

set oPosX = oNull.posx

' Create and connect an fcurve to the position x

set oFCurve = oPosX.AddFCurve2( Array( 1, 10, 50, 0, 100, 10 ))

' Set the zero slopes on the key tangents

oFCurve.SetKeyTangents( Array( _

	-10.5, 0, 10.5, 0, _

	-10.5, 0, 10.5, 0, _

	-10.5, 0, 10.5, 0 _

))

' Get the keys on the fcurve

for each oFCKey in oFCurve.Keys

	Application.LogMessage "oFCKey[" & oFCKey.Index & "] at frame " & oFCKey.Time & " = " & oFCKey.Value

next

' Expected results:

'INFO : oFCKey[0] at frame 1 = 10

'INFO : oFCKey[1] at frame 50 = 0

'INFO : oFCKey[2] at frame 100 = 10

#

# This example demonstrates how to set an fcurve on the posx parameter

# and then how to access the keys through the FCurveKey object

#

Application.NewScene( "", 0 )

oRoot = Application.ActiveProject.ActiveScene.Root

oNull = oRoot.AddNull()

oPosX = oNull.posx

# Create and connect an fcurve to the position x

oFCurve = oPosX.AddFCurve2( [1, 10, 50, 0, 100, 10] )

# Set the zero slopes on the key tangents

oFCurve.SetKeyTangents( [ 

	-10.5, 0, 10.5, 0, 

	-10.5, 0, 10.5, 0, 

	-10.5, 0, 10.5, 0 

])

# Get the keys on the fcurve

for oFCKey in oFCurve.Keys :

	Application.LogMessage( "oFCKey[" + str(oFCKey.Index) + "] at frame " + str(oFCKey.Time) + " = " + str(oFCKey.Value) )

# Expected results:

#INFO : oFCKey[0] at frame 1.0 = 10.0

#INFO : oFCKey[1] at frame 50.0 = 0.0

#INFO : oFCKey[2] at frame 100.0 = 10.0