/*
 *	Statistik-File
 * 	(c) 2000-2007 Ing. Christian Groesswang / P.I.C.S. GmbH
 * 	Version  4.10
 * 	LastEdit 2007-10-09gc
 *
 *	Anpassung an Statistik Version 4
 */


// parameter abfragen
var lScreen=screen.width+'x'+screen.height+'x'+screen.colorDepth;
var lHost=location.host;
var lPage=location.pathname;
var lParams=escape(location.search);
var lReferrer=escape(document.referrer);
var lScript='http://stat4.edev.at/stat4.php';

// 

var gNow = new Date();
var gRandom=gNow.getTime();


function writeStat(pClient, pSite, pRange, pPage, pTracking, pTopHRef)
{
	if (typeof pTopHRef == 'undefined') pTopHRef=1;

	// Übergeordneten HRef-Abfragen
	if (pTopHRef==1 && window.name!='') lReferrer=escape(top.document.referrer);
	
	//Timestamp für Browsercache
	var oTime = new Date();
	timestamp = oTime.getTime();
	
	// img-Tag fuer Auswertung schreiben
	var lOptions = "time="+gRandom+"&js=1&track="+pTracking+"&client="+pClient+"&site="+pSite+"&range="+pRange+"&page="+pPage+"&scr="+lScreen+"&host="+lHost+"&from="+lReferrer+"&flash="+FlashInstalled()+"&acrobat=0&params="+lParams+"&ts="+timestamp;
	var lImg = '<img src="'+lScript+'?' + lOptions + '" width="0" height="0">';
	document.write(lImg);
}


// Hilfsfunktion für Acrobat
function AcrobatInstalled()
{
	//Prüfen ob Acrobat-Plugin vorhanden ist	
	var oAcrobat=new Object();
	var result=0;
	
	if (navigator.plugins && navigator.plugins.length) {
		for (i=0; i<navigator.plugins.length; i++)
			if (navigator.plugins[i].description.indexOf('Adobe Acrobat') != -1) result=1;
	}
	else if (window.ActiveXObject) {
		for (i=1; i<10; i++){
			try	{
				oAcrobatTest=eval("new ActiveXObject('PDF.PdfCtrl."+i+"');");
				if (oAcrobatTest) result=1;
			}
			catch(e) {}
		}
	}
	return result;
}

// Hilfsfunktion für Flash
function FlashInstalled()
{
	result = 0;

	if (navigator.mimeTypes && navigator.mimeTypes["application/x-shockwave-flash"])
	{
		if (navigator.mimeTypes["application/x-shockwave-flash"].enabledPlugin) result=1;
		else result=0;
	}
	else if (document.all && (navigator.appVersion.indexOf("Mac")==-1))
	{
		// IE Windows only -- check for ActiveX control, have to hide code in eval from Netscape (doesn't like try)
		eval ('try {var xObj = new ActiveXObject("ShockwaveFlash.ShockwaveFlash");if (xObj)	result = 1; xObj = null;	} catch (e)	{}');
	}
	return result;
}

function showStat()
{
	// Ergebnis der Auswertung anzeigen
	document.writeln('Aufloesung:'+lScreen+'<br>');
	document.writeln('Host:'+lHost+'<br>');
	document.writeln('Page:'+lPage+'<br>');
	document.writeln('Params:'+lParams+'<br>');
	document.writeln('Referrer:'+lReferrer+'<br>');
	document.writeln('Flash:'+FlashInstalled()+'<br>');
	document.writeln('Acrobat:0<br>');
	document.writeln('Script:'+lScript+'<br>');
	document.writeln(''+'<br>');
}