home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mobiclic 46
/
Mobiclic46.iso
/
pc
/
DATA
/
COMMUNS
/
MOBICLIC_MENUS.CST
/
00258_Script_GESTION_BTON_PAUSE
< prev
next >
Wrap
Text File
|
2002-08-21
|
787b
|
34 lines
property pdizsprite,pdizspriteNo, pdizguyname
global gpiste_Pause, gpiste_Video, gpiste_GO, gL_EtatBtons
-----------------------------
on beginSprite me
pdizspriteNo = me.spriteNum
pdizsprite = sprite(pdizspriteNo)
pdizguyname = pdizsprite.member.name
gpiste_Pause = pdizspriteNo
end
------------------
on mouseEnter
cursor 280
pdizsprite.member = pdizguyname&"_R"
updateStage
end
-----------------
on mouseLeave
cursor -1
case(gL_EtatBtons[2]) of
0:
puppetSprite pdizspriteNo, FALSE
1:
nothing
end case
updateStage
-------------
on mouseUp
gL_EtatBtons = [0,1,0, 0]
pdizsprite.member = pdizguyname&"_R"
puppetSprite gpiste_Go, FALSE
sprite(gpiste_Video).movieRate = 0
updateStage
end
-------------