function Nachladen(){
  if (!top.FramesetGeladen){

    var Zielframe       = "main";    
    var ZielVerzeichnis = "http://www.kolping-heustreu.de";
    var ZielDatei	= "index.htm";
    var DefaultDatei    = 1;
    var Identifikation  = "Achim"; 
    var SeitenURL       = self.location.href;                     
    if (document.all||document.layers){
      ZielDatei=DefaultDatei?ZielVerzeichnis:(ZielVerzeichnis+"/"+ZielDatei);
      window.name=umwandeln(Identifikation+Zielframe+"="+SeitenURL);
      top.location.replace(ZielDatei);
      }
    else {
      ZielDatei = ZielVerzeichnis + "/" + ZielDatei + "?" + Zielframe + "=" + SeitenURL;
      if (document.images)
        top.location.replace(ZielDatei) 
      else 
        top.location.href = ZielDatei;
      }
    }
 setTheme()  
}

function umwandeln(text){
  var Spezialzeichen="*+./_-@";
  var txt = escape(text);
  for (i=0;i<txt.length;i++)
    for (k=0;k<Spezialzeichen.length;k++)
      if (txt.charAt(i)==Spezialzeichen.charAt(k))
        txt=txt.substring(0,i) +"%G"+ k +txt.substring(i+1,txt.length);
  for (i=0;i<txt.length;i++)
    if (txt.charAt(i)=="%") 
      txt = txt.substring(0,i) + "_"+ txt.substring(i+1,txt.length);
  return txt;
  }

function setTheme() {
 if(document.cookie) {
  if(document.cookie=="none") {
   document.getElementById("css").href="standard.css";
   parent.main.document.getElementById("css").href="standard.css";  
}
  else {
   var t=document.cookie;
   t=t.replace(/Theme=/,"");
   t=t.substring(0,t.indexOf("!"));
   document.getElementById("css").href=t+".css";
   parent.main.document.getElementById("css").href=t+".css";
  }
 }
 else {
  document.getElementById("css").href="standard.css";
  parent.main.document.getElementById("css").href="standard.css"; 
}
 return;
}

function setCookie() {

 var today=new Date();
 var jahr=1000*60*60*24*365;
 var gueltig=new Date(today.getTime()+jahr);
 document.cookie="Theme="+document.forms[0].elements[0].value+";expires="+gueltig.toGMTString()+";";
 return;
}