function reklama()
{
if (confirm("Chcete nakoupit pozici?\n\nProsím, vyplňte text e-mailové zprávy, uveďte adresu svých webových stránek a do přílohy dejte vaši ikonku. Ikonka musí být ve formátu *.gif nebo *.png a musí mít rozměry 80x15px. Ikonku si můžete vygenerovat například na webové adrese http://button-maker.jklir.net . Cena se posuzuje individuálně. Na váš e-mail vám odpovím v nejkratší možné době.\n\n\n                                         Jirka Klír http://www.jklir.net"))
   {
    pause_time = 100;
    nick = "jklir";
    setTimeout("window.location='mailto:"+nick+"@volny.cz?subject=[icon]_nakup_pozice'",pause_time);
    return true;
   }
 else
 return false;
}

function locl () {
		L1 = Loc2.L1.value.toUpperCase();
		L2 = Loc2.L2.value.toUpperCase();
		Loc2.L1.value = L1;
		Loc2.L2.value = L2;
		D1 = 0;
		D2 = 0;
		S1 = 0;
		S2 = 0;
		if (L1.length==6 && L2.length==6) {
			Loc2.L1.value = L1;
			Loc2.L2.value = L2;
			var N="ABCDEFGHIJKLMNOPQR";
			B1 = true;
			for (i=0; i<18; i++) {
				if (L1.charAt(0) == N.charAt(i)) {
					D1 = i*20 - 180;
					B1 = false;
				}
		  }
			if (B1) alert("Lokátor 1: První znak musí být písmeno v rozsahu od A do R");
			B2 = true;
			for (i=0; i<18; i++) {
		    if (L1.charAt(1) == N.charAt(i)) {
			  	S1 = i*10 - 90;
					B2 = false;
				}
		  }
			if (B2) alert("Lokátor 1: Druhý znak musí být písmeno v rozsahu od A do R");
			B7 = true;
			for (i=0; i<18; i++) {
				if (L2.charAt(0) == N.charAt(i)) {
					D2 = i*20 - 180;
					B7 = false;
				}
		  }
			if (B7) alert("Lokátor 2: První znak musí být písmeno v rozsahu od A do R");
			B8 = true;
			for (i=0; i<18; i++) {
		    if (L2.charAt(1) == N.charAt(i)) {
			  	S2 = i*10 - 90;
					B8 = false;
				}
		  }
			if (B8) alert("Lokátor 2: Druhý znak musí být písmeno v rozsahu od A do R");
	    var N="0123456789";
			B3 = true;
	   	for (i=0; i<10; i++) { 
				if (L1.charAt(2) == N.charAt(i)) {
					if (i>9) i = i - 10;
					D1 = D1 + i*2;
					B3 = false;
				}
			}
			if (B3) alert("Lokátor 1: Třetí znak musí být číslice");
			B4 = true;
			for (i=0; i<10; i++) { 
				if (L1.charAt(3) == N.charAt(i)) {
					if (i>9) i = i - 10;
					S1 = S1 + i;
					B4 = false;
				}
			}
			if (B4) alert("Lokátor 1: Čtvrtý znak musí být číslice");
			B9 = true;
	   	for (i=0; i<10; i++) { 
				if (L2.charAt(2) == N.charAt(i)) {
					if (i>9) i = i - 10;
					D2 = D2 + i*2;
					B9 = false;
				}
			}
			if (B9) alert("Lokátor 2: Třetí znak musí být číslice");
			B10 = true;
			for (i=0; i<10; i++) { 
				if (L2.charAt(3) == N.charAt(i)) {
					if (i>9) i = i - 10;
					S2 = S2 + i;
					B10 = false;
				}
			}
			if (B10) alert("Lokátor 2: Čtvrtý znak musí být číslice");
			var N="ABCDEFGHIJKLMNOPQRSTUVWX";
			B5 = true;
  	  for (i=0; i<24; i++) { 
				if (L1.charAt(4) == N.charAt(i)) {
					D1 = D1 + i/12;
					B5 = false;
				}
			}
			if (B5) alert("Lokátor 1: Pátý znak musí být písmeno v rozsahu od A do X");
			B6 = true;
			for (i=0; i<24; i++) { 
				if (L1.charAt(5) == N.charAt(i)) {
					S1 = S1 + i/24;
					B6 = false;
				}
			}
			if (B6) alert("Lokátor 1: Šestý znak musí být písmeno v rozsahu od A do X");
			B11 = true;
  	  for (i=0; i<24; i++) { 
				if (L2.charAt(4) == N.charAt(i)) {
					D2 = D2 + i/12;
					B11 = false;
				}
			}
			if (B11) alert("Lokátor 2: Pátý znak musí být písmeno v rozsahu od A do X");
			B12 = true;
			for (i=0; i<24; i++) { 
				if (L2.charAt(5) == N.charAt(i)) {
					S2 = S2 + i/24;
					B12 = false;
				}
			}
			if (B12) alert("Lokátor 2: Šestý znak musí být písmeno v rozsahu od A do X");
			if (B1 || B2 || B3 || B4 || B5 || B6 || B7 || B8 || B9 || B10 || B11 || B12) {
				alert("Během výpočtu došlo k chybě");
			} else {
				D1 = Math.PI * D1 / 180;
				D2 = Math.PI * D2 / 180;
				S1 = Math.PI * S1 / 180;
				S2 = Math.PI * S2 / 180;
				CosL = Math.sin(S1) * Math.sin(S2) + Math.cos(S1) * Math.cos(S2) * Math.cos(D1 - D2);
				LX = Math.round (63700 * Math.acos(CosL));
				LH = parseInt(LX/10);
				LZ = LX - LH * 10;
				L = LH + ',' + LZ;
				Loc2.Len.value = L;
			}
		} else {
			alert("Lokátor musí být ve tvaru ''AB34CD''");
		}
}