home *** CD-ROM | disk | FTP | other *** search
- on mouseDown me2
- spr = me2.spriteNum
- texto = member(the member of sprite (spr - 2)).name
- repeat while the mouseDown
- X = member(texto).scrollTop
- if X > (member(texto).height - 350) then
- next repeat
- end if
- member(texto).scrollTop = X + 16
- updateStage()
- end repeat
- end
-
- on mouseEnter me
- spr = me.spriteNum
- nom = member(the member of sprite spr).name
- set the member of sprite spr to nom && "on"
- updateStage()
- end
-
- on mouseLeave me
- spr = me.spriteNum
- nom = word 1 of the name of member the member of sprite spr
- set the member of sprite spr to nom
- updateStage()
- end
-