var isDOM = document.getElementById?1:0;
var isIE = document.all?1:0;
var isNS4 = (navigator.appName=='Netscape' && !isDOM)?1:0;
var isIE4 = (isIE && !isDOM)?1:0;
var isDyn = (isDOM||isIE4||isNS4);

function getRef(id, par)
{
 par = (!par ? document : (par.navigator ? par.document : par));
 return (isIE ? par.all[id] :
  (isDOM ? (par.getElementById?par:par.ownerDocument).getElementById(id) :
  par.layers[id]));
}

function getSty(id, par)
{
 return (isNS4 ? getRef(id, par) : getRef(id, par).style)
}

if (!window.LayerObj) var LayerObj = new Function('id', 'par',
 'this.ref=getRef(id, par); this.sty=getSty(id, par); return this');
function getLyr(id, par) { return new LayerObj(id, par) }

function LyrFn(fn, fc)
{
 LayerObj.prototype[fn] = new Function('var a=arguments,p=a[0]; with (this) { '+fc+' }');
}
LyrFn('x','if (!isNaN(p)) sty.left=p; else return parseInt(sty.left)');
LyrFn('y','if (!isNaN(p)) sty.top=p; else return parseInt(sty.top)');
LyrFn('vis','sty.visibility=p');
LyrFn('bgColor','if (isNS4) sty.bgColor=(p?p:null); ' +
 'else sty.backgroundColor=p');
LyrFn('bgImage','if (isNS4) sty.background.src=(p?p:null); ' + 
  'else sty.backgroundImage=(p?"url("+p+")":"") ');
LyrFn('write','if (isNS4) with (ref.document) {write(p);close()} else ref.innerHTML=p');
LyrFn('alpha','var f=ref.filters; if (f) {' +
 'if (sty.filter.indexOf("alpha")==-1) sty.filter+="alpha()"; ' +
 'if (f.length&&f.alpha) f.alpha.opacity=p } else if (isDOM) sty.MozOpacity=(p/100)');


function setLyr(lVis, docW, par)
{
 if (!setLyr.seq) setLyr.seq=0;
 if (!docW) docW=0;
 var obj = (!par ? (isNS4 ? window : document.body) :
  (!isNS4 && par.navigator ? par.document.body : par));
 var newID='_js_layer_'+setLyr.seq++;

 if (isIE) obj.insertAdjacentHTML('beforeEnd', '<div id="'+newID+
  '" style="position:absolute"></div>');
 else if (isDOM)
 {
  var newL=document.createElement('div');
  obj.appendChild(newL);
  newL.id=newID; newL.style.position='absolute';
 }
 else if (isNS4)
 {
  var newL=new Layer(docW, obj);
  newID=newL.id;
 }

 var lObj=getLyr(newID, par);
 with (lObj.sty) { visibility=lVis; left=0; top=0; width=docW }
 return lObj;
}


if (!window.page) var page = { win: window, minW: 0, minH: 0 }

page.winW=function()
 { return Math.max(this.minW, isIE?this.win.document.body.clientWidth:this.win.innerWidth) }
page.winH=function()
 { return Math.max(this.minH, isIE?this.win.document.body.clientHeight:this.win.innerHeight) }

page.scrollX=function()
 { return isIE?this.win.document.body.scrollLeft:this.win.pageXOffset }
page.scrollY=function()
 { return isIE?this.win.document.body.scrollTop:this.win.pageYOffset }






function popOver(mN, iN) { with (this)
{
 clearTimeout(hideTimer);
 overM = mN;
 overI = iN;
 var thisI = menu[mN][iN];

 if (iN && this.onmouseover) this.onmouseover();


 litOld = litNow;
 litNow = new Array();
 var litM = mN, litI = iN;
 while(1)
 {
  litNow[litM] = litI;
  if (litM == 'root') break;
  litI = menu[litM][0].parentItem;
  litM = menu[litM][0].parentMenu;
 }

 var same = true;
 for (var z in menu) if (litNow[z] != litOld[z]) same = false;
 if (same) return;



 for (thisM in menu)
 {
  if (!menu[thisM][0].lyr) continue;

  litI = litNow[thisM];
  oldI = litOld[thisM];

  if (litI && (litI != oldI)) changeCol(thisM, litI, true);

  if (oldI && (oldI != litI)) changeCol(thisM, oldI, false);

  if (isNaN(litI)) { menu[thisM][0].lyr.vis('hidden') }
 }


 clearTimeout(showTimer);
 nextMenu = '';
 if (thisI.type == 'sm:')
 {
  var targ = thisI.href, lyrM = menu[mN][0].lyr;

  with (menu[targ][0])
  {
   if (!lyr) update(targ);
   if (!lyr) return;

   lyr.x(eval(offX) + (typeof(offX)=='number' ? lyrM.x() + thisI.lyr.x() : 0));
   lyr.y(eval(offY) + (typeof(offY)=='number' ? lyrM.y() + thisI.lyr.y() : 0));

   showStr = myName + '.menu.' + targ + '[0].lyr.vis("visible")';
   nextMenu = targ;
   if (showDelay) showTimer = setTimeout(showStr, showDelay);
   else eval(showStr);
  }
 }
}}


