/*************************************************************************
*                                                                        *
*    WebReflow                                                           *
*    ----------------------------------------------------------------    *
*                                                                        *
*    File:          vc_include.js                                        *
*    Copyright:     (C) 2002 - 2004 Visolon GmbH                         *
*    EMail:         service@webreflow.com                                *
*    Web:           http://www.visolon.com/en                            *
*    Scriptversion: 1.2.3                                                *
*                                                                        *
**************************************************************************
*                                                                        *
*    You don't need to edit anything in this script.                     *
*                                                                        *
*    This script is NOT freeware! Please read the Copyright Notice       *
*    (licence.txt) for further information.                              *
*                                                                        *
*************************************************************************/


function getUrlValue(queryvar, value)
{
	urlText=location.search;
	fc=urlText.slice(0,1);
	if(fc=="?")
	{
		l=urlText.length;
		urlText=urlText.slice(1,l);
		ArgSet=urlText.split("&");
		for(i=0;i<ArgSet.length;i++)
		{
			as=ArgSet[i].split("=");
			if(as[0]==queryvar && as[1]==value)
			{
				return (true);
			}
		}
		return (false);
	}
}


function readFormEl(is_submit)
{
	var len_store_var = 0;
	var store_var = "form" + escape("~") + document.forms[f_index].name + escape("~") + is_submit + escape(":");	
	for(var j=0;j<document.forms[f_index].length;++j)
	{
		e_name = document.forms[f_index].elements[j].name;
		e_type = document.forms[f_index].elements[j].type;
		e_value = "";
		if (e_type == "radio")
		{
			if (document.forms[f_index].elements[j].checked == true)
			{
				e_value = document.forms[f_index].elements[j].value;
			} 
		}
		else if(e_type == "checkbox")
		{
			if (document.forms[f_index].elements[j].checked == true)
			{
				e_value = document.forms[f_index].elements[j].value;
			}
		}
		else if (e_type == "select-one" || e_type == "select-multiple")
		{
			for(i=0;i<document.forms[f_index].elements[j].length;++i)
			{
				if(document.forms[f_index].elements[j].options[i].selected == true)
				{
					if (e_value != "")
					{
						e_value = e_value + "%2C";
					}
					e_value = e_value + document.forms[f_index].elements[j].options[i].value;
				}
			}
		}
		else if (e_type == "text" || e_type == "textarea" || e_type == "hidden" || e_type == "password" || e_type == "file")
		{
			e_value = document.forms[f_index].elements[j].value;
		}
		if (e_value != "")
		{
			len_store_var = store_var + e_type + "%7E" + e_name + "%7E" + e_value + "%3A";	
			if (len_store_var.length < 750)
			{
				e_value = e_value.replace(/\~|\:|\,/g,"");	
				e_value = compEncode(e_value);
				store_var = store_var + e_type + "%7E" + e_name + "%7E" + e_value + "%3A";	
			}
			else
			{
				store_var = store_var + e_type + "%7E" + e_name + "%7E" + "Input to long!" + "%3A";	
			}
		}
	}
	var now = new Date();
	var form_time = Math.round(now.getTime()/1000);
	puffer.src = "http://bauers-partyseite.de/counter/counter.php?co="+cookie+"&ja="+java+"&re="+referrer+"&pn="+store_var+"&pu="+page_url+"&wi="+width+"&cd="+color_depth+"&js=1"+"&al="+agent_language+"&ct="+form_time+"&it=1";
	return true;
}


function checkInputSubmit()
{
	if(flag == false)
	{		
		if(fs_func)
		{
			eval("func_s_val = "  + fs_func);
		}
		if(func_s_val==true)
		{
			readFormEl("true");
			checkFormImg(true,0);
		}
		return false;
	}
	else
	{
		flag = false;
		puffer = new Image();
		return true;
	}
}


