/*

	This example illustrates how to use the OutputPort.Value property within 

	the context of the _Update function of a runtime scripted operator

*/

NewScene( null, false );

var oObject = Application.ActiveSceneRoot.AddGeometry( "Sphere", "MeshSurface" );

apply_taper( oObject );

// This is the _Update callback used for the 'MyTaper' runtime operator

function MyTaper_Update( ctx, Out, InGeom )

{	

	// Get the taper factor.

	var dFactor = ctx.Parameters("Factor").Value

	// Get the array of point positions.

	var aPnts = InGeom.Value.Geometry.Points.PositionArray.toArray();

	// Taper

	for ( var i = 0; i < aPnts.length / 3; i++ )

	{

		var dTaper = (1 - ( aPnts[1 + (i*3)] * dFactor ))

		aPnts[0 + (i*3)] = aPnts[0 + (i*3)] * dTaper;

		aPnts[1 + (i*3)] = aPnts[1 + (i*3)];

		aPnts[2 + (i*3)] = aPnts[2 + (i*3)] * dTaper;

	}

	// Set the points by accessing the geometry via

	// the OutputPort.Value property

	Out.Value.Geometry.Points.PositionArray = aPnts;

}	

// This function creates the 'MyTaper' operator on the fly and then connects it

// immediately to the input object.

function apply_taper( oObject )

{

	var op = XSIFactory.CreateScriptedOp( "MyTaper", MyTaper_Update.toString(), "JScript" );

	// Define connections

	var ioport = op.AddIOPort( oObject.ActivePrimitive, "Geom" );

	// Define parameters

	var pdef = XSIFactory.CreateParamDef2( "Factor", siDouble, 0.5, 0, 1 );

	op.AddParameter( pdef );

	// Connect operator

	op.Connect( oObject );

}