// ******************************* //
// * COPYRIGHT 2004 TomᚠSouček * //
// * - webmaster@penkavcivrch.cz * //
// ******************************* //
function upozorni(href) {
var prvniznak;
var druhyznak;
var newname;
var procenta = new Array();
var prvniznaky = new Array();
var druheznaky = new Array();
var pole = new Array();
var pole2 = new Array();

  if (href != "") {
    // odřízneme mailto
    href = href.substring(7);
    var delka = href.length;
    if (delka > 0) {
      // odstranění mezer %20
      for (var z = 0; z < delka; z++) {
        if (href.charAt(z) == "%") { procenta.push(z); }
      }
      for (var z = 0; z < procenta.length; z++) {
        if (z == 0) { pole2.push(href.substring(z,procenta[z])); }
       
        if (z != procenta.length-1) {
          pole2.push(" ");
          pole2.push(href.substring(procenta[z]+3,procenta[z+1]));
        }
        else {
          pole2.push(" ");
          pole2.push(href.substring(procenta[z]+3,delka));
        }
      }
      for (var z = 0; z < pole2.length; z++) {
        if (z == 0) href = pole2[z];
        else href += pole2[z];
      }
      // konec odstranění mezer %20
      
      // původní mailto
      var oldname = href;
      // nová délka
      delka = href.length;
      
      // zapíšeme si pozice lomítek
      for (var i = 0; i < delka; i++) {
        if (href.charAt(i) == "[") { prvniznak = i; prvniznaky.push(prvniznak); }
        if (href.charAt(i) == "]") { druhyznak = i; druheznaky.push(druhyznak); }
      }
      
      // kdyz je potreba nahradit vice lomitek za zavinace
      if (prvniznaky.length > 1) {
        // nahrazení zavináčů
        for (var x = 0; x < prvniznaky.length; x++) {
          if (x == 0) { pole.push(href.substring(x,prvniznaky[x])); pole.push("@"); }
         
          if (x != prvniznaky.length-1) {
            pole.push(href.substring(druheznaky[x]+1,prvniznaky[x+1]));
            pole.push("@");
          }
          else {
            pole.push(href.substring(druheznaky[x]+1,delka));
          }
        }
      
        for (var y = 0; y < pole.length; y++) {
          if (y == 0) newname = pole[y];
          else newname += pole[y];
        }
      }
      // je uveden pouze jeden e-mail
      else {
        var cast1 = href.substring(0,prvniznak);
        var cast2 = href.substring(druhyznak+1,delka);
        newname = cast1+"@"+cast2;
      }
      
      alert("Z důvodu ochrany proti nevyžádaným e-mailům (spamům)\nneuvádíme na našem serveru e-mailové adresy v klasickém tvaru.\n!!! ZAVINÁČE (@) NAHRAZUJEME VÝRAZEM [zavinac] !!!\n\nNezapomeňte si tedy změnit tuto e-mailovou adresu\n\n    -> "+oldname+"\n\nna\n\n   -> "+newname);
    }
  }
}

// otevirani do novych oken
function bar(url) {
  wasOpen = false;
  win = window.open(url);    
  return (typeof(win) == 'object')?true:false;
}
function popup(url) {
  wasOpen = false;
  win = window.open(url);    
  return (typeof(win) == 'object')?true:false;
}

// zobrazeni/skryti elementu s pridelenym id
function otevirej(element) {
  var element = document.getElementById(element);
	if (element.style.display == 'none') {
		element.style.display = 'block';
	}
	else {
		element.style.display = 'none';
	}
}

// str_replace
function replace(f,r,s) {
	var ra = r instanceof Array, sa = s instanceof Array, l = (f = [].concat(f)).length, r = [].concat(r), i = (s = [].concat(s)).length;
	while(j = 0, i--)
		while(s[i] = s[i].split(f[j]).join(ra ? r[j] || "" : r[0]), ++j < l);
	return sa ? s : s[0];
}

// test IC
function testICO(x) {
  try {
    var a = 0;
    if(x.length == 0) {
      alert('Pro ověření kredibility partnera je potřeba zadat jeho IČ!');
      return false;
    }
    if(x.length != 8) throw 1;
    var b = x.split('');
    var c = 0;
    for(var i = 0; i < 7; i++) a += (parseInt(b[i]) * (8 - i));
    a = a % 11;
    c = 11 - a;
    if(a == 1) c = 0;
    if(a == 0) c = 1;
    if(a == 10) c = 1;
    if(parseInt(b[ 7]) != c) throw(1);
  }
  catch(e) {
    alert('Zadané IČ se nezdá být korektní!');
    return false;
  }
  return true;
}

// test RC
function testRC(x, age) {
  if(!age) age = 0;
  try {
    if(x.length == 0) return true;
    if(x.length < 9) throw 1;
    var year = parseInt(x.substr(0, 2), 10);
    var month = parseInt(x.substr(2, 2), 10);
    var day = parseInt( x.substr(4, 2), 10);
    var ext = parseInt(x.substr(6, 3), 10);
    if((x.length == 9) && (year < 54)) return true;
    var c = 0;
    if(x.length == 10) c = parseInt(x.substr(9, 1));
    var m = parseInt( x.substr(0, 9)) % 11;
    if(m == 10) m = 0;
    if(m != c) throw 1;
    year += (year < 54) ? 2000 : 1900;
    if((month > 70) && (year > 2003)) month -= 70;
    else if (month > 50) month -= 50;
    else if ((month > 20) && (year > 2003)) month -= 20;
    var d = new Date();
    if((year + age) > d.getFullYear()) throw 1;
    if(month == 0) throw 1;
    if(month > 12) throw 1;
    if(day == 0) throw 1;
    if(day > 31) throw 1;
  }
  catch(e) {
    alert('Zadané rodné číslo se nezdá být korektní!');
    return false;
  }
  return true;
}

// test DIC
function testDIC(x) {
  try {
    if(x.length == 0) return true;
    var id = x.substr(0, 2).toUpperCase();
    x = x.substr(2);
    if((id == 'CZ') || (id == 'SK')) {
      if(x.length < 8) throw 1;
      if(x.length > 11) throw 1;
      if(x.length == 8) {
        return testICO(x);
      }
      else {
        return testRC(x, 18);
      }
      throw 1;
    }
    alert('Není možné zkontrolovat DIČ mimo Českou a Slovenskou republiku!');
    return true;
  }
  catch(e) {
    alert('Zadané DIČ se nezdá být korektní!');
    return false;
  }
}