home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mobiclic 51
/
Mobiclic51.iso
/
mac
/
DATA
/
COMMUNS
/
MOBICLIC_MENUS.CST
/
00094_Script_GESTION_COIN_ROUGE_STANDARD
< prev
next >
Wrap
Text File
|
2003-01-30
|
1KB
|
49 lines
global validMBD, menusActifs, menuOuvert, pisteMenuBD, pisteCoinBD, ouvreMenuBD, fermeMenuBD, menuFermeBD, volumeOn
global gFlagMagic, gFlag_hideWindows
----------------------------------------------
on beginSprite
pisteCoinBD = the currentSpriteNum
end
-----------------------------------------------
on mouseUp
if the pauseState = 1 then exit
case(gFlagMagic) of
0, VOID:--Θquerres Bernard
if menusActifs=1 and menuOuvert=0 then
if menusActifs=1 and menuOuvert = 1 then exit
cursor 280
ouvreMenuBD=1
menuFermeBD=0
sprite(pisteMenuBD).memberNum = member("MenuBD").number
sprite(pisteMenuBD).rect = rect(194, 374, 640, 480)
afficherPistes pisteMenuBD
updateStage
menuouvert = "BD"
hide_zevideo()
if gFlag_hideWindows <> VOID then hide_window()
put " Ouverture Θquerre rouge"
end if
1:--Θquerres JLM
cursor 280
manage_magicWindow("RED","STD")
put " Ouverture Θquerre magique rouge"
end case
end
-----------------------------------------------
on mouseEnter
if menusActifs=1 then
equerre pisteCoinBD
end if
end
-----------------------------------------------
on mouseLeave
if the pauseState=0 then
if rollOver(pisteMenuBD)=0 then
cursor -1
menuOuvert = 0
fermeMenuBD=1
end if
end if
end
-----------------------------------------------