// === Diese Variablen konfigurieren ===
var diaBGColor = '#000000';      
var diaTextColor =  '#CCCCCC';
var diaBorderColor = '#FFFFFF';
// =====================================


  var aktdia = 0;
  var previewbild = new Image();
  var diawindow = null;
//  var MyBrowser = new NavigatorVersion2();


//function initDiaShow()
//{
//  MyBrowser = new NavigatorVersion2();
//  if (MyBrowser.DOM1 == true) {document.addEventListener("keydown", gotoBild3, false); }
//}

function loadPicture() {
  if ((eval(top.name) < 1) || (eval(top.name) > lastdia) || top.name == "")
    { top.name = "1"; }
  gotoBild(top.name);
}

function gotoBild(bildnr)
{
  aktdia = parseInt(bildnr);
  if (isNaN(aktdia)) { aktdia = 1; }
  nextBild(0);
}

function gotoBild2(e)
{
  var Nr = document.form1.txtGoto.value;
  if (e.which == 13)          // Enter für NS 4.x auswerten
    { gotoBild(Nr); }
  else
  {
    if (e.keyCode == 13)     // Enter für IE 4.x auswerten
      { gotoBild(Nr); }
  }
  return false;
}


function gotoBild3(e)
{
  if (e.keyCode == 33) { nextBild(-1); }
  if (e.keyCode == 34) { nextBild(1); }
}

function CheckTastenDiaShow (Ereignis)
{
  if (!Ereignis)
  { Ereignis = window.event; }
  if (Ereignis.which)
  {
    Tastencode = Ereignis.which;
  }
  else
  if (Ereignis.keyCode)
  {
    Tastencode = Ereignis.keyCode;
  }
  if ((Tastencode == 33) || (Tastencode==37) || (Tastencode==38))  // PageUp , Pfeil link, Pfeil auf
  { nextBild(-1); }
  if ((Tastencode == 34) || (Tastencode==39) || (Tastencode==40))  // PageDown, Pfeil rechts, Pfeil unten
  { nextBild(1); }
}


function makediafunctions() {
var s="";
/*
s=s+' <S' + 'CRIPT language=JavaScript>';   // sonst meint Dreamwaver, hier sei ein echtes Sc...
// === Disable Right Mouse Button ===
s=s+' function disable_right_click(e)';
s=s+' { var browser = navigator.appName.substring ( 0, 9 ); var event_number = 0; if (browser=="Microsoft") event_number = event.button; else if (browser=="Netscape") event_number = e.which;';
s=s+' if ( event_number==2 || event_number==3 ) { alert ("Right Mouse Button Is Disabled"); return (false); } return (true); }';
s=s+' function check_mousekey () { var mouse_key = 93; var keycode = event.keyCode; if ( keycode == mouse_key ) alert ( "Mouse Key Is Disabled" ); }';
s=s+' function trap_page_mouse_key_events () { var browser = navigator.appName.substring ( 0, 9 ); document.onmousedown = disable_right_click; if ( browser == "Microsoft" ) document.onkeydown = check_mousekey; else if ( browser == "Netscape" ) document.captureEvents( Event.MOUSEDOWN ); }';
s=s+' trap_page_mouse_key_events (); ';
// === END Disable Right Mouse Button ===
s=s+'</S' + 'CRIPT>';   // sonst meint Dreamwaver, hier sei ein echtes Sc...
*/
return s;
}


function getDiaName(bildNr) {
var s="" + bildNr;
if (zzNrLen >= 2) 
{ 
   if (s.length <= 1)
   { s = "0" + s; }
}
if (zzNrLen >= 3) 
{ 
  if (s.length <= 2)
    { s = "0" + s; }
}
return s;
}



function nextBild(anzahl) {
	
  aktdia = parseInt(aktdia) + parseInt(anzahl);
  if (aktdia > lastdia) {
   aktdia = lastdia;
   alert("Sie haben das letzte Foto erreicht");
  }
  if (aktdia < 1) {
   alert("Sie haben das erste Foto erreicht");
   aktdia = 1;
  }
  saktdia = aktdia;
  diawindow = null;
  diawindow = window.open("","main");
  diawindow.document.open();
  diawindow.document.write(make_Page(aktdia));
  diawindow.document.bgColor=diaBGColor;             // Hintergrundfarbe
  diawindow.document.write(makediafunctions());
  diawindow.document.close();
  if (document.form1.txtGoto != null)  // ev. ist diese Inputbox gar nicht vorhanden
    {
		document.form1.txtGoto.value = " " + aktdia;
		document.form1.txtGoto.focus();
	}
  if (aktdia+1 <= lastdia)
    { previewbild.src = "bimages/b" + getDiaName(eval(aktdia + 1)) + ".jpg"; }
}


function make_Page(bildNr) {
var s="";
var temptitle = "";
var sbildNr = getDiaName(bildNr);

image_1 = new Image()
image_1.src = 'bimages/b' + sbildNr + '.jpg';		     
var tdWidth = image_1.width + 2;   // +2 Wegen Cellpadding=1

s=s+'<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">';
s=s+'<tr>';
s=s+'<td bgcolor="' + diaBGColor + '">';
s=s+'<div align="center">';
s=s+'<table border="0" cellspacing="0" cellpadding="1" width="' + tdWidth + '">';
if (document.form1.cbinfo != null)
  { temptitle = strreplace(zz[bildNr - 1], '<BR>', ' '); }
else
  { temptitle = ''; }
s=s+'<tr><td bgcolor="' + diaBorderColor + '"><img src="bimages/b' + sbildNr + '.jpg" border="0" title="'+ temptitle + '" galleryimg="no"></td></tr>';

// Bild-NR unterhalb des Bildes
// s=s+'<tr><td align=center><font face="Arial, Helvetica, sans-serif" size="-1" color="#CCCCCC">Bild '+eval(aktdia)+'/'+eval(lastdia)+'</font></td></tr>';

// Text unterhalb des Bildes
if (document.form1.cbinfo != null)  // ev. ist die Checkbox ja gar nicht vorhanden!
{
 if (document.form1.cbinfo.checked)
   {
     s=s+'<tr height="4"><td></td></tr>';
	 s=s+'<tr><td><font face="Arial, Helvetica, sans-serif" size="-1" color="' + diaTextColor + '">' + zz[bildNr - 1] + '</font></td></tr>' ; 
   }
}

s=s+'</table>';
s=s+'</div>';
s=s+'</td>';
s=s+'</tr>';
s=s+'</table>';
return s;
}


