ポイントを持たないカーブを作成します。

oReturn = SICreateCurve( [Name], [Degree], [CurveType] );

カーブを戻します(X3DObject オブジェクト)。

パラメータ	タイプ	説明
Name	文字列	カーブ名
Degree	Integer	カーブの度数 デフォルト値： 3 指定可能な値： 説明： 3 キュービックの NURBS カーブ 1 リニアの NURBS カーブ
CurveType	Integer	カーブを補間するかどうかを指定します。 デフォルト値： 1 指定可能な値： 説明： 1 カーブを補間する 0 カーブを補間しない

VBScript の例

'This example creates a curve by adding points to the curve

newscene

'Create a cubic interpolating curve called MyCurve

SICreateCurve "MyCurve", 3, 1

SIAddPointOnCurveAtEnd "MyCurve", -8.074, -1.352, 0.135, False

SIAddPointOnCurveAtEnd "MyCurve", -5.041, -4.056, 0.406, False

SIAddPointOnCurveAtEnd "MyCurve", 4.293, -2.567, 0.257, False	

SIAddPointOnCurveAtEnd "MyCurve", 8.05, -4.0, 3.0123, False	

'Show the knots since we created an interpolating curve

SelectObj "MyCurve", , True

ToggleValue "compobjselknot", "*.camvis,Views.*.*.camvis"

CreateCurve SIAddPointOnCurve SIAddPointOnCurveAtStart SIAddPointOnCurveAtEnd GetCurveLength EvaluateCurveAt