home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 21 / CTROM21A.mdf / mmm / digi.dxr / 00084.ls < prev    next >
Encoding:
Text File  |  1999-09-27  |  732 b   |  24 lines
  1. global sliderlijst, entert
  2.  
  3. on exitFrame
  4.   if entert = "<1" then
  5.     entert = ">1"
  6.     depuppet()
  7.     calcslider(the member of sprite 21)
  8.     setcurrentC(getAt(sliderlijst, 1), "ho6", "s1 id")
  9.     setcurrentC(getAt(sliderlijst, 2), "ho6", "s2 id")
  10.     setcurrentC(getAt(sliderlijst, 3), "ho6", "s3 id")
  11.     setcurrentC(getAt(sliderlijst, 4), "ho6", "s4 id")
  12.     setcurrentC(getAt(sliderlijst, 5), "ho6", "s5 id")
  13.     setcurrentC(getAt(sliderlijst, 6), "ho6", "s6 md")
  14.   end if
  15.   back = new(script("cb"), 18, "back id", "back hi", "back md", "bck")
  16.   slid(getAt(sliderlijst, 1))
  17.   slid(getAt(sliderlijst, 2))
  18.   slid(getAt(sliderlijst, 3))
  19.   slid(getAt(sliderlijst, 4))
  20.   slid(getAt(sliderlijst, 5))
  21.   cbbtn(back)
  22.   go(the frame)
  23. end
  24.