整排字符从右向左的移动-WEBASP.NET

精彩推荐

分类最新特效

分类热点特效

整排字符从右向左的移动

日期：2004-06-15 人气：【字体：大中小】【收藏此文】

<HTML>
<HEAD>
<META http-equiv='Content-Type' content='text/html; charset=gb2312'>
<TITLE>整排字符从右向左的移动</TITLE>

<!-- Beginning of JavaScript Applet -------------------

function scrollit_r2l(seed)

{ var m1  = "欢迎来到中国WEB开发者网络，请多提意见。谢谢!" ;

var m2  = "" ;

var msg=m1+m2;

var out = " ";

var c = 1;

var speed  = 120;

if (seed > 100)

{                seed-=2;

var cmd="scrollit_r2l(" + seed + ")";

timerTwo=window.setTimeout(cmd,speed);}

else if (seed <= 100 && seed > 0)

{                for (c=0 ; c < seed ; c++)

{       out+=" ";}

out+=msg;         seed-=2;

var cmd="scrollit_r2l(" + seed + ")";

window.status=out;

timerTwo=window.setTimeout(cmd,speed); }

else if (seed <= 0)

{                if (-seed < msg.length)

{

out+=msg.substring(-seed,msg.length);

seed-=2;

var cmd="scrollit_r2l(" + seed + ")";

window.status=out;

timerTwo=window.setTimeout(cmd,speed);}

else {               window.status=" ";

timerTwo=window.setTimeout("scrollit_r2l(100)",speed);

}

scrollit_r2l(100);

// -- End of JavaScript code -->

</script>
</HEAD>
<BODY >
</BODY></HTML>

<script>



</script>