function galGetId(id)
{ var element;
  if (document.all) { element = document.all[id]; }
  else { element = document.getElementById(id); }
  return(element);
}

function galImgSet(ind)
{ if(ind < 1) { gal_ind = gal_max; }
  else if(ind > gal_max) { gal_ind = 1; }
  else { gal_ind = ind; }
  document.FORM.T2.value = "Bild:" + gal_ind + "/" + gal_max;
  document.FORM.T1.value = gal_text[gal_ind];
  if(gal_ind<10)      { gal_img.src = "500pix/img_00" + gal_ind + ".jpg"; }
  else if(gal_ind<100)        { gal_img.src = "500pix/img_0" + gal_ind + ".jpg"; }
  else                        { gal_img.src = "500pix/img_"  + gal_ind + ".jpg"; }
  window.document.images[GAL].src = "" + gal_img.src;
  galResize();
}

function galPrev()  { galImgSet(--gal_ind); }
function galNext()  { galImgSet(++gal_ind); }
function galFirst() { galImgSet(gal_min); }
function galLast()  { galImgSet(gal_max); }

// Globals ---------------------
var gal_img;
var gal_text;
var gal_ind = 1;
var gal_min = 1;
var gal_max = 1;
var gal_pagesize = 1;

function galInit(istart,imax, ipagesize)
{ gal_img = new Image();
  gal_img.src = "/images/0.jpg"; /* Hier erste Standard-Grafik angeben */
  	  
  var pre = 0 ;
  gal_ind = istart;
  gal_min = istart;
  gal_max = imax;
  if(ipagesize<1) { ipagesize=4; }
  gal_pagesize = ipagesize;

  var url = document.URL;
  if((n=url.lastIndexOf("#")) > 0)
  { try
    { pre = 0+eval(url.substr(n+1,3));
      if((pre >= gal_min) && (pre <= gal_max)) { gal_ind = pre; }
    }
    catch(err)
    { pre=0 ; gal_ind=0; 
    }
  }

  if(gal_ind<10) 	{ gal_img.src = "500pix/img_00" + gal_ind + ".jpg"; }
  else if(gal_ind<100) 	{ gal_img.src = "500pix/img_0" + gal_ind + ".jpg"; }
  else	   		{ gal_img.src = "500pix/img_"  + gal_ind + ".jpg"; }

  GAL=0;
  gal_text = new Array(gal_max);
  for(i=1;i<=gal_max;i++)  { gal_text[i] = ""; }
  //  galImgSet(gal_ind);
}

