// Angus wrote all this and it is copyrighted.

// lundstroem@bahnhof.se can help you to contact Angus



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||isIE||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.background=p?p:"transparent"');

LyrFn('bgImage','if (isNS4) sty.background.src=(p?p:null); ' + 

 'else sty.background=(p?"url("+p+")":"") ');

LyrFn('clip','if (isNS4) with(sty.clip) { left=a[0]; top=a[1]; right=a[2]; bottom=a[3] } ' +

 'else sty.clip="rect("+a[1]+"px "+a[2]+"px "+a[3]+"px "+a[0]+"px)" ');

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&&!window.opera) 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, MS: isIE&&!window.opera }



page.winW=function()

 { with (this) return Math.max(minW, MS?win.document.body.clientWidth:win.innerWidth) }

page.winH=function()

 { with (this) return Math.max(minH, MS?win.document.body.clientHeight:win.innerHeight) }



page.scrollX=function()

 { with (this) return MS?win.document.body.scrollLeft:win.pageXOffset }

page.scrollY=function()

 { with (this) return MS?win.document.body.scrollTop: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) with (menu[thisM][0])

 {



  if (!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 (litI && !visNow && (thisM != 'root'))

  {

   showMenu(thisM);

   visNow = true;

  }



  if (isNaN(litI) && visNow)

  {

   hideMenu(thisM);

   visNow = false;

  }

 }







 clearTimeout(showTimer);

 nextMenu = '';

 if (thisI.type == 'sm:')

 {



  var targ = thisI.href, lyrM = menu[mN][0].lyr;





  with (menu[targ][0])

  {



   if (!lyr || !lyr.ref) 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 + '.showMenu("' + targ + '"); ' +

    myName + '.menu.' + targ + '[0].visNow = true';

   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 ? ref.childNodes : ref.children)

  if (chl) 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 }

   // Otherwise, point to the window if nothing else and navigate.

   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', 'visNow', 'menuW', 'menuH'];

 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 (aI.outBorder)

 {

  if (isNS4) aI.pad++;

 }

}}







