<     > 

Mixer

Object Hierarchy | Related C++ Class: Mixer | Supported Parameter List: mixer

Inheritance

SIObject
   ProjectItem
       Clip
          ClipContainer
              Mixer

Introduced

4.0

Description

This object represents the Animation Mixer, which is nested directly under the Model. The Mixer object is a ClipContainer and so provides access to the standard elements of a mixer: its Tracks, Transitions, Clips, and ClipRelations.

You can check if an object has a mixer by calling the Model.HasMixer method. If it doesn't, you can create one with the Model.AddMixer method.

The Mixer stores all of the Model's high-level animation and audio clips, so when you call its base property ClipContainer.Clips, you get a collection of clips only on the current model (there is no recursion). If any of these are compound clips, none of its contents are returned, just the top level.

Methods

Properties

Examples

1. JScript Example

/*
   This example demonstrates how to find all sources in the scene when there 
   are several levels of models all with their own sources. Something to note
   is that only ActionSources are returned from the Model.
*/
NewScene( null, false );

// Set up the scene (details are at the bottom of this example)
var m1 = ActiveSceneRoot.AddModel(); m1.Name = "Larry"
var m2 = m1.AddModel(); m2.Name = "Curly"
var m3 = m2.AddModel(); m3.Name = "Moe"
CreateModelSource( ActiveSceneRoot );
CreateImageSource(m1);
CreateShapeAction(m2);
CreateAudioSource(m3);


// Start with the top level model (the Scene_Root) and the use the Models property
// to search recursively. Since all action sources are stored under the model, once
// we've visited each model, we will have found each source in the scene.
LogMessage( "RecursiveModelSearch results: " + RecursiveModelSearch(ActiveSceneRoot) );


// Expected Results:
//INFO : MODEL: Scene_Root
//INFO : MODEL: Larry
//INFO : MODEL: Curly
//INFO : MODEL: Moe
//INFO : MODEL: Referenced_Biped_Skeleton_Generated
//INFO : RecursiveModelSearch results: Curly.Mixer.ShapeKey,Curly.Mixer.Shape_ClusterClip_source,
//       Curly.Mixer.ShapeKey1,Curly.Mixer.ShapeKey2,Sources.Referenced_Biped_Skeleton_Generated.DefaultPose


function RecursiveModelSearch( in_model )
{
   LogMessage( "MODEL: " + in_model.FullName );

   // Start with the top-level model
   // Get a comma-delimited string of all sources found under this model
   var foundsrcs = ( in_model.Sources ) ? in_model.Sources.GetAsText() : "";

   // For every model nested within this scene, check it for sources
   var mdl = new Enumerator( in_model.Models(true) );
   for ( ; ! mdl.atEnd(); mdl.moveNext() ) {
       LogMessage( "MODEL: " + mdl.item().FullName );

       var results = in_model.Sources;
       if ( results ) {
          foundsrcs += "," + mdl.item().Sources.GetAsText();
       }
   }

   // Correct any instances of a double or leading/trailing commas which may have 
   // occurred when reading a model with no sources
   foundsrcs = foundsrcs.replace( /,,/g, "," );
   foundsrcs = foundsrcs.replace( /^,/, "" );
   foundsrcs = foundsrcs.replace( /,$/, "" );

   // Return the string, which can be used by the caller to set an XSICollection,
   // populate a combo box, etc.
   return foundsrcs;
}



// This is an handy function to have around if you're going to create an action 
// source or clip on a parameter that is in a nested model (ie., not directly 
// under the Scene_Root) because AddClip will force a mapping template if your 
// parameter is not relative.
function GetRelativeNameForTarget( in_param )
{
   var mdlname = in_param.Model.FullName;
   if ( mdlname == "Scene_Root" ) {
       return in_param.FullName;
   } else {
       var tmp = in_param.FullName;
       var re = new RegExp( mdlname + ".", "i" );
       return tmp.replace( re, "" );
   }
}


