var fotoArray = new Array();
  var fotoCounter = 0;
  var rndseed = 107;
  var lastFotoW = -1;

  function DiaLink(foto, atext, auteur) {
    fotoArray[fotoCounter] = new Object();
    fotoArray[fotoCounter].foto = foto;
    fotoArray[fotoCounter].atext = atext;
    fotoArray[fotoCounter].auteur = auteur;
    fotoCounter++;
  }

  function randomnumber(hi)
  {
    var now = new Date();
    var rnd = 98726471 * (now.getTime() / ((now.getMinutes() + 1) * 1000)) + rndseed;
    rndseed = rnd % 9945613;
    rnd = Math.floor(rnd % hi);
    return rnd;
  }
	
  function putfoto(dirprefix) {
    var fotohtml = strfoto(dirprefix, true);
    document.write(fotohtml);
  }

  function strfoto(dirprefix, force) {
    var fotoUsed = new Array();
    var fotohtml = '';
    for (i = 0; i < fotoCounter; i++) { 
      fotoUsed[i] = new Object();
      fotoUsed[i].b = 0; 
    }
    var w = Math.floor((getWindowWidth() - 306) / 111);
    if ( w < 1 ) w = 1;
    if ( !force && (w == lastFotoW) ) return 0; else lastFotoW = w;
    while ( w > 0 ) {
      var n = 0;
      do {
        n = randomnumber(fotoCounter);
      } while ( fotoUsed[n].b != 0 );
      fotoUsed[n].b = 1;
      fotohtml += '<img border="0" src="' + dirprefix;
	  fotohtml += 'topfotos/' + fotoArray[n].foto + '.jpg' + '" ';
      fotohtml += 'alt="' + fotoArray[n].atext;
      if (fotoArray[n].auteur != '') {
        fotohtml += ' © ' + fotoArray[n].auteur;
      }
      fotohtml += '">';
      w--;
    }
    return fotohtml;
  }

  DiaLink('vlinder', 'vlinder', ''); 
  DiaLink('sanjose', 'San Jose', ''); 
  DiaLink('valverde', 'valverde', ''); 
  DiaLink('trogon', 'trogon', ''); 
  DiaLink('tortuguero', 'tortuguero', ''); 
  DiaLink('toekan', 'toekan', ''); 
  DiaLink('sarapiqui', 'sarapiqui', ''); 
  DiaLink('rincon', 'rincon', ''); 
  DiaLink('rafiki', 'rafiki', ''); 
  DiaLink('pacific', 'pacific', ''); 
  DiaLink('monteverde', 'monteverde', ''); 
  DiaLink('mawamba', 'mawamba', ''); 
  DiaLink('manuelantonio', 'manuelantonio', ''); 
  DiaLink('luiaard', 'luiaard', ''); 
  DiaLink('lapaz', 'lapaz', ''); 
  DiaLink('kikker', 'kikker', '');