function objmail(obj)
{
    if(!obj.value.match(/\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*/))
    {
        objpspan(obj,0)
        return false;
    }
    else
    {
        objpspan(obj,1)
        return true;
    }
}

function objpspan(obj,v)
{
    switch (v)
    {
        case 1:
            obj.parentNode.getElementsByTagName("span")[0].className="bluecor";
            obj.parentNode.getElementsByTagName("span")[0].innerHTML=" V ";
            break;
        case 0:
            obj.parentNode.getElementsByTagName("span")[0].className="redcor";
            obj.parentNode.getElementsByTagName("span")[0].innerHTML=" X ";
            break;
    }
}

function objtitle(obj)
{
    if(obj.value.length>2)
    {
        objpspan(obj,1);
        return true;
    }
    else
    {
        objpspan(obj,0)
        return false;
    }
}

function objdate(obj)
{
    if(!obj.value.match(/2\d{3}\-(0\d{1}|\d{1}\1[0-2]{1})\-(\d{1}|0\d{1}|[1-2]{1}\d{1}|3[0-1]{1})[^a-z]+/))
    {
        objpspan(obj,0);
        return false;
    }
    else
    {
        objpspan(obj,1);
        return true;
    }
}

function messagesubmit(obj)
{
    if(objmail(obj.txtmail) && objtitle(obj.txttle))
    {
        return true;
    }
    else
    {
        return false;
    }
}

function regprosubmit(obj)
{
    if(objmail(obj.txtmail) && objtitle(obj.txttle) && objtitle(obj.txtModnum) && objtitle(obj.txtsn1) && objtitle(obj.txtsn2) && objtitle(obj.txtsn3) && objtitle(obj.txtsn4))
    {
        return true;
    }
    else
    {
        return false;
    }
}

function objregpass(obj)
{
    if(obj.value.length>4 && obj.value==document.getElementById("regpass").value)
    {
        objpspan(obj,1);
        return true;
    }
    else
    {
        objpspan(obj,0);
        return false;
    }
}

function reguser(obj)
{
    if(objmail(obj.regmail) && objregpass(obj.regpass2) && objtitle(obj.regfnme) && objtitle(obj.reglnme) && objtitle(obj.regcnme) && objtitle(obj.regcy) && objtitle(obj.regpnm) && objtitle(obj.regmnm) && objtitle(obj.regadrs) )
    {
        return true;
    }
    else
    {
        return false;
    }
}

function reginfo(obj)
{
    if(obj.regpass2.value.length>0)
    {
        if(objmail(obj.regmail) && objregpass(obj.regpass2) && objtitle(obj.regfnme) && objtitle(obj.reglnme) && objtitle(obj.regcnme) && objtitle(obj.regcy) && objtitle(obj.regpnm) && objtitle(obj.regmnm) && objtitle(obj.regadrs) )
        {
            return true;
        }
        else
        {
            return false;
        }
    }
    else
    {
        if(objmail(obj.regmail) && objtitle(obj.regfnme) && objtitle(obj.reglnme) && objtitle(obj.regcnme) && objtitle(obj.regcy) && objtitle(obj.regpnm) && objtitle(obj.regmnm) && objtitle(obj.regadrs) )
        {
            return true;
        }
        else
        {
            return false;
        }
    }
}

function objcheckout(obj)
{
    if(objtitle(obj.contactper) && objmail(obj.email) && objtitle(obj.phnum) && objtitle(obj.adrs) )
    {
        return true;
    }
    else
    {
        return false;
    }
}

function objcproub(obj)
{
    if(objtitle(obj.txtcper) && objmail(obj.txtmail) && objtitle(obj.txtpnum)  )
    {
        return true;
    }
    else
    {
        return false;
    }
}