// vjs3.js 3.65 Sat May 10 2008 18:37 ---

function getStarted(message)
{
   if (top != self) top.location.replace(self.location.href.toLowerCase());
   window.defaultStatus = (message == null) ? '' : message; 
   return true;
} 

function cleanUp(message)
{
   window.defaultStatus = (message == null) ? '' : message; 
   return true;
} 

function tcolor(place, tint)
{
	var element = document.getElementById(place);
   if ( (element != null) && (tint != null) ) element.style.color = tint;
   return true;
} // end tcolorg

function myXMLHttpRequest()
{
   var xmlreq = false;
   if (window.XMLHttpRequest)
   {
      xmlreq = new XMLHttpRequest();
      return xmlreq;
   }

   if (window.ActiveXObject)
   {
      try { xmlreq = new ActiveXObject("Msxml2.XMLHTTP"); }
      catch (err) { xmlreq = false; }
   }
   return xmlreq;
} // end myXMLHttpRequest

function check_address()
{
	var email = document.getElementById("Email");
   var desc = document.getElementById("errMsg");
   if ( (email == null) || (desc == null) ) return false;
	if ( !email.value.match(/^[\d\w]+[\w\.\-]+@([\w\-]+\.)+[a-zA-Z]+$/) ) 
	{
      desc.innerHTML="Please enter a valid email address";
      desc.style.visibility = "visible";
      document.vmail.ZB.focus();
		return false;
   }
   return true;
} // end check_address

function check_form()
{
   var item, found;
   var got = 0;
   var must =    new Array( 1, 1, 0, 1 );
   var min_len = new Array( 3, 6, 3, 3 );
   var fe = document.forms["vmail"];

   if (fe == null) return false;

   for (var i = 0; i < must.length; i++)
   {
      item = fe.elements[i].value;
      if ( must[i] != 0 )
      {
         if (item != "")
         {
            if (item.length >= min_len[i])
            {
               ++got; 
            } // end if
         }
         else
         {
            if (i == 0)
            {
               got = -100;
            } // end if
         } // end if
      } // end if
   } // end forg

   if (got > 2) 
   {
      return true;
   }
   else
   {
      return false;
   } // end if
} // end check_form

function check_message()
{
   var html = new Array( "href", "url" );
   var link = new Array( "www", "http" );
   var h_err = 0, l_err = 0, item, result;
   var why = "To reduce spam, ";
   var elem = document.getElementById("Message");
   var desc = document.getElementById("errMsg");
   if ( (elem == null) || (desc == null) ) return false;

   item = elem.value.toLowerCase();
   if (item.length > 1100)
   {
      desc.innerHTML = "Please limit message to 20 lines";
      desc.style.visibility = "visible";
      return false;
   } // end if

   for (var i = 0; i < 2; i++)
   {
      if ( ( result = item.indexOf(html[i]) ) >= 0 ) ++h_err;
      else if ( ( result = item.indexOf(link[i]) ) >= 0 ) ++l_err;
      if (result >= 0)
      {
         var fixed = "", middle = "   ";
         if (result == 0)
         {
            fixed += middle;
         }
         else
         {
            fixed += elem.value.substr(0, result) + middle; 
         } // end if

         result += 3;
         if (item.length > result) fixed += elem.value.substr(result);
         elem.value = fixed;
      } // end if
   } // end for

   if ( (h_err == 0) && (l_err == 0) ) return true;

   if (l_err > 0)
   { 
      tcolor("wLabel", "red");
      tcolor("Web", "red");
      why += "only 1 Web address is allowed";
      document.vmail.ZC.focus();
   }
   else
   {
      tcolor("Message", "red");
      why += "please do not use HTML";
      document.vmail.ZD.focus();
   } // end if

   desc.innerHTML = why;
   desc.style.visibility = "visible";
   return false;
} // end check_message

function build_form()
{
   var fname = new Array( "ZA", "ZB", "ZC", "ZD" );
   var fe = document.forms["vmail"];
   var i, tmp, answer = "";
   for (i = 0; i < fname.length; i++)
   {
      tmp = fe.elements[fname[i]].value;
      answer += fname[i] + "=" + escape(tmp) + "&";
   }

   answer += "ZZ=SEND";
   return answer;
} // end build_form

function sendMail(msg)
{
   var l = '<', r = '>', s = '/', h = "p", e = "ERROR SENDING MESSAGE";
   var answer, command, elem, req;
   answer = l + h + r + e + l + s + h + r;
   elem = document.getElementById("special");
   if (elem == null)
   {
      return;
   }
   command = "/cgi-bin/vcontact.cgi"
   req = myXMLHttpRequest();
   if (req != null)
   {
      req.open("POST", command, false);
      req.send(msg);
      if (req.status != 204)
         answer = req.responseText; 
   }

   elem.innerHTML = answer;
} // end sendMail

function readMessage()
{
   var desc, ok, your_msg;
   if ( ( desc = document.getElementById("errMsg") ) == null ) return false;
   if ( ( ok = check_message() ) == false ) return false;
   ok = check_form();
   if (ok == true)
   {
      your_msg = build_form();
      sendMail(your_msg);
   }
   else
   {
      desc.innerHTML = "Please enter your name, email, message";
      desc.style.visibility = "visible";
   } // end if
   return ok;
}

function mShow(what, where)
{
   var l = '<', r = '>', s = '/', h = 'p', e = "ERROR";
   var answer, command, elem, req, submit, which;
   answer = l + h + r + e + l + s + h + r;
   elem = document.getElementById(where);
   which = what.charAt(0);
   if (which != '9')
      submit = document.getElementById("ZZ");
   else
      submit = elem;

   if ( (elem == null) || (submit == null) || (which < '2') || (which > '9') ) return true;
   if (which != '9') submit.innerHTML = "Loading..";
   command = "/cgi-bin/mshow.cgi?" + what;
   req = myXMLHttpRequest();
   if (req != null)
   {
      req.open("GET", command, false);
      req.send(null);
      if (req.status == 200) answer = req.responseText; 
   }

   if (req.status != 204) elem.innerHTML = answer;
   return false;
} // end mShow