function popChangeCol(mN, iN, isOver) { with (this.menu[mN][iN])
{
 var col = isOver ? overCol : outCol;
 if (col.indexOf('.') == -1) lyr.bgColor(col);
 else lyr.bgImage(col);

 var doFX = ((overClass != outClass) || (outBorder != overBorder));

 if (doFX && isNS4) lyr.write(this.getHTML(mN, iN, isOver));

 else if (doFX) with (lyr.ref)
 {
  className = (isOver ? overBorder : outBorder);
  var chl = (isDOM ? childNodes : children)
  for (var i = 0; i < chl.length; i++) chl[i].className = (isOver ? overClass : outClass);
 }

 if (typeof(outAlpha)=='number') lyr.alpha(isOver ? overAlpha : outAlpha);
}}


function popOut(mN, iN) { with (this)
{
 if ((mN != overM) || (iN != overI)) return;
 if (this.onmouseout) this.onmouseout();

 var thisI = menu[mN][iN];

 if (thisI.href != nextMenu) clearTimeout(showTimer);

 if (hideDelay)
 {
  var delay = ((mN == 'root') && (thisI.type != 'sm:')) ? 50 : hideDelay;
  hideTimer = setTimeout(myName + '.over("root", 0)', delay);
 }

 overM = 'root';
 overI = 0;
}}


function popClick(evt) { with (this)
{
 if (overI)
 {
  if (this.onclick) this.onclick();

  var thisI = menu[overM][overI];

  with (thisI) switch (type)
  {
   case 'sm:': return;
   case 'js:': { eval(href); break }
   case '': type = 'window';
   default: if (href) eval(type + '.location.href = "' + href + '"');
  }
 }

 over('root', 0);
}}


function popClearLyr(wN) { with (this)
{
 for (mN in menu) with (menu[mN][0]) if (par == wN) lyr = null;
}}


function addProps(obj, data, names, addNull)
{
 for (var i = 0; i < names.length; i++) if(i < data.length || addNull) obj[names[i]] = data[i];
}

function ItemStyle()
{
 var names = ['len', 'spacing', 'popInd', 'popPos', 'pad', 'outCol', 'overCol', 'outClass',
  'overClass', 'outBorder', 'overBorder', 'outAlpha', 'overAlpha'];
 addProps(this, arguments, names, true);
}

function popStartMenu(mName) { with (this)
{
 if (!menu[mName]) { menu[mName] = new Array(); menu[mName][0] = new Object(); }

 actMenu = mName;
 menu[mName].length = 1;
 nextItem = 1;
 var aM = menu[mName][0];

 var names = ['isVert', 'isVert', 'offX','offY', 'width', 'itemSty', 'par', 'parentMenu',
  'parentItem'];
 addProps(aM, arguments, names, true);

 if (!aM.lyr) aM.lyr = null;
}}

function popAddItem() { with (this)
{
 var aI = menu[actMenu][nextItem++] = new Object();

 var names = ['text', 'href', 'type', 'itemSty', 'len', 'spacing', 'popInd', 'popPos',
  'pad', 'outCol', 'overCol', 'outClass', 'overClass', 'outBorder', 'overBorder',
  'outAlpha', 'overAlpha', 'iW', 'iH', 'lyr'];
 addProps(aI, arguments, names, true);

 var iSty = (arguments[3] ? arguments[3] : menu[actMenu][0].itemSty);
 for (prop in iSty) if (aI[prop] == window.UnDeFiNeD) aI[prop] = iSty[prop];

 if (isNS4 && aI.outBorder) aI.pad++;
}}



