home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mobiclic 51
/
Mobiclic51.iso
/
pc
/
DATA
/
COMMUNS
/
MOBICLIC_MENUS.CST
/
00035_Script_GESTION_COIN_ROUGE_STANDARD
< prev
next >
Wrap
Text File
|
2003-01-30
|
978b
|
39 lines
global validMBD, menusActifs, menuOuvert, pisteMenuBD, pisteCoinBD, ouvreMenuBD, fermeMenuBD, menuFermeBD, volumeOn
-------------------------------------------
on beginSprite
pisteCoinBD = the currentSpriteNum
end
----------------------------------
on mouseUp
if the pauseState=0 then
if menusActifs=1 and menuOuvert=0 then
cursor 280
ouvreMenuBD=1
menuFermeBD=0
sprite(pisteMenuBD).memberNum = member("MenuBD").number
sprite(pisteMenuBD).rect = rect(320, 382, 640, 480)
afficherPistes pisteMenuBD
updateStage
menuouvert = "BD"
put " Ouverture Θquerre rouge"
end if
end if
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