Graphics

I currently am trying to write a script that plays a scene director whenever a datalinq hits ":05" and anytime above that, it plays out a different scene director. It would also be nice if that animation could pause when the timer pauses, but it's definitely not necessary. This is where I'm at so far:

dim PlayClockRed, PlayClockReset as xpSceneDirector

scene.GetSceneDirectorByName("PlayClockRed", PlayClockRed)
scene.GetSceneDirectorByName("PlayClockReset", PlayClockReset)

if text = ":05" then
PlayClockRed.playrange(0, PlayClockRed.duration)
end if

if text = ":00" then
PlayClockReset.playrange(0,0)
end if

This code works once and then doesn't play it out again without taking the scene offline and putting it back on. Anyone have any ideas?

Hey John! It looks like you're not setting the PlayClockRed scene director back to the beginning, only the PlayClockReset scene director. You can use PlayClockRed.Position(0) or PlayClockRed.PlayRange(0,0).

Additionally, I find it better to reset the scene directors when text="40" or text="25" since the play clock might not always hit 0, but it will always reset to one of those numbers. (Also note that I have my red background visibility animating on frame 1 of the scene director, which is how I avoid using two scene directors)

dim sd as xpSceneDirector

scene.GetSceneDirectorByName("PLAYCLOCK COUNTDOWN",sd)

if text="40" OR text="25" then
sd.PlayRange(0,0)

else if text="5" then
sd.PlayRange(0,300)
end if

Having the animation stop is a little more difficult. A quick and easy way would be to set ranges for each second under 5. This is built for a 59.94 system and my animation is 360 frames long. Example below.

dim sd as xpSceneDirector


scene.GetSceneDirectorByName("PLAYCLOCK COUNTDOWN",sd)


if text="40" OR text="25" then
sd.PlayRange(0,0)


else if text=5 then
sd.PlayRange(0,60)

else if text=4 then
sd.PlayRange(60,120)

else if text=3 then
sd.PlayRange(120,180)

else if text=2 then
sd.PlayRange(180,240)

else if text=1 then
sd.PlayRange(240,300)

else if text=0 then
sd.PlayRange(300,360)

end if

Hope this helps! 

dim PlayClockRed, PlayClockReset as xpSceneDirectorscene.GetSceneDirectorByName("PlayClockRed", PlayClockRed)scene.GetSceneDirectorByName("PlayClockReset", PlayClockReset)if text = ":05" thenPlayClockRed.playrange(0, PlayClockRed.duration)end ifif text = ":00" thenPlayClockReset.playrange(0,0)end if