dim scene as xpScene
dim fb as xpOutputFramebuffer
dim scenedir
engine.GetOutputFramebuffer(0, fb)
if fb.GetSceneOnLayer(0, scene) then
if Scene.Name = "ScorebarOT" then
if scene.GetSceneDirectorByName("macu3", scenedir) then
if scenedir.position >= 150 then
scenedir.PlayRange(150, 0)
else
scenedir.PlayRange(0, 150)
end if
end if
end if
end if
#XPression