function popGetHTML(mN, iN, isOver) { with (this)
{
 var itemStr = '';
 with (menu[mN][iN])
 {
  var textClass = (isOver ? overClass : outClass);

  if ((type == 'sm:') && popInd)
  {
   if (isNS4) itemStr += '<layer class="' + textClass + '" left="'+ ((popPos+iW) % iW) +
    '" top="' + pad + '">' + popInd + '</layer>';
   else itemStr += '<div class="' + textClass + '" style="position: absolute; left: ' +
    ((popPos+iW) % iW) + '; top: ' + pad + '">' + popInd + '</div>';
  }

  if (isNS4) itemStr += (outBorder ? '<span class="' + (isOver ? overBorder : outBorder) +
   '"><spacer type="block" width="' + (iW - 8) + '" height="' + (iH - 8) + '"></span>' : '') +
   '<layer left="' + pad + '" top="' + pad + '" width="' + (iW - (2 * pad)) + '" height="' +
   (iH - (2 * pad)) + '"><a class="' + textClass + '" href="#" ' +
   'onClick="return false" onMouseOver="status=\'\'; ' + myName + '.over(\'' + mN + '\',' +
   iN + '); return true">' + text + '</a></layer>';

  else itemStr += '<div class="' + textClass + '" style="position: absolute; left: ' + pad +
   '; top: ' + pad + '; width: ' + (iW - (2 * pad)) + '; height: ' + (iH - (2 * pad)) +
   '">' + text + '</div>';
 }
 return itemStr;
}}


function popUpdate(upMN) { with (this)
{
 if (!isDyn) return;

 for (mN in menu) with (menu[mN][0])
 {
  if (upMN && (upMN != mN)) continue;

  var eP = eval(par);
  if (eP && eP.navigator && (eP.document.readyState != 'complete')) continue;


  var str = '', iX = 0, iY = 0;

  for (var iN = 1; iN < menu[mN].length; iN++) with (menu[mN][iN])
  {
   var itemID = myName + '_' + mN + '_' + iN;

   if (type == 'sm:')
   {
    menu[href][0].parentMenu = mN;
    menu[href][0].parentItem = iN;
   }

   var shrink = (outBorder && isDOM && !isIE ? 2 : 0)
   iW = (isVert ? width : len) - shrink;
   iH = (isVert ? len : width) - shrink;

   var isImg = (outCol.indexOf('.') != -1) ? true : false;

   if (isDOM || isIE4)
   {
    str += '<div id="' + itemID + '" ' + (outBorder ? 'class="' + outBorder + '" ' : '') +
     'style="position: absolute; left: ' + iX + '; top: ' + iY + '; width: ' + iW + '; height: ' +
     iH + '; ' + (outCol ? 'background: ' + (isImg ? 'url('+ outCol+')' : outCol) : '') +
     ((typeof(outAlpha)=='number') ? '; filter: alpha(opacity='+ outAlpha + '); -moz-opacity: ' +
      (outAlpha/100) : '') +
     '; cursor: ' + ((type!='sm:' && href) ? (isIE ? 'hand' : 'pointer') : 'default') + '" ';
   }
   else if (isNS4)
   {
    str += '<layer id="' + itemID + '" left="' + iX + '" top="' + iY + '" width="' +
     iW + '" height="' + iH + '" ' + (outCol ? (isImg ? 'background="' : 'bgcolor="') +
     outCol + '" ' : '');
   }
   
   str += 'onMouseOver="' + myName + '.over(\'' + mN + '\',' + iN + ')" ' +
     'onMouseOut="' + myName + '.out(\'' + mN + '\',' + iN + ')">' +
     getHTML(mN, iN, false) + (isNS4 ? '</layer>' : '</div>');

   var spc = (outBorder ? 1 : 0)
   if (isVert) iY += len + spacing - spc;
   else iX += len + spacing - spc;

  }



  if (!lyr) lyr = setLyr('hidden', 3, eval(par));
  else if (isIE4) setTimeout(myName + '.menu.' + mN + '[0].lyr.sty.width=9', 50);

  with (lyr) { sty.zIndex = 1000; write(str) }

  for (var i = 1; i < menu[mN].length; i++)
   menu[mN][i].lyr = getLyr(myName + '_' + mN + '_' + i, lyr.ref);

 }

 position();
 menu.root[0].lyr.vis('visible');
}}


