Hello,
I'm trying to write a script to play other scene directors based upon the bounding box height but it doesn't seem to be working.
Does anyone have any ideas?
dim MessageIN as xpTextObject
Dim Box0to1 as xpSceneDirector
Dim Box0to2 as xpSceneDirector
Dim Box0to3 as xpSceneDirector
Dim Box0to4 as xpSceneDirector
Dim Box0to5 as xpSceneDirector
Scene.GetObjectByName("Message", MessageIN)
Scene.GetSceneDirectorByName("0 to 1", Box0to1)
Scene.GetSceneDirectorByName("0 to 2", Box0to2)
Scene.GetSceneDirectorByName("0 to 3", Box0to3)
Scene.GetSceneDirectorByName("0 to 4", Box0to4)
Scene.GetSceneDirectorByName("0 to 5", Box0to5)
'one line
If MessageIN.boundingboxheight=32 then
Box0to1.Play()
'two line
Else If MessageIN.boundingboxheight=71 then
Box0to2.Play()
'three line
Else If MessageIN.boundingboxheight=110 then
Box0to3.Play()
' four line
Else If MessageIN.boundingboxheight=149 then
Box0to4.Play()
'five lines
Else If MessageIN.boundingboxheight=188 then
Box0to5.Play()
End If