function galPrintList(istart,iakt, iend,ipagesize)
{ var i=0,gx=0, ix=0, iopen=0, gx_src="";
  if(istart<0)    { istart=0; }
  if(ipagesize<0) { ipagesize=4; }
  if((iend > ipagesize) && (ipagesize>0))
  { iakt = Math.round(iakt/ipagesize) * ipagesize;
  }
  if(iakt>iend)   { iakt = iend - ipagesize; }
  if(iakt<istart) { iakt=istart; }

  var rstr ="\n<TABLE border=0 cellpadding=0 cellspacing=0><TR><TD class=\"GALBORDER\">";
  rstr += "\n<TABLE border=0 cellpadding=2 cellspacing=0>";
  rstr +=  "<TR><TD colspan=4><LI><SMALL>Seite:";
  ix=1;
  if (iakt > istart)
  { rstr += "&nbsp; <A HREF=\"JavaScript:galPrintList(" + istart + "," + (iakt-ipagesize) + "," + iend + "," + ipagesize + ")\">&lt;&lt;</A> &nbsp; - ";
  }
  else
  { rstr += "&nbsp; &nbsp; &nbsp; ";
  }
  for(i=istart;i<iend;i+=ipagesize)
  { if(ix>1) { rstr += " - "; }
    if((i>=iakt) && i < (iakt+ipagesize))
    {  rstr += "&nbsp; <B>" + ix  + "</B>";
    }
    else
    { rstr += "&nbsp; <A HREF=\"JavaScript:galPrintList(" + istart + "," + i + "," + iend + "," + ipagesize + ")\">" + ix  + "</A>";
    }
    ix++;
  }
  if (iakt < (iend-ipagesize))
  { rstr += " &nbsp; - &nbsp; <A HREF=\"JavaScript:galPrintList(" + istart + "," + (iakt + ipagesize) + "," + iend + "," + ipagesize + ")\">&gt;&gt;</A> ";
  }
  rstr += "</SMALL></LI><P></TD></TR><TR><TD class=\"GAL_IMG\"><TABLE cellpadding=0 cellspacing=0>";
  ix=0; gx_src="";
  for(gx=iakt;((gx<=iend) && (ix < ipagesize));gx++)
  { if(gx<10) 	 	{ gx_src = "150pix/img_00" + gx + ".jpg"; }
    else if(gx<100) 	{ gx_src = "150pix/img_0" + gx + ".jpg"; }
    else	   	{ gx_src = "150pix/img_" + gx + ".jpg"; }
    if((ix%4) == 0)
    { if(ix>0) { rstr += "</TR>"; iopen=0; }
      rstr += "\n<TR valign=\"TOP\">"; iopen=1;
    }
    rstr += "\n<TD><A href=\"JavaScript:galWindowOpen(" + gx + ")\"><IMG SRC=\"" + gx_src + "\" border=0></A></TD>";
    ix++;
  }
  if(iopen>0) { rstr += "</TR></TABLE></TD></TR>"; iopen=0; }
  rstr +=  "<TR class=\"GALMENUE_SUB\"><TD colspan=4><SMALL>Wenn Sie wünschen dass ein Bild gelöscht wird, wenden Sie sich bitte an <a href=mailto:info@unterspiesheim.de>info@unterspiesheim.de</A></SMALL></TD></TR>";
  rstr += "\n</TABLE>\n";
  rstr += "</TD></TR></TABLE>";
  var _el = galGetId("GALMENUE");
  _el.innerHTML = rstr;
}


// -----------------------------------------------------------------------------
//
// -----------------------------------------------------------------------------
function galPrev1(pfad)  { galSetImg1(--gal_ind,pfad); }
function galNext1(pfad)  { galSetImg1(++gal_ind,pfad); }
function galFirst1(pfad) { galSetImg1(gal_min,pfad); }
function galLast1(pfad)  { galSetImg1(gal_max,pfad); }

function galSetImg(ind)
{ var rstr ="";

  if(ind < 1) { gal_ind = gal_max; }
  else if(ind > gal_max) { gal_ind = 1; ind= gal_ind;}
  else { gal_ind = ind; }
//  document.FORM.T2.value = "Bild:" + gal_ind + "/" + gal_max;
//  document.FORM.T1.value = gal_text[gal_ind];
  if(gal_ind<10)      { gal_img_src = "500pix/img_00" + gal_ind + ".jpg"; }
  else if(gal_ind<100)        { gal_img_src = "500pix/img_0" + gal_ind + ".jpg"; }
  else                        { gal_img_src = "500pix/img_"  + gal_ind + ".jpg"; }
  // window.document.images[GAL].src = "" + gal_img.src;

  var rstr ="\n<TABLE border=0 cellpadding=0 cellspacing=0><TR><TD class=\"GALBORDER\">";
  rstr += "\n<TABLE border=0 cellpadding=2 cellspacing=0>";
  rstr +=  "<TR class=\"GALMENUE_SUB\"><TD>";
  rstr += "Bild: &nbsp; [ " + gal_ind + "/" + gal_max + "] &nbsp;"
	+ "<input type=\"BUTTON\" value=\"|<\" name=\"FIRST\" onClick=\"galFirst1()\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\"<<\" name=\"PREF\" onClick=\"galPrev1()\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\">>\" name=\"NEXT\" onClick=\"galNext1()\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\">|\" name=\"LAST\" onClick=\"galLast1()\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\"zurück zur Übersicht\" name=\"ENDE\" onClick=\"galPrintList1(" + gal_min + "," + gal_ind + "," + gal_max + "," + gal_pagesize + ")\" class=\"small\">"
        + "<BR clear=\"ALL\">"
                  + "<IMG SRC=\"/images/0.gif\" width=500 height=1>"
        + "</TD></TR>"
        + "\n<TR valign=\"TOP\"><TD nowrap class=\"GAL_IMG\">";
  rstr += "<IMG ID=\"GAL\" SRC=\"" + gal_img_src + "\" onClick=\"galSetImg(" + (gal_ind+1) + ")\" ALT=\"Bild " + (gal_ind+1) + " wird geladen.\">"
          + "<IMG SRC=\"/images/0.gif\" width=1 height=350>"
	  + "</TD></TR>"
          + "<TR class=\"GALMENUE_SUB\"><TD colspan=4><SMALL>Wenn Sie wünschen dass ein Bild gelöscht wird, wenden Sie sich bitte an <a href=mailto:info@unterspiesheim.de>info@unterspiesheim.de</A></SMALL></TD></TR>"
	  + "</TABLE>";
rstr += "</TD></TR></TABLE>";	
  var _el = galGetId("GALMENUE");
  _el.innerHTML = rstr;
}

