/*
KAL, C+BG: wichtige Variablen
	aArray, bBoolean, iInteger, oObject, sString
	var						func
K							lesezeichen [k], lz_ok
BG	aBGalerie, aTitel, oBild (iBAnz)		gross, grossKlein, prepare, musical_id
DG/MS	iBAkt, bAgain, aBShow, iBAnz, iTime (oBild)	IntToString, NextB, DiaShow [c]
CV	aBHaft						haft [i]
KA	bDruck						change, dynamisch [w,emk/fw !!], druck
WIN							wop [ii], wop2 [iforum], Einstellungen, ord [ii,io]
KAL	aMonat						Ausgabe [nk], KStop, KStart, KKopf, KZelle, KMult
BIB	bDHTML, bDOM, bMS, bNS, bOP			DHTML_init, getElem, setCont, setNull
//
func.	Ausgabe, change, DHTML_init, DiaShow, druck, dynamisch, getElem, gross, grossKlein, haft, IntToString,
	KKopf, KMult, KStart, KStop, KZelle, lesezeichen, lz_ok, musical_id, NextB, ord, prepare, setCont, setNull, sWe, wop
*/
var	aBGalerie, aBGKlein, aBHaft, aBShow, aMonat, aTitel, bAgain, bDHTML, bDOM, bDruck, bMS, bNS, bOP, iBAkt, iBAnz, iTime, oBild;

// KAL
aMonat		= new Array;
aMonat[0]	= 3; // iTagAnz, Array-Länge von aTage und aOrte
aMonat[1]	= 5; // iMon
aMonat[2]	= 2006;	// iJahr
aMonat[3]	= new Array(14, 20, 21); // aTage
aMonat[4]	= new Array("Nürnberg", "Fürth", "Erlangen"); // aOrte

// C + BG, evtl NextB() ändern
iBAnz		= 67 + 1;
aBGalerie	= new Array(70);
aTitel		= new Array(70);

function musical_id(nr)
{if	 (nr < 11) sReturn = "G";
 else if (nr < 20) sReturn = "J"
 else if (nr < 30) sReturn = "Z";
 else if (nr < 40) sReturn = "H";
 else if (nr < 50) sReturn = "A";
 else if (nr < 60) sReturn = "B";
 else if (nr < 70) sReturn = "T";
 else		   sReturn = "";
 return sReturn;
}

aTitel[79]	= "";
aTitel[78]	= "";
aTitel[77]	= "";
aTitel[76]	= "";
aTitel[75]	= "";
aTitel[74]	= "";
aTitel[73]	= "";
aTitel[72]	= "";
aTitel[71]	= "";
aTitel[70]	= "";
//
aTitel[67]	= "Salomo wird Nachfolger Davids";
aTitel[66]	= "Nathan spricht zu David";
aTitel[65]	= "Batseba";
aTitel[64]	= "David wird König";
aTitel[63]	= "David auf der Flucht";
aTitel[62]	= "Doeg informiert Saul";
aTitel[61]	= "David spielt ein Saiteninstrument";
aTitel[60]	= "König Saul";
//
aTitel[58]	= "Geliebtes Dörfchen";
aTitel[57]	= "Der dritte Mann";
aTitel[56]	= "Abschied";
aTitel[55]	= "Gerüchte";
aTitel[54]	= "Es ist Liebe!";
aTitel[53]	= "Das war ein schönes Geschenk...";
aTitel[52]	= "Hochzeit";
aTitel[51]	= "Know how";
aTitel[50]	= "Der Handel ist perfekt";
//
aTitel[49]	= "Ein Fleischer ist kein Gelehrter";
aTitel[48]	= "Sabbatgebet";
aTitel[47]	= "Käse für Revoultion und Lehre";
aTitel[46]	= "Männersache";
aTitel[45]	= "Tevje das Pferd";
aTitel[44]	= "Lernen durch Staunen";
aTitel[43]	= "Mädchenträume";
aTitel[42]	= "Jente zu Besuch";
aTitel[41]	= "Hausarbeit";
aTitel[40]	= "Tevje";
//
aTitel[39]	= "Sie sind nicht meine Kinder";
aTitel[38]	= "Gelobtes Land";
aTitel[37]	= "Gott nimmt unser Wandern auf sein Herz";
aTitel[36]	= "Zeichen";
aTitel[35]	= "Gebote";
aTitel[34]	= "Tausendmal verraten";
aTitel[33]	= "Hör auf Gott, hör auf die Welt";
aTitel[32]	= "Unser Gott ist treu wie Gold";
aTitel[31]	= "Das war's also Herr";
//
aTitel[29]	= "Josef gibt sich zu erkennen";
aTitel[28]	= "Wer ist dieser Mann?";
aTitel[27]	= "Er hat sie lange schmoren lassen";
aTitel[26]	= "Gebt uns Brot";
aTitel[25]	= "Das Leben der Brüder geht weiter";
aTitel[24]	= "Träum süß";
aTitel[23]	= "Josef im Brunnen";
aTitel[22]	= "Josef und seine Brüder";
aTitel[21]	= "Pua und Schifra";
//
aTitel[15]	= "Die Karawane";
aTitel[14]	= "Rahel, Abraham und Joseph";
aTitel[13]	= "Der King";
aTitel[12]	= "Joseph + Olala";
aTitel[11]	= "Potiphar + Olala";
//
aTitel[10]	= "Wir beschwör'n dich";
aTitel[9]	= "Weh euch (doch nicht)";
aTitel[8]	= "Weh euch";
aTitel[7]	= "... Menschheit ";
aTitel[6]	= "Zu weit...";
aTitel[5]	= "Ja, der Herr gibt's im Schlaf";
aTitel[4]	= "Pass gut auf in Gottes Unterricht";
aTitel[3]	= "Bevor der ganze Körper verdirbt...";
aTitel[2]	= "Wer sich selbst erhöht...";
aTitel[1]	= "Bereitet dem Herrn seinen Weg";
aTitel[0]	= "Prolog";


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