// Helper functions to create & instantiate sources
function CreateShapeAction( in_model )
{
   var obj = in_model.AddGeometry( "Cone", "MeshSurface" );
   var target = obj + ".pnt[0,2,5,8,11,14,17,20,23]"

   SetSelFilter( "Vertex" );
   SelectGeometryComponents( target );
   Translate( null, 0, -2, 0, siAbsolute, siPivot, siObj, siY, null, 
       null, null, null, null, null, null, null, null, 1 );
   var clip = SaveShapeKey( target, null, null, 1, null, null, null, 
       null, siShapeObjectReferenceMode );

   Translate( null, 0, -1, 0, siAbsolute, siPivot, siObj, siY, null, 
       null, null, null, null, null, null, null, null, 1 );
   SaveShapeKey( target, null, null, 36, null, null, null, null, 
       siShapeObjectReferenceMode );

   Translate( null, 0, 0, 0, siAbsolute, siPivot, siObj, siY, null, 
       null, null, null, null, null, null, null, null, 1 );
   SaveShapeKey( target, null, null, 67, null, null, null, null, 
       siShapeObjectReferenceMode );
}


function CreateAudioSource( in_model )
{
   var mixmaster = ( in_model.HasMixer() ) ? in_model.Mixer : in_model.AddMixer();
   var aud_track = AddTrack( in_model, mixmaster, 2 );
   var aud_src = ImportAudio( in_model, "C:\\Program Files\\Messenger\\NEWALERT.WAV" );
   AddAudioClip( in_model, aud_src, mixmaster, aud_track, 22 );
}


function CreateImageSource( in_model )
{
   var cube = in_model.AddGeometry( "Cube", "MeshSurface" );
   SelectObj( cube );
   ApplyShader( null, null, null, siUnspecified, siLetLocalMaterialsOverlap );
   CreateProjection( cube, siTxtSpherical, siTxtDefaultSpherical, "", "Texture_Projection", null, siRelDefault, "" );
   BlendInTextureLayers( "Image", cube, 1, false, siReplaceAndBlendInPreset, true, true, false, false);
}


function CreateModelSource()
{
   ImportModel( "S:\\Data\\XSI_SAMPLES\\Models\\Biped_Skeleton_Generated.emdl", null, true, 
       null, null, null, null );
}

2. Python Example

# 
# This example demonstrates how to access every clip in the specified model. 
# In this case there are two clips in different models and only the top 
# model has been queried, so only the constraint action will be returned
#
def FindClipsUnderModel( in_model ) :
   # First make sure we have a mixer
   if  in_model.HasMixer()==0 :
       return ""

   mixer = in_model.Mixer

   # We will return a comma-delimited string of all sources found
   foundclips = ""
   Application.LogMessage( "\n\tSearching " + mixer.FullName + " for clips...", c.siComment );

   if mixer.Clips.Count > 0 :
       for clip in mixer.Clips :
          Application.LogMessage( "\t" + clip.FullName + " is a " + ClassName(clip) + "/" + clip.Type, c.siComment )
          if foundclips == "" :
              foundclips = foundclips + clip.FullName 
          else : 
              foundclips = foundclips + "," + clip.FullName
   else :
       Application.LogMessage( "\tNo sources found on " + mixer.FullName, c.siComment )

   return foundclips


# Helper function to strip off model name for FullNames
def GetRelativeNameForTarget( in_param ) :
   mdlname = in_param.Model.FullName
   if  mdlname == "Scene_Root" :
       return in_param.FullName
   else :
       tmp = in_param.FullName
       return tmp.replace( mdlname + ".", "" )


# Helper function to create constraint-based action
def CreateConstraintAction( in_model ) :
   # Build Orientation Constraint to null from cylinder
   a = in_model.AddNull()
   Application.SelectObj(a)
   Application.Translate("", 5.5173674053756, 2.96222253259053, 
       -0.296222253259053, c.siRelative, c.siView, c.siObj, 
       c.siXYZ, "", "", "", "", "", "", "", "", "", 1)

   b = in_model.AddGeometry("Cylinder", "MeshSurface" )
   Application.SetUserPref( "SI3D_CONSTRAINT_COMPENSATION_MODE", 1)
   Application.ApplyCns( "Orientation", b, a, 1 )
   Application.SetUserPref( "SI3D_CONSTRAINT_COMPENSATION_MODE", 0 )

   # Relative names (needed for AddClip under a nested model)
   relB = GetRelativeNameForTarget( b )

   # Make it into an Action (constraints are always on global Kinematics)
   # Get list of parameters to mark
   params = relB + "*/.kine.global.ori.euler"

   Application.StoreAction( in_model, params, 4, 
       "StoredAnimCnsAction", 1, 1, 100, 0, 0, 1, 1 )


