function isblank(s)
{
 for(var i=0; i<s.length;i++){
   var c=s.charAt(i);
   if ((c!=' ')&&(c!='\n')&&(c!='\t')) return false;
 }
 return true;
}

function CheckEmail(S) {
  // Pozice posledního znaku
  var LastChar = S.length - 1;

  // Pozice zavináče - nesmí být ani na prvním,
  // ani na posledním místě
  var CharPos = S.indexOf("@");
  if ((CharPos < 1) || (CharPos == LastChar)) return false;

  // Pozice první tečky
  var CharPosT1 = S.indexOf(".");
  if (CharPosT1 < 1) return false;

  // Pozice poslední tečky
  var CharPosT2 = S.lastIndexOf(".");
  if (CharPosT2 == LastChar) return false;

  if (((LastChar)-CharPos)<2) return false; 
   
  if ((CharPosT2-CharPos)==1) return false; 

 return true;
}


function verifyop(formular)
{
 var msg;
 var empty_fields="";
 var nazev="";
 var objednavka="";
 for(var i=0; i< formular.length; i++) {
   var e=formular.elements[i];
   if(formular.byemail.checked && e.name=="email") {
     if((e.value == "") || isblank(e.value)) {
	   if (e.name=="email")   {nazev="E-mail"}
	   empty_fields += "\n" + nazev;
	   continue;
	 }
     if(!CheckEmail(e.value)){
       alert ("Wrong e-mail address!");
       e.focus();
       e.select();
       return false;
	 }
   }
   if(formular.byairmail.checked) {
     if ((e.name=="name" || e.name=="address" || e.name=="city" || e.name=="country" || e.name=="phone") && ((e.value == "") || isblank(e.value))){
       if (e.name=="name")     {nazev="Name"}
	   if (e.name=="address")  {nazev="Street address"}
	   if (e.name=="city")     {nazev="City"}
	   if (e.name=="country")  {nazev="Country"}
	   if (e.name=="phone")    {nazev="Phone"}
	 empty_fields += "\n" + nazev;
	 continue;
	 }
   }
 }

/****** není vybrána žádná adresa ******/ 
 if((!formular.byemail.checked) && (!formular.byairmail.checked)) {
   alert ("Please choose e-mail or air mail.");
   return false;
 }

/****** něco vybráno a povinné položky nechybí ******/ 
 if (!empty_fields) return true;

/****** něco vybráno a něco chybí ******/ 
 if (empty_fields) {
   msg = "Pleas fill in:\n"+empty_fields;
   alert(msg);
   return false;
 }
}