Re: 特效代码收集
定时更换超级连接的代码<!--用<body onload="if (document.all||document.layers) {regenerate2();update()}">替换原来的<Body>-->
<!--将以下代码加入HTML的<Body></Body>之间--> <style>
<!-- #tickertape{
position:relative; layer-background-color:black;
width:400;
height:12;
; font-family: "宋体"; font-size: 9pt} #subtickertape{
background-color:black;
position:absolute;
border: 1px solid black;
width:400;
height:12;
; font-family: "宋体"; font-size: 9pt
}
.subtickertapefont{
font:bold 9pt "宋体";
text-decoration:none;
color:white;
}
.subtickertapefont a{
color:white;
text-decoration:none;
; font-family: "宋体"; font-size: 9pt}
-->
</style>
<div id="tickertape">
<div id="subtickertape" class="subtickertapefont">初始化...</div>
</div>
<script language="javascript1.2"> var speed=4500 var news=new Array()
news[0]="<a href='http://remotion.myetang.com'>网页特效梦工厂</a>"
news[1]="<a href='http://www.skycn.com'>天空下载</a>"
news[2]="<a href='http://www.delphibbs.com'>大富翁论坛</a>"
i=0
if (document.all)
tickerobject=document.all.subtickertape.style
else
tickerobject=document.tickertape.document
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers)
setTimeout("window.onresize=regenerate",450)
}
function update(){
BgFade(0xff,0xff,0xff, 0x00,0x00,0x00,10);
if (document.layers){
document.tickertape.document.subtickertape.document.write('<span class="subtickertapefont">'+news[i]+'</span>')
document.tickertape.document.subtickertape.document.close()
}
else
document.all.subtickertape.innerHTML=news[i] if (i<news.length-1)
i++
else
i=0
setTimeout("update()",speed)
} function BgFade(red1, grn1, blu1, red2,
grn2, blu2, steps) {
sred = red1; sgrn = grn1; sblu = blu1;
ered = red2; egrn = grn2; eblu = blu2;
inc = steps;
step = 0;
RunFader();
}
function RunFader() {
var epct = step/inc;
var spct = 1 - epct;
if (document.layers)
tickerobject.bgColor =
Math.floor(sred * spct + ered *
epct)*256*256 +
Math.floor(sgrn * spct + egrn * epct)*256 +
Math.floor(sblu * spct + eblu * epct);
else
tickerobject.backgroundColor=
Math.floor(sred * spct + ered *
epct)*256*256 +
Math.floor(sgrn * spct + egrn * epct)*256 +
Math.floor(sblu * spct + eblu * epct);
if ( step < inc ) {
setTimeout('RunFader()',50);
}
step++;
} </script>
</tr></table>
|
穆穆族论坛 » 拓 眼 电 脑 » [ 电脑网络 ] » 特效代码收集
1: 1 
