oh boy...
well, as it's only slider, it's not big script...
wait a sec...
code:
	$t = $p.screen.height-taskbar()
$d = 1
$p = CreateObject("Kixtart.Form")
$p.BorderStyle = 0
$p.Height = 22
$p.Width = 300
$p.fontsize = 10
$p.fontname = "helvetica"
$p.forecolor = 0
$p.fontbold = 1
$p.BorderStyle = 1
$p.backcolor = $p.RGB(255,255,0)
$p.Top = $t
$p.Left = $p.screen.width-760
$p.ShowInTaskbar = 0
$l = $p.hyperlink("$sc",2,2,296,18)
$l.Backcolor = $p.RGB(255,255,0)
$l.value = $scv
$c = $p.Timer(20)
$c.OnTimer = "
If $$d=1
$$p.Top=$$p.Top-1
If $$p.top<($$t-40)
$$c.Interval=3000
$$d=0
EndIf
Else
if $$d=2
$$c.Interval=20
$$p.Top=$$p.Top + 1
If $$p.top>$$t
$$c.Enabled=0
$$p.Hide
EndIf
else $$d=2
endif
EndIf
"
$p.Show
$p.TopMost = 1
While $p.Visible
$=Execute($p.DoEvents)
Loop
exit 0

Function TaskBar()
If @dos=="4.0" $_S="StuckRects" Else $_S="StuckRects2" EndIf
$TaskBar=Val("&"+SubStr(ReadValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\$_S","settings"),41,2))
EndFunction

_________________________
!

download KiXnet