home *** CD-ROM | disk | FTP | other *** search
/ 3D World 113 / 3DW_113.iso / pc / Menu / Scenes / home.dir / Internal_16_Sub_Item_Rollover.ls < prev    next >
Encoding:
Text File  |  2008-09-12  |  667 b   |  27 lines
  1. property Sp, myEntry
  2. global gRootPath, gDiv, gMenuList, rollcolor, SectionNumber, SectionPath, gFullPath
  3.  
  4. on Initialize me, aNumber, aListEntry, aItemTitle
  5.   Sp = sprite(aNumber)
  6.   myTitle = aItemTitle
  7.   myEntry = aListEntry
  8.   Sp.member.color = rgb(255, 255, 255)
  9. end
  10.  
  11. on mouseEnter me
  12.   cursor(280)
  13.   Sp.member.color = rgb(132, 220, 253)
  14. end
  15.  
  16. on mouseLeave me
  17.   cursor(-1)
  18.   Sp.member.color = rgb(255, 255, 255)
  19. end
  20.  
  21. on mouseUp me
  22.   fullPath = gRootPath & "DiscContent" & gDiv & SectionPath & gDiv & gMenuList[SectionNumber].ItemList[myEntry].ItemPath & gDiv
  23.   gFullPath = fullPath
  24.   generateProductPage(fullPath)
  25.   member("product_title").text = Sp.member.text
  26. end
  27.