var gFile;

function WriteLink(aLevel, aPrefix, aLink, aText) {
  if (aLink == gFile) {
    document.writeln ("<tr><td class=NLink" + aLevel + ">" + aText + "</td></tr>"); }
  else {
    document.writeln ("<tr><td class=LinkL" + aLevel + "><a class=Menu href=\"" + aPrefix + aLink + "\">" + aText + "</a></td></tr>"); 
  }
}

function WriteMenu(aPrefix) { 
  var myloc     = window.location.href;
  var locarray  = myloc.split("/");
  gFile     = locarray[locarray.length-1];
//gFile = "index.html"

  document.writeln("<table border=0 cellpadding=0 cellspacing=0>");

  WriteLink (1, aPrefix,                 "index.html",   "Startsidan");
  WriteLink (1, aPrefix,                "bullen.html",   "Tidskr Korrschack");
  WriteLink (1, aPrefix,              "booksale.html",   "Bokhandel");
  WriteLink (1, aPrefix,                "medlem.html",   "Medlemskap");
  WriteLink (1, aPrefix,                 "utbud.html",   "Turneringsutbud");
  WriteLink (2, aPrefix,   "lagmatcher_oversikt.html",   "Lagmatcher");
  WriteLink (3, aPrefix,    "lagmatcher_anmalda.html",   "Anmälda");
  WriteLink (2, aPrefix, "inbjudan/ICCF Calendar of Events.xls",    "ICCF-kalender");
  WriteLink (2, aPrefix,           "turniccf_tt.html",   "ICCF tematurn");
  WriteLink (1, aPrefix,                "regler.html",   "Tävlingsregler");
  WriteLink (1, aPrefix,              "resultat.html",   "Resultat");
  WriteLink (2, aPrefix,              "pagaende.html",   "Pågående");
  WriteLink (2, aPrefix,              "avslutat.html",   "Avslutat");
  WriteLink (2, aPrefix,         "country_codes.html",   "Nationskoder");
  WriteLink (2, aPrefix,         "res/arkiv/idx.html",   "Spelarregister");
  WriteLink (3, aPrefix,               "swe_int.html",   "ICCF-svenskar");
  WriteLink (2, aPrefix,   "sm_statistik.htm\" target=\"_blank",    "SM-statistik");
  WriteLink (1, "http://www.iccf-webchess.com/","RatingList.aspx",   "ICCF-rating");
  WriteLink (2, aPrefix,         "ratingunderlag.zip",   "Ratingunderlag");
  WriteLink (1, aPrefix,                 "parti.html",   "Partier");
  WriteLink (1, aPrefix,              "nyhemejl.html",   "Nyhetsbrev");
  WriteLink (2, aPrefix,         "sskkbrev/indx.html",   "Arkiv");
  WriteLink (1, aPrefix,                "adress.html",   "Kontakta SSKK");
  WriteLink (2, aPrefix,                    "TL.html",   "Tävlingsledare");
  WriteLink (1, aPrefix,                "lankar.html",   "Länkar");
  document.writeln("</table>");
}