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 / 00634.ls < prev    next >
Encoding:
Text File  |  1999-09-17  |  879 b   |  34 lines
  1. on exitFrame
  2.   global gReturn, gStyle, gRand, gList, gRadio, vmixlist
  3.   if gReturn = EMPTY then
  4.     set the randomSeed to the timer
  5.     createVariableMix()
  6.     createListMix()
  7.     handleSpriteMix()
  8.     writeFieldSeq()
  9.     if vmixlist = [EMPTY, EMPTY, EMPTY, EMPTY] then
  10.       createSong()
  11.     end if
  12.   else
  13.     handleSpriteMix()
  14.     if gStyle then
  15.       set Hs to "Hs" & gStyle
  16.       set the memberNum of sprite (gStyle + 1) to the number of member Hs
  17.       updateStage()
  18.     end if
  19.     if gList then
  20.       set the memberNum of sprite 43 to the number of member "Hlist"
  21.       updateStage()
  22.     end if
  23.     if gRand then
  24.       set the memberNum of sprite 43 to the number of member "Hrandom"
  25.       updateStage()
  26.     end if
  27.     if gRadio then
  28.       set the memberNum of sprite 48 to the number of member "Hradio"
  29.       updateStage()
  30.     end if
  31.     set gReturn to EMPTY
  32.   end if
  33. end
  34.