//an array containing information about all scrollers
var MWJScrollers = new Array();
//Opera 5, 6 and iCab are special - they use an iframe
var MWJ_isOpera6 = ( navigator.userAgent.toLowerCase().indexOf( 'opera' ) + 1 && !document.childNodes ) || ( window.ScriptEngine && ScriptEngine().indexOf( 'InScript' ) + 1 );
function getRefToDivNest( divID, oDoc ) {
if( !oDoc ) { oDoc = document; }
if( document.layers ) {
if( oDoc.layers[divID] ) { return oDoc.layers[divID]; } else {
for( var x = 0, y; !y && x < oDoc.layers.length; x++ ) {
y = getRefToDivNest(divID,oDoc.layers[x].document); }
return y; } }
if( document.getElementById ) { return document.getElementById(divID); }
if( document.all ) { return document.all[divID]; }
return document[divID];
}
function reWriteSCRL(oDiv,oFrame,oString) {
if( MWJ_isOpera6 ) {
//Opera 5 & 6 and iCab do not allow layers to be re-written / clipped, so I use an iframe - location about:blank
var oContent = window.opera ? window.open('',oFrame) : window.frames[oFrame].window; //this makes a small flicker - if I don't do this it won't work in Op 6
oContent.document.open('text/html','replace'); //iframe syntax - do not add to history
oContent.document.write('Dynamic content'+oString+'');
oContent.document.close();
} else {
//I use layers (NS && DOM) to provide re-writing and clipping.
//Konq2 cannot scroll iframes or clip so it should produce a moving layer, but does not.
var oContent = getRefToDivNest(oDiv); if( !oContent ) { oContent = new Object(); }
if( oContent.document && oContent.document != document ) {
oContent.document.open(); //Separate contents syntax
oContent.document.write('Dynamic content'+oString+'');
oContent.document.close();
} else {
oContent.innerHTML = oString;
}
}
}
function createScroller() {
if( document.layers ) {
//create the border with an ilayer
document.write('\n' );
//offset the container (clipped) layer to give a border
document.write('\n' );
document.write('\n' );
} else if( MWJ_isOpera6 ) {
//create the scroller with an iframe (the table creates a border - used instead of stylesheets so iCab also draws it)
document.write('
' );
} else {
//create the scroller with Div elements
document.write( '
' );
document.write( '
' );
//this extra div provides the background colour preventing a Gecko rewrite flicker and allowing the IE5 Mac bug fix (see below)
document.write( '' );
document.write( '
' );
}
}
function msgScroller(oH,oW,oTH,oBW,oBC,oSD,oPT,oSP,oBGC) {
if( arguments.length > 9 ) { window.alert('Incompatible scroller script - see the source'); window.onerror = function () { return true; }; return; }
this.height = oH; this.width = oW; this.textHeight = oTH; this.border = [ oBW, oBC ];
this.scrollSpeed = oSD; this.pauseLength = oPT; this.stopOff = oSP; this.background = oBGC;
this.msgArray = ['']; this.scrollNum = window.MWJScrollers.length; this.buildScroller = createScroller;
this.layer = 'scLyEr' + window.MWJScrollers.length;
this.iframe = 'scFrAm' + window.MWJScrollers.length;
window.MWJScrollers[window.MWJScrollers.length] = this;
}
//now do the bit that works out what to write and how far to scroll
function rotMsg(oNum,sCroll,oUnit) {
//the size of the div must be 2 * height of scroller + height of writing
oUnit = MWJScrollers[oUnit];
if( MWJ_isOpera6 ) { //scroll the iframe
window.frames[oUnit.iframe].scrollTo(0,sCroll);
} else {
var refToDiv = getRefToDivNest(oUnit.layer);
if( !refToDiv ) { return; } //not supported
if( refToDiv.style ) { refToDiv = refToDiv.style; }
//to make up for the lack of offset (used to avoid the IE5 Mac bug - see below), I add it in here
refToDiv.top = ( ( document.layers ? 0 : oUnit.height ) - sCroll ) + ( document.childNodes ? 'px' : 0 );
}
if( sCroll == 0 ) { //next message
if( MWJ_isOpera6 || document.layers ) {
//use a table to provide scroller colour and offset
reWriteSCRL(oUnit.layer,oUnit.iframe,'
'+oUnit.msgArray[oNum]+'
');
} else {
//IE5 Mac has horrible rendering bugs when moving layers whose contents are larger than their parent container,
//so I create no offset here and instead put the offset in when I scroll. The layer behind provides the colour
reWriteSCRL(oUnit.layer,oUnit.iframe,'
'+oUnit.msgArray[oNum]+'
');
}
oNum++; if( oNum >= oUnit.msgArray.length ) { oNum = 0; }
}
if( sCroll >= oUnit.height + oUnit.textHeight ) { sCroll = -3; } //top of travel, reset
//if it is one or two px away from the stopoff point, push it up just enough to reach it - pause at the stopoff point
window.setTimeout( 'rotMsg('+oNum+','+(((oUnit.height-oUnit.stopOff)-sCroll==1||(oUnit.height-oUnit.stopOff)-sCroll==2)?oUnit.height-oUnit.stopOff:sCroll+3)+','+oUnit.scrollNum+');', ( sCroll == oUnit.height - oUnit.stopOff ) ? oUnit.pauseLength : oUnit.scrollSpeed );
}
window.onload = function () { for( var x = 0; x < MWJScrollers.length; x++ ) { rotMsg( 0, 0, x ); } }