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