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 / 00085.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  917 b   |  43 lines
  1. on mouseEnter
  2.   if the visible of window "help" then
  3.     tell window "help"
  4.       go("pref4")
  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 mouseUp
  18.   global gDb, gGreen
  19.   if not (the visible of window "help") then
  20.     repeat with i = 11 to 13
  21.       set the visible of sprite i to 0
  22.     end repeat
  23.     if the mouseH <= 265 then
  24.       set the visible of sprite 11 to 1
  25.       set gDb to 70
  26.     else
  27.       if the mouseH >= 299 then
  28.         set the visible of sprite 13 to 1
  29.         set gDb to 128
  30.       else
  31.         set the visible of sprite 12 to 1
  32.         set gDb to 90
  33.       end if
  34.     end if
  35.     updateStage()
  36.     if integer(field "fieldMasterVol") > gDb then
  37.       put gDb into field "fieldMasterVol"
  38.       IKMasterVolume(gDb)
  39.       set the foreColor of field "fieldMasterVol" to gGreen
  40.     end if
  41.   end if
  42. end
  43.