var request = false;
   try {
     request = new XMLHttpRequest();
   } catch (trymicrosoft) {
     try {
       request = new ActiveXObject("Msxml2.XMLHTTP");
     } catch (othermicrosoft) {
       try {
         request = new ActiveXObject("Microsoft.XMLHTTP");
       } catch (failed) {
         request = false;
       }
     }
   }

   if (!request)
     alert("Error initializing XMLHttpRequest!");

   function callServer() {



  var urlik = document.all.url.value;

  if ((urlik == null) || (urlik == "")) return;
     var url = "/class/get_all.php?url=" + escape(urlik);
     request.open("GET", url, true);
          request.onreadystatechange = updatePage;
     request.send(null);
          document.getElementById("schet").value = 'Подождите, идет рассчет...';
          window.status = 'Рассчет стоимости ссылки с сайта ' + escape(urlik);
          document.getElementById("schet").disabled = true;
          document.getElementById("data").innerHTML = '';
          document.getElementById("blinking").innerHTML = 'ИДЕТ СБОР ДАННЫХ И ПЕРЕСЧЕТ ПАРАМЕТРОВ...';

   } 
   
     function callServerP() {



  var pr = document.all.pr_p.value;
  var tic = document.all.tic_p.value;
  var ar = document.all.ar_p.value;
  var bl = document.all.bl_p.value;
  var yac = document.all.yac_p.checked;
  var dzc = document.all.dz_p.checked;
  var iya = document.all.iya_p.checked;
  var igg = document.all.igg_p.checked;

  if ((yac == true)) yac=1;
  else yac=0; 
  
  if ((dzc == true)) dzc=1;
  else dzc=0;
  
  if ((iya == true)) iya=0;
  else iya=1;
  
    if ((igg == true)) igg=0;
  else igg=1;
     var url = "/class/calc_price.php?pr=" + escape(pr) + "&tic=" + escape(tic) +"&ar=" + escape(ar) +"&bl=" + escape(bl) +"&yac=" + escape(yac) + "&dzc=" + escape(dzc) + "&iya=" + escape(iya) + "&igg=" + escape(igg);
     request.open("GET", url, true);
          request.onreadystatechange = updatePage;
     request.send(null);
          document.getElementById("schet").value = 'Подождите, идет рассчет...';
          window.status = 'Рассчет стоимости ссылки по параметрам ';
          document.getElementById("schet").disabled = true; 
          document.getElementById("data").innerHTML = '';
          document.getElementById("blinking").innerHTML = 'ИДЕТ ПЕРЕССЧЕТ ПАРАМЕТРОВ...';

   }

  function updatePage() {

     if (request.readyState == 4){
       if (request.status == 200) {

          var response = request.responseText;
          document.getElementById("data").innerHTML = response;
          document.getElementById("schet").value = 'Посчитать...';
          document.getElementById("schet").disabled = false;
          document.getElementById("blinking").innerHTML = '';
         }else if (request.status == 404){
         alert("Request URL does not exist");
       }else{
         alert("Error: status code is " + request.status);
       }
      }
  }


ie4 = (document.all)? true:false

function showit() {
if (ie4) {blinking.style.visibility = "visible"}
setTimeout("hideit()",10000)
}

function hideit() {
if (ie4) {blinking.style.visibility = "hidden"}
setTimeout("showit()",1000)
}