// K
function lesezeichen(verweis, name)
{ if (!lz_ok())
  { alert("Diese Funktion wird von Ihrem Browser nicht unterstützt!")
    /* Diese Funktion wird von Ihrem Browser nicht unterstützt!\n\nDurch Eingabe eines entsprechenden Tastaturkürzels können Sie die Seite dennoch \nzu Ihren Favoriten hinzufügen:\n\n\nNetscape WIN (alle Vers.): Strg+G \n\nOpera WIN (alle Vers.): Strg+T \n\nInternet Explorer MAC (alle Vers.): Apfel+D \n\nNetscape MAC (ab 4.x): Apfel+D \n\nNetscape MAC (ab 6.x): Apfel+G \n\nOpera MAC (alle Vers.): Apfel+T */
    return;
  }  
  window.external.AddFavorite(verweis, name);
}

function lz_ok()
{ if (!window.external)
    return false;
  return true;
}


// BG
oBild = new Image();
oBild.src = "../ci/lk.jpg";

function gross(nr)
{if (bDHTML)
 {// 2x default
  oB = oBild;
  sT = "iBAnz zu klein (qt.js gross)";
  if (nr < iBAnz)
  { oB = eval(aBGalerie[nr]);
    sT = aTitel[nr];
  }
  sM = musical_id(nr);
  sA = "Anf_"		+ sM;
  sB = "beschreibung_"	+ sM;
  sG = "gross_"		+ sM;
  sL = "link_"		+ sM;
  sU = "ueb"		+ sM;
  oZiel		= document.images[sG];
  oZiel.src	= oB.src;
  oZiel.alt	= sT;
  oZiel.height	= 425;
  oZiel.style.border = "solid #aaaaff 1px";
  setNull(sA);
  setCont(sB,sT);
  oL = getElem(sL);
  if ((nr == 10) || (nr == 15) || (nr == 29) || (nr == 39) || (nr == 49) || (nr == 58) || (nr == 67))
   oL.href = "javascript:grossKlein(" + nr + ");";
  else
   oL.href = "javascript:gross(" + eval(nr+1) + ");";
  oU = getElem(sU);
  oU.style.visibility = "visible";
 }
}

function grossKlein(nr)
{if (bDHTML)
 {if (nr < iBAnz)
  {sT = "Nach Klick auf Titel oder Bild ersetzt Javascript die kleinen Bilder durch ein Großes.";
   sM = musical_id(nr);
   sA = "Anf_"		+ sM;
   sB = "beschreibung_"	+ sM;
   sG = "gross_"	+ sM;
   sU = "ueb"		+ sM;
   oZiel	= document.images[sG];
   oZiel.src	= "../b/k/0.jpg";
   oZiel.alt	= "";
   oZiel.height	= 1;
   oZiel.style.border = "none";
   setReset(sA);
   setCont(sB,sT);
   oU = getElem(sU);
   oU.style.visibility = "hidden";
  }
 }
}

