home *** CD-ROM | disk | FTP | other *** search
/ Reflux 1: The Becoming / Reflux.iso / master13.dxr / 00365_13-5spot.ls < prev    next >
Encoding:
Text File  |  1995-05-01  |  1.2 KB  |  33 lines
  1. on mouseUp
  2.   global gPerspective, s60, s40, s20
  3.   set the visible of sprite 24 to 0
  4.   if gPerspective = 1 then
  5.     set the visible of sprite 21 to 1
  6.     animate("13F3RING.WAV", 21, "133F00.BMP", 4, s40, EMPTY)
  7.     animate(EMPTY, 21, "133F00.BMP", -4, s40, EMPTY)
  8.     animate(EMPTY, 21, "133F00.BMP", 4, s40, EMPTY)
  9.     animate(EMPTY, 21, "133F00.BMP", -4, s40, EMPTY)
  10.     puppetSprite(21, 0)
  11.     set the visible of sprite 21 to 0
  12.   end if
  13.   if gPerspective = 2 then
  14.     set the visible of sprite 22 to 1
  15.     animate("13I3RING.WAV", 22, "133ID01.BMP", 3, s60, EMPTY)
  16.     animate(EMPTY, 22, "133ID01.BMP", 3, s60, EMPTY)
  17.     animate(EMPTY, 22, "133ID01.BMP", 3, s60, EMPTY)
  18.     animate(EMPTY, 22, "133ID01.BMP", 3, s60, EMPTY)
  19.     puppetSprite(22, 0)
  20.     set the visible of sprite 22 to 0
  21.   end if
  22.   if gPerspective = 3 then
  23.     set the visible of sprite 23 to 1
  24.     animate("13R3RIN2.WAV", 23, "133R01.BMP", 2, s40, EMPTY)
  25.     animate(EMPTY, 23, "133R01.BMP", 2, s40, EMPTY)
  26.     animate(EMPTY, 23, "133R01.BMP", 2, s40, EMPTY)
  27.     animate(EMPTY, 23, "133R01.BMP", 2, s40, EMPTY)
  28.     puppetSprite(23, 0)
  29.     set the visible of sprite 23 to 0
  30.   end if
  31.   set the visible of sprite 24 to 1
  32. end
  33.