home *** CD-ROM | disk | FTP | other *** search
- global sliderlijst, entert
-
- on exitFrame
- if entert = "<1" then
- entert = ">1"
- setcurrentC(getAt(sliderlijst, 1), "ho5", "s1 id")
- setcurrentC(getAt(sliderlijst, 2), "ho5", "s2 id")
- setcurrentC(getAt(sliderlijst, 3), "ho5", "s3 id")
- setcurrentC(getAt(sliderlijst, 4), "ho5", "s4 id")
- setcurrentC(getAt(sliderlijst, 5), "ho5", "s5 md")
- setcurrentC(getAt(sliderlijst, 6), "ho5", "s6 id")
- end if
- back = new(script("cb"), 18, "back id", "back hi", "back md", "bck")
- rolqt = new(script("cb"), 22, "h5qrbnt1 id", "h5qrbnt1 hi", "h5qrbnt1 md", "h5qr")
- slid(getAt(sliderlijst, 1))
- slid(getAt(sliderlijst, 2))
- slid(getAt(sliderlijst, 3))
- slid(getAt(sliderlijst, 4))
- slid(getAt(sliderlijst, 6))
- cbbtn(back)
- cbbtn(rolqt)
- go(the frame)
- end
-