[Script for XSI] Copy all parameters

This script is using VBScript for XSI,
copyright : Wigiantoro Aji
Develop by : Saman
use this script to copy animation per controller (limited)

---

dim Objtarget, button

set obj= Application.selection(0)

PickObject "pick target", MiddleMessage, Objtarget, button
if button <> 0 then
    logMessage Objtarget.name
end if
CopyAllAnimation2 obj, siFCurveSource, siAllParam
SelectObj Objtarget
PasteAllAnimation

---