home *** CD-ROM | disk | FTP | other *** search
/ 404 Jogos / CLJG.iso / Acao / Doubleshotz / Doubleshotz.dcr / Internal_15_blitRollover.ls < prev    next >
Encoding:
Text File  |  2007-09-27  |  651 b   |  37 lines

  1. property spriteNum, myY
  2.  
  3. on beginSprite me
  4.   myY = sprite(spriteNum).locV
  5.   sprite(spriteNum).color = rgb("#FFFFFF")
  6. end
  7.  
  8. on mouseWithin me
  9.   if the mouseDown then
  10.     sprite(spriteNum).locV = myY + 2
  11.   else
  12.     sprite(spriteNum).locV = myY
  13.   end if
  14.   sprite(spriteNum).color = rgb("#fcbd2e")
  15.   cursor(280)
  16. end
  17.  
  18. on mouseEnter me
  19.   doPlaySound("Snd_rollover")
  20. end
  21.  
  22. on mouseLeave me
  23.   sprite(spriteNum).locV = myY
  24.   sprite(spriteNum).color = rgb("#FFFFFF")
  25.   cursor(-1)
  26. end
  27.  
  28. on mouseUp me
  29.   gotoNetPage("http://www.blitinteractive.com", "_new")
  30.   sprite(spriteNum).color = rgb("#FFFFFF")
  31.   cursor(-1)
  32. end
  33.  
  34. on mouseDown me
  35.   doPlaySound("Snd_click")
  36. end
  37.