function prepare(von, bis)
{if (bDHTML)
 {for (iI = von; iI <= bis; iI++)
  {if (iI < 10)
    sZ = "0";
   else
    sZ = "";
   Hilf			= new Image();
   Hilf.src		= "../b/g/0" + sZ + iI + ".jpg";
   aBGalerie[iI]	= Hilf;
  }
 }
}


// DG/MS
function IntToString(iNr)
{ if (iNr <  10)  sE = "0"; else sE = "";
  if (iNr < 100)  sH = "0"; else sH = "";
  Erg = "../b/k/" + sH + sE + iNr + ".jpg";
  return Erg;
}

function NextB()
{ if (bAgain)
  { iBAkt	= (iBAkt + 1) % iBAnz;
    if (iBAkt == 16)  iBAkt = 21;
    if (iBAkt == 30)  iBAkt = 31;
    if (iBAkt == 59)  iBAkt = 60;
    if (iBAkt == 68)  iBAkt = 70;
    Hilf	= eval(aBShow[iBAkt]);
    oBild.src	= Hilf.src;
    oBild.alt	= iBAkt;
    window.setTimeout('NextB()', iTime);
  }
}

function DiaShow()
{ iBAkt		= 0;
  bAgain	= 1;
  aBShow	= new Array(200);
  iTime		= 1000;
  oBild		= getElem('B');
//
  for (iI=0; iI<iBAnz; iI++)
  { Hilf	= new Image();
    Hilf.src	= IntToString(iI);
    aBShow[iI]	= Hilf;
  }
  window.setTimeout('NextB()', 5000);
}


// CV
aBHaft		= new Array(3);
//
aBHaft[0]	= new Image();
aBHaft[1]	= new Image();
aBHaft[2]	= new Image();
//
aBHaft[0].src= "../ci/lk.jpg";	/* 170x260 (190x291) */
aBHaft[1].src= "../b/d/00.jpg";	/* 110x164 (110x168) */
aBHaft[2].src= "../b/d/04.jpg";	/* 110x173 (110x168) */

function haft(nr)
{Hilf = eval(aBHaft[nr]);
 window.document.images.log.src = Hilf.src;
}


// KA
// div: 'db' Menu mit 'di' Link/Version
//      'dp' Druck-Bilder, 'd0' 'd1' 'd2' Einzelbilder
bDruck = 1;

function change(target)
{if (bDHTML)
 {sT = 'd'+target;
  oT = getElem('d'+target);
  if (oT.style.visibility == "visible")
   oT.style.visibility = "hidden";
  else
   oT.style.visibility = "visible";
 }
}

function dynamisch()
{if (bDHTML)
 {oT = getElem('db'); // Link
  oT.style.display = "block";
  oT = getElem('dt'); // Text
  oT.style.display = "block";
  druck();
 }
}

function druck()
{if (bDHTML)
 {oP = getElem('dp'); // Druck-Bilder
  oA = getElem('d0'); // d0-01:386x452
  oB = getElem('d1'); // d1-02:403x323
  oC = getElem('d2'); // d2-03:475x170
  oT = getElem('dt'); // Text
//
  if (bDruck == 0)
  {bDruck = 1;
//
   oP.style.display	= "block";
   oA.style.display	= "none";
   oB.style.display	= "none";
   oC.style.display	= "none";
   oT.style.display	= "none";
//
   setCont("di","OnlineVersion");
  }
  else
  {bDruck = 0;
//
   oP.style.display	= "none";
   oA.style.display	= "block";
   oB.style.display	= "block";
   oC.style.display	= "block";
   oT.style.display	= "block";
   oA.style.visibility	= "visible";
   oB.style.visibility	= "hidden";
   oC.style.visibility	= "hidden";
//
   setCont("di","DruckVersion");
  }
 }
}


// WIN
function wop(file,breit,hoch)
{ return window.open(file,'_blank',Einstellungen(10,breit,hoch));
}

function wop2(file,breit,hoch)
{ return window.open(file,'_blank',Einstellungen(170,breit,hoch));
}

function Einstellungen(links,breit,hoch)
{ return ('toolbar=no,scrollbars=yes,left='+links+',top=10,status=0,width='+breit+',height='+hoch);
}

function ord(o,file,FensterName)
{ l = 10;
  w = screen.width;
  breit = 440;
  if (w < 900)
   breit = breit - 100;
  w = w - breit;
  if (o == 2)
  { l = w + 20;
    w = breit - 40;
  }
  h = screen.height - 70;
  return window.open(file,FensterName,Einstellungen(l,w,h));
}


// KAL
function Ausgabe()
{ KMult(aMonat);
}

