// Do navigation and start preloading
function pageInit() {
  var code = "";
  code += writeContent("p");  // Primary text
  code += writeNav("n");  // Secondary navigation
  code += writeContent("s");  // Secondary text
  document.getElementById("main").innerHTML = code;
  preloader();
}

// Navigate to some text / nav / text.
function nav(p,n,s) {
  location.href = "index.html?p="+p+"&n="+n+"&s="+s;
}

// Insert html text for one of our pages.
function writeContent(param) {
  var page;
  // Guarantee there is at least some main text
  if(param=="p"&&gup(param)=="")
    page = "welkom";
  else
    page = gup(param);
  // Retrieve page content
  var code = "";
  if(page.length)
    code =
        "<div class='top'></div><div class='middle'><div class='content'>"
      + getContent(page)
      + "</div></div><div class='bottom'></div>"
  //document.writeln(html);
  return code;
}

// Insert code for some clickable subnavigation.
function subNavButton(name,id,n1,n2,n3) {
  //return "<input type=\"button\" class=\"subnav "+id+"\" onclick=\"nav('"+n1+"','"+n2+"','"+n3+"')\" />\n";
  return "<a class=\"subnav\" href=\"javascript:nav('"+n1+"','"+n2+"','"+n3+"')\">"+name+"</a>\n";
}

// Insert a new navigation bar.
function writeNav(param) {
  var page = gup(param);
  var code = "";
  if(page.length)
    code =
        "<div class='subnav'>"
      + getContent(page)
      + "</div>";
  //document.writeln(html);
  return code;
}

