home *** CD-ROM | disk | FTP | other *** search
/ Computer Music Interactif 7 / cd.iso / pc / PC / Demos / GroovMak / data1.cab / Program_Executable_Files / Media / Pref.dxr / 00090.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  847 b   |  29 lines
  1. on mouseDown
  2.   if not (the visible of window "help") then
  3.     repeat while the mouseDown
  4.       set the memberNum of sprite 48 to the number of member "Hcancel"
  5.       updateStage()
  6.     end repeat
  7.   end if
  8. end
  9.  
  10. on mouseUp
  11.   global gQMix, gDb, gReturn, numTrackList, tList
  12.   if not (the visible of window "help") then
  13.     cursor(4)
  14.     IKSetIniPath("SOFTWARE\IK Multimedia\GrooveMaker\1.2")
  15.     set gQMix to getAt(tList, 1)
  16.     repeat with i = 1 to 4
  17.       set spento to getAt(numTrackList, i) & i
  18.       set the memberNum of sprite (15 + (5 * (i - 1)) + getAt(numTrackList, i)) to the number of member spento
  19.     end repeat
  20.     repeat with i = 1 to 4
  21.       setAt(numTrackList, i, integer(char i of getAt(tList, 2)))
  22.     end repeat
  23.     set gDb to getAt(tList, 3)
  24.     go(word 1 of gReturn, word 2 of gReturn)
  25.     setAudio()
  26.     cursor(-1)
  27.   end if
  28. end
  29.