home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 51 / Mobiclic51.iso / mac / DATA / COMMUNS / MOBICLIC_MENUS.CST / 00263_Script_BASCULE_EKERRES < prev    next >
Text File  |  2003-01-30  |  1KB  |  23 lines
  1. global gFlagMagic
  2. -----------------
  3. on mouseUp me
  4.   if not(the controlDown and the optionDown) then exit
  5.   case(gFlagMagic) of
  6.     0,VOID:
  7.       gFlagMagic = 1
  8.       alert("Vous passer en mode Θquerres dΘplaτables")
  9. --      texte1 = "Equerres dΘplaτables, comportementclassique si non dΘplacΘes.Si dΘplacΘes:"&RETURN
  10. --      texte4 = "fermeture par leur propre triangle,  rΘapparition α la mΩmeplace."&RETURN
  11. --      texte5 = "fermeture par les triangles de l'Θcran, rΘapparition α la position initiale."&RETURN
  12. --      texte6 = "ce qui permet par ex. deles rΘcupΘrer si on les a perdues hors Θcran!!"
  13. --      alert(texte1&texte4&texte5&texte6)
  14.     1:
  15.       if windowpresent("YELLOW_WINDOW") then close_magicWindow("YELLOW","STD")
  16.       if windowpresent("GREEN_WINDOW") then close_magicWindow("GREEN","STD")
  17.       if windowpresent("RED_WINDOW") then close_magicWindow("RED","STD")
  18.       if windowpresent("BLUE_WINDOW") then close_magicWindow("BLUE","STD")
  19.       gFlagMagic = 0
  20.       alert("Vous passer en mode Θquerres fixes (mode standard")
  21.   end case
  22. end
  23. ----------