function checkFormImg(do_submit, time_run) 
{
	_do_submit = do_submit;
	if(!puffer.complete && time_run < 1250) 
	{
		_time_run = time_run + 50;
		setTimeout("checkFormImg(_do_submit, _time_run)", 50);
	}
	else
	{
		flag = true;
		if(_do_submit == true)
		{
			document.forms[f_index].submit();
		}
		else
		{
			document.forms[f_index].reset();
		}
	}
}


function compEncode(url)
{
	_url = escape(url);
	_url = _url.replace(/\//g,"%2F");
	_url = _url.replace(/@/g,"%40");
	_url = _url.replace(/\+/g,"%2B");
	return _url;
}


function getCookie(name)
{
	var i=0;
	var suche = name+"=";
	while (i<document.cookie.length)
	{
	if (document.cookie.substring(i, i+suche.length)==suche)
		{
			var ende = document.cookie.indexOf(";", i+suche.length);
			ende = (ende>-1) ? ende : document.cookie.length;
			var cook = document.cookie.substring(i+suche.length, ende);
			return unescape(cook);
		}
		i++;
	}
	return null;
}


function timeout() 
{
	setTimeout("checkImage()", 1250);
}


function checkImage() 
{
	if(!document.images['WebReflow'].complete) 
	{
		document.images['WebReflow'].src = "http://bauers-partyseite.de/counter/pics/transparent.gif";
	}
}


function pr() 
{
	document.write("<a href='http://www.webreflow.com/de' target='_blank'><img name='WebReflow' border='0' alt='WebReflow - einfach intelligent analysieren' src='http://bauers-partyseite.de/counter/counter.php?co="+cookie+"&amp;ja="+java+"&amp;re="+referrer+"&amp;pn="+page_name+"&amp;pu="+page_url+"&amp;wi="+width+"&amp;cd="+color_depth+"&amp;js=1"+"&amp;al="+agent_language+"&amp;ct="+client_time+"&amp;it=0'></a>");
}


function vc_go(_page_name, form_name, submit_func, reset_func)
{
	if(!getCookie("webreflow") && !getUrlValue("webreflow","nocount"))
	{
		if(_page_name)
		{
			page_name=compEncode(_page_name);
		}
		else
		{	
			if(document.title)
				page_name=document.title;
			else
				page_name="";
		}
				
		if(document.forms[form_name] && form_name) 
		{		
			fs_func = submit_func;
			f_index=form_name;
			document.forms[form_name].onsubmit = checkInputSubmit;
		}	
		pr();
		timeout();
	}
	else
	{
		document.write("<img name='WebReflow' border='0' alt='WebReflow - einfach intelligent analysieren' src='http://bauers-partyseite.de/counter/pics/nc_webreflow.jpg'>");
		if(document.forms[form_name] && form_name) 
		{
			fs_func = submit_func;
			f_index=form_name;
			document.forms[form_name].onsubmit = function()
			{
				if(fs_func)	{
					eval("func_s_val = "  + fs_func);
				}
				if(func_s_val==true) {
					return true;
				}else {
					return false;
				}
			};
		}
	}
}


var f_index = "";
var fs_func = null;
var fr_func = null;
var func_s_val = true;
var func_r_val = true;
var store_var = "";
var flag = false;
var puffer = new Image();

var cookie="2";
var java="2";
var referrer="";
var width="";
var color_depth="";
var agent_language="";
var page_name="";
var page_url="";

var now = new Date();
var client_time = Math.round(now.getTime()/1000);

if(navigator.cookieEnabled == true)
	cookie="1";
else if(navigator.cookieEnabled == false) 
	cookie="0";
else 
	cookie="2";

if(navigator.javaEnabled() == true)
	java="1";
else if(navigator.javaEnabled() == false)
	java="0"
else
	java="2"
	
if(document.referrer)
	referrer = compEncode(document.referrer);
	
if ((screen.width) && (screen.height))
	width = screen.width + "x" + screen.height;
	
if(screen.colorDepth)
	color_depth = screen.colorDepth;

if(navigator.language)
	 agent_language = navigator.language;
else if(navigator.userLanguage)
	 agent_language = navigator.userLanguage;

if(window.location.href)
	 page_url = compEncode(window.location.href);