function gunpwd(){var OK;OK=0;document.mailpass.EmailAddress.value="";while(1){document.mailpass.EmailAddress.value=prompt("Please enter your email address",document.mailpass.EmailAddress.value);if(document.mailpass.EmailAddress.value<=" "||document.mailpass.EmailAddress.value=="null"){OK=0;break;}
TrimAll(document.mailpass.EmailAddress);if(IsAbsent(document.mailpass.EmailAddress,"Email")){OK=0;break;}
if(!BadEmail(document.mailpass.EmailAddress,"Email")){OK=1;break;}}
if(OK==1)document.mailpass.submit();return;}
function verifylogin(){var myUsername=document.checkpass.Username;var myPassword=document.checkpass.Password;if(myUsername.value==''){alert('Please enter a Username.');myUsername.focus();return 0;}
if(myPassword.value==''){alert('Please enter a Password.');myPassword.focus();return 0;}
document.checkpass.submit();return 1;}
function TrimAll(obj){var startpos=0,endpos=obj.value.length-1;if(endpos==-1){return;}
while(startpos<=obj.value.length&&obj.value.substring(startpos,startpos+1)==" "){startpos++;}
while(endpos>=0&&obj.value.substring(endpos,endpos+1)==" "){endpos--;}
if(startpos>endpos){obj.value="";}else{obj.value=obj.value.substring(startpos,endpos+1);}}
function BadText(obj,objname){TrimAll(obj);c='|';if(obj.value.indexOf(c)!=-1){alert("'"+objname+"' contains an illegal '"+c+"' character");return true;}
return false;}
function IsAbsent(obj,objname){var retval=-1;for(var i=0;i<obj.value.length;i++){if(obj.value.substring(i,i+1)!=" "){retval=0;break;}}
if(retval&&(objname!="")){alert("'"+objname+"' may not be left empty");}
return retval;}
function BadEmail(obj,objname)
{TrimAll(obj);x=obj
L=x.value.length;if(x.value.charAt(L-1)=="."){alert("'"+objname+"' may not have a period as it last character");return-1}
At=x.value.indexOf("@");if(At==-1){alert("'"+objname+"' is missing an @ sign");return-1}
if(At==0){alert("'"+objname+"' may not have @-sign as first character");return-1}
if(At==(L-1)){alert("'"+objname+"' may not have @-sign as last character");return-1}
A=x.value.indexOf("@",At+1);if(A!=-1){alert("'"+objname+"' may not have more than one @-sign");return-1}
P=x.value.indexOf(".");if(P==-1){alert("'"+objname+"' must have at least one period");return-1}
if(P==0){alert("'"+objname+"' may not have period as first character");return-1}
P=x.value.indexOf(".",At+1);if(P==-1){alert("'"+objname+"' must have at least one period after @-sign");return-1}
if(At+1==P){alert("'"+objname+"' must have characters between @sign and period");return-1}
y=x.value.substring(L-3,L);z=x.value.substring(L-2,L);z=z.toLowerCase();if(y.charAt(0)=="."&&z=="us"){y=x.value.substring(L-6,L-3)}
if(y.charAt(0)!=".")
{y=y.toLowerCase();if(y!="com"&&y!="edu"&&y!="net"&&y!="org"&&y!="gov"&&y!="mil"&&y!="int"){alert("'"+objname+"' must be .com, .edu, .net, .org, .gov, .mil, or .int ");return-1};}
if(x.value.indexOf(",")!=-1){alert("'"+objname+"' may not contain a comma");return-1}
if(x.value.indexOf(" ")!=-1){alert("'"+objname+"' may not contain a space");return-1}
if(x.value.indexOf("*")!=-1){alert("'"+objname+"' may not contain a asterisk");return-1}
if(x.value.indexOf(")")!=-1){alert("'"+objname+"' may not contain a close parenthesis");return-1}
if(x.value.indexOf("(")!=-1){alert("'"+objname+"' may not contain a open parenthesis");return-1}
if(x.value.indexOf(">")!=-1){alert("'"+objname+"' may not contain a greater than sign");return-1}
if(x.value.indexOf("<")!=-1){alert("'"+objname+"' may not contain a less than sign");return-1}
if(x.value.indexOf(":")!=-1){alert("'"+objname+"' may not contain a colon");return-1}
if(x.value.indexOf(";")!=-1){alert("'"+objname+"' may not contain a semi-colon");return-1}
if(x.value.indexOf('"')!=-1){alert("'"+objname+"' may not contain a quotation mark");return-1}
return false;}