打字效果的新闻标题

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>打字效果的新闻标题- 51windows.Net</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
body{font-size:14px;font-weight:bold;}
</style>
</head>
<body>
最新内容：<a id="HotNews" href="" target="_blank"></a>
<SCRIPT LANGUAGE="JavaScript">
<!--
var NewsTime = 2000;	//每条新闻的停留时间
var TextTime = 50;		//新闻标题文字出现等待时间，越小越快

var newsi = 0;
var txti = 0;
var txttimer;
var newstimer;

var newstitle = new Array();	//新闻标题
var newshref = new Array();		//新闻链接

newstitle[0] = "世界银行公布世界最富和最穷国家前10名";
newshref[0] = "http://www.51windows.net/data/files/file_695.asp";

newstitle[1] = "安全经过广州火车站攻略";
newshref[1] = "http://www.51windows.net/data/files/file_682.asp";

newstitle[2] = "没有卖不出去的豆子";
newshref[2] = "http://www.51windows.net/data/files/file_686.asp";

newstitle[3] = "人类为何活不到自然寿命";
newshref[3] = "http://www.51windows.net/data/files/file_680.asp";

newstitle[4] = "没人会踢一只死狗";
newshref[4] = "http://www.51windows.net/data/files/file_685.asp";

function shownew()
{
	//code by haiwa @2005-10-21 www.51windows.net
	var endstr = "_"
	hwnewstr = newstitle[newsi];
	newslink = newshref[newsi];
	if(txti==(hwnewstr.length-1)){endstr="";}
	if(txti>=hwnewstr.length){
		clearInterval(txttimer);
		clearInterval(newstimer);
		newsi++;
		if(newsi>=newstitle.length){
			newsi = 0
		}
		newstimer = setInterval("shownew()",NewsTime);
		txti = 0;
		return;
	}
	clearInterval(txttimer);
	document.getElementById("HotNews").href=newslink;
	document.getElementById("HotNews").innerHTML = hwnewstr.substring(0,txti+1)+endstr;
	txti++;
	txttimer = setInterval("shownew()",TextTime);
}
shownew();
//-->
</SCRIPT>
</body>
</html>