// In The Name of Allah, The Most Gracious, The Most Merciful
/*
Powered for VWDEV.com
*/

var setstatshomeaddress = "http://www.setstats.com/demo";

//alert('Ver 11-00-11');
//var setstatshomeaddress = "http://setstats";
var setstatsmisctrackerurl = setstatshomeaddress + "/statistics/actuary.php";
var setstatscounterpositionfileurl = setstatshomeaddress + "/statistics/counter.php?place";
var setstatscounterimgsrc = '';
var setstatscounterWidth = 72;
var setstatscounterHeight = 18;
var setstatscounterposition = 3;
var SetStatsCounterPositionatEnd = true;
var SetStatsCounterVisibility = true;

var DocumentText = '';
	// Positions: 2 > invisible!
	// 			  3 > at The End of HTML
	// 			  15 > Top Left
	// 			  16 > Top Center
	// 			  17 > Top Right
	// 			  25 > Down Left
	// 			  26 > Down Center
	// 			  27 > Down Right

var setstatsreqresponse;
// ------------- Public Vars --------------------------
var Starts, End;
var isIE, isNS, isOpers;
var isWinOS, isMacOS;
var addStatBar = false;
var DocumentLoaded = false;

// ----------------------
nullfunction = function(){};
var PrevOnReadyStateChange;

function SetStats_SetCookie(CookieName, CookieValue, CookieExpire /* Duration : In Hour Scale */)
{
	ExpireDate = new Date ();
	ExpireDate.setTime(ExpireDate.getTime() + (CookieExpire * 3600 * 1000));
	document.cookie = CookieName + "=" + escape(CookieValue) + "; path=/" + ((CookieExpire == null) ? "" : "; expires=" + ExpireDate.toGMTString());
}

function SetStats_GetCookie(CookieName)
{
	if (document.cookie.length > 0)
	{
		Start = document.cookie.indexOf(CookieName + "=");
		if (Start != -1)
		{
			Start += CookieName.length + 1; 
			End = document.cookie.indexOf(";", Start);

			if (End == -1)
				End = document.cookie.length;

			return unescape(document.cookie.substring(Start, End));
		}
		return null; 
	}
	return null; 
}

function setstats_detectIE(plugin)
{
	var plugin_ = new Array(
							"Shockwave Flash",
							"Shockwave for Director",
							"RealPlayer",
							"QuickTime",
							"VivoActive",
							"LiveAudio",
							"VRML",
							"Dynamic HTML Binding",
							"Windows Media Services"
							);

	var pluginsid = new Array(
							  "D27CDB6E-AE6D-11CF-96B8-444553540000",
							  "2A202491-F00D-11CF-87CC-0020AFEECF20",
							  "23064720-C4F8-11D1-994D-00C04F98BBC9",
							  "",
							  "",
							  "",
							  "90A7533D-88FE-11D0-9DBE-0000C0411FC3",
							  "9381D8F2-0288-11D0-9501-00AA00B911A5",
							  "22D6F312-B0F6-11D0-94AB-0080C74C7E95"
							  );


	for(var i = 0; (i < plugin_.length) && (plugin_[i].toLowerCase() != plugin.toLowerCase()); i++);

	pl = plugin.toLowerCase();
	//alert(pl);

	var l = 0;
	
	
	if (plugin_[i])
	{
		l = i;
	}
	else if (plugin_[i-1])
		{
			l = i - 1;
		}
		else
		{l = -1;}

	if (l > -1)
	{
		var db = document.body;
		db.addBehavior("#default#clientcaps");
		if(db.isComponentInstalled("{"+pluginsid[l]+"}","componentid"))
		{
			result = 'y';
		}
		else
		{
			result = 'n';
		}
	}
	else
	{
		result = 'n';
	}

	return result;
}

function setstats_detectNS(plugin)
{
	var result = 'n';
	var plugin_ = new Array(
							"Shockwave Flash",
							"Shockwave for Director",
							"RealPlayer",
							"QuickTime",
							"VivoActive",
							"LiveAudio",
							"VRML",
							"Dynamic HTML Binding",
							"Windows Media Services"
							);

	var db = navigator.plugins;
	for(var i = 0; i < db.length; i++)
	{
		if(db[i].name.toLowerCase().indexOf(plugin.toLowerCase()) >= 0)
		{
			return 'y';
		}
		else
		{
			result = 'n';
		}
	}
		
	return result;
}