# Helper function to create fcurve-based action
def CreateFCurveAction( in_model ) :
   obj = in_model.AddNull()

   # Set FCurves on the null's scaling
   keys = [ 5, 1.2,  20, 1.7,  45, 2.0,  90, 2.5 ]
   obj.sclx.AddFCurve2( keys )

   keyfactor = 0.66
   posfactor = 0.54
   i=0
   while i < len(keys) :
       keys[i] = keys[i] + keyfactor
       keys[i+1] = keys[i+1] * posfactor
       i = i + 2
   obj.scly.AddFCurve2( keys )

   keyfactor = 0.27
   posfactor = 0.44
   while i < len(keys) :
       keys[i] = keys[i] - keyfactor
       keys[i+1] = keys[i+1] * posfactor
       i = i + 2
   obj.sclz.AddFCurve2( keys )

   # Get list of parameters to mark
   params = obj.sclx.FullName + "," + obj.scly.FullName + "," + obj.sclz.FullName

   # Make the FCurves into an Action
   src = Application.StoreAction( in_model, params, 2, "StoredAnimFCrvAction" )
   clip = Application.AddClip( in_model, src )

   # Add some clip effects to it
   toclip = clip.Name + ".ActionClip"
   rtn = Application.GetMappingRule( toclip, 0 )
   fromclip = rtn.Value( "From" )
   Application.SetMappingRule( toclip, fromclip, "this+5", 1 )


# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
#  MAIN
#
Application.NewScene( "", 0)
from win32com.client import constants as c

# Set up some animation action nested inside models (see bottom for functions)
CreateFCurveAction( Application.ActiveSceneRoot )
m1 = Application.ActiveSceneRoot.AddModel()
m1.Name = "Sunshine"
CreateConstraintAction( m1 )

# Get a collection of clips under every model
results = FindClipsUnderModel( Application.ActiveSceneRoot )
if results != "" :
   cliplist = XSIFactory.CreateActiveXObject( "XSI.Collection" )
   cliplist.AddItems( results )

# Print out list
for clip in cliplist :
   Application.LogMessage( clip.Name + " is a " + clip.Type )


# Expected results:
#
#  Searching Mixer for clips...
#  Mixer.Mixer_Anim_Track.StoredAnimFCrvAction_Clip is a Clip/mixeranimclip
#INFO : StoredAnimFCrvAction_Clip is a mixeranimclip

3. VBScript Example

'
' This example demonstrates how to crawl through the Mixer to try and extract
' all the interesting pieces of data, through clips, sources, tracks, etc.
'
NewScene , false

' Set up some clips in the mixer
CreateStaticAction( ActiveSceneRoot )
CreateShapeAction( ActiveSceneRoot )
CreateAudioSource( ActiveSceneRoot )

' Traverse the mixer, finding as much info as we can
ReadMixerContents ActiveSceneRoot.Mixer



sub ReadMixerContents( in_mixer )
   LogMessage vbTab & "Reading " & in_mixer.FullName & " in ReadMixerContents()" 

   ' CLIPS
   LogMessage vbTab & vbTab & "Found " & in_mixer.Clips.Count & " clip(s)."
   ReadClipsFromContainer in_mixer 

   ' TRACKS
   LogMessage vbTab & vbTab & "Found " & in_mixer.Tracks.Count & " track(s)."
   for each trk in in_mixer.Tracks
       ' TRACKS::CLIPS
       ReadClipsFromContainer trk 
   next

   ' TRANSITIONS
   LogMessage vbTab & vbTab & "Found " & in_mixer.Transitions.Count & " transition(s)."
   for each trns in in_mixer.Transitions
       LogMessage vbTab & vbTab & vbTab & "Found the " & trns.FullName &  _
          " transition which starts at frame " & trns.StartClip &  _
          " and ends at frame " & trns.EndClip
   next

   ' NESTED RELATIONS
   LogMessage vbTab & vbTab & "Found " & in_mixer.NestedRelations.Count & " nested relation(s)."
   if in_mixer.NestedRelations.Count > 0 then
       ReadRelations in_mixer.NestedRelations
   end if
