主题:  找一个特效

死不了

职务:普通成员
等级:1
金币:0.0
发贴:89
#12006/1/18 17:15:42
记得以前看到 蓝鲸 的一个网站(好像是建站服务那类的),有个效果是一排图向上滚动,图全部显示后暂停一短时间;然后再向上滚。

PS:版主的站还没备案?本来打算自己上去找的,结果



缺缺

职务:管理员
等级:8
金币:41.0
发贴:9620

蓝鲸

职务:版主
等级:5
金币:42.1
发贴:2614
#32006/1/20 15:37:58
JS文件中的代码
function scrollUp(object, perHeight, count, speed)
{
	var stopScroll = false;
	var preTop = 0;
	var curTop = 0;
	var stopTime = 0;
	
	with(eval(object)){
	    innerHTML += eval(object).innerHTML;
	    style.height = perHeight;
	    style.overflowX="visible";
	    style.overflowY="hidden";
	    noWrap=true;
	    onmouseover=new Function("stopScroll=true"); 
		onmouseout=new Function("stopScroll=false"); 
	}
	
	eval(object).scrollTop = 0;
	curTop = 0;
	
	setInterval (
		function(){
			if (stopScroll == true) return;
			curTop ++;
		
			if (curTop == (perHeight+1))
			{
				stopTime ++;
				curTop --;
				if (stopTime == 80)
				{
		    		stopTime = 0;
					curTop = 0;
				}
			}
			else
			{
				preTop = eval(object).scrollTop;
	   		 	eval(object).scrollTop ++;
				if (eval(object).scrollTop == (perHeight*count))
				{
					eval(object).scrollTop = 0;
					preTop = 0;
				}
			}
		}
	, speed);
}

function scroll_init(object, perHeight, count, speed)
{
	var stopScroll = false;
	var preTop = 0;
	var curTop = 0;
	var stopTime = 0;
	
	with(eval(object)){
	    innerHTML += eval(object).innerHTML;
	    style.height = perHeight;
	    style.overflowX="visible";
	    style.overflowY="hidden";
	    noWrap=true;
	    onmouseover=new Function("stopScroll=true"); 
		onmouseout=new Function("stopScroll=false"); 
	}
	
	eval(object).scrollTop = 0;
	curTop = 0;
}


用法
<script language="javascript">scrollUp('divArtist', 294, 2, 40);</script>


scroll_init函数可以不用,不过用的空间速度不均,大运算量结果可能位置有些偏移,在onload或其它地方先init一下,最后在实行scrollUp,可以消除偏移

网站被关了,注册了n次,头疼


非常大鱼

浮尘

职务:普通成员
等级:3
金币:7.0
发贴:1258
#42006/1/27 9:52:32
我的小站收藏了这个特效,可以去看看。



浮尘

职务:普通成员
等级:3
金币:7.0
发贴:1258
#52006/1/27 9:56:50