SIAddPointOnCurveAtEnd

詳細

指定したカーブの最後にポイントを追加します。

スクリプト構文

SIAddPointOnCurveAtEnd( InputObj, [X], [Y], [Z], [Local], [CurveType], [PreserveTrace] );

パラメータ

パラメータ タイプ 説明
InputObj 文字列 ポイントを設定するカーブ
X Double X 座標

デフォルト値: 0

Y Double Y 座標

デフォルト値: 0

Z Double Z 座標

デフォルト値: 0

Local Boolean ポイントがローカル座標にある場合は True、グローバル座標にある場合は False。

デフォルト値: False

CurveType Integer カーブのタイプ

デフォルト値: -1

PreserveTrace Boolean 新しいポイントを追加するときにカーブの現在の形状を保つ場合は True を設定します。

デフォルト値: False

VBScript の例

'This example shows how to add points at the end of a curve.

newscene

'Create a curve and add points at end.  

'Adding points at end will create a curve that

'has the same trace as adding the same points at start

'but with start and end points reversed.

SICreateCurve "crvlist", 3, 0

SIAddPointOnCurveAtEnd "crvlist", -4.0, 0, 1.6, False

SIAddPointOnCurveAtEnd "crvlist", -3.9, 0, -0.3, False

SIAddPointOnCurveAtEnd "crvlist", -2.3, 0, 0.2, False

SIAddPointOnCurveAtEnd "crvlist", -1.9, 0, -2.2, False

SIAddPointOnCurveAtEnd "crvlist", -0.1, 0, -0.9, False

SIAddPointOnCurveAtEnd "crvlist", 0.4, 0, 0.6, False

SIAddPointOnCurveAtEnd "crvlist", 3, 0, -1.7, False

SIAddPointOnCurveAtEnd "crvlist", 3.7, 0, -1.8, False

'Show boundaries

SelectObj "crvlist"

ToggleValue "attrselboundaryflags", "*.camvis,Views.*.*.camvis"

関連項目

CreateCurve SISetCurvePoints SICreateCurve SIAddPointOnCurve SIAddPointOnCurveAtStart GetCurveLength EvaluateCurveAt