home *** CD-ROM | disk | FTP | other *** search
- on mouseDown
- hSound(1, "click.aif")
- end
-
- on mouseUp
- global gStrArt, gLstFLArt, gintWhichSprite, gMarkerName
- hDisplay(0, 0, 23, gStrArt, 320, 240)
- setProp(gLstFLArt, gintWhichSprite, 1)
- hCursor(1, "finger", 24, 24)
- hVisibleSprite(1, 23, 24)
- updateStage()
- hCursor(0, "finger", 17, 17)
- hIcons(0, 0, 0)
- hFlashlight(0)
- updateStage()
- hFYI(0)
- case gintWhichSprite of
- 10:
- set lStrSound to "swamp3.aif"
- 13:
- set lStrSound to "swamp2.aif"
- end case
- hSound(1, lStrSound)
- end
-