Mobiclic 46/Mobiclic46.iso/pc/DATA/SHARED/COMMUNS.CST/00206_Script_206

Text File | 2002-07-12 | 635b | 30 lines

--bouton quitter

property pMySprite
global gMyParent

on beginSprite me
  pMySprite = me.spriteNum
end

on mouseUp
  exitUtil
end

on mouseEnter
  cursor 280
  case gMyParent of
    0 : sprite(pMySprite).member = member("quitter roll 0")
    1 : sprite(pMySprite).member = member("quitter roll 1")
    2 : sprite(pMySprite).member = member("quitter roll 2")
  end case
end

on mouseLeave
  cursor -1
  case gMyParent of
    0 : sprite(pMySprite).member = member("quitter 0")
    1 : sprite(pMySprite).member = member("quitter 1")
    2 : sprite(pMySprite).member = member("quitter 2")
  end case
end