/*
		 *Copyright 2009 (c) Aldenborg.AT Automation und Technologie
		 *lokale Scripte
		 *
		 */
		
		function ErrorMessage(message) {
			document.getElementById("inhalt").innerHTML= "<br/><strong>Tja, da lief wohl was falsch. ...&#160;</strong>" + message +
			"<br/><br/><a href='mailto:info@chorisma-schapdetten.de'>Fehler bitte melden.</a>";
		}

		function ShowText(text) {
			alert(text);
		}
		function ShowContent(tpage) {
			document.getElementById("inhalt").innerHTML= "<br/><div style='margin-top:20px; width:200px; background-color:#22eeee'>InhaltHome</div>";
		}
		function LoadEntry(what) {
			var timeoutid;
			if (window.XMLHttpRequest) XmlHttp= new XMLHttpRequest();
			else if (window.ActiveXObject) {
				XmlHttp= new ActiveXObject("Msxml2.XMLHTTP.6.0");
			}
			else {
				ErrorMessage();
				return;
			}
			XmlHttp.onreadystatechange= function() {
				if (XmlHttp.readyState==4) {
					window.clearTimeout(timeoutid);
					if (XmlHttp.status==200) {
						if (XmlHttp.responseXML!= null  && XmlHttp.responseXML.documentElement!=null) ReqAnswer(XmlHttp.responseXML, true);
						else if (XmlHttp.responseText!= null) ReqAnswer(XmlHttp.responseText, false);
						else ErrorMessage("Das ist nicht zu parsen! ...");
					} else ErrorMessage(XmlHttp.statusText);

				} else if (!timeoutid) {
					timeoutid= window.setTimeout(function() {XmlHttp.abort; ErrorMessage("TimeOut ist abgelaufen ...");}, 5000);
				}
			}
			//XmlHttp.open("GET","http://aatw01/AATcgi/Pages/Chorisma/" + what, true);
			XmlHttp.open("GET","http://www.chorisma-schapdetten.de/" + what, true);
			XmlHttp.send("");
		}

		function ReqAnswer(rxml, sxml) {
			var rhtml;
			if (sxml) {
				if (rxml.documentElement.xml) rhtml= rxml.documentElement.childNodes[1].xml;
				else rhtml= rxml.documentElement.childNodes[3].innerHTML;
			} else rhtml= rxml;
			document.getElementById("inhalt").innerHTML= rhtml;
			if (document.getElementById("divmove")) IniPage();
		}
		
		window.setTimeout(function() {LoadEntry("Home.xml");},1000);
		
		function LoadPicture(from) {
			window.open(from.getAttribute("src"));
			//alert();
		}

	/* Weitere 
	 *
	 */
		


	function AddEventListner (enode, etype, elistner, ebubble) {
		if (document.addEventListener) enode.addEventListener(etype.substr(2), elistner, ebubble);
		else enode.attachEvent(etype, elistner);
	}
	
	var tmpooo;
	function IniPage() {
		var ppp= document.getElementById("divmove");
		AddEventListner(ppp, "onmouseover", function() {
			tmpooo= window.setInterval(function() {
				if(ppp.scrollLeft==0) ddir= 1; 
				if(ppp.scrollLeft+ ppp.clientWidth==ppp.scrollWidth) ddir= -1;
				ppp.scrollLeft+= ddir;
			}, 5);
		}, false);
		AddEventListner(ppp, "onmouseout", function() {
				window.clearInterval(tmpooo);
			}, true);
	}

	function ShowDate(ele) {
	ele= ele.nextSibling;
	while (ele.nodeType!= 1) {ele= ele.nextSibling;}
	var ddd= new Date();
	ele.innerHTML= ddd.toLocaleString() + "<br>" + 
				   ddd.toString("") + "<br>" +
				   ddd.toLocaleTimeString() + "<br>" +
				   ddd.toDateString();
				   
	}