function writeMto(m){
var newstr ="";
for (var i = 0; i < m.length; i++) {
x = m.charAt(i);
if((x >"m" && x <="z")||(x >"M" && x <="Z"))
newstr += String.fromCharCode(m.charCodeAt(i) - 13)
else if((x <="m" && x >="a")||(x <="M" && x >="A"))
newstr += String.fromCharCode(m.charCodeAt(i) + 13)
else
newstr += String.fromCharCode(m.charCodeAt(i) + 1)
}
document.write(''
	+ String.fromCharCode(60,97,32,104,114,101,102,61,34,109,97,105,108,116,111,58)
       +newstr
       +unescape('%22%3E')
       +newstr
       +unescape('%3C%2Fa%3E')
       +'');
}


function formCheck(formobj,fieldRequired,fieldDescription){

	var alertMsg = "M I S S I N G   V A L U E S ! \n"
		+'—————————————————————————————'
		+"\nPlease complete the following fields:\n\n";

	var l_Msg = alertMsg.length;

	for (var i = 0; i < fieldRequired.length; i++){
		var obj = formobj.elements[fieldRequired[i]];
		if (obj){
			switch(obj.type){
			case "select-one":
				if (obj.selectedIndex == -1 || obj.options[obj.selectedIndex].text == ""){
					alertMsg += "—  " + fieldDescription[i] + "\n";
				}
				break;
			case "select-multiple":
				if (obj.selectedIndex == -1){
					alertMsg += "—  " + fieldDescription[i] + "\n";
				}
				break;
			case "text":
				if (obj.value == "" || obj.value == null || MyDefault[obj.name]==obj.value ){
					alertMsg += "—  " + fieldDescription[i] + "\n";
				}
				break;
			case "file":
				if (obj.value == "" || obj.value == null || MyDefault[obj.name]==obj.value  ){
					alertMsg += "—  " + fieldDescription[i] + "\n";
				}
				break;

			case "textarea":
				if (obj.value == "" || obj.value == null|| MyDefault[obj.name]==obj.value  ){
					alertMsg += "—  " + fieldDescription[i] + "\n";
				}
				break;
			default:
			}
			if (obj.type == undefined){
				var blnchecked = false;
				for (var j = 0; j < obj.length; j++){
					if (obj[j].checked){
						blnchecked = true;
					}
				}
				if (!blnchecked){
					alertMsg += "—  " + fieldDescription[i] + "\n";
				}
			}
		}
	}

	if (alertMsg.length == l_Msg){
		return true;
	}else{
		alert(alertMsg);
		return false;
	}
}

function parseEmail(str)
{
   if(!str)
   	return '';

    var chkstr = str.toLowerCase();
    var domainPart 	= "";
    var tldPart 	= "";
    var localPart 	= "";
    var sawAt 		= false;
    var lastDot = chkstr.lastIndexOf('.')

    if(lastDot != -1){
        for (var i = 0; i < chkstr.length; i++) {
        ch = chkstr.charAt(i)

        if (ch == '@'){
            sawAt=true;
            continue;
        };
        if( sawAt == true ){
       		  if( i < lastDot )
            domainPart += isDomainChar(ch)
          	  else if (ch >= 'a' && ch <= 'z')
            tldPart += ch

           continue;
        };
         localPart += isLocalChar(ch)
      };
    };

    if( localPart.length >0 && tldPart.length>1 && domainPart.length >1){
        return  localPart + '@' + domainPart + '.' + tldPart
    }
    else {
        return ''
    }
}


function toEmail(objFormelement)
{
    chkstr = parseEmail(objFormelement.value)


    if( chkstr ){
	objFormelement.value = chkstr
	return true
    }
    else {
	objFormelement.value =''
	return false
    }
}

function isDomainChar(dchr){
    if (  (dchr >= "a" && dchr <= "z")
        || (dchr >= "0" && dchr <= "9" )
        || (dchr == ".")
        || (dchr == "-")){
    return dchr;
    };
    return '';
}
function isLocalChar(lchr){
    var ord = lchr.charCodeAt(0)
    if(ord < 33
        || ord ==34
        || ord ==40
        || ord ==41
        || ord ==44
        || (ord >= 58 && ord <= 60)
        || ord == 62
        || ord == 64
        || (ord >=91 && ord <= 93)
        || ord > 126 ) {
        return '';
    } else {
        return lchr
    }
}