滚动代码

< div  id ="marquees" >  < ! -- 这些是字幕的内容，你可以任意定义 -- > 
< p > < a  href ="http://www.ybj86.cn"  target ="_blank" >四季情缘 </a> </p> 
< p > < a  href ="http://blog.ybj86.cn"  target ="_blank" > < a  href ="http://blog.ybj86.cn"  target ="_blank" >我们的天堂 </a> </a> </p>        
< p > < a  href ="http://www.year80.cn"  target ="_blank" >80年代论坛 </a> </p> 
< p > < a  href ="http://vip.year80.cn"  target ="_blank" >80年代综合社区 </a> </p> 
< p > < a  href ="http://www.coldyu.com"  target ="_blank" >冷雨技术论坛 </a> </p> 
< p > < a  href ="http://www.baidu.com"  target ="_blank" >百度搜索 </a> </p>    
< p > < a  href ="http://www.google.com/"  target ="_blank" >GOOGLE搜索 </a> </p> 
</div>    
< ! -- 以下是javascript代码 -- > 
< script  language ="javascript" > 
<!-- 
marqueesHeight=200; //内容区高度 
stopscroll=false; //这个变量控制是否停止滚动 
with(marquees){ 
noWrap=true; //这句表内容区不自动换行 
style.width=0; //于是我们可以将它的宽度设为0，因为它会被撑大 
style.height=marqueesHeight; 
style.overflowY="hidden"; //滚动条不可见 
Function("stopscroll=true"); //鼠标经过，停止滚动 
Function("stopscroll=false"); //鼠标离开，开始滚动 
} 
//这时候，内容区的高度是无法读取了。下面输出一个不可见的层"templayer"，稍后将内容复制到里面： 
document.write(' < div  id ="templayer"  style ="position:absolute;z-index:1;visibility:hidden" > </div>'); 
function init(){ //初始化滚动内容 
//多次复制原内容到"templayer"，直到"templayer"的高度大于内容区高度： 
while(templayer.offsetHeight<marqueesHeight){ 
templayer.innerHTML+=marquees.innerHTML; 
} //把"templayer"的内容的“两倍”复制回原内容区： 
marquees.innerHTML=templayer.innerHTML+templayer.innerHTML; 
//设置连续超时，调用"scrollUp()"函数驱动滚动条： 
setInterval("scrollUp()",20); 
} 
document.body. 
preTop=0; //这个变量用于判断滚动条是否已经到了尽头 
function scrollUp(){ //滚动条的驱动函数 
if(stopscroll==true) return; //如果变量"stopscroll"为真，则停止滚动    
preTop=marquees.scrollTop; //记录滚动前的滚动条位置 
marquees.scrollTop+=1; //滚动条向下移动一个像素 
//如果滚动条不动了，则向上滚动到和当前画面一样的位置 
//当然不仅如此，同样还要向下滚动一个像素(+1)： 
if(preTop==marquees.scrollTop){ 
marquees.scrollTop=templayer.offsetHeight-marqueesHeight+1; 
} 
} 
--> 
</script>