home *** CD-ROM | disk | FTP | other *** search
/ Reflux 1: The Becoming / Reflux.iso / shared.dxr / 00797_fQUIT01.BMP.ls < prev    next >
Encoding:
Text File  |  1995-05-01  |  384 b   |  15 lines
  1. on mouseDown
  2.   puppetSound("lightswt.wav")
  3.   puppetSprite(8, 1)
  4.   repeat while the mouseDown
  5.     set the castNum of sprite 8 to the number of cast "fquit02.bmp"
  6.     updateStage()
  7.   end repeat
  8.   set the castNum of sprite 8 to the number of cast "fquit01.bmp"
  9.   puppetSprite(8, 0)
  10.   updateStage()
  11.   set the visible of sprite 38 to 1
  12.   set the visible of sprite 39 to 1
  13.   go("QUIT")
  14. end
  15.