
  // lijst met sites aangesloten in de webring
  // geen http:// voor de sitenaam plaatsen aub

  var tpSiteNamen = new Array(

    "yasha.gerits.net",
    "www.henkiez.com", 
    "www.lijsterhof.nl",
    "www.zeelanddahlia.nl/",
    "www.teunistuin.net/",
    "www.zavage.nl/mijntuin/",
    "users.skynet.be/de.eigenwijze.tuin/",
    "home.planet.nl/~gerrien/",
    "home.versatel.nl/h-devries/",
    "members.home.nl/hitv/tuin/mijn_tuin.htm",
    "users.pandora.be/subtropical/", 
    "www.geocities.com/ronnydeketele/",
    "users.skynet.be/zonhof/", 
    "www.freewebs.com/gerdashomepage/",
    "users.skynet.be/mijo.braem/", 
    "users.telenet.be/mijnwereld/tuin/tuin.htm", 
    "www.rhodoland.nl/home_nl.htm", 
    "www.schippie.net/garden/index.html",
    "tuin.marigesi.nl/",
    "home.scarlet.be/ae1941/Onze%20tuin.html",
    "home.scarlet.be/leoriademeyer", 
    "members.chello.nl/brosco/hetlandje/",
    "home.tiscali.be/dekaardebol/index.htm",   
    "users.skynet.be/gardeninglizzy/", 
    "www.mijnenhof.be/", 
    "users.pandora.be/engelsetuin/", 
    "www.hermanbruggeling.nl/",
    "www.ecotuin-cologne.be", 
    "www.sandrastuin.nl", 
    "www.schunsland.nl/", 
    "www.tuinkunstenzo.nl/", 
    "www.hofoverwellingen.tk/",
    "www.helenium.tuinpagina.net/",
    "home.hetnet.nl/~j.kohnken/",
    "www.tuinpagina.net/dutchwonders.nl/dutchwonders.htm",   
    "www.mijntuin-mijndroom.com/",
    "www.tropotuin.nl/",
    "www.freewebs.com/belevenissen-van-een-tuinkabouter/index.htm", 
    "home.quicknet.nl/qn/prive/tj.de.graaf/", 
    "home.hetnet.nl/~h2811/", 
    "www.stammer.nl/natureswitchedon/", 
    "gerver.org/Tuin/mija-en-gerards-tuin.htm",
    "www.leovanhethofvaneden.com/onze_tuin.htm",
    "www.tuinpagina.net/tp.html"
       


    );


function tpVindHuidigeSiteIndex(huidigeSiteNaam)
  {
     var i;
  var sn1 = huidigeSiteNaam.replace(" ","%20")

   sn1 = sn1.toLowerCase();

     for(i=0;i<tpSiteNamen.length;i++) 
     {
         sn2 = tpSiteNamen[i];
         sn2 = sn2.toLowerCase();

         if (sn1 == sn2.substring(0,sn1.length))
            return i;
     }
     return -1;
  }
 
  function tpGaNaarSite(siteIndex)
  {
     if (siteIndex >= 0 && siteIndex < tpSiteNamen.length)
     {
         volgendeSite = "http://" + tpSiteNamen[siteIndex];
         top.location.href = volgendeSite;
     }
  }

  function tpGaNaarVolgendeSite(huidigeSiteNaam)
  {
     var n = tpVindHuidigeSiteIndex(huidigeSiteNaam);
     n = n + 1;
     if (n>tpSiteNamen.length-1)
        n = 0;
     tpGaNaarSite(n);
  }

  function tpGaNaarVorigeSite(huidigeSiteNaam)
  {
     var n = tpVindHuidigeSiteIndex(huidigeSiteNaam);
     n = n - 1;
     if (n<0)
        n = tpSiteNamen.length-1;
     tpGaNaarSite(n);
  }

  function tpGaNaarWillekeurigeSite(huidigeSiteNaam)
  {
     var n = tpVindHuidigeSiteIndex(huidigeSiteNaam);
     var r = n;
     while (r == n)
     {
        r = Math.round((tpSiteNamen.length-1)*Math.random());
     }
     
     tpGaNaarSite(r);
  }


  function tpDoeMee(huidigeSiteNaam)
  {
     top.location.href = "http://www.tuinpagina.net/aanmeldingwebring.htm";   
  }