end sub


sub ReadClipsFromContainer( in_can )
   LogMessage vbTab & "Reading " & in_can.FullName & " in ReadClipsFromContainer()"

   for each clp in in_can.Clips
       ' MAPPEDITEMS
       if clp.Type <> siClipAudioType then
          if TypeName(clp.MappedItems) <> "Nothing" then
              LogMessage vbTab & vbTab & "Found " & clp.MappedItems.Count & " mapped items(s)"
              for each mapping in clp.MappedItems
                 LogMessage vbTab & vbTab & vbTab & mapping.FullName & ": " & ClassName(mapping)

                 ' MAPPEDITEMS::CLIPEFFECTITEM
                 ReadClipEffectItem mapping.ClipEffectItem 
              next
          end if
       end if

       ' TIMECONTROL
       if  TypeName(clp.TimeControl) <> "Nothing" then
          LogMessage vbTab & vbTab & "Found this clip's time control: " & clp.TimeControl.FullName
          set tc = clp.TimeControl
          LogMessage vbTab & vbTab & vbTab & "Scaling Factor: " & tc.Scale 
          LogMessage vbTab & vbTab & vbTab & "Start Offset: " & tc.StartOffset 
          LogMessage vbTab & vbTab & vbTab & "First Frame: " & tc.ClipIn 
          LogMessage vbTab & vbTab & vbTab & "Last Frame: " & tc.ClipOut 
          LogMessage vbTab & vbTab & vbTab & "siTimeControlExtrapolationType before this clip: " _
              & tc.ExtrapolationBeforeType & " (" & tc.ExtrapolationBeforeValue & ")" 
          LogMessage vbTab & vbTab & vbTab & "siTimeControlExtrapolationType after this clip: " _
              & tc.ExtrapolationAfterType & " (" & tc.ExtrapolationAfterValue & ")" 
       else
          LogMessage vbTab & "TimeControl is not available on this clip."
       end if


       ' SOURCE
       LogMessage vbTab & vbTab & "Found this clip's source: " & clp.Source.FullName & "(" & ClassName(clp.Source) & ")"

       ' EFFECT
       if TypeName(clp.Effect) <> "Nothing" then
          LogMessage vbTab & vbTab & "Found this clip's effect: " & clp.Effect.FullName 
          ReadClipEffect clp.Effect 
       end if

       ' RELATIONS
       LogMessage vbTab & vbTab & "Found " & clp.Relations.Count & " relation(s) on this clip." 
       ReadRelations clp.Relations 
   next
end sub


sub ReadClipEffect( in_clpeff )
   LogMessage vbTab & "Reading " & in_clpeff.FullName & " in ReadClipEffect()"

   ' CLIPEFFECTITEMS
   LogMessage vbTab & vbTab & "Found " & in_clpeff.Items.Count & " clip effect item(s)" 
   for each thing in in_clpeff.Items
       ReadClipEffectItem thing
   next

   ' VARIABLES
   LogMessage vbTab & vbTab & "Found " & in_clpeff.Variables.Count & " variables(s)" 
   if  in_clpeff.Variables.Count > 0 then
       for each var in in_clpeff.Variables
          LogMessage vbTab & vbTab & vbTab & "Found this variable on the clip effect: " & var.FullName
       next
   end if

   ' TIMEREFERENCE
   if TypeName(in_clpeff.TimeReference) <> "Nothing" then
       dim trparams
       if in_clpeff.TimeReference then
          trparams = "spans over extrapolation (siExtrapolatedClip)"
       else 
          trparams = "repeats itself over time (siOriginalClip)"
       end if
       LogMessage vbTab & vbTab & "Found this time reference indicating that this clip effect item: " & trparams 
   else
       LogMessage vbTab & vbTab & "No time reference found on the clip effect" 
   end if

   ' POSEEFFECT
   if TypeName(in_clpeff.PoseEffect) <> "Nothing" then
       LogMessage vbTab & vbTab & "Found this pose effect property on the clip effect: " _
          & in_clpeff.PoseEffect.FullName & " containing " _
          & in_clpeff.PoseEffect.Parameters.Count & " parameters...."
       set peparams = in_clpeff.PoseEffect.Parameters
       for each p in peparams
          LogMessage vbTab & vbTab & vbTab & "Found this parameter on the pose effect property: " & p.FullName 
       next
   else
       LogMessage vbTab & vbTab & "No pose effect property found on the clip effect" 
   end if

   ' ISACTIVE
   LogMessage vbTab & vbTab & "Is this clip effect active? -- " & in_clpeff.IsActive 

   ' ISPOSEEFFECTACTIVE
   LogMessage vbTab & vbTab & "Is the pose effect on this clip effect active? -- " & in_clpeff.IsPoseEffectActive 
