ungoliath
04-10-2009, 11:16 AM
I'm trying to have objects sit in place until it's time to move them and then start moving. This is what I tried but it's not working.
(
f = openfile "c:\\transforms.csv"
set animate on
if (f != undefined) then
(
skiptonextline f
while not eof f do
(
sliderTime = 0
TransformName = readdelimitedstring f ","
Xpos1 = readValue f
Ypos1 = readValue f
Zpos1 = readValue f
Start_Time = readValue f
End_Time = readValue f
DelXpos = readValue f
DelYpos = readValue f
DelZpos = readValue f
Point pos:[Xpos1,Ypos1,Zpos1] isSelected:on name:TransformName
addNewKey $.pos.controller.X_Position.controller Start_Time
addNewKey $.pos.controller.Y_Position.controller Start_Time
addNewKey $.pos.controller.Z_Position.controller Start_Time
sliderTime = End_Time
move $ [DelXpos,DelYpos,DelZpos]
)
)
else
(
messageBox "Open Failed" title:"Error!"
)
(
f = openfile "c:\\transforms.csv"
set animate on
if (f != undefined) then
(
skiptonextline f
while not eof f do
(
sliderTime = 0
TransformName = readdelimitedstring f ","
Xpos1 = readValue f
Ypos1 = readValue f
Zpos1 = readValue f
Start_Time = readValue f
End_Time = readValue f
DelXpos = readValue f
DelYpos = readValue f
DelZpos = readValue f
Point pos:[Xpos1,Ypos1,Zpos1] isSelected:on name:TransformName
addNewKey $.pos.controller.X_Position.controller Start_Time
addNewKey $.pos.controller.Y_Position.controller Start_Time
addNewKey $.pos.controller.Z_Position.controller Start_Time
sliderTime = End_Time
move $ [DelXpos,DelYpos,DelZpos]
)
)
else
(
messageBox "Open Failed" title:"Error!"
)
