home *** CD-ROM | disk | FTP | other *** search
/ PC Home 49 / PC_Home_Issue_49.iso / winprogs / childenc / oecdemo / shared.dir / 00544.ls < prev    next >
Encoding:
Text File  |  1996-07-24  |  606 b   |  23 lines
  1. on mouseDown
  2.   global bndLt, bndRt
  3.   set x to the castNum of sprite 8
  4.   if the castType of cast x <> #digitalVideo then
  5.     setUpSprites("8;37-42;48", 0)
  6.     updateStage()
  7.     go(marker(0) + 7)
  8.     puppetSprite(8, 1)
  9.     puppetSprite(11, 1)
  10.     puppetSprite(12, 1)
  11.     set the movieTime of sprite 8 to 0
  12.     set the movieRate of sprite 8 to 1
  13.     set the castNum of sprite 11 to 448
  14.   else
  15.     puppetSprite(8, 0)
  16.     set the movieRate of sprite 8 to 0
  17.     set the movieTime of sprite 8 to 0
  18.     set the castNum of sprite 11 to 446
  19.     set the locH of sprite 12 to bndRt
  20.     go(marker(0) + 11)
  21.   end if
  22. end
  23.