end sub


sub ReadRelations( in_rels )
   LogMessage vbTab & "Reading " & in_rels.GetAsText() & " in ReadRelations()" 

   for each rel in in_rels
       LogMessage vbTab & vbTab & vbTab & "Master: " & in_rels(r).MasterClip
       LogMessage vbTab & vbTab & vbTab & "Slave: " & in_rels(r).SlaveClip
   next
end sub


sub ReadClipEffectItem( in_clpeffitm )
   LogMessage vbTab & vbTab & "Reading " & in_clpeffitm.FullName & " in ReadClipEffectItem()" 

   LogMessage vbTab & vbTab & vbTab & "Value of " & in_clpeffitm.Parameter.FullName & " = " & in_clpeffitm.Parameter.Value 
   dim str 
   if in_clpeffitm.Expression = "" then
       str = "(no expression)" 
   else
       str = in_clpeffitm.Expression
   end if
   LogMessage vbTab & vbTab & vbTab & "Value of ClipEffectItem.Expression = " & str 
end sub



' Expected Results:
'INFO :  Reading Mixer in ReadMixerContents()
'INFO :  Found 2 clip(s).
'INFO :  Reading Mixer in ReadClipsFromContainer()
'INFO :  Found 1 mapped items(s)
'INFO :   MappedItem: MappedItem
'INFO :  Reading  in ReadClipEffectItem()
'INFO :   Value of Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.param = 0
'INFO :   Value of ClipEffectItem.Expression = (no expression)
'INFO :  Found this clip's time control: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.timectrl
'INFO :   Scaling Factor: 1
'INFO :   Start Offset: 1
'INFO :   First Frame: 1
'INFO :   Last Frame: 100
'INFO :   siTimeControlExtrapolationType before this clip: 0 (0)
'INFO :   siTimeControlExtrapolationType after this clip: 0 (0)
'INFO :  Found this clip's source: Mixer.Shape_ClusterClip_source(ActionSource)
'INFO :  Found this clip's effect: 
'INFO :  Reading  in ReadClipEffect()
'INFO :  Found 1 clip effect item(s)
'INFO :  Reading  in ReadClipEffectItem()
'INFO :   Value of Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.param = 0
'INFO :   Value of ClipEffectItem.Expression = (no expression)
'INFO :  Found 0 variables(s)
'INFO :  Found this time reference indicating that this clip effect item: spans over extrapolation (siExtrapolatedClip)
'INFO :  Found this pose effect property on the clip effect: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState containing 9 parameters....
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.sclx
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.scly
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.sclz
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.posx
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.posy
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.posz
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.orix
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.oriy
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.oriz
'INFO :  Is this clip effect active? -- True
'INFO :  Is the pose effect on this clip effect active? -- False
'INFO :  Found 0 relation(s) on this clip.
'INFO :  Reading  in ReadRelations()
'INFO :  Found this clip's time control: Mixer.Mixer_Audio_Track.Clip.timectrl
'INFO :   Scaling Factor: 1
'INFO :   Start Offset: 22
'INFO :   First Frame: 1
'INFO :   Last Frame: 6.87475789516606
'INFO :   siTimeControlExtrapolationType before this clip: 0 (0)
'INFO :   siTimeControlExtrapolationType after this clip: 0 (0)
'INFO :  Found this clip's source: Sources.NEWALERT_WAV(Source)
'INFO :  Found 0 relation(s) on this clip.
'INFO :  Reading  in ReadRelations()
'INFO :  Found 2 track(s).
'INFO :  Reading Mixer.Mixer_Shape_Track in ReadClipsFromContainer()
'INFO :  Found 1 mapped items(s)
'INFO :   MappedItem: MappedItem
'INFO :  Reading  in ReadClipEffectItem()
'INFO :   Value of Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.param = 0
'INFO :   Value of ClipEffectItem.Expression = (no expression)
'INFO :  Found this clip's time control: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.timectrl
'INFO :   Scaling Factor: 1
'INFO :   Start Offset: 1
'INFO :   First Frame: 1
'INFO :   Last Frame: 100
'INFO :   siTimeControlExtrapolationType before this clip: 0 (0)
'INFO :   siTimeControlExtrapolationType after this clip: 0 (0)
'INFO :  Found this clip's source: Mixer.Shape_ClusterClip_source(ActionSource)
'INFO :  Found this clip's effect: 
'INFO :  Reading  in ReadClipEffect()
'INFO :  Found 1 clip effect item(s)
'INFO :  Reading  in ReadClipEffectItem()
'INFO :   Value of Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.param = 0
'INFO :   Value of ClipEffectItem.Expression = (no expression)
'INFO :  Found 0 variables(s)
'INFO :  Found this time reference indicating that this clip effect item: spans over extrapolation (siExtrapolatedClip)
'INFO :  Found this pose effect property on the clip effect: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState containing 9 parameters....
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.sclx
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.scly
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.sclz
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.posx
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.posy
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.posz
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.orix
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.oriy
'INFO :   Found this parameter on the pose effect property: Mixer.Mixer_Shape_Track.Shape_ClusterClip.actionclip.StaticKineState.oriz
'INFO :  Is this clip effect active? -- True
'INFO :  Is the pose effect on this clip effect active? -- False
'INFO :  Found 0 relation(s) on this clip.
'INFO :  Reading  in ReadRelations()
'INFO :  Reading Mixer.Mixer_Audio_Track in ReadClipsFromContainer()
'INFO :  Found this clip's time control: Mixer.Mixer_Audio_Track.Clip.timectrl
'INFO :   Scaling Factor: 1
'INFO :   Start Offset: 22
'INFO :   First Frame: 1
'INFO :   Last Frame: 6.87475789516606
'INFO :   siTimeControlExtrapolationType before this clip: 0 (0)
'INFO :   siTimeControlExtrapolationType after this clip: 0 (0)
'INFO :  Found this clip's source: Sources.NEWALERT_WAV(Source)
'INFO :  Found 0 relation(s) on this clip.
'INFO :  Reading  in ReadRelations()
'INFO :  Found 0 transition(s).
'INFO :  Found 0 nested relation(s).


