home *** CD-ROM | disk | FTP | other *** search
/ MacFormat UK 163 - Disc 1 / MF_UK_163_1.iso / pc / Files / Scenes / HOME.DIR / Internal_100_SubMenuHandler.ls < prev    next >
Encoding:
Text File  |  2005-10-20  |  304 b   |  21 lines
  1. property Sp, myListIndex
  2.  
  3. on init me, aListIndex
  4.   Sp = sprite(me.spriteNum)
  5.   myListIndex = aListIndex
  6. end
  7.  
  8. on mouseUp me
  9.   GenFromSubMenu(myListIndex, Sp)
  10. end
  11.  
  12. on mouseEnter me
  13.   Sp.member.color = rgb(255, 255, 255)
  14.   cursor(280)
  15. end
  16.  
  17. on mouseLeave me
  18.   Sp.member.color = rgb(0, 0, 0)
  19.   cursor(-1)
  20. end
  21.