function KMult(aM)
{ aNMon	= new Array ("Januar","Februar","M&auml;rz","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
  Start	= KStart(aM[1],aM[2]);
  Stop	= KStop(aM[1],aM[2]);
//
  var Wochen = 6 - 1;
  var Ende = Start + Stop;
  if (Ende <= 35)
    Wochen--;
  document.write("<table class='kal'>");
  var Monatskopf = aNMon[aM[1]-1] + " " + aM[2];
  KKopf(Monatskopf);
  var Tageszahl = 1;
  var iTestTag = 0;
  var iTestMax = aM[0] - 1; // wegen Start bei Null, dies wegen Array-Index
//
  for (i=0; i<=Wochen; i++)
  { document.write("<tr class='kal'>");
    for(j=0; j<=6; j++)
    { if((i == 0) && (j < Start))
        KZelle("&#160;", "leer", '');
      else
      { if(Tageszahl > Stop)
          KZelle("&#160;", "leer", '');
        else
        { if ((Tageszahl == aM[3][iTestTag]))
          { if (j == 6)
              KZelle(Tageszahl, "heuteSonntag", aM[4][iTestTag]); // Titel = Ort
            else
              KZelle(Tageszahl, "heute", aM[4][iTestTag]); // Titel = Ort
	    if (iTestTag < iTestMax)
	      iTestTag++; // nicht mehr Tage prüfen als vorhanden!
	  }
          else
            if (j == 6)
              KZelle(Tageszahl, "Sonntag", '');
            else
              KZelle(Tageszahl, "tag", '');
          Tageszahl++;
        }
      }
    }
    document.write("</tr>");
  }
  document.write("</table>");
}

function KStart(Monat, Jahr)
{ var Zeit         = new Date(Jahr,Monat-1,1);
  var Start        = Zeit.getDay();
  if (Start > 0)
    Start--;
  else
    Start = 6;
  return Start;
}

function KStop(Monat,Jahr)
{ var Stop = 31;
  if (Monat==4 || Monat==6 || Monat==9 || Monat==11 )
    Stop--;
  if (Monat==2)
  { Stop-=3;
    if (Jahr%4 == 0)
      Stop++;
    if (Jahr%100 == 0)
      Stop--;
    if (Jahr%400 == 0)
      Stop++;
  }
  return Stop;
}

function KKopf(Monatstitel)
{ document.write("<tr class='kal'>");
  aWTag	= new Array ("Mo","Di","Mi","Do","Fr","Sa","So");
  document.write("<td align='center' colspan='7' valign='middle' class='kaltitel'>");
  document.write(Monatstitel);
  document.write("</td></tr>");
  document.write("<tr class='kal'>");
  for(i=0; i<=6; i++)
    KZelle(aWTag[i], 'titel', '');
  document.write("</tr>");
}

function KZelle(Inhalt, Class, Title)
{ document.write("<td align='center' valign='middle' class='" + Class + "' title='" + Title + "' class='kal'>");
  document.write(Inhalt);
  document.write("</td>");
}


// BIB DHTML-Bibliothek
bDHTML = bDOM = bMS = bNS = bOP = 0;
DHTML_init();
 
function DHTML_init()
{if (window.opera)  		bOP = 1;
 if (document.getElementById)	bDOM = 1;
 if (document.all && !bOP)	bMS = 1;
 if (document.layers && !bOP)	bNS = 1;
 bDHTML = bDOM + bMS + bNS;
}

function getElem(p2)
{var Elem = null;
 if (bDOM)
  if (typeof document.getElementById(p2) == "object")
   Elem = document.getElementById(p2);
 else if (bMS)
  if (typeof document.all[p2] == "object")
   Elem = document.all[p2];
 else if (bNS)
  if (typeof document[p2] == "object")
   Elem = document[p2];
 return(Elem);
}

function setCont(p2,p4)
{Elem = getElem(p2);
 if (Elem)
 {if (bDOM && Elem.firstChild)
   Elem.firstChild.nodeValue = p4;
  else if (bMS)
   Elem.innerText = p4;
  else if (bNS)
  {Elem.document.open();
   Elem.document.write(p4);
   Elem.document.close();
  }
 }
}

function setNull(p2)
{Elem = getElem(p2);
 if (Elem)
 {if (bDOM || bMS)
   Elem.style.display = "none";
  else if (bNS)
  {Elem.document.open();
   Elem.document.write("");
   Elem.document.close();
  }
 }
}

function setReset(p2)
{Elem = getElem(p2);
 if (Elem)
 {if (bDOM || bMS)
   Elem.style.display = "block";
 }
}

// EOF