
//browser detection

if (document.all) {n=0;ie=1;ns6=0;fShow="visible";fHide="hidden";}//ie
else if (document.getElementById){n=0;ie=0;ns6=1;fShow="";fHide="hidden";}//ns6
else if (document.layers) {n=1;ie=0;ns6=0;fShow="show";fHide="hide";}//ns4

//Initialize variables used in displaySubMenu function
rightX = 0;
leftY = 0;
leftX = 0;

//menu contents
function showToolbar(){
//addItem(id, text, hint, location, alternativeLocation);
        menu = new Menu();
        menu.addItem("north1id", "North Coast", "North Coast",  null, null);
        menu.addItem("north2id", "North West Coast", "Notrh West Coast",  null, null);      
        menu.addItem("MWid", "Mid West", "Mid West Coast",  null, null);
        menu.addItem("perth1id", "Perth Metro North", "Perth Metro North",  null, null);
		menu.addItem("perth2id", "Perth Metro South", "Perth Metro Sourh",  null, null);
	    menu.addItem("rottoid", "Rottnest", "Rottnest",  null, null);
		menu.addItem("SWid", "South West Coast", "South West Coast",  null, null);
		menu.addItem("SCid", "South Coast", "South Coast",  null, null);

// addSubItem(idParent, text, hint, location);  

        menu.addSubItem("north1id", "Calliance", "calliance.html",  "calliance.html");
        menu.addSubItem("north1id", "Karrakatta", "karrakatta.html", "karrakatta.html");
        menu.addSubItem("north1id", "Manfred",  "manfred.html", "manfred.html");
        menu.addSubItem("north1id", "SS Sunbeam", "sunbeam.html", "sunbeam.html");
        menu.addSubItem("north1id", "Yarra", "yarra.html", "yarra.html");

        menu.addSubItem("north2id", "Correio da Azia", "Correio.htm", "Correio.htm");
        menu.addSubItem("north2id", "Crown Of England", "crownengland.html", "crownengland.html");
        menu.addSubItem("north2id", "Emma", "emma.html", "emma.html");
        menu.addSubItem("north2id", "Fairy Queen", "fairyqueen.html", "fairyqueen.html");
        menu.addSubItem("north2id", "Koombana", "Koombana.htm", "Koombana.htm");
        menu.addSubItem("north2id", "Lively", "lively.html", "lively.html");
		menu.addSubItem("north2id", "Rapid", "rapid.html", "rapid.html");
        menu.addSubItem("north2id", "SS Fin", "fin.html", "fin.html");
        menu.addSubItem("north2id", "SS Mildura", "mildura.html", "mildura.html");
        menu.addSubItem("north2id", "SS Perth", "perth.html", "perth.html");
        menu.addSubItem("north2id", "SS Zvir", "zvir.html", "zvir.html");
        menu.addSubItem("north2id", "Stefano", "Stefano.htm", "Stefano.htm");
        menu.addSubItem("north2id", "Trial", "Trial.htm", "Trial.htm");
        
        menu.addSubItem("MWid", "Aagtekerke", "Aagtekerke.htm", "Aagtekerke.htm");
        menu.addSubItem("MWid", "African", "african.html", "african.html");
        menu.addSubItem("MWid", "Batavia", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Batavia/batavia.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Batavia/batavia.html");
        menu.addSubItem("MWid", "Ben ledi", "benledi.html", "benledi.html");
        menu.addSubItem("MWid", "Cervantes", "cervantes.html", "cervantes.html");
        menu.addSubItem("MWid", "Europa", "europa.html", "europa.html");
        menu.addSubItem("MWid", "Gudrun", "gudrun.html", "gudrun.html");
        menu.addSubItem("MWid", "Hadda", "hadda.html", "hadda.html");
        menu.addSubItem("MWid", "Marten", "marten.html", "marten.html");
        menu.addSubItem("MWid", "Mayhill", "mayhill.html", "mayhill.html");
        menu.addSubItem("MWid", "Ocean Queen", "oceanqueen.html", "oceanqueen.html");
        menu.addSubItem("MWid", "SS Cambewarra", "cambewarra.html", "cambewarra.html");
        menu.addSubItem("MWid", "SS Lubra", "lubra.html", "lubra.html");
        menu.addSubItem("MWid", "SS Windsor", "windsor.html", "windsor.html");
        menu.addSubItem("MWid", "SS Xantho", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Xantho/Xantho.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Xantho/Xantho.html");
        menu.addSubItem("MWid", "Zeewijk", "Zeewijk.htm", "Zeewijk.htm");
        menu.addSubItem("MWid", "Zuytdorp", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Zuytdorp/Zuytdorp.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Zuytdorp/Zuytdorp.html");
        
        menu.addSubItem("perth1id", "Alex T Brown", "alextbrown.html",  "alextbrown.html");
		menu.addSubItem("perth1id", "Conference", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/confer/confer.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/confer/confer.html");
		menu.addSubItem("perth1id", "Eglinton", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/eglint/eglint.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/eglint/eglint.html");
		menu.addSubItem("perth1id", "Gemini", "gemini.html",  "gemini.html");
		menu.addSubItem("perth1id", "Klaraborg", "klaraborg.html",  "klaraborg.html");
		menu.addSubItem("perth1id", "Lalla", "lalla.html",  "lalla.html");
		menu.addSubItem("perth1id", "SS Alkimos", "alkimos.html",  "alkimos.html");
		menu.addSubItem("perth1id", "Vergulde Draeck", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/verdra/vergulded.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/verdra/vergulded.html");
		menu.addSubItem("perth1id", "Villalta", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/villal/villalta.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/villal/villalta.html");
		menu.addSubItem("perth1id", "Ville de Rouen", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/villed/villed.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/villed/villed.html");

        menu.addSubItem("rottoid", "City of York", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/cityoy/cityoy.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/cityoy/cityoy.html");
        menu.addSubItem("rottoid", "Denton Holme", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/denhol/denhol.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/denhol/denhol.html");
		menu.addSubItem("rottoid", "Gem", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/gem/gem.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/gem/gem.html");
		menu.addSubItem("rottoid", "Janet", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/janet/janet.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/janet/janet.html");
		menu.addSubItem("rottoid", "Lady Elizabeth", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/ladyel/ladyel.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/ladyel/ladyel.html");
		menu.addSubItem("rottoid", "Mira Flores", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/mirafl/mirafl.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/mirafl/mirafl.html");
		menu.addSubItem("rottoid", "Raven", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/raven/raven.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/raven/raven.html");
		menu.addSubItem("rottoid", "SS Macedon", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/macedo/macedo.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/macedo/macedo.html");
		menu.addSubItem("rottoid", "Uribes", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/uribes/uribes.html",  "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/uribes/uribes.html");
		
		menu.addSubItem("perth2id", "Amur", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/amur/amur.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/amur/amur.html");
		menu.addSubItem("perth2id", "Belle Of Bunbury", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/belbun/belbun.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/belbun/belbun.html");
		menu.addSubItem("perth2id", "Carlisle Castle", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/carcas/carcas.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/carcas/carcas.html");
		menu.addSubItem("perth2id", "Centaur", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/centau/centau.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/centau/centau.html");
		menu.addSubItem("perth2id", "Chalmers", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/chalme/chalme.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/chalme/chalme.html");
		menu.addSubItem("perth2id", "Contest", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/contes/contes.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/contes/contes.html");
		menu.addSubItem("perth2id", "Dato", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/dato/dato.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/dato/dato.html");
		menu.addSubItem("perth2id", "Day Dawn", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/daydaw/daydaw.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/daydaw/daydaw.html");
		menu.addSubItem("perth2id", "Diana", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/diana/diana.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/diana/diana.html");
		menu.addSubItem("perth2id", "Elizabeth", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/elizab/elizab.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/elizab/elizab.html");
		menu.addSubItem("perth2id", "Hero of the Nile", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/heroni/heroni.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/heroni/heroni.html");
		menu.addSubItem("perth2id", "Highland Forest", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/hifore/hifore.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/hifore/hifore.html");
		menu.addSubItem("perth2id", "James", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/james/james.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/james/james.html");
		menu.addSubItem("perth2id", "James Matthews", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/jamesm/jamesm.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/jamesm/jamesm.html");
		menu.addSubItem("perth2id", "James Service", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/jamess/jamess.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/jamess/jamess.html");
		menu.addSubItem("perth2id", "Lancier", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/lancie/lancie.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/lancie/lancie.html");
		menu.addSubItem("perth2id", "Priestman Dredge", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/priest/priest.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/priest/priest.html");
		menu.addSubItem("perth2id", "Omeo", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/omeo/omeo.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/omeo/omeo.html");
		menu.addSubItem("perth2id", "Robertina", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/robert/robert.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/robert/robert.html");
		menu.addSubItem("perth2id", "Sepia", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/sepia/sepia.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/sepia/sepia.html");
		menu.addSubItem("perth2id", "SS Orizaba", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/orizab/orizab.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/orizab/orizab.html");
		menu.addSubItem("perth2id", "Star", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/star/star.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/star/star.html");
		menu.addSubItem("perth2id", "Ulidia", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/ulidia/ulidia.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/ulidia/ulidia.html");
		menu.addSubItem("perth2id", "Zedora", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/zedor/zedor.html", "http://www.museum.wa.gov.au/collections/maritime/march/shipwrecks/Metro/zedor/zedor.html");
		
		menu.addSubItem("SWid", "Ada", "ada.html", "ada.html");
		menu.addSubItem("SWid", "Agincourt", "agincourt.html", "agincourt.html");
		menu.addSubItem("SWid", "Arpenteur", "arpenteur.html", "arpenteur.html");
		menu.addSubItem("SWid", "Belinda", "belinda.html", "belinda.html");
		menu.addSubItem("SWid", "Carbet Castle", "carbcastle.html", "carbcastle.html");
		menu.addSubItem("SWid", "Chaudiere", "chaudiere.html", "chaudiere.html");
		menu.addSubItem("SWid", "Cumberland", "cumberland.html", "cumberland.html");
		menu.addSubItem("SWid", "Fanny Nicholson", "fannynic.html", "fannynic.html");
		menu.addSubItem("SWid", "Katinka", "katinka.html", "katinka.html");
		menu.addSubItem("SWid", "Kingfisher", "kingfisher.html", "kingfisher.html");
		menu.addSubItem("SWid", "Lady Lyttleton", "ladylyt.html", "ladylyt.html");
		menu.addSubItem("SWid", "Mandalay", "mandalay.html", "mandalay.html");
		menu.addSubItem("SWid", "Mary", "mary.html", "mary.html");
		menu.addSubItem("SWid", "Ringbolt Bay Lighter", "ringbolt.html", "ringbolt.html");
		menu.addSubItem("SWid", "Runnymede", "runnymede.html", "runnymede.html");
		menu.addSubItem("SWid", "Samuel Wright", "samwright.html", "samwright.html");
		menu.addSubItem("SWid", "Sarah Burnyeat", "sarahburn.html", "sarahburn.html");
		menu.addSubItem("SWid", "SS Escort", "escort.html", "escort.html");
		menu.addSubItem("SWid", "SS Georgette", "georgette.html", "georgette.html");
		menu.addSubItem("SWid", "SS Pericles", "pericles.html", "pericles.html");
		menu.addSubItem("SWid", "Wave", "wave.html", "wave.html");
		
		menu.addSubItem("SCid", "Batoe Bassi", "batbassi.html", "batbassi.html");
		menu.addSubItem("SCid", "Dunster Castle", "duncastle.html", "duncastle.html");
		menu.addSubItem("SCid", "Mary Ann", "maryann.html", "maryann.html");
		menu.addSubItem("SCid", "SS Franklin", "franklin.html", "franklin.html");
		menu.addSubItem("SCid", "SS Rodondo", "rodondo.html", "rodondo.html");
		menu.addSubItem("SCid", "Twilight", "twilight.html", "twilight.html");

        
        menu.showMenu();
}

//create the menu
function Menu(){
        this.addItem    = addItem;
        this.addSubItem = addSubItem;
        this.showMenu   = showMenu;
        this.bgColor     = "#0099CC";      
        this.mainPaneBorder = 1;
		this.mainPaneBorderColor = "#FFFFFF"
		this.subMenuPaneBorder = 1;
        this.borderColor = "#003162";
        this.subMenuPaneWidth = 123;
        lastMenu = null;
        
        HTMLstr = "";
        HTMLstr += "<!-- MENU PANE DECLARATION BEGINS -->\n";
        HTMLstr += "\n";
        HTMLstr += "<div id='MainTable' style='position:relative'>\n";
        HTMLstr += "<table width='100%' height='20px' cellpadding='0' cellspacing='0' bgcolor='"+this.bgColor+"' border='"+this.mainPaneBorder+"' bordercolor='"+this.mainPaneBorderColor+"'>\n";
        HTMLstr += "<tr>";
        if (n) HTMLstr += "<td>";
        HTMLstr += "<!-- MAIN MENU STARTS -->\n";
        HTMLstr += "<!-- MAIN_MENU -->\n";
        HTMLstr += "<!-- MAIN MENU ENDS -->\n";
        if (n) HTMLstr += "</td>";
        HTMLstr += "</tr>\n";
        HTMLstr += "</table>\n";
        HTMLstr += "\n";
        HTMLstr += "<!-- SUB MENU STARTS -->\n";
        HTMLstr += "<!-- SUB_MENU -->\n";
        HTMLstr += "<!-- SUB MENU ENDS -->\n";
        HTMLstr += "\n";
        HTMLstr+= "</div>\n";
        HTMLstr += "<!-- MENU PANE DECALARATION ENDS -->\n";
}

//add drop-down container
function addItem(idItem, text, hint, location, altLocation){
        var Lookup = "<!-- ITEM "+idItem+" -->";
        if (HTMLstr.indexOf(Lookup) != -1){
                alert(idParent + " already exist");
                return;
        }
        var MENUitem = "";
        MENUitem += "\n<!-- ITEM "+idItem+" -->\n";
        if (n){
                MENUitem += "<ilayer name="+idItem+">";
                MENUitem += "<a href='.' class=drophead onmouseover=\"displaySubMenu('"+idItem+"')\" onclick=\"return false;\">";
                MENUitem += "|&nbsp;";
                MENUitem += text;
                MENUitem += "</a>";
                MENUitem += "</ilayer>";
        }
        else{//IE or NS6
                MENUitem += "<td>\n";
                MENUitem += "<div id='"+idItem+"' style='position:relative; font: "+this.menuFont+";'>\n";
                MENUitem += "<a ";
                
                if(ie)
                        MENUitem += "class=drophead ";
                if(ns6)
                        MENUitem += "class=drophead ";
                        
                if (hint != null)
                        MENUitem += "title='"+hint+"' ";
                if (location != null){
                        MENUitem += "href='"+location+"' ";
                        MENUitem += "onmouseover=\"hideAll()\" ";
                }
                else{
                        if (altLocation != null)
                                MENUitem += "href='"+altLocation+"' ";
                        else
                                MENUitem += "href='.' ";
                        MENUitem += "onmouseover=\"displaySubMenu('"+idItem+"')\" ";
                        MENUitem += "onclick=\"return false;\" "
                }
                MENUitem += ">";
                MENUitem += text;
                MENUitem += "</a>\n";
                MENUitem += "</div>\n";
                MENUitem += "</td>\n";
        }
        MENUitem += "<!-- END OF ITEM "+idItem+" -->\n\n";
        MENUitem += "<!-- MAIN_MENU -->\n";

        HTMLstr = HTMLstr.replace("<!-- MAIN_MENU -->\n", MENUitem);
}

//add sub-menu items to applicable drop-down containor
function addSubItem(idParent, text, hint, location){
        var MENUitem = "";
        Lookup = "<!-- ITEM "+idParent+" -->";
        if (HTMLstr.indexOf(Lookup) == -1){
                alert(idParent + " not found");
                return;
        }
        Lookup = "<!-- NEXT ITEM OF SUB MENU "+ idParent +" -->";
        if (HTMLstr.indexOf(Lookup) == -1){
                if (n){
                        MENUitem += "\n";
                        MENUitem += "<layer id='"+idParent+"submenu' visibility=hide bgcolor='"+this.bgColor+"'>\n";
                        MENUitem += "<table border='"+this.subMenuPaneBorder+"' bordercolor='"+this.borderColor+"' bgcolor='"+this.bgColor+"' width="+this.subMenuPaneWidth+">\n";
                        MENUitem += "<!-- NEXT ITEM OF SUB MENU "+ idParent +" -->\n";
                        MENUitem += "</table>\n";
                        MENUitem += "</layer>\n";
                        MENUitem += "\n";
                }
                else{//IE or NS6
                        MENUitem += "\n";
                        MENUitem += "<div id='"+idParent+"submenu' style='position:absolute; background-color: "+this.bgColor+"; visibility: hidden; width: "+this.subMenuPaneWidth+"; top: -400;'>\n";
                        MENUitem += "<table border='"+this.subMenuPaneBorder+"' bgcolor='"+this.bgColor+"' bordercolor='"+this.borderColor+"' width="+this.subMenuPaneWidth+">\n";
                        MENUitem += "<!-- NEXT ITEM OF SUB MENU "+ idParent +" -->\n";
                        MENUitem += "</table>\n";
                        MENUitem += "</div>\n";
                        MENUitem += "\n";
                }
                MENUitem += "<!-- SUB_MENU -->\n";
                HTMLstr = HTMLstr.replace("<!-- SUB_MENU -->\n", MENUitem);
        }

        Lookup = "<!-- NEXT ITEM OF SUB MENU "+ idParent +" -->\n";
        if (n)  MENUitem = "<tr><td><a class=clsMenuItemNS title='"+hint+"' href='"+location+"'>"+text+"</a><br></td></tr>\n";
        else //IE or NS6
                if(ie)
                        MENUitem = "<tr><td><a class=clsMenuItemIE title='"+hint+"' href='"+location+"'>"+text+"</a><br></td></tr>\n";
                if(ns6)
                        MENUitem = "<tr><td><a class=clsMenuItemNS6 title='"+hint+"' href='"+location+"'>"+text+"</a><br></td></tr>\n";
        MENUitem += Lookup;
        HTMLstr = HTMLstr.replace(Lookup, MENUitem);

}

//write out main menu bar
function showMenu(){
        document.writeln(HTMLstr);
}

//show submenu, and then calculate its x and y coordinates
function displaySubMenu(idMainMenu){
        var menu;
        var submenu;
        if (n){
                submenu = document.layers[idMainMenu+"submenu"];
                if (lastMenu != null && lastMenu != submenu) hideAll();
                submenu.left = document.layers[idMainMenu].pageX;
                submenu.top  = document.layers[idMainMenu].pageY + document.layers[idMainMenu].clip.height;
                submenu.visibility = fShow;
                submenu.zIndex=1
                leftX  = document.layers[idMainMenu+"submenu"].left;
                rightX = leftX + document.layers[idMainMenu+"submenu"].clip.width;
                leftY  = document.layers[idMainMenu+"submenu"].top+document.layers[idMainMenu+"submenu"].clip.height;
        } else if (ns6) {
        
        menu = document.getElementById(idMainMenu);             
                submenu = document.getElementById(idMainMenu+"submenu");
                if (lastMenu != null && lastMenu != submenu) hideAll();
                submenu.style.left = calculateSumOffset(menu, 'offsetLeft');
                submenu.style.top  = document.getElementById(idMainMenu).offsetHeight + 4;
                submenu.style.visibility = fShow;
                leftX  = calculateSumOffset(menu, 'offsetLeft');
                rightX =leftX + document.getElementById(idMainMenu+"submenu").offsetWidth;
                leftY  = document.getElementById(idMainMenu+"submenu").offsetHeight + window.pageYOffset + 4;
        
        } else if (ie) { 
                menu = eval(idMainMenu);
                submenu = eval(idMainMenu+"submenu.style");
                if (lastMenu != null && lastMenu != submenu) hideAll();                 
                submenu.left = calculateSumOffset(menu, 'offsetLeft');
                submenu.top  = document.all[idMainMenu].offsetHeight + 4;
                submenu.visibility = fShow;
                leftX  = document.all[idMainMenu+"submenu"].style.posLeft;
                rightX = leftX + document.all[idMainMenu+"submenu"].offsetWidth;
                leftY  = document.all[idMainMenu+"submenu"].style.posTop+document.all[idMainMenu+"submenu"].offsetHeight + 4;
        }
        lastMenu = submenu;
}

//hide the submenu
function hideAll(){
        if (ns6){
                if (lastMenu != null) 
                        {lastMenu.style.visibility = fHide;}
        }else{
                if (lastMenu != null) 
                        {lastMenu.visibility = fHide;}
        }               
}

//used to calculate position of a submenu
function calculateSumOffset(idItem, offsetName){
        var totalOffset = 0;
        var item = eval('idItem');
        do{
                totalOffset += eval('item.'+offsetName);
                item = eval('item.offsetParent');
        } while (item != null);
        return totalOffset;
}

//close menu on mouse out of menu containor
function updateIt(e){
        if (ns6){
                var x = e.pageX;
                var y = e.pageY;
                if (x > rightX || x < leftX) hideAll();
                else if (y > leftY) hideAll();
        }
         else if (ie){
                var x = window.event.clientX;
                var y = window.event.clientY;
                if (x > rightX || x < leftX) hideAll();
                else if (y > leftY) hideAll();
        }
        else if (n){
                var x = e.pageX;
                var y = e.pageY;
                if (x > rightX || x < leftX) hideAll();
                else if (y > leftY) hideAll();
        }
}

//set page to hide menus on a mouse click or on mouseout of menu containor
if (ns6)
{
        document.body.onclick=hideAll;
        document.body.onmousemove=updateIt;
}
else if (ie)
{
        document.body.onclick=hideAll;
        document.body.onscroll=hideAll;
        document.body.onmousemove=updateIt;
}
else if (n)
{
        document.onmousedown=hideAll;
        window.captureEvents(Event.MOUSEMOVE);
        window.onmousemove=updateIt;
}