選んでる全てをplotする

青い字の部分をコレにしても出来るがこれだとオブジェクトの数だめプロットしてしまう。

for i = 0 to sItem.count - 1

For Each r In oReturn だと選んでるリストを返す。一つに全てが入っている

/kine.local.posと書くと全てのposをプロットしてくれる

しかしrotはダメ。/kine.local.rotは使えない。

rotの場合はrを入れる。

Set oReturn = GetValue("SelectionList")
For Each r In oReturn
LogMessage r
Next

PlotAndApplyAction oReturn , "/kine.local.pos", "plot", 1, 100, 1, 20, 3, False, 0.01, True, True, True, True

PlotAndApplyAction oReturn ,r &".kine.local.rotx,"& r &".kine.local.roty, "& r &".kine.local.rotz", "ff", oStart, oEnd, 1, 20, 3, False, 0.01, True, True, True, True