// Lookup some content.
function getContent(id) {
  var code;
  switch(id) {
  
    // Main content
    case "welkom": code =
        //"<h2>Welkom</h2>"
        "<p class=\"quote\">Sinds 1939 een begrip in Breda en omstreken</p>"
      + "<p><img src=\"foto/home/home01_thumb.jpg\" class=\"photo home_left\" onclick=\"viewPhoto('foto/home/home01.jpg')\" />Welkom op de website van de gebroeders Joosen. Wij zijn gespecialiseerd in trouw- en rouwvervoer en verzorgen dat door heel Zuid-West Nederland.</p>"
      + "<p>Voor de mooiste dag van uw leven hebben wij verschillende romantische koetsen in onze collectie. U hebt bij ons de keuze tussen verschillende paarden waaronder schitterende witte paarden of zeer mooie Friese paarden.</p>"
      + "<p><img src=\"foto/home/home02_thumb.jpg\" class=\"photo home_right\" onclick=\"viewPhoto('foto/home/home02.jpg')\" />Onze koetsiers gaan gekleed in originele rode of donkerblauwe koetsiersjassen naar uw keuze.</p>"
      + "<p>Tevens kunt u bij ons stadsritten maken in de binnenstad van Breda, of in de schitterende bossen en verdere omgeving.</p>"
      + "<p>Graag tonen wij u onze uitgebreide collectie rijtuigen en auto&prime;s. Voor inlichtingen en bezichtiging kunt u <a href=\"index.html?p=contact\">contact</a> met ons opnemen.</p>";
      break;
    case "trouwkoetsen": code =
      "<h2>Trouwkoetsen</h2>"
      + "<p>Al onze trouwkoetsen kunnen worden bespannen met witte paarden of Friese paarden. Onze koetsiers gaan gekleed in originele rode of donkerblauwe koetsiersjassen naar keuze. Tevens kunnen wij op onze trouwkoetsen naar wens bloemversieringen aanbrengen. Ook kunt u bij ons na het uitkiezen van een dichte coup&eacute; de Victoria (open koets) reserveren voor als het mooi weer is.</p>";
      break;
    case "rouwkoetsen": code =
        "<h2>Rouwkoetsen</h2>"
      + "<p>Om in stijl afscheid te kunnen nemen van uw dierbaren bieden wij u de volgende mogelijkheden, waaronder zwarte rouwkoets met twee of vier paarden, witte rouwkoets met twee of vier witte paarden, volgkoetsen en een platte kar met twee paarden. Ook kunnen wij een witte rouwstoet begeleiden met witte paarden. Onze koetsiers zijn gekleed in gepaste kledij, zoals originele koetsiers jassen met steek en zwarte hoeden.</p>";
      break;
    case "autos": code =
        "<h2>Auto&prime;s</h2>"
      + "<p>Al onze auto&prime;s worden geleverd met chauffeur, alleen met de Kever Cabrio mag u eventueel zelf rijden.</p>";
      break;
    case "diversen": code =
        "<h2>Diversen</h2>"
      + "<p>Naast onze trouw- en rouwservice bieden wij u tal van mogelijkheden aan om van onze diensten gebruik te maken.</p>";
      break;
    case "fotoalbum": code =
        "<h2>Fotoalbum</h2>"
      + startPhoto()
      + "<div>Begeleiding rouwstoet</div>"
      + insertAlbumPhoto("11")
      + insertAlbumPhoto("12")
      + insertAlbumPhoto("13")
      + endPhoto()
      + startPhoto()
      + "<div>Meiden van De Wit</div>"
      + insertAlbumPhoto("08")
      + insertAlbumPhoto("09")
      + endPhoto()
      + startPhoto()
      + "<div>Pietje Bell</div>"
      + insertAlbumPhoto("07")
      + endPhoto()
      + startPhoto()
      + "<div>Girl in Hyacinth Blue</div>"
      + insertAlbumPhoto("03")
      + endPhoto()
      + startPhoto()
      + "<div>In naam der Koningin</div>"
      + insertAlbumPhoto("01")
      + endPhoto()
      + startPhoto()
      + "<div>Overigen</div>"
      + insertAlbumPhoto("02")
      + insertAlbumPhoto("04")
      + insertAlbumPhoto("05")
      + "<br />"
      + insertAlbumPhoto("06")
      + insertAlbumPhoto("10")
      + endPhoto();
      break;
    case "links": code =
        "<h2>Links</h2>"
      + "<table style=\"margin: 0px 16px;\" cellspacing=\"8px\">"
      
      //+ "<tr><td><a href=\"http://www.marijnkroese.nl/\" target=\"_new\"></a></td>"
      //+ "<td>Marijn Kroese<br /><a href=\"http://www.marijnkroese.nl/\" target=\"_new\">http://www.marijnkroese.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.estherstevens.nl/\" target=\"_new\"><img src=\"image/logo_estherstevens.png\" alt=\"Esther Stevens\" /></a></td>"
      + "<td>Esther Stevens<br /><a href=\"http://www.estherstevens.nl/\" target=\"_new\">http://www.estherstevens.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.robertgovers.nl/\" target=\"_new\"><img src=\"image/logo_robertgovers.png\" alt=\"Robert Govers\" /></a></td>"
      + "<td>Robert Govers<br /><a href=\"http://www.robertgovers.nl/\" target=\"_new\">http://www.robertgovers.nl/</a></td></tr>"
      
      //+ "<tr><td><a href=\"http://www.wedding-car.nl/\" target=\"_new\"></a></td>"
      //+ "<td>Oldtimer Trouwauto Vervoer<br /><a href=\"http://www.wedding-car.nl/\" target=\"_new\">http://www.wedding-car.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.detijd-rijsbergen.nl/\" target=\"_new\"><img src=\"image/logo_detijd.png\" alt=\"De Tijd\" /></a></td>"
      + "<td>Feestlokatie De Tijd<br /><a href=\"http://www.detijd-rijsbergen.nl/\" target=\"_new\">http://www.detijd-rijsbergen.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.deperfectetrouwdag.nl/\" target=\"_new\"><img src=\"image/logo_perfecte_trouwdag.png\" alt=\"De Perfecte Trouwdag\" /></a></td>"
      + "<td>De Perfecte Trouwdag<br /><a href=\"http://www.deperfectetrouwdag.nl/\" target=\"_new\">http://www.deperfectetrouwdag.nl/</a></td></tr>"
      
      + "<tr><td align=\"center\"><a href=\"http://www.passion4weddingplanning.nl/\" target=\"_new\"><img src=\"image/logo_passion4weddingplanning.png\" alt=\"Passion 4 Weddingplanning\" /></a></td>"
      + "<td>Passion 4 Weddingplanning<br /><a href=\"http://www.passion4weddingplanning.nl/\" target=\"_new\">http://www.passion4weddingplanning.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.koetshuisanneville.nl/\" target=\"_new\"></a></td>"
      + "<td>Trouwlokatie<br /><a href=\"http://www.koetshuisanneville.nl/\" target=\"_new\">http://www.koetshuisanneville.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.webtop20.nl/trouwservice/\" target=\"_new\"></a></td>"
      + "<td>Web Top 20<br /><a href=\"http://www.webtop20.nl/trouwservice/\" target=\"_new\">http://www.webtop20.nl/trouwservice/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.b9.nl/retour/index.htm?i=700653\" target=\"_new\"></a></td>"
      + "<td>B9<br /><a href=\"http://www.b9.nl/retour/index.htm?i=700653\" target=\"_new\">http://www.b9.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://koetsen.2link.be/\" target=\"_new\"></a></td>"
      + "<td>Ceremonie Belgi&euml;<br /><a href=\"http://koetsen.2link.be/\" target=\"_new\">http://koetsen.2link.be/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.trouwdag.opzijnbest.nl/\" target=\"_new\"></a></td>"
      + "<td>Trouwdag OpZijnBest<br /><a href=\"http://www.trouwdag.opzijnbest.nl/\" target=\"_new\">http://www.trouwdag.opzijnbest.nl/</a></td></tr>"
      
      + "<tr><td><a href=\"http://www.uitvaartverzorging.opzijnbest.nl/\" target=\"_new\"></a></td>"
      + "<td>Uitvaartverzorging OpZijnBest<br /><a href=\"http://www.uitvaartverzorging.opzijnbest.nl/\" target=\"_new\">http://www.uitvaartverzorging.opzijnbest.nl/</a></td></tr>"
      
      + "</table>"
      break;
    case "contact": code =
        "<h2>Contact</h2>"
      + "<p>Hier vindt u alle benodigde gegevens om contact met ons op te kunnen nemen.</p>"
      + "<table class=\"contact\">"
      + "<tr><td rowspan=\"3\" style=\"font-weight:bold;width:100px;\">Adres:</td><td>Menno van Coehoornstraat 6</td></tr>"
      + "<tr><td>(100 m vanaf station)</td></tr>"
      + "<tr><td>4811 AV Breda</td></tr>"
      + "</table>"
      + "<p>Heeft u vragen en/of opmerkingen met betrekking tot ons aanbod of overige diensten? Wij staan u graag te woord!</p>"
      + "<table class=\"contact\">"
      + "<tr><td style=\"font-weight:bold;width:100px;\">Tel.:</td><td>076-522 25 00</td></tr>"
      + "<tr><td style=\"font-weight:bold;width:100px;\">B.g.g.:</td><td>076-521 00 03</td></tr>"
      + "<tr><td style=\"font-weight:bold;width:100px;\">Mobiel:</td><td>06 - 22 87 31 82</td></tr>"
      + "<tr><td style=\"font-weight:bold;width:100px;\">Fax:</td><td>076-520 82 49</td></tr>"
      + "</table>"
      + "<p align=\"right\"><a href=\"javascript:void(0)\" onclick=\"history.back(1)\"><<< Terug</a></p>";
      break;
    
    // Trouwkoetsen
    case "trouwkoetsen_nav": code =
      subNavButton("Glazen coup&eacute;","glazen_coupe","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_glazen_coupe") +
      subNavButton("Witte coup&eacute;","witte_coupe","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_witte_coupe") +
      subNavButton("Fabiola-coup&eacute;","fabiola_coupe","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_fabiola_coupe") +
      subNavButton("Victoria","victoria","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_victoria") +
      subNavButton("Blauwe coup&eacute;","blauwe_coupe","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_blauwe_coupe") +
      subNavButton("Volgkoetsen","volgkoetsen","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_volgkoetsen") +
      subNavButton("Landauer","landauer","trouwkoetsen","trouwkoetsen_nav","trouwkoetsen_landauer");
      break;
    case "trouwkoetsen_glazen_coupe": code =
      "<h2>Glazen Coup&eacute;</h2>"
      + "<p>De glazen coup&eacute; is een witte koets die getrokken kan worden door twee of vier paarden en is geschikt voor twee volwassen personen en twee bruidskinderen.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","glazen_coupe","01")
      + insertPhoto("trouwkoetsen","glazen_coupe","02")
      + insertPhoto("trouwkoetsen","glazen_coupe","03")
      + insertPhoto("trouwkoetsen","glazen_coupe","04")
      + endPhoto();
      break;
    case "trouwkoetsen_witte_coupe": code =
        "<h2>Witte Coup&eacute;</h2>"
      + "<p>De witte coup&eacute; is een witte koets die getrokken kan worden door twee of vier paarden. In de koets kunnen twee volwassen personen en twee bruidskinderen plaatsnemen. Doordat de coup&eacute; aan de achter- en zijkanten dicht is kan men ontspannen en romantisch vervoerd worden.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","witte_coupe","01")
      + insertPhoto("trouwkoetsen","witte_coupe","02")
      + endPhoto();
      break;
    case "trouwkoetsen_fabiola_coupe": code =
        "<h2>Fabiola-coup&eacute;</h2>"
      + "<p>De fabiola-coup&eacute; is een witte koets die rondom van glas voorzien is en ook een glazen dak heeft. Kan getrokken worden door twee of vier paarden en is geschikt voor twee volwassen personen en twee bruidskinderen.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","fabiola_coupe","01")
      + insertPhoto("trouwkoetsen","fabiola_coupe","02")
      + endPhoto();
      break;
    case "trouwkoetsen_victoria": code =
        "<h2>Victoria</h2>"
      + "<p>De Victoria is een wit, open rijtuig dat getrokken kan worden door twee of vier paarden. Het rijtuig is geschikt voor twee volwassen personen en twee bruidskinderen. De koets kan open of halfgesloten gereden worden. Het rijtuig wordt meestal gebruikt bij mooi weer, maar bij slecht weer kan de kap omhoog.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","victoria","01")
      + insertPhoto("trouwkoetsen","victoria","02")
      + insertPhoto("trouwkoetsen","victoria","03")
      + insertPhoto("trouwkoetsen","victoria","04")
      + insertPhoto("trouwkoetsen","victoria","05")
      + insertPhoto("trouwkoetsen","victoria","06")
      + insertPhoto("trouwkoetsen","victoria","07")
      + endPhoto();
      break;
    case "trouwkoetsen_blauwe_coupe": code =
        "<h2>Blauwe Coup&eacute;</h2>"
      + "<p>Deze coup&eacute; is een blauwe koets die getrokken kan worden door twee of vier paarden. Het rijtuig is geschikt voor twee volwassen personen en twee bruidskinderen. Doordat de coup&eacute; aan de achter- en zijkanten gesloten is men ontspannen en romantisch vervoerd worden.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","blauwe_coupe","01")
      + insertPhoto("trouwkoetsen","blauwe_coupe","02")
      + insertPhoto("trouwkoetsen","blauwe_coupe","03")
      + insertPhoto("trouwkoetsen","blauwe_coupe","04")
      + endPhoto();
      break;
    case "trouwkoetsen_volgkoetsen": code =
        "<h2>Volgkoetsen</h2>"
      + "<p>De volgkoetsen die wij gebruiken zijn <span class=\"i\">vigilante</span> en zijn geschikt voor vier volwassen personen. Deze koetsen worden getrokken door twee paarden.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","volgkoetsen","01")
      + insertPhoto("trouwkoetsen","volgkoetsen","02")
      + insertPhoto("trouwkoetsen","volgkoetsen","03")
      + endPhoto();
      break;
    case "trouwkoetsen_landauer": code =
        "<h2>Landauer</h2>"
      + "<p>De landauer is een dichte koets die ook helemaal open of halfopen gereden kan worden bij mooi weer. Zo is deze koets te gebruiken voor elk weertype. Het rijtuig is geschikt voor vier volwassen personen en kan worden getrokken door twee of vier paarden. Deze koets wordt ook als volgkoets gebruikt en bij openingen of evenementen.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","landauer","01")
      + insertPhoto("trouwkoetsen","landauer","02")
      + insertPhoto("trouwkoetsen","landauer","03")
      + insertPhoto("trouwkoetsen","landauer","04")
      + insertPhoto("trouwkoetsen","landauer","05")
      + insertPhoto("trouwkoetsen","landauer","06")
      + insertPhoto("trouwkoetsen","landauer","07")
      + endPhoto();
      break;
    
    // Rouwkoetsen
    case "rouwkoetsen_nav": code =
      subNavButton("Zwarte Rouwkoets","zwarte_rouwkoets","rouwkoetsen","rouwkoetsen_nav","rouwkoetsen_zwarte_rouwkoets") +
      subNavButton("Witte Rouwkoets","witte_rouwkoets","rouwkoetsen","rouwkoetsen_nav","rouwkoetsen_witte_rouwkoets") +
      subNavButton("Volgkoetsen","volgkoetsen","rouwkoetsen","rouwkoetsen_nav","rouwkoetsen_volgkoetsen") +
      subNavButton("Platte Wagen","platte_wagen","rouwkoetsen","rouwkoetsen_nav","rouwkoetsen_platte_wagen");
      break;
    case "rouwkoetsen_zwarte_rouwkoets": code =
        "<h2>Zwarte Rouwkoets</h2>"
      + "<p>Met deze prachtige zwarte rouwkoets kunt u op stijlvolle en waardige wijze afscheid nemen van uw dierbaren. De koets kan getrokken worden door twee of vier Friese paarden met traditionele rouwkleden, kappen en pluimen.</p>"
      + startPhoto()
      //+ insertPhoto("rouwkoetsen","zwarte_rouwkoets","01")
      //+ insertPhoto("rouwkoetsen","zwarte_rouwkoets","02")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","03")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","04")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","05")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","06")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","07")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","08")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","09")
      + "<br />"
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","10")
      + insertPhoto("rouwkoetsen","zwarte_rouwkoets","11")
      + endPhoto()
      + "<p align=\"center\">Ook kan de koets naar wens zwart-wit bespannen worden.</p>";
      break;
    case "rouwkoetsen_witte_rouwkoets": code =
        "<h2>Witte Rouwkoets</h2>"
      + "<p>Met deze prachtige witte rouwkoets kunt u op stijlvolle en waardige wijze afscheid nemen van uw dierbaren. De koets kan getrokken worden door twee of vier prachtige witte paarden met witte pluimen, of Friese paarden.</p>"
      + startPhoto()
      + insertPhoto("rouwkoetsen","witte_rouwkoets","01")
      //+ insertPhoto("rouwkoetsen","witte_rouwkoets","02")
      + insertPhoto("rouwkoetsen","witte_rouwkoets","03")
      + insertPhoto("rouwkoetsen","witte_rouwkoets","04")
      + insertPhoto("rouwkoetsen","witte_rouwkoets","09")
      + "<br />"
      + insertPhoto("rouwkoetsen","witte_rouwkoets","05")
      + insertPhoto("rouwkoetsen","witte_rouwkoets","06")
      + insertPhoto("rouwkoetsen","witte_rouwkoets","07")
      + insertPhoto("rouwkoetsen","witte_rouwkoets","08")
      + endPhoto()
      + "<p align=\"center\">Begeleiding van rouwstoet met vier witte paarden.</p>"
      break;
    case "rouwkoetsen_volgkoetsen": code =
        "<h2>Volgkoetsen</h2>"
      + "<p>De volgkoetsen zijn geschikt voor vier volwassen personen en worden getrokken door twee paarden. De koetsiers gaan gekleed in traditionele kledij.</p>"
      + startPhoto()
      + insertPhoto("rouwkoetsen","volgkoetsen","01")
      + insertPhoto("rouwkoetsen","volgkoetsen","02")
      + endPhoto();
      break;
    case "rouwkoetsen_platte_wagen": code =
        "<h2>Platte Wagen</h2>"
      + "<p>Deze platte wagen kan gebruikt worden om uw dierbare naar zijn of haar laatste rustplaats te brengen. Tevens kan deze kar als bloemenwagen fungeren.</p>"
      + startPhoto()
      + insertPhoto("rouwkoetsen","platte_wagen","01")
      + insertPhoto("rouwkoetsen","platte_wagen","02")
      + insertPhoto("rouwkoetsen","platte_wagen","03")
      + insertPhoto("rouwkoetsen","platte_wagen","04")
      + endPhoto();
      break;
    
    // Auto's
    case "autos_nav": code =
      subNavButton("Trouwauto&prime;s","trouwautos","autos","autos_nav","autos_trouwautos") +
      subNavButton("Rouwauto&prime;s","rouwautos","autos","autos_nav","autos_rouwautos") +
      subNavButton("Volgauto&prime;s","volgautos","autos","autos_nav","autos_volgautos");
      break;
    case "autos_trouwautos": code =
        "<h2>Trouwauto&prime;s</h2>"
      + startPhoto()
      + insertPhoto("autos","trouwauto","03")
      + insertPhoto("autos","trouwauto","04")
      + endPhoto()
      + "<p align=\"center\">Cadillac Sedan de Ville, 1959.</p>"
      + startPhoto()
      + insertPhoto("autos","trouwauto","01")
      + insertPhoto("autos","trouwauto","02")
      + endPhoto()
      + "<p align=\"center\">Kever Cabrio.</p>";
      break;
    case "autos_rouwautos": code =
        "<h2>Rouwauto&prime;s</h2>"
      + startPhoto()
      + insertPhoto("autos","rouwauto","01")
      + insertPhoto("autos","rouwauto","02")
      + insertPhoto("autos","rouwauto","03")
      + endPhoto()
      + "<p align=\"center\">Chevrolet Caprice.</p>";
      break;
    case "autos_volgautos": code =
        "<h2>Volgauto&prime;s</h2>"
      + startPhoto()
      + insertPhoto("autos","volgauto","01")
      + endPhoto()
      + "<p align=\"center\">Zwarte Chevrolet Caprice, 5 personen.</p>";
      break;
    
    // Diversen
    case "diversen_nav": code =
        getContent("diversen_nav_0")
      + "</div>"
      + "<div class=\"subnav\">"
      + getContent("diversen_nav_1");
      break;
    case "diversen_nav_0": code =
      subNavButton("Postkoets","postkoets","diversen","diversen_nav","diversen_postkoets") +
      subNavButton("Landauer","landauer","diversen","diversen_nav","diversen_landauer") +
      subNavButton("Jan Plezier","jan_plezier","diversen","diversen_nav","diversen_jan_plezier") +
      subNavButton("Open paardentram","open_paardentram","diversen","diversen_nav","diversen_open_paardentram") +
      subNavButton("Dichte paardentram","dichte_paardentram","diversen","diversen_nav","diversen_dichte_paardentram");
      break;
    case "diversen_nav_1": code =
      subNavButton("Witte geluksduiven","witte_geluksduiven","diversen","diversen_nav","diversen_witte_geluksduiven") +
      subNavButton("Huifkar","huifkar","diversen","diversen_nav","diversen_huifkar") +
      subNavButton("Americo","americo","diversen","diversen_nav","diversen_americo") +
      subNavButton("Arrenslee","arrenslee","diversen","diversen_nav","diversen_arrenslee") +
      subNavButton("Strijdwagens","strijdwagens","diversen","diversen_nav","diversen_strijdwagens") +
      subNavButton("Transport","transport","diversen","diversen_nav","diversen_transport");
      break;
    case "diversen_postkoets": code =
        "<h2>Postkoets</h2>"
      + "<p>Deze schitterende postkoets kan ongeveer veertien personen vervoeren, waarvan er tien bovenop en vier binnenin de koets zitten. Deze koets wordt aangespannen met vier paarden en wordt gebruikt voor bedrijfsuitjes, tochten, shows en andere evenementen.</p>"
      + startPhoto()
      + insertPhoto("diversen","postkoets","01")
      + insertPhoto("diversen","postkoets","02")
      + endPhoto();
      break;
    case "diversen_landauer": code =
        "<h2>Landauer</h2>"
      + "<p>De landauer is een dichte koets die ook helemaal open of halfopen gereden kan worden bij mooi weer. Zo is deze koets te gebruiken voor elk weertype. Het rijtuig is geschikt voor vier volwassen personen en kan worden getrokken door twee of vier paarden. Deze koets wordt ook als volgkoets gebruikt en bij openingen of evenementen.</p>"
      + startPhoto()
      + insertPhoto("trouwkoetsen","landauer","01")
      + insertPhoto("trouwkoetsen","landauer","02")
      + insertPhoto("trouwkoetsen","landauer","03")
      + insertPhoto("trouwkoetsen","landauer","04")
      + insertPhoto("trouwkoetsen","landauer","05")
      + insertPhoto("trouwkoetsen","landauer","06")
      + insertPhoto("trouwkoetsen","landauer","07")
      + endPhoto();
      break;
    case "diversen_jan_plezier": code =
        "<h2>Jan Plezier</h2>"
      + "<p>Deze volgkoets is geschikt voor zestien volwassen personen en wordt getrokken door twee paarden. De zijkanten kunnen bij mooi weer open. Is ook geschikt voor rondritten en bedrijfsfeesten.</p>"
      + startPhoto()
      + insertPhoto("diversen","jan_plezier","01")
      //+ insertPhoto("diversen","jan_plezier","02")
      + insertPhoto("diversen","jan_plezier","03")
      + insertPhoto("diversen","jan_plezier","04")
      + insertPhoto("diversen","jan_plezier","05")
      + endPhoto();
      break;
    case "diversen_open_paardentram": code =
        "<h2>Open Paardentram</h2>"
      + "<p>De open paardentram is zeer goed geschikt bij mooi weer als volgkoets en wordt getrokken door twee paarden. De open paardentram biedt plaats aan ruim twee&euml;ntwintig volwassen personen. Ook kan deze paardentram gebruikt worden voor rondritten en bedrijfsfeesten.</p>"
      + startPhoto()
      + insertPhoto("diversen","open_paardentram","01")
      + endPhoto();
      break;
    case "diversen_dichte_paardentram": code =
        "<h2>Dichte Paardentram</h2>"
      + "<p>De dichte paardentram is geschikt voor vierentwintig volwassen personen en is bij goed en slecht weer te gebruiken. De zijramen kunnen bij mooi weer open. Deze paardentram is onder andere geschikt voor bruidsparen met famillie, rondritten en bedrijfsfeesten.</p>"
      + startPhoto()
      + insertPhoto("diversen","dichte_paardentram","01")
      + insertPhoto("diversen","dichte_paardentram","02")
      + insertPhoto("diversen","dichte_paardentram","03")
      + insertPhoto("diversen","dichte_paardentram","04")
      + insertPhoto("diversen","dichte_paardentram","05")
      + insertPhoto("diversen","dichte_paardentram","06")
      + endPhoto();
      break;
      case "diversen_witte_geluksduiven": code =
        "<h2>Witte Geluksduiven</h2>"
      + "<p>Deze duiven zijn te huur in combinatie met onze koetsen of auto&prime;s.</p>"
      + startPhoto()
      + insertPhoto("diversen","witte_geluksduiven","01")
      + insertPhoto("diversen","witte_geluksduiven","02")
      + endPhoto();
      break;
    case "diversen_huifkar": code =
        "<h2>Huifkar</h2>"
      + "<p>Deze huifkar is geschikt voor dertig personen en wordt getrokken door twee paarden. De huifkar is ook geschikt voor grote groepen kinderen, mede doordat deze aan beide kanten gesloten is. De huifkar wordt gebruikt voor mooie bosritten in de omgeving van Breda en voor schitterende rondritten in de binnenstad. Ook wordt hij gebruikt als volgkoets voor de familie van het bruidspaar, of voor vrijgezellenfeesten, kroegentochten, bedrijfsfeesten en braderie&euml;n.</p>"
      + startPhoto()
      + insertPhoto("diversen","huifkar","01")
      + insertPhoto("diversen","huifkar","02")
      + insertPhoto("diversen","huifkar","03")
      + endPhoto();
      break;
    case "diversen_americo": code =
        "<h2>Americo</h2>"
      + "<p>Wij hebben diverse makke schimmels om de Sint te kunnen vervoeren bij zijn intochten. Ook kunnen deze worden gebruikt voor huwelijksaanzoeken, voor de Prins op het Witte Paard.</p>"
      + startPhoto()
      //+ insertPhoto("diversen","americo","01")
      + insertPhoto("diversen","americo","02")
      //+ insertPhoto("diversen","americo","03")
      + "<br />"
      + insertPhoto("diversen","americo","04")
      + insertPhoto("diversen","americo","05")
      + insertPhoto("diversen","americo","06")
      + endPhoto();
      break;
    case "diversen_arrenslee": code =
        "<h2>Arrenslee</h2>"
      + "<p>De arrenslee wordt getrokken door &eacute;&eacute;n of twee paarden en is voorzien van wieltjes. Op de paarden hebben wij originele bellentuigen met pluimen. De arrenslee is zeer goed te gebruiken bij kerstmarkten om rondritjes te verzorgen met de Kerstman.</p>"
      + "<p>De arrenslee kan ook gebruikt worden voor een romantische, winterse bruiloft. De koetsiers gaan gekleed in originele koetsiersjas met bondmuts, kan ook als kerstman geleverd worden.</p>"
      + startPhoto()
      + insertPhoto("diversen","arrenslee","01")
      + insertPhoto("diversen","arrenslee","02")
      + insertPhoto("diversen","arrenslee","03")
      + insertPhoto("diversen","arrenslee","04")
      + "<br />"
      + insertPhoto("diversen","arrenslee","05")
      + insertPhoto("diversen","arrenslee","06")
      + insertPhoto("diversen","arrenslee","07")
      + insertPhoto("diversen","arrenslee","08")
      + endPhoto();
      break;
    case "diversen_strijdwagens": code =
        "<h2>Strijdwagens</h2>"
      + "<p>Deze strijdwagens worden gebruikt bij bedrijfsfeesten, openingen, reclamespots, shows, optochten en andere evenementen.</p>"
      + startPhoto()
      + insertPhoto("diversen","strijdwagen","01")
      + insertPhoto("diversen","strijdwagen","02")
      + insertPhoto("diversen","strijdwagen","03")
      + insertPhoto("diversen","strijdwagen","04")
      + endPhoto();
      break;
    case "diversen_transport": code =
        "<h2>Transport</h2>"
      + "<p></p>"
      + startPhoto()
      + insertPhoto("diversen","transport","01")
      + insertPhoto("diversen","transport","02")
      + insertPhoto("diversen","transport","03")
      + insertPhoto("diversen","transport","04")
      + endPhoto();
      break;
    
    // Report error
    default: code = "<p>Navigatiefout! Gegeven was \""+id+"\"...</p>";
    
  }
  return code;
}