function StatisticsBarFunction(options)
{
	var persistclose=0;
	var startX = 0;
	var startY = 0;
	var verticalpos="frombotton";
	
	switch (setstatscounterposition)
	{
		case 15 :
			verticalpos = "fromtop";
			horizontalpos = "left";
			break;
		case 16 :
			verticalpos = "fromtop";
			horizontalpos = "center";
			break;
		case 17 :
			verticalpos = "fromtop";
			horizontalpos = "right";
			break;
		case 25 :
			verticalpos = "frombotton";
			horizontalpos = "left";
			break;
		case 26 :
			verticalpos = "frombotton";
			horizontalpos = "center";
			break;
		case 27 :
			verticalpos = "frombotton";
			horizontalpos = "right";
			break;
	}

	function iecompattest()
	{
		//return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
		return document.body
	}

	function closesetstatsstatsbar()
	{
		if (persistclose)
			SetStats_SetCookie("remainclosed", 1, 1);
		document.getElementById("StatisticsBar").style.visibility="hidden";
	}

	function statbar()
	{
		barheight=document.getElementById("StatisticsBar").offsetHeight;
		barwidth=document.getElementById("StatisticsBar").offsetWidth;

		var ns = isNS || isOpera;

		var d = document;

		function ml(id)
		{
			var el=d.getElementById(id);
			if (!persistclose || persistclose && SetStats_GetCookie("remainclosed")=="")
				el.style.visibility="visible"

			if(d.layers)
				el.style=el;

			el.sP=function(x,y){this.style.left=x+"px";this.style.top=y+"px";};

			el.x = startX;

			if (verticalpos=="fromtop")
				el.y = startY;
			else
			{
				el.y = ns ? pageYOffset + innerHeight : iecompattest().scrollTop + iecompattest().clientHeight;
				el.y -= startY;
			}

			return el;
		}
		window.FixStatbarPosition = function()
							{
								if (verticalpos=="fromtop")
								{
									var pY = ns ? pageYOffset : iecompattest().scrollTop;
									ftlObj.y += (pY + startY - ftlObj.y)/8;
								}
								else
								{
									var pY = ns ? pageYOffset + innerHeight - barheight: iecompattest().scrollTop + iecompattest().clientHeight - barheight;
									ftlObj.y += (pY - startY - ftlObj.y)/8;
								}
					
								if (horizontalpos == "left")
								{
									var pX = 0;
									ftlObj.x += (pX + startX - ftlObj.x)/8;
								}
								else if (horizontalpos == "center")
								{
									var pX = ns ? (innerWidth - barwidth) / 2: (iecompattest().clientWidth - barwidth) / 2;
									ftlObj.x += (pX - ftlObj.x)/8;
								}
								else if (horizontalpos == "right")
								{
									var pX = ns ? innerWidth - barwidth: iecompattest().clientWidth - barwidth;
									ftlObj.x += (pX - startX - ftlObj.x)/8;
								}
					
								ftlObj.sP(ftlObj.x, ftlObj.y);
								setTimeout("FixStatbarPosition()", 10);
							}
		ftlObj = ml("StatisticsBar");
		FixStatbarPosition();
	}
	statbar();
}

