home *** CD-ROM | disk | FTP | other *** search
/ Computer Music Interactif 7 / cd.iso / pc / PC / Demos / GroovMak / data1.cab / Program_Executable_Files / Media / grooveM.dxr / 00633.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  802 b   |  39 lines
  1. on mouseEnter
  2.   if the visible of window "Help" then
  3.     tell window "help"
  4.       go("mix7")
  5.     end tell
  6.   end if
  7. end
  8.  
  9. on mouseLeave
  10.   if the visible of window "Help" then
  11.     tell window "help"
  12.       go("start")
  13.     end tell
  14.   end if
  15. end
  16.  
  17. on mouseDown
  18.   global gStyle
  19.   if (gStyle <> 0) and not (the visible of window "help") then
  20.     repeat while the mouseDown
  21.       set the memberNum of sprite 42 to the number of member "HtransfSong"
  22.       updateStage()
  23.     end repeat
  24.   end if
  25. end
  26.  
  27. on mouseUp
  28.   global gStyle
  29.   if (gStyle <> 0) and not (the visible of window "help") then
  30.     set the memberNum of sprite 42 to the number of member "transfSong"
  31.     updateStage()
  32.     openWin("YesNo")
  33.     tell window "YesNo"
  34.       go("toSeq")
  35.     end tell
  36.   end if
  37.   set the editable of member "fieldBpm" to 0
  38. end
  39.