// *** MAIN MENU CREATION/UPDATE FUNCTIONS ***





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>';



  // IE4+/NS6 is an awful lot easier to work with sometimes.

  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(docWrite, upMN) { with (this)

{



 if (!isDyn) return;





 for (mN in menu) with (menu[mN][0])

 {



  if (upMN && (upMN != mN)) continue;





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





  // Also use properties of each item nested in the other with() for construction.

  for (var iN = 1; iN < menu[mN].length; iN++) with (menu[mN][iN])

  {



   var itemID = myName + '_' + mN + '_' + iN;





   var targM = menu[href];

   if (targM && (type == 'sm:'))

   {

    targM[0].parentMenu = mN;

    targM[0].parentItem = iN;

   }



   var shrink = (outBorder && ((isDOM && !isIE) || window.opera) ? 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 + '; 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;





  }









  menuW = isVert ? width : iX;

  menuH = isVert ? iY : width;









  var eP = eval(par);





  setTimeout(myName + '.setupRef("' + mN + '")', 50);

  



  if (docWrite)

  {



   var targFr = (eP && eP.navigator ? eP : window);

   targFr.document.write('<div id="' + myName + '_' + mN + '_Div" style="position: absolute; ' +

    'visibility: hidden; width: ' + menuW + '; height: ' + menuH + '; z-index: 1000">' +

    str + '</div>');

  }

  else

  {





   if (!lyr) lyr = setLyr('hidden', menuW, eP);

   else if (isIE4) setTimeout(myName + '.menu.' + mN + '[0].lyr.sty.width=' + (menuW+2), 50);





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

  }





 }

}}





function popSetupRef(mN) { with (this) with (menu[mN][0])

{



 if (!lyr || !lyr.ref) lyr = getLyr(myName + '_' + mN + '_Div', eval(par));





 for (var i = 1; i < menu[mN].length; i++)

  menu[mN][i].lyr = getLyr(myName + '_' + mN + '_' + i, lyr.ref);





 if (mN == 'root')

 {

  position();

  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 || !lyr.ref) continue;





  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 = 500;

 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.setupRef = popSetupRef;

 this.position = popPosition;

 



 this.showMenu = function(mName) { this.menu[mName][0].lyr.vis('visible') }

 this.hideMenu = function(mName) { this.menu[mName][0].lyr.vis('hidden') }

}



























// *** START EDITING HERE, READ THIS SECTION CAREFULLY! ***







// *** (1) ITEMSTYLES ***

//



var hBar = new ItemStyle(70, 10, '', 0, 0, '#006600', '#006600', 'itemText', 'itemText', '', '',

 null, null);

var subM = new ItemStyle(22, 0, '&gt;', -15, 3, '#006600', '#FFFFCC', 'itemText', 'itemHover',

 'itemBorder', 'itemBorder', null, null);



var crazy = new ItemStyle(22, 1, '&gt;', -15, 2, '#666699', '#CC6600', 'crazyText', 'crazyHover',

 'crazyBorder', 'crazyBorderOver', 80, 90);







var pMenu = new PopupMenu('pMenu');

with (pMenu)

{



// The 'root' menu is horizontal, positioned at (x = 10, y = 0) and is 17px high, and items

// by default use the colours and dimensions in the 'hBar' ItemStyle defined above.

//                        x    y   'page.winW()/2-160'    h

startMenu('root', false, 16, 54, 14, hBar);



addItem('Lainio river', 'mLain', 'sm:', hBar, 88);

addItem('Fishing', 'mFisk', 'sm:', hBar, 54);

addItem('Salmon fishing', 'mLax', 'sm:', hBar, 102);

addItem('Summer/Winter', 'mVint', 'sm:', hBar, 102);

addItem('Camp Tystnaden', 'mCamp', 'sm:', hBar, 130);

addItem('Contact', 'mKont', 'sm:', hBar, 82);

addItem('Web map', 'mWebb', 'sm:', hBar, 82);

startMenu('mLain', true, 0, 17, 140, subM);

addItem('General info', 'general_about_lainio.html', '');

addItem('The archaean river', 'uralven.html', '');

addItem('Wilderness', 'vildmark.html', '');

addItem('River map', 'fardstrackor.html', '');

addItem('More reading', 'bidrag.html', '');





startMenu('mFisk', true, 0, 17, 100, subM);

addItem('General info', 'fiske.html', '');

addItem('The fishes', 'fiskar.html', '');

addItem('Fishing tips', 'fisketips.html', '');

addItem('Ice fishing', 'vinterfiske.html', '');

//addItem('Fishing areas', 'fiskeomraden.html', '');

startMenu('mLax', true, 0, 17, 100, subM);

addItem('Laino salmon', 'lainiolaxen.html', '');

addItem('Beats', 'lainiolaxbeats.html', '');

addItem('Fishing tips', 'lainiolaxtips.html', '');

addItem('Courses', 'courses.html', '');

startMenu('mVint', true, 0, 17, 166, subM);

addItem('Summer: Drifting', 'drifting.html', '');

addItem('Summer: Caoneing', 'paddling.html', '');

addItem('Summer pictures', 'bilder_sommar.html', '');

addItem('Winter: Snow-mobile safari', 'skotersafari.html', '');

addItem('Winter: Dog sledge', 'hundspann.html', '');

addItem('Winter: Ice fishing', 'vinterfiske.html', '');

addItem('Winter weekend', 'weekend.html', '');

//addItem('Winter in Silence', 'vinter_i_tystnaden.html', '');

addItem('Winter pictures', 'bilder_vinter.html', '');

addItem('Northern lights', 'aurora_borealis.html', '');


startMenu('mCamp', true, 0, 17, 110, subM);

addItem('The camp', 'camp_tystnaden.html', '');

addItem('Map', 'karta.html', '');

 



startMenu('mKont', true, 0, 17, 130, subM);

addItem('Contact info', 'kontakt.html', '');

addItem('Reservations', 'bestall.html', '');



startMenu('mWebb', true, 0, 17, 70, subM);

addItem('Web map', 'webmap.html', '');

addItem('Home page', 'index.html', '');







startMenu('mReopen', true, 85, 0, 120, crazy);



addItem('Recent Doc 1:<br>Schedule', '#', '', crazy, 35);

addItem('Recent Doc 2:<br>Cunning Plan', '#', '', crazy, 35, 5);



addItem('Etc. etc...', '#', '', subM);







}

















if (!isNS4)

{



 pMenu.update(true);

 //anotherMenu.update(true);

}

else

{

 var popOldOL = window.onload;

 window.onload = function()

 {

  if (popOldOL) popOldOL();

  pMenu.update();

  //anotherMenu.update();

 }

}









window.onresize = function()

{

 ns4BugCheck();

 pMenu.position();

 //anotherMenu.position();

}



window.onscroll = function()

{

 pMenu.position();

 //anotherMenu.position();

}



if (isNS4) document.captureEvents(Event.CLICK);

document.onclick = function(evt)

{

 pMenu.click();

 //anotherMenu.click();

 if (isNS4) return document.routeEvent(evt);

}





// A small function that refreshes NS4 on window resize to avoid bugs, called above.

var nsWinW = window.innerWidth, nsWinH = window.innerHeight;

function ns4BugCheck()

{

 if (isNS4 && (nsWinW!=innerWidth || nsWinH!=innerHeight)) location.reload()

}



// Activate the useful 'onscroll' event for non-Microsoft browsers.

if (!isIE || window.opera)

{

 var nsPX=pageXOffset, nsPY=pageYOffset;

 setInterval('if (nsPX!=pageXOffset || nsPY!=pageYOffset) ' +

 '{ nsPX=pageXOffset; nsPY=pageYOffset; window.onscroll() }', 50);

}









function menuClip(menuObj, menuName, dir)

{



 var mD = menuObj.menu[menuName][0];



 if (!mD.timer) mD.timer = 0;

 if (!mD.counter) mD.counter = 0;

 with (mD)

 {



  clearTimeout(timer);



  if (!lyr || !lyr.ref) return;



  if (dir==1) lyr.vis('visible');



  lyr.sty.zIndex = 1001 + dir;



  lyr.clip(0, 0, menuW+2, (menuH+2)*Math.pow(Math.sin(Math.PI*counter/20),0.75) );

  counter += dir;

  if (counter==11) { counter = 10; if (isDOM&&!isIE) lyr.sty.clip='' }

  else if (counter<0) { counter = 0; lyr.vis('hidden') }

//  else timer = setTimeout(menuObj.myName+'.'+(dir==1?'show':'hide')+'Menu("'+menuName+'")', 40);

   else timer = setTimeout(menuObj.myName+'.'+(dir==1?'show':'hide')+'Menu("'+menuName+'")', 1);

 }

}





// Add the effect to the 'pMenu' menu object for supported browsers. Opera doesn't support clipping

// so we turn it off, neither does IE4/Mac.

if (!window.opera)

{

 pMenu.showMenu = new Function('mN','menuClip(pMenu, mN, 1)');

 pMenu.hideMenu = new Function('mN','menuClip(pMenu, mN, -1)');

 // Add it to other menu objects like this...

 //anotherMenu.showMenu = new Function('mN','menuClip(anotherMenu, mN, 1)');

 //anotherMenu.hideMenu = new Function('mN','menuClip(anotherMenu, mN, -1)');

}





















/*

pMenu.onclick = function() { with (this)

{

 // Do actions depending on the item that the mouse was over at the time of the click.

 // You may with to use nested IFs or 'switch' statements etc. if you're familiar with JS.

 if (overM == 'root' && overI == 1) status = 'Congratulations, you\'ve mastered clicking!';

 if (overM == 'root' && overI == 2) location.href = 'edit.html';

}}



// Set the status message to the URL if the 'action type' is nothing, and clear on mouseout.

pMenu.onmouseover = function() { with (this)

{

 // By now, you either have my JS Object Browser script from my site or you need it... try

 // embedding in an IFrame and typing 'pMenu' into its Go To field to see the menu internals.

 with (menu[overM][overI]) if (!type) status = href;

}}

pMenu.onmouseout = function() { status = '' }

*/







// This illustrates changing the contents of the menu -- delete this, it's unnecessary...

// This DOES NOT WORK in Opera yet (as of v6.00 at time of writing) by the way.

function changeMenu() { with (pMenu)

{

 // If your modifications are quite extensive, probably hide the menu before commencing

 // them, as the script relies on the menu array in realtime to handle highlighting etc.

 //over('root', 0);

 //menu.root[0].lyr.vis('hidden');



 // Create a whole new menu...

 startMenu('mNewMenu', true, 0, 22, 130, subM);

 addItem('<b>TwinHelix Designs:</b><br>Extreme DHTML.<br>Small Code.<br>Click to Visit...',

  'window.open("http://www.twinhelix.com")', 'js:', subM, 70);



 // Alter just the 'Visit My Site' menu item to pop it out... setting nextItem tells the

 // addItem() command which item number we are up to in the sequence.

 actMenu = 'root';

 nextItem = 4;

 addItem('&nbsp; Dynamism...', 'mNewMenu', 'sm:', hBar, 80);



 // Call the update function to implement our changes.

 update();

}}





// This is just the moving command called when you click the feature list.

function moveRoot()

{

 with (pMenu.menu.root[0].lyr) x( (x()<100) ? 100 : 10);

}