无缝滚动新闻的Javascript源代码

重点在于function scroll()，function clipShow()及以下for循环。
无缝滚动新闻的Javascript源代码，放在这里，有需要的时候可能用得上：
//CSS样式
<style>
.new_newsT{
 padding-top: 10px;
 padding-bottom: 8px;
}
.new_newsT  .list {
 CLEAR: both; MARGIN: 0px 6px 0px 10px
}
.new_newsT  .list UL {
 PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; PADDING-TOP: 6px
}
.new_newsT  .list LI {
 CLEAR: both;
 PADDING-RIGHT: 0px;
 PADDING-BOTTOM: 0px;
 LINE-HEIGHT: 26px;
 PADDING-TOP: 0px;
 TEXT-ALIGN: left;
 width: 390px;
 white-space: nowrap;
 padding-left: 8px;
 overflow: hidden;
 background-image: url(/images/2/icon_20.gif);
 background-repeat: no-repeat;
 background-position: left;
 font-size: 14px;
 text-overflow:ellipsis;
}
.newReportMarquee {
 width:420px;
 height:128px;
 text-align:left;
 margin:0px;padding:0px;
 overflow:hidden;
 white-space:nowrap;
}
</style>
//相关内容
<table>
  <tr>
    <td class="new_newsT"><div onmouseover="iScrollAmount=0" onmouseout="iScrollAmount=1">
        <div id="newReport" class="newReportMarquee">
          <ul id="NewsMarquees" class="list">
            <li><a href="/Article/ShowInfo.asp?ID=4757" title="狂烧16小时 五千平米仓库裂成两半">狂烧16小时&nbsp;五千平米仓库裂成两半</a>&nbsp;<span style="color:red">[09月17日]</span></li>
            <li><a href="/Article/ShowInfo.asp?ID=4743" title="东莞市发生一起特大交通事故致4死两伤">东莞市发生一起特大交通事故致4死两伤</a>&nbsp;<span>[09月14日]</span></li>
  &n