function FormParser(t){

x = t.getElementsByTagName('input');

var ret = true;
var mess = Array;

for(i=0,c=x.length;i<c;i++){

 if(x[i]['id']!=""){
	//x[i].style.border = "";
	d=x[i]['id'].split("__");
	switch(d[1]){
		case "email":
            ret =/^[_a-zA-Z0-9-]+(\.[_a-zA-Z0-9-]+)*@[a-zA-Z0-9-]+(\.[a-zA-Z0-9-]+)*(\.[a-z]{2,6})$/.test(x[i].value);
			ret==false ? mess[x[i]['id']]=__EMAIL : mess[x[i]['id']] = '';
			break;
		case "int":
               		ret =/^[0-9]*[.|,]?[0-9]{0,}$/.test(x[i].value);
			ret==false ? mess[x[i]['id']]=__INT : mess[x[i]['id']] = '';
			break;
		case "username":
               		ret =/^[a-zA-Z0-9_-]*$/.test(x[i].value);
			ret==false ? mess[x[i]['id']]=__USERNAME : mess[x[i]['id']] = '';
			break;
		case "password":
               		ret =/^[a-zA-Z0-9_\-,\. ]*$/.test(x[i].value);
			ret==false ? mess[x[i]['id']]=__PASSWORD : mess[x[i]['id']] = '';
			break;
	}
	
	if(d[2]=="R"){
	
        ret = (x[i].value=="" ? false : ret);
		x[i].value=="" ? mess[x[i]['id']]=__REQUIRED : (mess[x[i]['id']]==__REQUIRED ? mess[x[i]['id']] = '' : '');
	}

	for ( keyVar in mess ) {
		if(mess[keyVar]!=""){
			ck = document.getElementById('div_'+keyVar);
			ck.innerHTML = "<p>"+mess[keyVar]+"</p>";
			document.getElementById(keyVar).style.border = "2px solid red";
			ck.style.fontSize = "14px";
			ck.style.padding = "5px 0 5px 0";
			ck.style.fontFamily = "Verdana,Helvetica,Arial,x-small";
			
		}
		else {
			document.getElementById(keyVar).style.border = "1px solid gray";
			ck = document.getElementById('div_'+keyVar);
			ck.innerHTML = '';
			ck.style.padding = "0";
			ck.style.fontFamily = "Arial";
			ck.style.fontSize = "1px/1px";
			
		}
	}
	if(ret==false){ return false; }

 }


}

return ret;

}

function findIndex(t,u,inner){tt=$(t);for(itt=0,ic=tt.options.length;itt<ic;itt++){
var valtt="";if(inner==1){valtt=tt.options[itt].innerHTML;}else {
valtt=tt.options[itt].value;}if(valtt==u){ tt.selectedIndex=itt; return true; }}}