home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 144 / DPCS0200.iso / Business / Helpme / _SETUP.1 / creatingnewfolder.dxr / 00004_pausebutton.ls < prev    next >
Encoding:
Text File  |  1999-11-12  |  433 b   |  23 lines
  1. property spriteNum, myMember, IamPaused
  2.  
  3. on beginSprite me
  4.   myMember = the member of sprite spriteNum
  5.   IamPaused = 0
  6. end
  7.  
  8. on exitFrame me
  9.   if IamPaused then
  10.     go(the frame)
  11.   end if
  12. end
  13.  
  14. on mouseUp me
  15.   IamPaused = not IamPaused
  16.   if IamPaused then
  17.     sprite(me.spriteNum).member = member("circularbuttonpausepressed")
  18.     puppetSound("drop")
  19.   else
  20.     sprite(me.spriteNum).member = member("circularbuttonpause")
  21.   end if
  22. end
  23.