home *** CD-ROM | disk | FTP | other *** search
/ Reflux 1: The Becoming / Reflux.iso / reflux.exe / MASTER18.DXR / 00347_18-3spot.ls < prev    next >
Encoding:
Text File  |  1995-06-02  |  1.2 KB  |  36 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("18F2MUST.WAV", 21, "182F00.BMP", 6, s60, EMPTY)
  7.     animate(EMPTY, 21, "182F00.BMP", -6, s60, EMPTY)
  8.     puppetSprite(21, 0)
  9.     set the visible of sprite 21 to 0
  10.   end if
  11.   if gPerspective = 2 then
  12.     set the visible of sprite 22 to 1
  13.     animate("18I2GLIS.WAV", 22, "182I01.BMP", 4, s60, EMPTY)
  14.     puppetSprite(22, 0)
  15.     set the visible of sprite 22 to 0
  16.   end if
  17.   if gPerspective = 3 then
  18.     set the visible of sprite 23 to 1
  19.     animate("18R2KAZU.WAV", 23, "182R01.BMP", 3, s60, EMPTY)
  20.     delay(30)
  21.     animate(EMPTY, 23, "182R01.BMP", -3, s60, EMPTY)
  22.     animate(EMPTY, 23, "182R01.BMP", 3, s60, EMPTY)
  23.     delay(30)
  24.     animate(EMPTY, 23, "182R01.BMP", -3, s60, EMPTY)
  25.     animate(EMPTY, 23, "182R01.BMP", 3, s60, EMPTY)
  26.     delay(30)
  27.     animate(EMPTY, 23, "182R01.BMP", -3, s60, EMPTY)
  28.     animate(EMPTY, 23, "182R01.BMP", 3, s60, EMPTY)
  29.     delay(90)
  30.     animate(EMPTY, 23, "182R01.BMP", -3, s60, EMPTY)
  31.     puppetSprite(23, 0)
  32.     set the visible of sprite 23 to 0
  33.   end if
  34.   set the visible of sprite 24 to 1
  35. end
  36.