var n = 0;
var barkn = new Array();
var nname = new Array();
var fen = "toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=no,width=600,height=400";
var correctArt;


if (document.images) {
    barkn[0]   = new Image(400,300); barkn[0].src   = "../cgi-bin/gbarkn/barkeriola.jpg";
    barkn[1]   = new Image(400,300); barkn[1].src   = "../cgi-bin/gbarkn/obovata.jpg";
    barkn[2]   = new Image(400,300); barkn[2].src   = "../cgi-bin/gbarkn/dorothea.jpg";
    barkn[3]   = new Image(400,300); barkn[3].src   = "../cgi-bin/gbarkn/melanocaulon.jpg";
    barkn[4]   = new Image(400,300); barkn[4].src   = "../cgi-bin/gbarkn/lindleyana.jpg";
    barkn[5]   = new Image(400,300); barkn[5].src   = "../cgi-bin/gbarkn/lindleyana_vanneriana.jpg";
    barkn[6]   = new Image(400,300); barkn[6].src   =  "../cgi-bin/gbarkn/naevosa.jpg";
    barkn[7]   = new Image(400,300); barkn[7].src   = "../cgi-bin/gbarkn/palmeri.jpg";
    barkn[8]   = new Image(400,300); barkn[8].src   =  "../cgi-bin/gbarkn/scandens.jpg";
    barkn[9]   = new Image(400,300); barkn[9].src   =  "../cgi-bin/gbarkn/shoemakeri.jpg";
    barkn[10]  = new Image(400,300); barkn[10].src  =  "../cgi-bin/gbarkn/skinneri.jpg";
    barkn[11]  = new Image(400,300); barkn[11].src  =  "../cgi-bin/gbarkn/spectabilis.jpg";
    barkn[12]  = new Image(400,300); barkn[12].src  =  "../cgi-bin/gbarkn/strophinx.jpg";
    barkn[13]  = new Image(400,300); barkn[13].src  =  "../cgi-bin/gbarkn/uniflora.jpg";
    barkn[14]  = new Image(400,300); barkn[14].src  =  "../cgi-bin/gbarkn/whartoniana.jpg";
    barkn[15]  = new Image(400,300); barkn[15].src  =  "../cgi-bin/gbarkn/lindleyana_alba.jpg";

    nname[0]  =   "barkeriola";
    nname[1]  =   "obovata";
    nname[2]  =   "dorothea";
    nname[3]  =   "melanocaulon";
    nname[4]  =   "lindleyana";
    nname[5]  =   "lindleyana vanneriana";
    nname[6]  =   "naevosa";
    nname[7]  =   "palmeri";
    nname[8]  =   "scandens";
    nname[9]  =   "shoemakeri";
    nname[10] =   "skinneri";
    nname[11] =   "spectabilis";
    nname[12] =   "strophinx";
    nname[13] =   "uniflora";
    nname[14] =   "whartoniana";
    nname[15] =   "lindleyana alba";
}

function gvor() {
     if (n < barkn.length -1)  n++
     else  n = 0

     document.barkeria.src = barkn[n].src ;

     if (brneu) {
     document.getElementById("barkArt").innerHTML = "Barkeria  " + nname[n];
     }
     else if (explo) {
     barkArt.innerHTML = "Barkeria  " + nname[n];
     }
     else if (navi) {
     document.barkArtNet.document.open();
     document.barkArtNet.document.write("Barkeria  " + nname[n]);
     document.barkArtNet.document.close();
     }
     leseArt();
}

function gback() {
     if (n > 0)  n--
     else n = barkn.length - 1

     document.barkeria.src = barkn[n].src;

     if (brneu) {
     document.getElementById("barkArt").innerHTML = "Barkeria  " + nname[n];
     }
     else if (explo) {
     barkArt.innerHTML = "Barkeria  " + nname[n];
     }
     else if (navi) {
     document.barkArtNet.document.open();
     document.barkArtNet.document.write("Barkeria  " + nname[n]);
     document.barkArtNet.document.close();
     }
     leseArt();
}

function zeigeArt() {
   art = location.search;
   art = art.substring(1, art.length);

   if (location.search) {
       n = art;
   }else {
     n = 0;
   }
  document.barkeria.src = barkn[n].src;

     if (brneu) {
     document.getElementById("barkArt").innerHTML = "Barkeria  " + nname[n];
     }
     else if (explo) {
     barkArt.innerHTML = "Barkeria  " + nname[n];
     }
     else if (navi) {
     document.barkArtNet.document.open();
     document.barkArtNet.document.write("Barkeria  " + nname[n]);
     document.barkArtNet.document.close();
     }
     leseArt();
}

function leseArt() {
     correctArt = n;
     if (correctArt == 15) {
         correctArt = 4;
     }
}

function init(links,oben,i1,i3) {
   if (navi) {
   var breite = window.innerWidth;
   var hoehe =  window.innerHeight;
   document.layers["barkArtNet"].pageX = Math.ceil(breite / 2 + 40);
    }
    zeigeLayer(links,oben,i1,i3);
    zeigeArt();
}

function beschrieb() {
     goTo = "arten.php?art=" + nname[n];
     meinFenster = window.open(goTo,"",fen);
}