function setstats(siteid, pageid, /*position, */options)
{
	var USRScreen, USRWinSize, USRCdi, hasJava, hasSHK, hasSVG, hasFLA, USRNSe;
	var hasRP, hasMOV, hasWMA, hasPDF, USRPDFVer, SetStats_UserID, SetStats_SessionID;
	var Now;

	if (setstatscounterposition==1 || setstatscounterposition==0)
	{setstatscounterposition = 5;}

	Now = new Date();
	USRScreen = screen.width + "x" + screen.height;

	if (navigator.appName != "Netscape"){ USRCdi = screen.colorDepth; }
	else {USRCdi = screen.pixelDepth};

	hasJava = navigator.javaEnabled();

	SetStats_UserID = SetStats_GetCookie("SETUSER_ID" + siteid);
	SetStats_SessionID = SetStats_GetCookie("SETSESSION_ID" + siteid);
	var RandomNumber=Math.floor(Math.random()*10000);
	if (SetStats_UserID == null || (SetStats_UserID == "")) { SetStats_UserID = "setuser_id" + Now.getTime() +"r"+ RandomNumber; }
	if (SetStats_SessionID == null || (SetStats_SessionID == "")) { SetStats_SessionID = "setsession_id" + Now.getTime() +"r"+ RandomNumber; }
	SetStats_SetCookie("SETUSER_ID" + siteid, SetStats_UserID, 10000);
	SetStats_SetCookie("SETSESSION_ID" + siteid, SetStats_SessionID, 1);
	SetStats_UserID = ""; SetStats_UserID = SetStats_GetCookie("SETUSER_ID" + siteid);
	SetStats_SessionID = ""; SetStats_SessionID = SetStats_GetCookie("SETSESSION_ID" + siteid);

	var NavText = navigator.appName.toLowerCase();     // "internet explorer" or "netscape"
	var AgentText = navigator.userAgent.toLowerCase();   // "msie...", "mozilla...", "firefox..."

	var isWinOS  = ((AgentText.indexOf("win")!=-1) || (AgentText.indexOf("32bit")!=-1));
	var isMacOS  = (AgentText.indexOf("mac")!=-1);

	var OS = "";
	var OSVer = "Unknown"

	if (isWinOS)
		{ OS="Windows";}
	else if (isMacOS)
			{OS = "Macintosh";}
		else
			{OS = "Unknown";}

	var NavName = "";
	var isNS = (NavText.indexOf("netscape") != -1);
	var isOpera = (NavText.indexOf("opera") != -1);
	var isIE = (AgentText.indexOf("msie") != -1);

	if (isNS)
	{NavName = "Netscape";}
	else if (isOpera)
		 {NavName = "Opera";}
		 else if (isIE)
				{NavName = "Msie";}
				else 
				{NavName = "Unknown";}

	if (document.documentElement && document.documentElement.clientWidth)
		USRWinSize = document.documentElement.clientWidth + 'x' + document.documentElement.clientHeight;
	else if (document.body && document.body.clientWidth)
		USRWinSize = document.body.clientWidth + 'x' + document.body.clientHeight;
	else
		USRWinSize = window.innerWidth + 'x' + window.innerHeight;

	if (isIE && isWinOS)
	{
		hasshk = setstats_detectIE("Shockwave for Director");
		hassvg = setstats_detectIE("Adobe.SVGCtl");
		hasfla = setstats_detectIE("Shockwave Flash");
		hasrp  = setstats_detectIE("RealPlayer");
		hasmov = setstats_detectIE("QuickTime");
		haswma = setstats_detectIE("Windows Media Services");
		haspdf = 'n'; USRPDFVer='';
//		if (setstats_detectIE("PDF.PdfCtrl.1") == 'y') { TRKpdf = 'y'; TRKpdfver='4'; } // Acrobat 4
//		if (setstats_detectIE('PDF.PdfCtrl.5') == 'y') { TRKpdf = 'y'; TRKpdfver='5'; } // Acrobat 5
//		if (setstats_detectIE('PDF.PdfCtrl.6') == 'y') { TRKpdf = 'y'; TRKpdfver='6'; } // Acrobat 6
//		if (setstats_detectIE('AcroPDF.PDF.1') == 'y') { TRKpdf = 'y'; TRKpdfver='7'; } // Acrobat 7
	}

	if (isNS || !isIE)
	{
		USRNSe = "";
		for (var i = 0; i < navigator.mimeTypes.length; i++)
			USRNSe += navigator.mimeTypes[i].type.toLowerCase();

		hasSHK = setstats_detectNS("Shockwave for Director");
		//TRKsvg = /* setstats_detectNS("image/svg+xml","" */);
		hasSVG = setstats_detectNS("image/svg+xml");
		if (document.implementation.hasFeature("org.w3c.dom.svg", "")) {hasSVG = "y"; }
		hasFLA = setstats_detectNS("Shockwave Flash");
		hasRP  = setstats_detectNS("RealPlayer");
		hasMOV = setstats_detectNS("QuickTime");
		hasWMA = setstats_detectNS("Windows Media Services");
		hasPDF = 'n'; //setstats_detectNS("application/pdf");
		USRPDFVer = '';
	}

	var imgsrc1 = setstatsmisctrackerurl + '?site=' + siteid + '&page=' + pageid;
	var counteraddress = setstatshomeaddress + '/statistics/counter.php?site=' + siteid;
	var imgsrc2 = '&counterfile=' + counteraddress;
	var imgsrc3 = '&os=' + OS + '&osver=' + OSVer + '&nav=' + escape(NavName) /*+'&agt='+TRKagt+'&bie='+isIE+'&bop='+isOpera+'&bns='+isNS;*/;
	var imgsrc4 = '&screen=' + USRScreen + '&win=' + USRWinSize + '&cdi=' + USRCdi;
	var imgsrc5 = '&java=' + hasJava + '&shk=' + hasSHK + '&svg=' + hasSVG + '&fla=' + hasFLA + '&rp=' + hasRP + '&mov=' + hasMOV + '&wma=' + hasWMA + '&pdf=' + hasPDF;
	var imgsrc6 = '&uid=' + SetStats_UserID + '&sid=' + SetStats_SessionID;
	var imgsrc7 = '&addr=' + escape(window.location);

	setstatscounterimgsrc =imgsrc1+imgsrc2+imgsrc3+imgsrc4+imgsrc5+imgsrc6+imgsrc7;

	if ((document.readyState == 'loaded')||(document.readyState == 'complete'))
	{
		PrevOnReadyStateChange = nullfunction;
		SetStatsCheck();	
	}
	else
	{
		if (document.onreadystatechange != null)
		{PrevOnReadyStateChange = document.onreadystatechange;}
		else
		{PrevOnReadyStateChange = nullfunction;}
		document.onreadystatechange = SetStatsCheck;
	}
}