function popPosition(wN) { with (this)
{
 for (mN in menu) if (!wN || menu[mN][0].par == wN) with (menu[mN][0])
 {
  if (!lyr) return;

  if (typeof(offX)!='number' || mN=='root') lyr.x(eval(offX));
  if (typeof(offY)!='number' || mN=='root') lyr.y(eval(offY));
 }
}}



function PopupMenu(myName)
{
 this.myName = myName;

 this.showTimer = 0;
 this.hideTimer = 0;
 this.showDelay = 0;
 this.hideDelay = 800;
 this.showMenu = '';

 this.menu =  new Array();
 this.litNow = new Array();
 this.litOld = new Array();

 this.overM = 'root';
 this.overI = 0;

 this.actMenu = '';
 this.nextItem = 1;

 this.over = popOver;
 this.changeCol = popChangeCol;
 this.out = popOut;
 this.click = popClick;
 this.clearLyr = popClearLyr;
 this.startMenu = popStartMenu;
 this.addItem = popAddItem;
 this.getHTML = popGetHTML;
 this.update = popUpdate;
 this.position = popPosition;
}



var hBar = new ItemStyle(70, 0, '', 0, 6, '#000000', '#000000', 'itemText', 'itemHover', 'itemBorder', 'itemBorder', '', '');

var subM = new ItemStyle(22, 0, '>', -15, 3, '#000000', '#000000', 'itemText', 'itemHover', 'itemBorder', 'itemBorder', '', '');

var crazy = new ItemStyle(22, 0, '>', -15, 3, '#000000', '#000000', 'crazyText', 'crazyHover',
 'crazyBorder', 'crazyBorderOver', '', '');




