home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 51 / Mobiclic51.iso / mac / DATA / JEUX / Quiz.dir / 00010_Script_GESTION_BTON_NEWQUIZ < prev    next >
Text File  |  2003-01-27  |  765b  |  32 lines
  1. property p_cettePiste, p_Nodepiste,p_nom_Acteur
  2. ----------------------------------
  3. on beginsprite me
  4.   p_Nodepiste = me.spriteNum
  5.   p_cettePiste = sprite(p_Nodepiste)
  6.   p_nom_Acteur = p_cettePiste.member.name
  7. end
  8. ----------------------------------- 
  9. on mouseEnter
  10.   if the pauseState = 1 then exit
  11.   cursor 280
  12.   sprite(p_Nodepiste + 2).visible = 1
  13.   updateStage
  14. end
  15. ----------------------------------- 
  16. on mouseWithin
  17.   if the pauseState = 1 then exit
  18.   cursor 280
  19. end
  20. ---------------------------------
  21. on mouseLeave
  22.   if the pauseState = 1 then exit
  23.   cursor -1
  24.   puppetsprite  p_Nodepiste + 2 , FALSE
  25. end
  26. ----------------------------------- 
  27. on mouseUp
  28.   if the pauseState = 1 then exit
  29.   
  30. end
  31. ----------------------------------- 
  32.