// JScript 文件
//2009-3-13 陈碧波
//用于滚动制定区域的内容

marqueesHeight=200; //内容区高度
preTop=0; //这个变量用于判断滚动条是否已经到了尽头
Imge_roll=null;
div_roll_hid1=null;
function Rollinit()
{ //初始化滚动内容
//多次复制原内容到"div_roll_hid"，直到"div_roll_hid"的高度大于内容区高度：
    while(div_roll_hid1.offsetHeight<marqueesHeight)
    {
        div_roll_hid1.innerHTML+=Imge_roll.innerHTML;
    } //把"div_roll_hid1"的内容的“两倍”复制回原内容区：
    Imge_roll.innerHTML=div_roll_hid1.innerHTML+div_roll_hid1.innerHTML;
    //设置连续超时，调用"scrollUp()"函数驱动滚动条：
    setInterval("scrollUp()",30);
}
function scrollUp()
{ //滚动条的驱动函数
    if(stopscroll==true) 
        return; //如果变量"stopscroll"为真，则停止滚动
    preTop=Imge_roll.scrollTop; //记录滚动前的滚动条位置
    Imge_roll.scrollTop+=1; //滚动条向下移动一个像素
    //如果滚动条不动了，则向上滚动到和当前画面一样的位置
    //当然不仅如此，同样还要向下滚动一个像素(+1)：
    if(preTop==Imge_roll.scrollTop)
    {
        Imge_roll.scrollTop=div_roll_hid1.offsetHeight-marqueesHeight+1;
    }
}

function ImgToRoll(rollname,s_hight)
{
    alert(rollname);
//    Imge_roll=document.getElementById(rollname);
//    marqueesHeight=s_hight
//    stopscroll=false; //这个变量控制是否停止滚动
//    with(Imge_roll)
//    {
//        noWrap=true; //这句表内容区不自动换行
//        style.width=0; //于是我们可以将它的宽度设为0，因为它会被撑大
//        style.height=marqueesHeight;
//        style.overflowY="hidden"; //滚动条不可见
//        onmouseover=new Function("stopscroll=true"); //鼠标经过，停止滚动
//        onmouseout=new Function("stopscroll=false"); //鼠标离开，开始滚动
//    }//这时候，内容区的高度是无法读取了。下面输出一个不可见的层"div_roll_hid"，稍后将内容复制到里面：    
//    document.write('<div id="div_roll_hid" style="position:absolute;z-index:1;visibility:hidden"></div>');
//    div_roll_hid1=document.getElementById("div_roll_hid");
//    Rollinit();
}