home *** CD-ROM | disk | FTP | other *** search
/ PROFONDO / PROFONDO.iso / Main.exe / Main.dxr / 00011_bMenu.ls < prev    next >
Encoding:
Text File  |  2001-09-24  |  1.0 KB  |  47 lines

  1. on mouseEnter me
  2.   setCursor("cursorUse")
  3.   sprite(the currentSpriteNum - 10).visible = 1
  4. end
  5.  
  6. on mouseLeave me
  7.   setCursor("cursorNormal")
  8.   sprite(the currentSpriteNum - 10).visible = 0
  9. end
  10.  
  11. on mouseUp me
  12.   nItem = the currentSpriteNum - 14
  13.   case nItem of
  14.     1:
  15.       go("Presentazione")
  16.     2:
  17.       mci("stop cdaudio")
  18.       sprite(2).visible = 0
  19.       sprite(21).visible = 0
  20.       go("Ini", "Start")
  21.     3:
  22.       mci("stop cdaudio")
  23.       mci("play cdaudio")
  24.       sprite(2).visible = 1
  25.       sprite(21).visible = 1
  26.     4:
  27.       mci("stop cdaudio")
  28.       sprite(2).visible = 0
  29.       sprite(21).visible = 0
  30.       nomeVideo = the moviePath & "Video\Video1.avi"
  31.       open(nomeVideo, "explorer.exe")
  32.     5:
  33.       mci("stop cdaudio")
  34.       sprite(2).visible = 0
  35.       sprite(21).visible = 0
  36.       nomeVideo = the moviePath & "Video\Video2.avi"
  37.       open(nomeVideo, "explorer.exe")
  38.     6:
  39.       go("Credits")
  40.     7:
  41.       mci("stop cdaudio")
  42.       sprite(2).visible = 0
  43.       sprite(21).visible = 0
  44.   end case
  45.   setCursor("cursorNormal")
  46. end
  47.