一定时间滚动的链接菜单效果

定时滚动链接的菜单

var scrollerwidth=115
var scrollerheight=131
var scrollerbgcolor='#FFFFFF'
//3000 miliseconds=9 seconds
var pausebetweenimages=4000

var slideimages=new Array()
slideimages[0]='你的链接

你的链接

你的链接

你的链接'
slideimages[1]='你的链接

你的链接

你的链接

你的链接'
slideimages[2]='你的链接

你的链接

你的链接

你的链接'
slideimages[3]='你的链接

你的链接

你的链接

你的链接'

if (slideimages.length>1)
i=2
else
i=0

function move1(whichlayer){
tlayer=eval(whichlayer)
if (tlayer.top>0&&tlayer.top=tlayer.document.height*-1){
tlayer.top-=4
setTimeout("move1(tlayer)",100)
}
else{
tlayer.top=scrollerheight
tlayer.document.write(slideimages[i])
tlayer.document.close()
if (i==slideimages.length-1)
i=0
else
i++
}
}

function move2(whichlayer){
tlayer2=eval(whichlayer)
if (tlayer2.top>0&&tlayer2.top=tlayer2.document.height*-1){
tlayer2.top-=4
setTimeout("move2(tlayer2)",100)
}
else{
tlayer2.top=scrollerheight
tlayer2.document.write(slideimages[i])
tlayer2.document.close()
if (i==slideimages.length-1)
i=0
else
i++
}
}

function move3(whichdiv){
tdiv=eval(whichdiv)
if (tdiv.style.pixelTop>0&&tdiv.style.pixelTop=tdiv.offsetHeight*-1){
tdiv.style.pixelTop-=4
setTimeout("move3(tdiv)",100)
}
else{
tdiv.style.pixelTop=scrollerheight
tdiv.innerHTML=slideimages[i]
if (i==slideimages.length-1)
i=0
else
i++
}
}

function move4(whichdiv){
tdiv2=eval(whichdiv)
if (tdiv2.style.pixelTop>0&&tdiv2.style.pixelTop=tdiv2.offsetHeight*-1){
tdiv2.style.pixelTop-=4
setTimeout("move4(second2)",100)
}
else{
tdiv2.style.pixelTop=scrollerheight
tdiv2.innerHTML=slideimages[i]
if (i==slideimages.length-1)
i=0
else
i++
}
}

function startscroll(){
if (document.all){
move3(first2)
second2.style.top=scrollerheight
}
else if (document.layers){
move1(document.main.document.first)
document.main.document.second.top=scrollerheight+5
document.main.document.second.visibility='show'
}
}

window.onload=startscroll

if (document.layers)
document.write(slideimages[0])

if (document.layers)
document.write(slideimages[1])

if (document.layers)
document.write(slideimages[0])

if (document.all){
document.writeln('')
document.writeln('

')
document.writeln('

')
document.write(slideimages[0])
document.writeln('

')
document.writeln('

')
document.write(slideimages[1])
document.writeln('

')
document.writeln('

')
document.writeln('')
}

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]