'VBScript example
set oRoot = ActiveProject.ActiveScene.Root
set oNull = oRoot.AddNull
set oChainRoot = oRoot.Add3DChain
set oChainEffector = oChainRoot.Effector
LogMessage "Name of effector: " & oChainEffector.Name & "       class: " & typename(oChainEffector)