home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 21 / CTROM21A.mdf / mmm / win2000.dxr / 00209.ls < prev    next >
Encoding:
Text File  |  1999-09-27  |  753 b   |  26 lines
  1. global hydrolijst, SWentert, Musicslijst, shotslijst
  2.  
  3. on exitFrame
  4.   shotslijst = []
  5.   maakShots3Actief(EMPTY)
  6.   if SWentert = "<1" then
  7.     SWentert = ">1"
  8.     setcurrentSW(getAt(Musicslijst, 1), "sw3 txt", "sw1 id")
  9.     setcurrentSW(getAt(Musicslijst, 2), "sw3 txt", "sw2 id")
  10.     setcurrentSW(getAt(Musicslijst, 3), "sw3 txt", "sw3 md")
  11.   end if
  12.   back = new(script("cb"), 18, "back id", "back hi", "back md", "bck")
  13.   slid(getAt(hydrolijst, 1))
  14.   slid(getAt(hydrolijst, 2))
  15.   slid(getAt(hydrolijst, 4))
  16.   slid(getAt(hydrolijst, 5))
  17.   slid(getAt(hydrolijst, 6))
  18.   switch(getAt(Musicslijst, 1))
  19.   switch(getAt(Musicslijst, 2))
  20.   cbbtn(getAt(shotslijst, 1))
  21.   cbbtn(getAt(shotslijst, 2))
  22.   cbbtn(getAt(shotslijst, 3))
  23.   cbbtn(back)
  24.   go(the frame)
  25. end
  26.