NS4=(document.layers);IE4=(document.all);isDOM=((document.getElementById)&&(!IE4))?true:false;
isOP=(navigator.userAgent.indexOf('Opera') != -1)?true:false;
if((NS4||IE4||isDOM)&&(!isOP)){

interval=30;
increment=2;
pause=3500;
bannerColor='#99CCFF';
leftPadding=1;
topPadding=1;
maxLoops=999;
target=' TARGET="_self" ';
classid=' CLASS="headlines" ';
numheadlines=10;
isMac=(navigator.userAgent.indexOf('Mac') != -1)?true:false;

function reDo(){window.location.reload();}

function getObj(i){
   if (isDOM) {
      obj=document.getElementById('msg'+i).style;
   }else{
      obj=eval('msg'+i+((IE4)?'.style':''));
   }
   return obj;
}

function showMsg(n,show){
   var theEl=getObj(n);
   theEl.visibility=(show)?'visible':'hidden';
}

function nextMsg(){
   var fm=current;
   current=(fm==ar.length-1)?0:fm+1;
   if(current==1)loopCount++;
   if((finite&&(loopCount>=maxLoops))||!ar[1])return;
   scrollBnr(fm,current);
}

// mouseover/out new 010222 - abk

function SCRLmouseover() {
	clearInterval(intervalID);
	clearTimeout(timeoutID);
}

function SCRLmouseout() {
	intervalID=setInterval('moveUp()',interval);
}

function moveUp(){
   if (isDOM) {
		var inttoeltopdec = parseInt(toEl.top)-increment;
		fmEl.top=parseInt(fmEl.top) - increment; // + 'px' not nec
      if(inttoeltopdec<=toElTarget){
         toEl.top=toElTarget;
         clearInterval(intervalID);
        fmEl.visibility='hidden';
         timeoutID=setTimeout('nextMsg()',pause);
      }else{
         toEl.top=inttoeltopdec; // no px
      }
   }else{
      if(NS4){
         var inttoeltopdec = toEl.top-increment;
         fmEl.top-=increment;
         if(inttoeltopdec<=toElTarget){
            toEl.top=toElTarget;
            clearInterval(intervalID);
            fmEl.visibility='hidden';
            timeoutID=setTimeout('nextMsg()',pause);
         }else{
            toEl.top=inttoeltopdec;
         }
      }else{
         var inttoeltopdec = toEl.pixelTop-increment;
         fmEl.pixelTop-=increment;
         if(inttoeltopdec<=toElTarget){
            toEl.pixelTop=toElTarget;
            clearInterval(intervalID);
            fmEl.visibility='hidden';
            timeoutID=setTimeout('nextMsg()',pause);
         }else{
            toEl.pixelTop=inttoeltopdec;
         }
      }
   }
}

function scrollBnr(fm,to){
   fmEl=getObj(fm);
   toEl=getObj(to);
   if (isDOM) {
	toElTarget=parseInt(fmEl.top);        // save one parseInt 010224
	toEl.top=(toElTarget+bnrHit) + 'px'; 
//      toEl.top=(parseInt(fmEl.top)+bnrHit) + 'px';
//      toElTarget=parseInt(fmEl.top);
   }else{
      if(NS4){
         toEl.top=fmEl.top+bnrHit;
         toElTarget=fmEl.top;
      }else{
         toEl.pixelTop=fmEl.pixelTop+bnrHit;
         toElTarget=fmEl.pixelTop;
      }
   }
   showMsg(to,true);
   intervalID=setInterval('moveUp()',interval);
	// can use setTimeout for evengreater speed - abk 010227
}

function moveIE(lPos,tPos){this.style.pixelLeft=lPos;this.style.pixelTop=tPos;}
function moveDOM(lPos,tPos){this.style.left=lPos+'px';this.style.top=tPos+'px';}

function makeIE(){
	var text='<DIV ID="bnr" STYLE="position:absolute;overflow:hidden;top:'+bnrTop+';left:'+bnrLft +';width:'+bnrWid+';height:'+bnrHit+'">';
	msgWid=bnrWid-leftPadding;
	for(var i=ar.length-1;i>=0;i--){
		text+='<DIV ID="msg'+i+'" STYLE="position:absolute;overflow:hidden;visibility:hidden;top:'+ topPadding +';left:'+leftPadding+';width:'+msgWid+'"><\/DIV>';
	}
	text+='<\/DIV>';	
	document.body.insertAdjacentHTML('BeforeEnd',text);
	
//	bnr.onmouseover=SCRLmouseover;
//	bnr.onmouseout=SCRLmouseout;

	for(i=0;i<ar.length;i++){
		var scroller = eval('msg'+i);
		scroller.moveTo=moveIE;
	}
}

function makeDOM(){
	var elmParentDiv;
   
	elmParentDiv = document.createElement('div');
	elmParentDiv.id = 'bnr';
	elmParentDiv.style.position = 'absolute';
	elmParentDiv.style.overflow = 'hidden';
	elmParentDiv.style.top = bnrTop + 'px';
	elmParentDiv.style.left = bnrLft + 'px';
	elmParentDiv.style.width = bnrWid + 'px';
	elmParentDiv.style.height = bnrHit + 'px';
	
//	elmParentDiv.onmouseover = SCRLmouseover;
//	elmParentDiv.onmouseout  = SCRLmouseout;

	var elmChildDiv;
	var i;

	msgWid=bnrWid-leftPadding;

   for (i = ar.length - 1; i >= 0; i--)
   {
       elmChildDiv = document.createElement('div');
       elmChildDiv.id = 'msg' + i;
       elmChildDiv.style.position = 'absolute';
       elmChildDiv.style.visibility = 'hidden';
       elmChildDiv.style.overflow = 'hidden';
       elmChildDiv.style.top = topPadding + 'px';
       elmChildDiv.style.left = leftPadding + 'px';
       elmChildDiv.style.width = msgWid + 'px';

       elmParentDiv.appendChild(elmChildDiv);
       
       elmChildDiv.moveTo=moveDOM;
   }
   
   document.body.appendChild(elmParentDiv);
}

function makeNS(){
   bnr=new Layer(bnrWid);
   with(bnr){
      clip.right=bnrWid;
      clip.bottom=bnrHit;
      moveTo(bnrLft,bnrTop);
      visibility='show';
   }	
//	bnr.onmouseover = SCRLmouseover;
//	bnr.onmouseout  = SCRLmouseout;

   for(var i=0;i<ar.length;i++){
      eval('msg'+i+'='+'new Layer(bnrWid-leftPadding,bnr)');
      with(eval('msg'+i)){
         moveTo(leftPadding,topPadding);
      }
   }
}

function fillBnr(){
   var theEl;
   for(i=0;i<ar.length;i++){
      if (isDOM){
         theEl=document.getElementById('msg'+i);
      }else{
         theEl=eval('msg'+i);
      }
      newsStr='<A '+target+classid+
              ' HREF='+ar[newsCount][0]+'>'+ar[newsCount][1]+'<\/A>';
      if(NS4){
         with(theEl.document){write(newsStr);close();}
      }else{
         theEl.innerHTML=newsStr;
      }
      newsCount++;if(newsCount==ar.length)newsCount=0;
   }
}

function startBnr(){
   if (isDOM){makeDOM();}
      else{(NS4)?makeNS():makeIE();}
   fillBnr();
   showMsg(0,true);
   current=0;
   window.onresize=reDo;
   timeoutID=setTimeout('nextMsg()',pause);
}

function initScroller() {
   finite=(maxLoops>0);
   ar=[];
   if(!window.arURL)return;
   if(arURL.length==0)return;
   if(arURL.length<numheadlines){numheadlines=arURL.length;}
   for(i=0;i<numheadlines;i++){ar[i]=[prefix+arURL[i],arTXT[i]];}
   newsCount=0;
   if(finite){loopCount=0;}
   ispaused=0;
   bnrWid=580 // parseInt(pHT.width)-20;
   bnrHit=16 //parseInt(pHT.height)-20;
   bnrTop=bnrLft=0;

   if (document.getElementById){
      pHT=document.getElementById('ph1');
   }else{pHT=document.images['ph1'];}
   if(pHT){
      bnrWid=580 // parseInt(pHT.width)-20;
      bnrHit=16 //parseInt(pHT.height)-20;
     // bnrOffsetLeft=(parseInt(pHT.width)-bnrWid) / 2;
	  bnrOffsetLeft=2;
      bnrOffsetTop=-5;
      if(document.getElementById){
         bnrTop=((isMac)&&(IE4))?pHT.clientTop:pHT.offsetTop;
         bnrLft=((isMac)&&(IE4))?pHT.clientLeft:pHT.offsetLeft;
         tEl=pHT;
         while(tEl.offsetParent != null) {
            tEl=tEl.offsetParent;
            bnrTop+=((isMac)&&(IE4))?tEl.clientTop:tEl.offsetTop;
            bnrLft+=((isMac)&&(IE4))?tEl.clientLeft:tEl.offsetLeft;
         }
      }else{
         if (IE4) {
            arPH=[level1,level2,level3,level4,level5];
            bnrTop=bnrLft=0;
            for(i=0;i<arPH.length;i++){
               tEl = arPH[i];
               bnrTop+=tEl.offsetTop;
               bnrLft+=tEl.offsetLeft;
            }
         }else{
            bnrTop = pHT.y;
            bnrLft = pHT.x;
         }
      }
      bnrLft+=bnrOffsetLeft;
      bnrTop+=bnrOffsetTop;
      startBnr();
   }
}
window.onload=initScroller;
}