// ------------------------------------------------------------------

function galSetImg1(ind,pfad)
{ var rstr ="";
  if(ind < 1) { gal_ind = gal_max; }
  else if(ind > gal_max) { gal_ind = 1; }
  else { gal_ind = ind; }
//  document.FORM.T2.value = "Bild:" + gal_ind + "/" + gal_max;
//  document.FORM.T1.value = gal_text[gal_ind];
  if(gal_ind<10)      { gal_img_src = "img_00" + gal_ind + ".jpg"; }
  else if(gal_ind<100)        { gal_img_src = "img_0" + gal_ind + ".jpg"; }
  else                        { gal_img_src = "img_"  + gal_ind + ".jpg"; }
  // window.document.images[GAL].src = "" + gal_img.src;

  var rstr ="\n<TABLE border=0 cellpadding=0 cellspacing=0><TR><TD class=\"GALBORDER\">";
 rstr += "\n<TABLE border=0 cellpadding=2 cellspacing=0>";
  rstr +=  "<TR class=\"GALMENUE_SUB\"><TD>";
  rstr += "Bild: &nbsp; [ " + gal_ind + "/" + gal_max + "] &nbsp;"
	+ "<input type=\"BUTTON\" value=\"|<\" name=\"FIRST\" onClick=\"galFirst1('" + pfad + "')\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\"<<\" name=\"PREF\" onClick=\"galPrev1('" + pfad + "')\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\">>\" name=\"NEXT\" onClick=\"galNext1('" + pfad + "')\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\">|\" name=\"LAST\" onClick=\"galLast1('" + pfad + "')\" class=\"small\">"
	+ "&nbsp;<input type=\"BUTTON\" value=\"zurück zur Übersicht\" name=\"ENDE\" onClick=\"galPrintList1(" + gal_min + "," + gal_ind + "," + gal_max + "," + gal_pagesize + ",'" + pfad + "')\" class=\"small\">"
        + "<BR clear=\"ALL\">"
                  + "<IMG SRC=\"/images/0.gif\" width=500 height=1>"
        + "</TD></TR>"
        + "\n<TR valign=\"TOP\"><TD nowrap class=\"GAL_IMG\">";
  rstr += "<IMG ID=\"GAL\" SRC=\"" + pfad + "500pix/" + gal_img_src + "\" onClick=\"galSetImg1(" + (ind+1) + ",'" + pfad + "')\" ALT=\"Bild " + (ind+1) + " wird geladen.\">"
                  + "<IMG SRC=\"/images/0.gif\" width=1 height=350>"
	  + "</TD></TR>"
          + "<TR class=\"GALMENUE_SUB\"><TD colspan=4><SMALL>Wenn Sie wünschen dass ein Bild gelöscht wird, wenden Sie sich bitte an <a href=mailto:info@unterspiesheim.de>info@unterspiesheim.de</A></SMALL></TD></TR>"
	  + "</TABLE>";
	rstr += "</TD></TR></TABLE>";
  var _el = galGetId("GALMENUE");
  _el.innerHTML = rstr;
}

