SICreateCurve

SICreateCurve

詳細

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

スクリプト構文

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