var checktheform=0;
function writeEmail(cml,cml2,cml3,subj1,subj2){
TWrite=" "+"<a href=m"+"a"+"i"+"l"+"to"+":"+cml;
TWrite+="@";
TWrite+=cml2;
TWrite+=".";
TWrite+=cml3;
TWrite+="?";
TWrite+="subj";
TWrite+="ect=";
TWrite+=subj1;
TWrite+=">";
TWrite+=subj2;
TWrite+="</a>";
var footertext =TWrite;
document.write(footertext);
}
function doCheck(form)
{
if(form.checkvalue.value!=checktheform){alert("please verify your calculation");return false;}

for (i=0; i<form.elements.length; i++)
{
if (form.elements[i].type == "text")
{
if (form.elements[i].name.indexOf("RQ") ==0 && form.elements[i].value.length == 0){
alert("You need to enter a "+form.elements[i].id);
form.elements[i].focus();
return false;
}
if (form.elements[i].name.indexOf("RQEMAIL") ==0 && !emailCheck(form.elements[i].value)){
form.elements[i].focus();
return false;
//checkEmail(form);
}
}
// look for checkboxes
if (form.elements[i].type == "password")
{
if (form.elements[i].name.indexOf("password") ==0 && form.elements[i].value.length == 0){
alert("You need to enter a PIN.");
form.elements[i].focus();
return false;
}
if (form.elements[i].name.indexOf("password2") ==0 && form.elements[i].value.length == 0){
alert("You need to verify the PIN.");
form.elements[i].focus();
return false;
}
checkPass(form);
}
if (form.elements[i].type == "checkbox")
{
if (form.elements[i].name.indexOf("RQ") ==0 && form.elements[i].checked == false){
alert("You need to enter a "+ form.elements[i].id);
form.elements[i].focus();
return false;
}
}
// look at radio buttons
if (form.elements[i].type == "radio")
{
var o = form.elements[form.elements[i].name];
var check = false;
for (x=0;x<o.length;x++) {check = (o[x].checked)?true:check;}
if (!check) {alert("You need to check "+form.elements[i].id);i+=(x-1);var j=(i-x+1);form.elements[i].focus();return false;}
i+=(x-1);
}
// look at select
if (form.elements[i].type == "select-one")
{
if (form.elements[i].name.indexOf("RQ") ==0 && form.elements[i].options[form.elements[i].selectedIndex].value == "no selection"){
alert("You need to select a "+ form.elements[i].id);
form.elements[i].focus();
return false;
}
}
}
return true;
}
//*********************************************************
function checkPass(form)
{
if(document.sacs.password.value.length!=4){
alert("Please choose a 4 digit number for the PIN.\nThe last four digits of your SSN can be used as a PIN");
document.sacs.password.value="";
document.sacs.password2.value="";
form.elements[i].focus();
return false;
}
//newvariable=document.moon.password.value.substring(0,1);
if(parseInt(document.sacs.password.value)!=document.sacs.password.value){
alert("Please choose a 4 digit number for the PIN.\nThe last four digits of your SSN can be used as a PIN");
document.sacs.password.value="";
document.sacs.password2.value="";
form.elements[i].focus();
return false;
}
}
//*********************************************************
function ConfirmClear() {
if(confirm ("Are you sure you want to clear the form?")){return true;}
else{return false;}
}
//*********************************************************
function emailCheck (emailStr) {
<!-- Original:  Sandeep V. Tamhankar (stamhankar@hotmail.com) -->
var messg="Email address seems to be incorrect, please correct it!";
var checkTLD=1;
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
var emailPat=/^(.+)@(.+)$/;
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
var validChars="\[^\\s" + specialChars + "\]";
var quotedUser="(\"[^\"]*\")";
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
var atom=validChars + '+';
var word="(" + atom + "|" + quotedUser + ")";
var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
var matchArray=emailStr.match(emailPat);
if (matchArray==null) {
alert(messg);
return false;
}
var user=matchArray[1];
var domain=matchArray[2];
for (i=0; i<user.length; i++) {
if (user.charCodeAt(i)>127) {
alert(messg);
return false;
}
}
for (i=0; i<domain.length; i++) {
if (domain.charCodeAt(i)>127) {
alert(messg);
return false;
}
}
// See if "user" is valid
if (user.match(userPat)==null) {
alert(messg);
return false;
}
var IPArray=domain.match(ipDomainPat);
if (IPArray!=null) {
for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("Destination IP address is invalid!");
return false;
}
}
return true;
}
var atomPat=new RegExp("^" + atom + "$");
var domArr=domain.split(".");
var len=domArr.length;
for (i=0;i<len;i++) {
if (domArr[i].search(atomPat)==-1) {
alert(messg);
return false;
}
}
if (checkTLD && domArr[domArr.length-1].length!=2 && domArr[domArr.length-1].search(knownDomsPat)==-1) {
alert(messg);
return false;
}
if (len<2) {
alert(messg);
return false;
}
return true;
}
//**************
function wordCounter(field, countfield, maxlimit) {
wordcounter=0;
for (x=0;x<field.value.length;x++) {
if (field.value.charAt(x) == " " && field.value.charAt(x-1) != " ")  {wordcounter++}  // Counts the spaces while ignoring double spaces, usually one in between each word.
if (wordcounter > 250) {field.value = field.value.substring(0, x);}
else {countfield.value = maxlimit - wordcounter;}
}
}
//**************
function textCounter(field, countfield, maxlimit) {
if (field.value.length > maxlimit)
{field.value = field.value.substring(0, maxlimit);}
else
{countfield.value = maxlimit - field.value.length;}
}
//**************
function writecheck(){
//checktheform
numb1=(Math.round(Math.random()*5)+1);
numb2=(Math.round(Math.random()*4)+1);
checktheform=numb1*numb2;
TWrite="<hr><span style=font-size:150%;color:red;font-weight:bold>For verification, please multiply: <span style=font-size:150%;color:blue;>";
TWrite+=numb1;
TWrite+="</span> by: <span style=font-size:150%;color:blue;>";
TWrite+=numb2;
TWrite+="</span> and <br>enter the answer here:<input type=text name=checkvalue size=10><hr>";
document.write(TWrite);
}
//**************