function galPrintList1(istart,iakt, iend,ipagesize,pfad)
{ var i=0,gx=0, ix=0, iopen=0, gx_src="";
  if(istart<0)    { istart=0; }
  if(ipagesize<0) { ipagesize=4; }
  if((iend >= ipagesize) && (ipagesize>0))
  { iakt = Math.floor(iakt/ipagesize) * ipagesize;
  }


  var lines = Math.floor(ipagesize/4); if(lines < 1) { lines=1; }

  if(iakt>iend)   { iakt = iend - ipagesize; }
  if(iakt<istart) { iakt=istart; }
// alert("galPrintList(" + istart +"," + iakt + "," + iend + "," +ipagesize + ")");
  galInit(istart,iend, ipagesize);

  var rstr ="\n<TABLE border=0 cellpadding=0 cellspacing=0><TR><TD class=\"GALBORDER\">";
  rstr += "\n<TABLE border=0 cellpadding=2 cellspacing=0>";
  rstr +=  "<TR class=\"GALMENUE_SUB\"><TD colspan=4 nowrap>Seite:";
  ix=1;
  if(iend > ipagesize)
  { if (iakt > istart)
    { rstr += "&nbsp;<input type=\"BUTTON\" value=\"<<\" name=\"PREF\" onClick=\"galPrintList1(" + istart + "," + (iakt-ipagesize) + "," + iend + "," + ipagesize + ",'" + pfad + "')\"  class=\"small\">";
    }
    else
    { rstr += "&nbsp;<input type=\"BUTTON\" value=\"<<\" name=\"PREF\" class=\"small\" disabled=\"disabled\">"
    }
    for(i=istart;i<iend;i+=ipagesize)
    { if(ix>1) { rstr += " - "; }
      if((i>=iakt) && i < (iakt+ipagesize))
      {  rstr += "&nbsp; <B>" + ix  + "</B>";
      }
      else
      { rstr += "&nbsp; <A HREF=\"JavaScript:galPrintList1(" + istart + "," + i + "," + iend + "," + ipagesize + ",'" + pfad + "')\">" + ix  + "</A>";
      }
      ix++;
    }
    if (iakt < (iend-ipagesize))
    { rstr += " &nbsp; &nbsp; <input type=\"BUTTON\" value=\">>\" name=\"PREF\" onClick=\"galPrintList1(" + istart + "," + (iakt + ipagesize) + "," + iend + "," + ipagesize + ",'" + pfad + "')\" class=\"small\">";
    }
    else
    { rstr += " &nbsp; &nbsp; <input type=\"BUTTON\" value=\">>\" name=\"PREF\" class=\"small\" disabled = \"disabled\">";
    }
  }
  else
  { rstr += "1/1";
  }
  rstr += " &nbsp; <SPAN class=\"small\">Zum vergrößern: Bilder anklicken</SPAN></TD>" ;
  rstr += "</TR><TR><TD class=\"GAL_IMG\"><TABLE border=0 cellpadding=2 cellspacing=0>";
  ix=0; gx_src="";
  for(gx=iakt;((gx<=iend) && (ix < ipagesize));gx++)
  { if(gx<10) 	 	{ gx_src = "img_00" + gx + ".jpg"; }
    else if(gx<100) { gx_src = "img_0" + gx + ".jpg"; }
    else	   	    { gx_src = "img_" + gx + ".jpg"; }
    if((ix%4) == 0)
    { if(ix>0) { rstr += "</TR>"; iopen=0; }
      rstr += "\n<TR valign=\"TOP\">"; iopen=1;
    }
    rstr += "\n<TD><A href=\"JavaScript:galSetImg1(" + gx + ",'" + pfad + "')\"><IMG SRC=\"" + pfad + "150pix/" + gx_src + "\" border=0></A></TD>";
    ix++;
  }
  if(iopen>0) { rstr += "</TR>"; iopen=0; }
  rstr += "</TABLE></TD></TR>";
  rstr +=  "<TR class=\"GALMENUE_SUB\"><TD colspan=4><SMALL>Wenn Sie wünschen dass ein Bild gelöscht wird, wenden Sie sich bitte an <a href=mailto:info@unterspiesheim.de>info@unterspiesheim.de</A></SMALL></TD></TR>";
  rstr += "\n</TABLE>\n";
  rstr += "</TD></TR></TABLE>";  
  var _el = galGetId("GALMENUE");
  _el.innerHTML = rstr;
}