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 / 00089.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  1.2 KB  |  48 lines
  1. on mouseEnter
  2.   if the visible of window "help" then
  3.     tell window "help"
  4.       go("pref5")
  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.   if not (the visible of window "help") then
  19.     repeat while the mouseDown
  20.       set the memberNum of sprite 47 to the number of member "Hsave"
  21.       updateStage()
  22.     end repeat
  23.   end if
  24. end
  25.  
  26. on mouseUp
  27.   global gQMix, gReturn, gPath, gDb, gRandom, gGrooveSel, numTrackList, folderSynthList, tList, virTracklIst
  28.   if not (the visible of window "help") then
  29.     cursor(4)
  30.     IKSetIniPath("SOFTWARE\IK Multimedia\GrooveMaker\1.2")
  31.     IKIniWrite("stereo_mix", string(gQMix))
  32.     set tempWord to EMPTY
  33.     repeat with i = 1 to 4
  34.       set tempWord to tempWord & getAt(numTrackList, i)
  35.     end repeat
  36.     if tempWord <> getAt(tList, 2) then
  37.       IKIniWrite("numTrack", tempWord)
  38.     end if
  39.     if gDb <> getAt(tList, 3) then
  40.       IKIniWrite("db", string(gDb))
  41.     end if
  42.     go(word 1 of gReturn, word 2 of gReturn)
  43.     setAudio()
  44.     set the memberNum of sprite 47 to the number of member "save"
  45.     cursor(-1)
  46.   end if
  47. end
  48.