home *** CD-ROM | disk | FTP | other *** search
/ Galleria D'arte: Manet / Manet.iso / Dati / Internet.dxr / 00008_SelezLinkTXT.ls < prev    next >
Encoding:
Text File  |  2000-12-21  |  754 b   |  39 lines
  1. on mouseEnter me
  2.   tmp = sprite(the currentSpriteNum).member
  3.   nome = member(tmp).name
  4.   link = member(nome).text
  5.   if link = EMPTY then
  6.     exit
  7.   end if
  8.   member(nome).forecolor = 6
  9.   cursor(280)
  10. end
  11.  
  12. on mouseLeave me
  13.   tmp = sprite(the currentSpriteNum).member
  14.   nome = member(tmp).name
  15.   link = member(nome).text
  16.   if link = EMPTY then
  17.     exit
  18.   end if
  19.   member(nome).forecolor = 3
  20.   cursor(-1)
  21. end
  22.  
  23. on mouseUp me
  24.   global gWWW, gBig
  25.   tmp = sprite(the currentSpriteNum).member
  26.   nome = member(tmp).name
  27.   link = member(nome).text
  28.   if link = EMPTY then
  29.     exit
  30.   end if
  31.   member(nome).forecolor = 3
  32.   cursor(-1)
  33.   tmp = sprite(the currentSpriteNum + 2).member
  34.   img = member(tmp).name
  35.   gBig = img & "_big"
  36.   gWWW = link
  37.   go("ingrandimento")
  38. end
  39.