向上循环滚动的滚轴式链接效果

网站 2005-10-12 11:8

可以做滚动的新闻及友情链接，程序较长，修改时请注意里面的相关参数：

页面：点这儿参观
制作方法
将下面的代码复制到<body>~</body>里

var slideimages=new Array()
slideimages[0]='中文雅虎<br><br>首都在线<br><br>网络特区<br><br>风 云 居'
slideimages[1]='缘份的传奇<br><br>热网中转<br><br>封存往事<br><br>丛林驿站'
slideimages[2]='中文雅虎<br><br>首都在线<br><br>网络特区<br><br>新 浪 网'
slideimages[3]='缘份的传奇<br><br>壹号工作室<br><br>七色鸟设计<br><br>有风的日子'

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

function move1(whichlayer){
tlayer=eval(whichlayer)
if (tlayer.top>0&&tlayer.top<=4){
tlayer.top=0
setTimeout("move1(tlayer)",pausebetweenimages)
setTimeout("move2(document.main.document.second)",pausebetweenimages)
return
}
if (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<=4){
tlayer2.top=0
setTimeout("move2(tlayer2)",pausebetweenimages)
setTimeout("move1(document.main.document.first)",pausebetweenimages)
return
}
if (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<=4){
tdiv.style.pixelTop=0
setTimeout("move3(tdiv)",pausebetweenimages)
setTimeout("move4(second2)",pausebetweenimages)
return
}
if (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<=4){
tdiv2.style.pixelTop=0
setTimeout("move4(tdiv2)",pausebetweenimages)
setTimeout("move3(first2)",pausebetweenimages)
return
}
if (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('<span id="main2" style="position:relative;width:'+scrollerwidth+';height:'+scrollerheight+';overflow:hiden;background-color:'+scrollerbgcolor+'">')
document.writeln('<div style="position:absolute;width:'+scrollerwidth+';height:'+scrollerheight+';clip:rect(0 '+scrollerwidth+' '+scrollerheight+' 0);left:0;top:0">')
document.writeln('<div id="first2" style="position:absolute;width:'+scrollerwidth+';left:0;top:1;">')
document.write(slideimages[0])
document.writeln('</div>')
document.writeln('<div id="second2" style="position:absolute;width:'+scrollerwidth+';left:0;top:0">')
document.write(slideimages[1])
document.writeln('</div>')
document.writeln('</div>')
document.writeln('</span>')
}
</script>

[Ctrl+A 全部选择提示：你可先修改部分代码，再按运行]

注意：此例分为4个数组成员，在成员为可以制作链接及含有双引号，如下所示：

slideimages[0]='<a href="http://www.yahoo.com.cn">中文雅虎</a><br><br>.......'
slideimages[1]='<a href="http://wein.363.net/">缘份的传奇</a><br><br>......'
slideimages[2]='<a href="http://www.yahoo.com.cn">中文雅虎</a><br><br>.......'
slideimages[3]='<a href="http://wein.363.net/">缘份的传奇</a><br><br>......'

□浮生蕭條□

日志分类Categories

日历表calendar

最新发表Latest Posts

最近推荐Highlights

最新回复Comments

统计信息Total info

日志搜索Search

友情链接My Friends

其他信息Other

向上循环滚动的滚轴式链接效果

回复Comments() 点击Count()

回复Comments

{commenttime}{commentauthor}

{CommentUrl}