v6.0
Returns a CustomProperty containing the current character key set, if it exists. Character key sets are implemented as custom properties.
oReturn = GetCurrentCharacterKeySet(); |
Returns the CustomProperty or Nothing if there is no current Character Key Set
Sub DumpCharKeySet Dim oCharKeySet Set oCharKeySet = GetCurrentCharacterKeySet If ( oCharKeySet Is Nothing ) Then LogMessage "No current Character Key Set..." Else LogMessage "Current Character Key Set : " & oCharKeySet End If End Sub SetCurrentCharacterKeySet "" DumpCharKeySet CreateCharacterKeySet ActiveSceneRoot, "BodyKeySet" DumpCharKeySet CreateSubCharacterKeySet ,, "HandKeySet" DumpCharKeySet |