function SetStatsCheck()
{
	PrevOnReadyStateChange();
	if ((document.readyState == 'loaded')||(document.readyState == 'complete'))
	{
		//DocumentLoaded = true;
		if (((setstatscounterposition>=15) && (setstatscounterposition<=17)) || ((setstatscounterposition>=25) && (setstatscounterposition<=27)))
		{
			SetStatsCounterPositionatEnd = false;
			SetStatsCounterVisibility = true;
			CreateSetStatsIECounterObject();
			StatisticsBarFunction();
		}
		else if (setstatscounterposition == 3)
		{
			SetStatsCounterVisibility = true;
			SetStatsCounterPositionatEnd = true;
			CreateSetStatsCounterObject();
		}
		else if (setstatscounterposition == 2)
		{
			SetStatsCounterPositionatEnd = true;
			SetStatsCounterVisibility = false;
			CreateSetStatsCounterObject()
		}
		document.onreadystatechange = null;
	}
}

function CreateSetStatsCounterObject()
{
	if (!SetStatsCounterPositionatEnd)
	{
		DocumentText = '<style type="text/css">#StatisticsBar{position:absolute;border: 1px solid black;padding: 2px;background-color: black;width: ' + setstatscounterWidth + 'px;visibility: hidden;z-index: 100;}</style>';
		DocumentText += '<div id="StatisticsBar" style="position: absolute; left: 0px; top: 0px" />';
		DocumentText += '<a href="' + setstatshomeaddress + '/index.htm">';
		DocumentText += '<img id="setstatscounterimg" src="' + setstatscounterimgsrc + '" width="' + setstatscounterWidth + '" height="' + setstatscounterHeight + '">';
		DocumentText += '</a></div>';
	}
	else
	{
		DocumentText = "</html><html><body align='center'><span style='width:100%;text-align:center'>";
		DocumentText += '<a href="' + setstatshomeaddress + '/index.htm">';
		DocumentText += '<img id="setstatscounterimg" src="' + setstatscounterimgsrc + '" width="' + setstatscounterWidth + '" height="' + setstatscounterHeight + '" border="0" title="سايت آمارگيري SetStats" >';
		DocumentText += '</a>';
		DocumentText += '</span></body></html>';
	}

	var Bodies = document.getElementsByTagName('body');
	if (Bodies.length>0)
	{
		Bodies(Bodies.length - 1).innerHTML += DocumentText;
	}
	var CounterElement = document.getElementById("setstatscounterimg");

	if (SetStatsCounterVisibility)
	{
		CounterElement.style.visibility = 'visible';
	}
	else
	{
		CounterElement.style.visibility = 'hidden';
	}
}