home *** CD-ROM | disk | FTP | other *** search
/ Creative Review 20 / Creative-Review-CD-ROM-20.iso / pc / image / tibcr972.dir / 00414_Script_414 < prev    next >
Text File  |  1996-11-25  |  1KB  |  42 lines
  1. on exitFrame
  2.   global dest
  3.   if dest = "Film Play" then
  4.     put 1 into startFilm
  5.     set the visible of sprite 2 to true
  6.     set the movieRate of sprite 2 to 1
  7.   else
  8.     put 0 into startFilm
  9.   end if
  10.   put "none" into dest
  11.   hideObjects("9,10,17,18,19,20,21,46,47,48")
  12.   rollOver1("17,Forward,18,Play,19,Pause,20,Stop,21,Rewind,46,Contents,47,Help,48,Quit")
  13.   rollOver2("9,10,none")
  14.   if ((the movieTime of sprite 2 = 0 and startFilm = 0) or the movieTime of sprite 2 = the duration of member 415) then
  15.     set the movieTime of sprite 2 to 0
  16.     go to "Film"
  17.   else
  18.     go the frame
  19.   end if
  20. end
  21.  
  22. on mouseUp
  23.   global dest
  24.   if (dest = "Contents" or dest = "Help" or dest = "Quit") then
  25.     set the movieRate of sprite 2 to 0
  26.     updateStage
  27.     go to dest
  28.   end if
  29.   if dest = "Forward" then
  30.     set the movieRate of sprite 2 to 2
  31.   else if dest = "Play" then
  32.     set the movieRate of sprite 2 to 1
  33.   else if dest = "Stop" then
  34.     set the movieRate of sprite 2 to 0
  35.     set the movieTime of sprite 2 to 0
  36.     go to "Film"
  37.   else if dest = "Pause" then
  38.     set the movieRate of sprite 2 to 0
  39.   else if dest = "Rewind" then
  40.     set the movieRate of sprite 2 to -2
  41.   end if
  42. end