home *** CD-ROM | disk | FTP | other *** search
/ The Complete Interactive Cookbook / L1_JS_101199.ISO / TOURGUID / COOKTG.DIR / 00015.ls < prev    next >
Encoding:
Text File  |  1996-10-29  |  1.0 KB  |  41 lines
  1. on startMovie
  2.   global marked, markedSprite, markedLoc, useRollOver, BGScreenShotCastNum
  3.   set markedSprite to 43
  4.   puppetSprite(markedSprite, 1)
  5.   set marked to 0
  6.   set markedLoc to point(433, 75)
  7.   set useRollOver to 1
  8.   set BGScreenShotCastNum to the number of member "BG Screen Shot"
  9. end
  10.  
  11. on waitSound whichChannel
  12.   repeat while soundBusy(whichChannel) and not (the mouseDown)
  13.     updateStage()
  14.   end repeat
  15.   checkPassClick()
  16. end
  17.  
  18. on waitVideo whichSprite
  19.   set the movieTime of sprite whichSprite to 0
  20.   set the movieRate of sprite whichSprite to 1
  21.   repeat while (the movieRate of sprite whichSprite > 0) and not (the mouseDown) and not (the movieTime of sprite whichSprite >= the duration of cast the castNum of sprite whichSprite)
  22.     updateStage()
  23.   end repeat
  24.   checkPassClick()
  25. end
  26.  
  27. on checkPassClick
  28.   global gPaused, gContinued, pauseSprite
  29.   if gPaused then
  30.     if the clickOn = pauseSprite then
  31.       continueDemo()
  32.     end if
  33.   else
  34.     if gContinued then
  35.       if the clickOn = pauseSprite then
  36.         pauseDemo()
  37.       end if
  38.     end if
  39.   end if
  40. end
  41.