// Preloads navigation images that are not
// immediately visible after first page load.
function preloader() {
  var imgObj = new Image();
  
  var image = new Array(
    "image/autos_on.png",
    "image/contact_on.png",
    "image/diversen_on.png",
    "image/fotoalbum_on.png",
    "image/links_on.png",
    "image/rouwkoetsen_on.png",
    "image/trouwkoetsen_on.png",
    "image/welkom_on.png",
    "image/subnav.png"
  );
  
  for(var i = 0; i < image.length; i++)
    imgObj.src = image[i];
}

// Open a container for the photo section.
function startPhoto() {
  return "<div class=\"photo\">\n";
}

// Close the photo container.
function endPhoto() {
  return "</div>\n";
}

// Make clickable thumbnail for some photo in
// a category, with some name, and a number.
function insertPhoto(cat,name,num) {
  var photo = "foto/"+cat+"/"+name+"/"+name+num+".jpg";
  var thumb = "foto/"+cat+"/"+name+"/"+name+num+"_thumb.png";
  var code = "<a class=\"photo\" href=\"javascript:void(0)\" onclick=\"viewPhoto('"+photo+"')\">"
    + "<img class=\"photo\" src=\""+thumb+"\" />"
    + "</a>\n";
  return code;
}

// Make clickable thumbnail for an album photo
// with some name, and a number.
function insertAlbumPhoto(num) {
  var photo = "foto/fotoalbum/fotoalbum"+num+".jpg";
  var thumb = "foto/fotoalbum/fotoalbum"+num+"_thumb.png";
  var code = "<a class=\"photo\" href=\"javascript:void(0)\" onclick=\"viewPhoto('"+photo+"')\">"
    + "<img class=\"photo\" src=\""+thumb+"\" />"
    + "</a>\n";
  return code;
}

// Show photo in new window and close if focus lost to parent.
var popup = null;
function viewPhoto(photo) {
  popup = window.open(photo,'foto','width=800,height=600,location=false,status=false,menubar=false,directories=false,toolbar=false,resizable=true,scrollbars=true');
  window.name = "opener";
}
function sluitpopup() {
  if(popup!=null&&popup.open)
    popup.close();
}
window.onfocus = sluitpopup;

// Return "_GET" variables.
// By lobo235 (from: http://www.netlobo.com/url_query_string_javascript.html)
function gup( name ) {
  name = name.replace(/[\[]/,"\\\[").replace(/[\]]/,"\\\]");
  var regexS = "[\\?&]"+name+"=([^&#]*)";
  var regex = new RegExp( regexS );
  var results = regex.exec( window.location.href );
  if( results == null )
    return "";
  else
    return results[1];
}