home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 46 / Mobiclic46.iso / pc / DATA / COMMUNS / MOBICLIC_MENUS.CST / 00064_Script_GESTION_COIN_JAUNE_STANDARS < prev    next >
Text File  |  2002-08-21  |  1KB  |  52 lines
  1. global validMHG,menusActifs,menuOuvert, pisteMenuHG, pisteCoinHG, ouvreMenuHG,fermeMenuHG, menuFermeHG
  2. global gFlagmagic, gFlag_hideWindows
  3. ----------------------------------
  4. on beginSprite
  5.   pisteCoinHG = the currentSpriteNum
  6. end
  7. ----------------------------------
  8. on mouseUp
  9.   if the pauseState = 1 then exit
  10.   case(gFlagmagic) of
  11.     0, VOID:--Θquerres Bernard
  12.       if menusActifs=1 and menuOuvert=0 then
  13.         cursor 280
  14.         ouvreMenuHG=1
  15.         menuFermeHG=0
  16.         sprite(pisteMenuHG).memberNum = member("menuHG").number
  17.         sprite(pisteMenuHG).rect = rect(0,0,600,98)
  18.         updateStage
  19.         afficherPistes pisteMenuHG
  20.         menuOuvert = "HG"
  21.         hide_zevideo()
  22.         if gFlag_hideWindows <> VOID then hide_window()
  23.         put "  Ouverture Θquerre jaune"
  24.       end if
  25.       
  26.     1:--Θquerres JLM
  27.       cursor 280
  28.       manage_magicWindow("YELLOW","STD")
  29.       put "  Ouverture Θquerre magique jaune"
  30.   end case
  31.   
  32.   
  33. end
  34. -------------------------------
  35. on mouseEnter
  36.   if menusActifs=1 then
  37.     equerre pisteCoinHG
  38.   end if
  39. end
  40. ------------------------
  41. on mouseLeave
  42.   if the pauseState=0 then
  43.     if rollOver(pisteMenuHG)=0 then
  44.       cursor -1
  45.       menuOuvert=0
  46.       fermeMenuHG=1
  47.     end if
  48.   end if
  49. end
  50.  
  51. ----------------------------
  52.