home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 51 / Mobiclic51.iso / mac / DATA / JEUX / Quiz.dir / 00003_Script_GESTION_BOUTONS_VIGNETTES < prev    next >
Text File  |  2003-01-27  |  874b  |  44 lines
  1. --BOUTONS_VIGNETTES
  2. property numero, LaPiste, LeNom, LaBoucle, LaPisteBoucle
  3. -------
  4. on beginSprite me
  5.   numero = me.spriteNum
  6.   LaBoucle = numero + 5
  7.   LaPiste = sprite(numero)
  8.   LaPisteBoucle = sprite(LaBoucle)
  9.   LeNom = LaPiste.member.name
  10. end
  11. ------- 
  12. on MouseEnter
  13.   if the pauseState = 1 then exit
  14.   cursor 280
  15.   LaPisteBoucle.member = LeNom&"_R"
  16.   LaPisteBoucle.blend = 100
  17.   LaPiste.blend = 0
  18.   updateStage
  19. end
  20. -------
  21. on mouseLeave
  22.   if the pauseState = 1 then exit
  23.   cursor -1
  24.   LapisteBoucle.member = LeNom
  25.   LaPisteBoucle.blend = 0
  26.   Lapiste.blend = 100
  27.   puppetSprite numero,false
  28. end
  29. -------
  30. on mouseUp
  31.   if the pauseState = 1 then exit
  32.   cursor -1
  33.   sound close 3
  34.   case(LeNom) of
  35.     "CHOIX_1":
  36.       SERIE_01
  37.     "CHOIX_2":
  38.       SERIE_02
  39.     "CHOIX_3":
  40.       SERIE_03
  41.     "CHOIX_4":
  42.       SERIE_04
  43.   end case 
  44. end