var request = 0;
var prospect = 0;
var booking = 0;
var page_lang = "";
var page_category = "";
var link = "";

var agent = navigator.userAgent.toLowerCase();
var major = parseInt( navigator.appVersion );
var is_ie  = ( agent.indexOf("msie") != -1 );
var is_nav = (( agent.indexOf( 'mozilla' ) != -1 ) && (( agent.indexOf( 'spoofer' ) == -1 ) && ( agent.indexOf( 'compatible' ) == -1 )) && ( agent.indexOf( 'opera' ) == -1 ));

var is_win = (( agent.indexOf( "win" ) != -1 ) || ( agent.indexOf( "16bit" ) != -1 ));
var ref = "";
var res = "";
var co = 0;
var tz=(new Date()).getTimezoneOffset();
if( major >= 4 )
{
	if( is_ie )
	{
		co = screen.colorDepth;
	}
	else
	{
		co = screen.pixelDepth
	}
	res = "" + screen.width + "x" + screen.height;
}

var url = ""+escape( document.location.href );
var fl = 0; // Flash
var sw = 0; // Shockwave
var rp = 0; // Real Player
var qt = 0; // Quick time
var wm = 0; // Realplayer

if( is_ie && is_win )
{
	var rp2 = 0;
	var rp3 = 0;
	var rp4 = 0;

	document.write('<script type="text/vbscript"\> \n');
	document.write('on error resume next \n');
	document.write('For i = 1 to 8 \n');
	document.write('If Not(fl) And IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash." & i)) Then \n');
	document.write('fl = 1 \n');
	document.write('End If \n');
	document.write('If Not(sw) And IsObject(CreateObject("SWCtl.SWCtl." & i)) Then \n');
	document.write('sw = 1 \n');
	document.write('End If \n ');
	document.write('If Not(qt) And IsObject(CreateObject("QuickTimeCheckObject.QuickTimeCheck." & i)) Then \n');
	document.write('qt = 1 \n');
	document.write('End If \n ');
	document.write('If Not(wm) And IsObject(CreateObject("MediaPlayer.MediaPlayer." & i)) Then \n');
	document.write('wm = 1 \n');
	document.write('End If \n '); 
	document.write('If Not(rp2) And IsObject(CreateObject("rmocx.RealPlayer G2 Control." & i)) Then \n');
	document.write('rp2 = 1 \n');
	document.write('End If \n ');
	document.write('Next \n');
	document.write('If Not(rp2) And IsObject(CreateObject("rmocx.RealPlayer G2 Control")) Then \n');
	document.write('rp3 = 1 \n');
	document.write('End If \n ');
	document.write('If Not(rp2) And IsObject(CreateObject("RealVideo.RealVideo(tm) ActiveX Control (32-bit)")) Then \n');
	document.write('rp4 = 1 \n');
	document.write('End If \n ');
	document.write('</script\> \n');
	if( rp2 || rp3 || rp4 )
	{
		rp = 1;
	}
}
else
{
	detect();
}

try
{
	ref = ceref();
}
catch( e )
{
	if( typeof( top.document ) == "object" )
	{
		ref = escape( top.document.referrer );
	}
}

if(( ref == "" ) || ( ref == undefined ))
{
	ref = ""+escape( document.referrer );
}

function ceref()
{
	var ref = "";
	if(( top.location == document.referrer ) || ( top != parent && parent.document.referrer == top.location ))
	{ 
		ref = "" + escape( top.document.referrer );
		return ref;
	}
}

function get_query()
{
	var jv = 0;
	try
	{
		jv = ( navigator.javaEnabled()) ? 1 : 0;
	}
	catch( e )
	{
		handleError();
	}
	var ck = ( navigator.cookieEnabled ) ? 1 : 0;
	var req = ( request ) ? 1 : 0;
	var book = ( booking ) ? 1 : 0;
	var pro = ( prospect ) ? 1 : 0;
	var js = 1;

	var flags = ( req * 1 ) | ( book * 2 ) | ( pro * 4 );
	var plugs = ( fl * 1 ) | ( sw * 2 ) | ( rp * 4 ) | ( qt * 8 ) | ( wm * 16 );
	var techs = ( jv * 1 ) | ( ck * 2 ) | ( js * 4 );

	var returnValue = "";
	returnValue += "ex=" + flags + "&co=" + co + "&res="+ res + "&pl=" + plugs +
				   "&tz=" + tz + "&tc=" + techs + "&pgl=" + page_lang;
	returnValue += "&pgc=" + page_category + "&ln=" + link + "&js=" + js +
				   "&js=" + ref + "&url=" + url;
	return returnValue;
}

function handleError()
{
	return true;
}

function set_cookie( key, value, expires )
{
	var exists = get_cookie_value( key );
	var cookie = key + "=" + escape(value);
	if( expires )
		cookie += "; expires=" + expires.toGMTString() + "; path=/";

	document.cookie = cookie;
	return exists;
}

function get_cookie_value( key )
{
	var arr;
	var cookies = document.cookie.split( ";" );
	for( i=0; i<cookies.length; i++ )
	{
		arr = cookies[ i ].split( "=" );
		var name = new String( arr[ 0 ] );
		var value = new String( arr[ 1 ] );

		name = name.replace( /^[ \t\n]*/, "" );
		if( name == key )
			return value;
	}
	return false;
}
 
function wr_count( client )
{
	var query = get_query();
	var now = new Date();
	var fv=0;
	var firstVisit = get_cookie_value( "profi_wr_u_fv" );
	if( !firstVisit )
	{
		fv=1;
		firstVisit = ( new Date()).getTime();
	}

	var logdom = "webreporter.profi.it/counter/";
	var url = "http://" + logdom + "/counter.php?u=" + client + "&t=" + now.getTime() +
			  "&fv=" + fv + "&" + query;

	var expires = new Date();
	expires.setYear( 1900 + expires.getYear() + 2 );
	set_cookie( "profi_wr_u_fv", firstVisit, expires );

	document.write( "<img src='"+url+"' />" );
}

function detect( Name )
{
	if( navigator.plugins && navigator.plugins.length )
	{
		for( i=0; i<navigator.plugins.length; ++i )
		{
			var str = navigator.plugins[i].name.toLowerCase();
			if( str.indexOf("quicktime") != -1 )
			{
				qt=1;
			}
			if( str.indexOf( "windows media" ) != -1 )
			{
				wm=1;
			}
			if( str.indexOf( "shockwave for director" ) != -1 )
			{
				sw=1;
			}
			if( str.indexOf( "shockwave flash" ) != -1 )
			{
				fl=1;
			}
			if( str.indexOf( "realplayer" ) != -1 )
			{
				rp=1;
			}
		}
	}
} 
