// Declare & Initialize Global Variables here



al="`1234567890-=~!@#$%^&*()_+qwer"

+"tyuiop[]QWERTYUIOP{}|asdfghjkl;A"

+"SDFGHJKL:zxcvbnm,./ZXCVBNM<>?";

ab1="";

bctr=0;

function unencr(val) {

 ab1z="";

 lsz=val;

 az=eval(lsz.substring(0,2))-91;

 lsz=lsz.substring(2,lsz.length);

 nlsz="";

 flgz=0;

 abz=eval(lsz.substring(0,2))-89;

 ab1z=(ab1z==""?""+abz:ab1z);

 oab1z=ab1z;

 lsz=lsz.substring(2,lsz.length);

 for (var i=0;i<abz;i++) {

  nrz=eval(lsz.substring(0,2))-az;

  lsz=lsz.substring(2,lsz.length);

  nlsz+=al.charAt(nrz);

 }

 return nlsz;

	

}

function ckPwd() {

 tst=username.getText()

 +"*"+passwrd.getText()+"*";

 ls=pe.getText();

 a=eval(ls.substring(0,2))-91;

 ls=ls.substring(2,ls.length);

 nls="";

 flg=0;

 while (ls.length>12){

  ab=eval(ls.substring(0,2))-89;

  ab1=(ab1==""?""+ab:ab1);

  oab1=ab1;

  ls=ls.substring(2,ls.length);

  for (var i=0;i<ab;i++){

   nr=eval(ls.substring(0,2))-a;

   ls=ls.substring(2,ls.length);

   nls+=al.charAt(nr);

   }

  nls+="*";

  if (nls.indexOf(tst)>-1){

   ls="";

   flg=1;

   }

  }

 if (flg==1){

  tstOk();

  }

 else{

  bctr++;

  if (bctr>3){

   location.href="badpass.html";

   }  

  else{

   alert("Incorrect Username or Password. Check your entry and try again.");

   }

  }

	

}

function tstOk() {

 ab1=ab1+""+a;

 azzz=unencr(pf.getText());

 open(azzz.substring(0,azzz.indexOf(".htm"))+passwrd.getText()+

     "/eq.htm",'equipInventory','toolbars=no,location=no,directories=no,'+

     'status=no,menubar=yes,scrollbars=yes,resizable=yes,width=799,height=599');

}

function srand() {

 today=new Date();

 rand=today.getTime();

 picker=""+rand

 picker=picker.charAt((picker.length-4));

 rec=eval(picker);

	

}