var pMenu = new PopupMenu('pMenu');
with (pMenu)
{

startMenu('root', false, 7, 108, 29, hBar, 'topFr');
addItem('<center>The MUD', 'mMud', 'sm:');
addItem('Guilds', 'mGuilds', 'sm:');
addItem('Races', 'mRaces', 'sm:');
addItem('Help', 'mHelp', 'sm:');
addItem('Connect', 'mConnect', 'sm:');
addItem('Links', 'mLinks', 'sm:');
addItem('Game Info', 'mGame', 'sm:');

 startMenu('mMud', true, 0, 'mainFr.page.scrollY()+1', 158, crazy, 'mainFr');
 addItem('Main page', '/main.html', 'mainFr.window');
 addItem('Timeline', '/timeline.html', 'mainFr.window');
 addItem('System', '/system.html', 'mainFr.window');
 addItem('Donate', '/donate.html', 'mainFr.window');
 addItem('Maps', 'mMaps', 'sm:');
 addItem('MudCons', '/mudcons.html', 'mainFr.window');
 addItem('The Future of the mud', 'mFuture', 'sm:');

 startMenu('mGuilds', true, 0, 'mainFr.page.scrollY()+1', 158, crazy, 'mainFr');
 addItem('Warrior', '/guilds/warrior.html', 'mainFr.window');
addItem('Martial Artist', '/guilds/martial_artist.html', 'mainFr.window');
addItem('Acrobat', '/guilds/acrobat.html', 'mainFr.window');
 addItem('Abjurer', '/guilds/abjurer.html', 'mainFr.window');
addItem('Elemental', '/guilds/elemental.html', 'mainFr.window');
addItem('Psychics', '/guilds/psychics.html', 'mainFr.window');
addItem('Evoker', '/guilds/evoker.html', 'mainFr.window');
addItem('Necromancer', '/guilds/necromancer.html', 'mainFr.window');

 addItem('Weaver', '/guilds/weaver.html', 'mainFr.window');
 addItem('Unraveller', '/guilds/unraveller.html', 'mainFr.window');
 addItem('Druid', '/guilds/druid.html', 'mainFr.window');
 addItem('Shapeshifter', '/guilds/shapeshifter.html', 'mainFr.window');
addItem('Woodsman', '/guilds/woodsman.html', 'mainFr.window');
  
 startMenu('mRaces', true, 0, 'mainFr.page.scrollY()+1', 158, crazy, 'mainFr');
 addItem('Races A-H', 'mAH', 'sm:');
 addItem('Races I-Z', 'mIZ', 'sm:');
 
 startMenu('mConnect', true, 0, 'mainFr.page.scrollY()+1', 158, crazy, 'mainFr');
 addItem('Java 3k', 'window.open("/java.html")', 'js:');
  
 startMenu('mLinks', true, 0, 'mainFr.page.scrollY()+1', 100, crazy, 'mainFr');
 addItem('Clients', 'mCli', 'sm:');
 addItem('Mudding Info', 'mMif', 'sm:');
 
 startMenu('mGame', true, 0, 'mainFr.page.scrollY()+1', 158, crazy, 'mainFr');
 addItem('Who', '/3k/cgi/who.c', 'mainFr.window');
 addItem('Game Status', '/3k/cgi/status.c', 'mainFr.window');
 addItem('Player Graph', '/3k/cgi/players.c', 'mainFr.window');
 addItem('Player Pages', '/3k/playerpages.html', 'mainFr.window');
 addItem('Finger', '/3k/fingeruser.html', 'mainFr.window');
 addItem('News', 'window.open("/3k/scgi/news/news.c")', 'js:');
 addItem('Mudmail', 'window.open("/3k/scgi/webmail.c")', 'js:');
 addItem('Polls', '/3k/cgi/poll.c','mainFr.window');
 addItem('Top Plaque', '/3k/plaque.html', 'mainFr.window');
 addItem('Weekly Top Plaque', '/3k/weekly_plaque.html', 'mainFr.window');
 addItem('Old Exp. Plaques','/old_plaques/old_plaques.php','mainFr.window');
 addItem('Compare old Plaques','/old_plaques/explist.php','mainFr.window');
addItem('Exp. Growth Graphs','/old_plaques/graph_selection.php?view=graph&graph=solo','mainFr.window');
 addItem('Castle Area Map', '/3k/cgi/castle_map.c', 'mainFr.window');
 addItem('Wizard Documents', '/wiz.html', 'mainFr.window');
 addItem('Builder Application', '/3k/builderapp.html', 'mainFr.window');
 addItem('RDMP Info', 'RDMP.html', 'mainFr.window');
 addItem('View Bug Reports','/3k/scgi/bug_page.c','mainFr.window');

 startMenu('mHelp', true, 0, 'mainFr.page.scrollY()+1', 158, crazy, 'mainFr');
 addItem('Help', '/3k/help.html', 'mainFr.window');
 addItem('FAQ', 'window.open("/faq/index.html")', 'js:');
 addItem('Newbie FAQ', '/newbiefaq.html', 'mainFr.window');
 addItem('Score Help', '/score_help.html', 'mainFr.window');
 
 startMenu('mAH', true, 159, 0, 158, crazy, 'mainFr');
 addItem('Cromagnon', '/3k/cgi/races.c?=race-cromagnon.c', 'mainFr.window');
 addItem('Drow', '/3k/cgi/races.c?=race-drow.c', 'mainFr.window');
 addItem('Dwarf', '/3k/cgi/races.c?=race-dwarf.c', 'mainFr.window');
 addItem('Elf', '/3k/cgi/races.c?=race-elf.c', 'mainFr.window');
 addItem('Ent', '/3k/cgi/races.c?=race-ent.c', 'mainFr.window');
 addItem('Faerie', '/3k/cgi/races.c?=race-faerie.c', 'mainFr.window');
 addItem('Gargoyle', '/3k/cgi/races.c?=race-gargoyle.c', 'mainFr.window');
 addItem('Giant', '/3k/cgi/races.c?=race-giant.c', 'mainFr.window');
 addItem('Gnome', '/3k/cgi/races.c?=race-gnome.c', 'mainFr.window');
 addItem('Goblin', '/3k/cgi/races.c?=race-goblin.c', 'mainFr.window');
 addItem('Grorrark', '/3k/cgi/races.c?=race-grorrark.c', 'mainFr.window');
 addItem('Halfelf', '/3k/cgi/races.c?=race-halfelf.c', 'mainFr.window');
 addItem('Hobbit', '/3k/cgi/races.c?=race-hobbit.c', 'mainFr.window');
 addItem('Human', '/3k/cgi/races.c?=race-human.c', 'mainFr.window');

 startMenu('mIZ', true, 159, 0, 158, crazy, 'mainFr');
 addItem('Kobold', '/3k/cgi/races.c?=race-kobold.c', 'mainFr.window');
 addItem('Leprechaun', '/3k/cgi/races.c?=race-leprechaun.c', 'mainFr.window');
 addItem('Lizardman', '/3k/cgi/races.c?=race-lizardman.c', 'mainFr.window');
 addItem('Mindflayer', '/3k/cgi/races.c?=race-mindflayer.c', 'mainFr.window');
 addItem('Minotaur', '/3k/cgi/races.c?=race-minotaur.c', 'mainFr.window');
 addItem('Ogier', '/3k/cgi/races.c?=race-ogier.c', 'mainFr.window');
 addItem('Phoenix', '/3k/cgi/races.c?=race-phoenix.c', 'mainFr.window');
 addItem('Snakeman', '/3k/cgi/races.c?=race-snakeman.c', 'mainFr.window');
 addItem('Thrikhren', '/3k/cgi/races.c?=race-thrikhren.c', 'mainFr.window');
 addItem('Troll', '/3k/cgi/races.c?=race-troll.c', 'mainFr.window');
 addItem('Vampire', '/3k/cgi/races.c?=race-vampire.c', 'mainFr.window');
 addItem('Vinnipier', '/3k/cgi/races.c?=race-vinnipier.c', 'mainFr.window');
 addItem('Xorn', '/3k/cgi/races.c?=race-xorn.c', 'mainFr.window');
 
 startMenu('mCli', true, 102, 0, 158, crazy, 'mainFr');
 addItem('Portal', 'window.open("http://www.gameaxle.com")', 'js:');
 addItem('TinyFugue', 'window.open("http://muq.org/~hawkeye/tf/")', 'js:');
 addItem('GolteMUD', 'window.open("http://hem.passagen.se/golte/programs/goltemud.html")', 'js:');
 addItem('zMUD', 'window.open("http://www.zuggsoft.com")', 'js:');
 addItem('MCCP', 'mccp.html', 'mainFr.window');

 startMenu('mMif', true, 102, 0, 158, crazy, 'mainFr');
 addItem('MUD Connector', 'window.open("http://www.mudconnector.com")', 'js:');
 addItem('Our Roots, CIE', 'window.open("http://cie.imaginary.com")', 'js:');
 addItem('Imaginary Realities', 'window.open("http://imaginaryrealities.imaginary.com")', 'js:');

 startMenu('mMaps', true, 159, 0, 158, crazy, 'mainFr');
 addItem('Gossamer', '/3k/cgi/map.c?name=Gossamer Island', 'mainFr.window');
 addItem('Blackavar', '/3k/cgi/map.c?name=blackavar', 'mainFr.window');
 addItem('Misty', '/3k/cgi/map.c?name=Misty', 'mainFr.window');
 addItem('Emerald', '/3k/cgi/map.c?name=Emerald', 'mainFr.window');
 addItem('Hyboria', '/3k/cgi/map.c?name=hyboria', 'mainFr.window');
 addItem('Everrest', '/3k/cgi/map.c?name=everrest', 'mainFr.window');
 addItem('OddWorld', '/3k/cgi/map.c?name=oddworld', 'mainFr.window');
 addItem('Sombre Isles','/3k/cgi/map.c?name=Sombre Isles', 'mainFr.window');

 startMenu('mFuture', true, 159, 0, 158, crazy, 'mainFr');
 addItem('Problems discussion', 'future/ProblemList.html', 'mainFr.window');
 
}

var popOldOL = window.onload;

window.onload = new Function('if (popOldOL) popOldOL(); pMenu.update()');
window.onresize = new Function('ns4BugCheck(); pMenu.position()');
window.onscroll = new Function('pMenu.position()');

if (isNS4) document.captureEvents(Event.CLICK);
document.onclick = new Function('evt', 'pMenu.click(); ' +
 'if (isNS4) return document.routeEvent(evt)');


var origWinWidth = window.innerWidth;
function ns4BugCheck()
{
 if (isNS4 && origWinWidth != window.innerWidth) location.reload()
}

if (!isIE)
{
 var nsScrollX = page.scrollX(), nsScrollY = page.scrollY();
 setInterval('if (nsScrollY!=pageYOffset || nsScrollX()!=pageYOffset) ' +
  '{ nsScrollX=pageXOffset; nsScrollY=pageYOffset; window.onscroll() }', 50);
}
