多条文字的播放特效

- 中国WEB开发者网络 (http://www.webasp.net)
-- 网页特效 (http://www.webasp.net/javascript/)
--- 多条文字的播放特效 (http://www.webasp.net/javascript/1/86.htm)
-- 发布日期： 2004-05-28
<!-- 网页特效代码由[中国WEB开发者网络:http://www.ChinaWebDev.com]提供！ -->
<!-- 要实现此效果需要 1 个步骤： -->

<!-- 第 1 步： -->
<!-- 把下面的代码加到<BODY></BODY>区域中： -->

<script>
var message="网页特效 特酷感觉 www.webasp.net 谢谢你的关注 "
var messagefont=new Array("Arial Black","Verdana","Impact","Comic Sans MS")
var messagecolor=new Array("33FF33","olive","888888","purple")
var positionleft=20
var positiontop=10
</script>
<script>
var timer
var marginright=0
var i_fadestrength=5
var i_message=0
var i_messagecolor=0
var i_messagefont=0
var step=1
var maxfontsize=110
var fontsizefactor=maxfontsize/100
var content
var textboxwidth=0
var bodywidth=0
message=message.split(" ")


function setmessage() {
if (i_message>=message.length) {i_message=0}
if (i_messagecolor>=messagecolor.length) {i_messagecolor=0}
if (i_messagefont>=messagefont.length) {i_messagefont=0}
content="<nobr><font color="+messagecolor[i_messagecolor]+" face="+messagefont[i_messagefont]+">"+message[i_message]+"</font><nobr>"
textbox.innerHTML=content
i_message++
i_messagecolor++
i_messagefont++
timer=setTimeout("resizemessage()",500)
}

function resizemessage() {
if (i_fadestrength<120) {
textbox.filters.alpha.opacity=Math.floor(100-i_fadestrength)
document.all.textbox.style.fontSize=i_fadestrength*fontsizefactor
document.all.textbox.style.posLeft=positionleft-(Math.floor(i_fadestrength/1.1*fontsizefactor))
document.all.textbox.style.posTop=positiontop
document.all.textbox.style.width=bodywidth-document.all.textbox.style.posLeft-5
document.all.textbox.style.overflowX="hidden"
document.all.textbox.style.visibility="visible"
step+=1.5
i_fadestrength+=step
timer=setTimeout("resizemessage()",50)
}
else {
clearTimeout(timer)
i_fadestrength=0;
step=1;
setmessage()
}
}
if (document.all) {
document.write("<DIV id='textbox' style='position:absolute;font-family:Verdana;filter:alpha(opacity=0);'></DIV>")
document.write("<DIV style='position:relative;'>")
}

if (document.all) {
bodywidth=document.body.clientWidth-5
setmessage()
}

</script>

webasp.net