' Helper routines to create the sources
sub CreateStaticAction( in_model )
   set obj = in_model.AddGeometry( "Cone", "MeshSurface" )
   targets = Array( obj.rotx.FullName, obj.roty.FullName, obj.rotz.FullName )
   statics = Array( 22.5, 90, 45 )
   actives = Array( true, true, true )
   in_model.AddActionSource "StoredAnimStaticAction", targets, statics, actives 
end sub


sub CreateShapeAction( in_model )
   set obj = in_model.AddGeometry( "Cone", "MeshSurface" )
   target = obj & ".pnt[0,2,5,8,11,14,17,20,23]"

   SetSelFilter "Vertex" 
   SelectGeometryComponents target 
   Translate , 0, -2, 0, siAbsolute, siPivot, siObj, siY, , , , , , , , , , 1 
   set clip = SaveShapeKey( target, , , 1, , , , , siShapeObjectReferenceMode )
   target = clip.Source.SourceItems(0).Target

   Translate , 0, -1, 0, siAbsolute, siPivot, siObj, siY, , , , , , , , , , 1 
   SaveShapeKey target, , , 36, , , , , siShapeObjectReferenceMode 

   Translate , 0, 0, 0, siAbsolute, siPivot, siObj, siY, , , , , , , , , , 1 
   SaveShapeKey target, , , 67, , , , , siShapeObjectReferenceMode 
end sub


sub CreateAudioSource( in_model )
   if in_model.HasMixer() then
       set mixmaster = in_model.Mixer 
   else
       set mixmaster = in_model.AddMixer()
   end if

   set aud_track = AddTrack( in_model, mixmaster, 2 )
   set aud_src = ImportAudio( in_model, "C:\Program Files\Messenger\NEWALERT.WAV" )
   AddAudioClip in_model, aud_src, mixmaster, aud_track, 22 
end sub

See Also

Autodesk Softimage v7.5     <     >