home *** CD-ROM | disk | FTP | other *** search
/ Computer Music Interactif 7 / cd.iso / pc / PC / Demos / GroovMak / data1.cab / Program_Executable_Files / Media / MenuSong.dxr / 00109.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  1011 b   |  45 lines
  1. on mouseEnter
  2.   if the visible of window "HelpM" then
  3.     tell window "HelpM"
  4.       go("menuSong5")
  5.     end tell
  6.   end if
  7. end
  8.  
  9. on mouseLeave
  10.   if the visible of window "HelpM" then
  11.     tell window "HelpM"
  12.       go("start")
  13.     end tell
  14.   end if
  15. end
  16.  
  17. on mouseDown
  18.   global gSong
  19.   if not (the visible of window "HelpM") then
  20.     if (gSong <> EMPTY) and (field "fieldElencoSongHD" contains gSong) then
  21.       repeat while the mouseDown
  22.         set the memberNum of sprite 8 to the number of member "HvMix"
  23.         updateStage()
  24.       end repeat
  25.     end if
  26.   end if
  27. end
  28.  
  29. on mouseUp
  30.   global gSong, gBpmSong
  31.   if not (the visible of window "HelpM") then
  32.     if (gSong <> EMPTY) and (field "fieldElencoSongHD" contains gSong) then
  33.       cursor(4)
  34.       prepare()
  35.       go("vMix", "grooveM")
  36.       put EMPTY into field "fieldElencoSongCD"
  37.       put EMPTY into field "fieldDescription"
  38.       set the visible of sprite 23 to 0
  39.       puppetSprite(39, 1)
  40.       puppetSprite(24, 1)
  41.       cursor(-1)
  42.     end if
  43.   end if
  44. end
  45.