v4.0

指定したオブジェクトにアタッチされたイミディエイト シェーダで、すべてのデフォルト テクスチャ ポート(接続ポイント)の位置を指定します。 要求されたプリセットでレイヤを作成し、作成したレイヤを指定のポートに追加します。

oReturn = BlendInTextureLayers( [PresetNames], [InputObjs], [SharedMatAction], [NotifyNoResult], [Mode], [Ambient], [Diffuse], [Transparency], [Reflection] );

作成されたレイヤを XSICollection として戻します。 Mode の値が siReplaceNoBlend である場合は、最初のプリセットが、レイヤではなくシェーダとして戻されます。

パラメータ	タイプ	説明
PresetNames	文字列	レイヤを作成するシェーダ/イメージに対応するシェーダ プリセット デフォルト値： 「Image」
InputObjs	文字列	デフォルトのテクスチャ接続ポイントを検索するオブジェクトのリスト デフォルト値： 現在選択されている値
SharedMatAction	Integer	共有マテリアルをローカルに設定するかどうかを設定します。 注: 「2」または「3」に設定すると、ユーザに選択を求めるポップアップ ダイアログが表示されます(0=No または 1=Yes)。 「2」に設定されている場合に記録されているコマンドが再度実行されると、ユーザの応答に応じてコマンドは「可」または「不可」の応答を自動的に返します。 「3」に設定されている場合には、再度ポップアップ ダイアログが表示されます。 デフォルト値：2 (初級ユーザに確認) 指定可能な値： 説明： 0 不可 1 可 2 初級ユーザに確認 3 上級ユーザに確認
NotifyNoResult	Boolean	プリセットが作成されない場合に、ユーザに通知するには True。 デフォルト値：False (通知しない)
Mode	siBlendInTextureLayersModes	新しいプリセットでのブレンディング方法 デフォルト値：siBlendInTextureLayers (置き換えない)
Ambient	Boolean	True の場合、アンビエント ポート(存在する場合)にブレンドします。 デフォルト値：True (アンビエントを適用)
Diffuse	Boolean	True の場合、ディフューズ ポート(存在する場合)にブレンドします。 デフォルト値：True (ディフューズを適用)
Transparency	Boolean	True の場合、トランスペアレンシ ポート(存在する場合)にブレンドします。 デフォルト値：False (トランスペアレンシを適用しない)
Reflection	Boolean	True の場合、リフレクション ポート(存在する場合)にブレンドします。 デフォルト値：False (リフレクションを適用しない)

VBScript の例

'

' This example demonstrates how to apply blended shaders to all texture ports on a

' cube. It also shows how to access the shader information both from the collection 

' returned by BlendInTextureLayers and through the object's material.

'

NewScene , false

' Create a default cube

Set oBox = ActiveSceneRoot.AddGeometry( "Cube", "MeshSurface" )

' Apply Cloud and Gradient presets on all texture ports

Set oLayers = BlendInTextureLayers( "Cloud,Gradient", oBox, 1, False, False )

' At this point you will also see a Multiple Property Sets page pop up for the shaders.

' Now display the name of the created shaders:

For Each oLayer In oLayers

	Set oShader = SIGetShaderOnCnxPoint( oLayer & ".color" )

	Application.LogMessage oLayer.Name & " created with shader " & oShader.Name

Next

' View the results in a rendered frame. (The colors appear quite smooth.)

RenderPasses oDefPass, 1, 1

' Set the mode of the Gradient to "Darken":

SetValue oBox.Material.Shaders( "Phong" ) & ".Gradient_Layer.mode", 8

' View the results in a rendered frame. (Now the colors seem to be quite mottled.) 

RenderPasses oDefPass, 1, 1

' Output of above script:

'INFO : "Cloud_Layer created with shader Cloud"

'INFO : "Gradient_Layer created with shader Gradient"

BlendInTextureLayersInsp BlendInTextureLayersWithPorts BlendInTextureLayersWithPortsInsp BlendClipsInTextureLayersInsp BlendClipsInTextureLayersWithPorts BlendClipsInTextureLayersWithPortsInsp SIConnectShaderToCnxPoint SIApplyShaderToCnxPoint