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 / 00083.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  932 b   |  35 lines
  1. on setMonitor
  2.   global gQMix, gDb, gReturn, gNumUser, gMix, gBlue, numTrackList
  3.   repeat with i = 6 to 7
  4.     set the visible of sprite i to 0
  5.   end repeat
  6.   if not gMix then
  7.     set the memberNum of sprite 5 to the number of member "dMix"
  8.     updateStage()
  9.   else
  10.     if gQMix then
  11.       set the visible of sprite 6 to 1
  12.     else
  13.       set the visible of sprite 7 to 1
  14.     end if
  15.   end if
  16.   repeat with i = 11 to 13
  17.     set the visible of sprite i to 0
  18.   end repeat
  19.   case gDb of
  20.     70:
  21.       set the visible of sprite 11 to 1
  22.     90:
  23.       set the visible of sprite 12 to 1
  24.     128:
  25.       set the visible of sprite 13 to 1
  26.   end case
  27.   if numTrackList = [] then
  28.     set numTrackList to [3, 3, 3, 3]
  29.   end if
  30.   repeat with i = 1 to count(numTrackList)
  31.     set Hmarker to "H" & getAt(numTrackList, i) & i
  32.     set the memberNum of sprite (15 + (5 * (i - 1)) + getAt(numTrackList, i)) to the number of member Hmarker
  33.   end repeat
  34. end
  35.