//******************************************************************************
// Description: Sucht im String ss nach dem Vorkommen von searchpattern und ersetzt
//   dieses Muster durch replacepattern.
// Remarks:
// Version: 1.0 / 24.08.2002 / M. Derflinger
//****************************************************************************** 
function strreplace(ss, searchpattern, replacepattern) 
{
  var newS = "";
  var s = ss;
  var sBigLetters = s.toUpperCase();   // s in Grossbuchstaben
  var i = 0;
  var pos = 1;   // damits überhaupt startet
  searchpattern = searchpattern.toUpperCase();

  while (pos >= 0) {
    sBigLetters = s.toUpperCase();
    pos = sBigLetters.indexOf(searchpattern, 0);
    if (pos >= 0)
    { 
      newS = s.substring(0, pos) + replacepattern + s.substring(pos + searchpattern.length, s.length); 
      s = newS;
    } 
    else
      { newS = s; }
  }
  return newS;
}


//******************************************************************************
// Description: Füllt einen String [s] bis auf eine Länge von [Len] mit dem Zeichen 
//   [FillCharacter]
// Remarks:  z.B. aus "3" --> "003"
// Version: 1.0 / 21.09.2008 / M. Derflinger
//****************************************************************************** 
function LPad(s, Len, FillCharacter)
{
  var newS = "" + s;
  while (newS.length < Len)
  {	newS = FillCharacter + newS ;  }
  return newS;	
}


//******************************************************************************
// Description: Um für alle Thumbernails die Beschreibungstexte (title) zu laden
// Remarks:
// Version: 1.0 / 24.08.2002 / M. Derflinger
//****************************************************************************** 
function loadTitles()
{
  var i=1;
  for(i=1; i <= lastdia; i++)
  { 
    document.images["b"+i].alt = strreplace(zz[i-1], "<BR>", " ");
    document.images["b"+i].title = strreplace(zz[i-1], "<BR>", " ");
  }
}


function loadTitles2(start, stop)
{
  var i=1;
  for(i=start; i <= stop; i++)
  { 
    document.images["b"+i].title = strreplace(zz[i-1], "<BR>", " ");
  }
}


//******************************************************************************
// Description: Erstellt die Einträge innerhalb der Tabelle mit allen Links
// startNr: EffekteNr des ersten Bildes  z.B. (1)
// stopNr: Letzte Nummer des Bilder z.B. 34
// breite: 2 wenn Bild m01.mpg oder 3 wenn Bild m001.jpg benannt ist
// Remarks:  Das Alt- und TitleTag wird ebenfalls gesetzt.
// Version: 1.0 / 21.09.2008 / M. Derflinger
//****************************************************************************** 
function MakeFotogalerieThumbs(startNr, stopNr, breite)
{
  var i=1;
  var Quote= "\"";
  var bildNr = "000";
  var BildTitle = "";
  
  for(i=startNr; i <= stopNr; i++)
  { 
	bildNr = LPad(i, breite, "0");
	bildTitle = strreplace(zz[i-1], "<BR>", " ");
	s = "<a href=" + Quote + "javascript:dv_ShowDia('" + i + "')" + Quote + ">";
	s = s + '<img name="b"' + i + ' ';
	s = s + 'src="mimages/m' + bildNr + '.jpg" width="139" height="110" border="0"';
	s = s + 'alt="' + bildTitle + '" title="' + bildTitle + '"></a>';
	document.writeln(s);
  }
}


//******************************************************************************
// Description: Erstellt die Einträge innerhalb der Tabelle mit allen Links
// startNr: EffekteNr des ersten Bildes  z.B. (1)
// stopNr: Letzte Nummer des Bilder z.B. 34
// breite: 2 wenn Bild m01.mpg oder 3 wenn Bild m001.jpg benannt ist
// Remarks:  Das Alt- und TitleTag wird ebenfalls gesetzt.
// Version: 1.1 / 08.11.2011 / M. Derflinger / Abgleitet aus MakeFotogarlieThumbsHD, nur andere Bildgrösse
//****************************************************************************** 
function MakeFotogalerieThumbsHD(startNr, stopNr, breite)
{
  var i=1;
  var Quote= "\"";
  var bildNr = "000";
  var BildTitle = "";
  
  for(i=startNr; i <= stopNr; i++)
  { 
	bildNr = LPad(i, breite, "0");
	bildTitle = strreplace(zz[i-1], "<BR>", " ");
	s = "<a href=" + Quote + "javascript:dv_ShowDia('" + i + "')" + Quote + ">";
	s = s + '<img name="b"' + i + ' ';
	s = s + 'src="mimages/m' + bildNr + '.jpg" width="140" height="90" border="0"';
	s = s + 'alt="' + bildTitle + '" title="' + bildTitle + '"></a>';
	document.writeln(s);
  }
}