var userid="default",replaceFrames=0,defview=1, molmol=0,rasmol=0,chime=0, pdbdir=0, bookm="", statem="", stated="";
var cookie_error=0;
var cookieID="CBSU260867";
function cookieVal(cookieName,indx){
 thisCookie=top.document.cookie.split("; ");
 for(i=0; i<thisCookie.length; i++){
  if(cookieName==thisCookie[i].split("=")[0] && cookieID==thisCookie[i].split("=")[1].split("|")[0]){
   thisValue=thisCookie[i].split("=")[1];
   return thisValue.split("|")[indx];
   }
  }
 return "";
}
function setCookie(cookieName,userid,replaceFrames,defview,molmol,rasmol,chime,pdbdir,bookm,statem,stated){
//alert(document.title+"\nsetCookie"+cookieName+"\n"+cookieName+"\n"+userid+"\n"+replaceFrames+"\n"+defview+"\n"+
//                     molmol+"\n"+rasmol+"\n"+chime+"\n"+pdbdir+"\n"+bookm+"\n"+statem+"\n"+stated);
expireDate = new Date;
expireDate.setMonth(expireDate.getMonth()+6);
top.document.cookie=cookieName+"="+cookieID+"|"+userid+"|"+replaceFrames+"|"+defview+"|"+
 molmol+"|"+rasmol+"|"+chime+"|"+pdbdir+"|"+bookm+"|"+statem+"|"+stated+";expires="+expireDate.toGMTString();
//for(i=0; i<top.document.cookie.split("`").length; i++){
// alert("set "+i+" "+top.document.cookie.split("`")[i]);
// }
}

function readCookie(cookieName){
 if(top.cookie_busy==1){
  cookie_error=-1;
  return;
  }
// alert(document.title+"\nReadCookie "+cookieName+"\n"+top.document.cookie);
 thisCookie=top.document.cookie.split("; ");
 cookie_error=1;
 for(i=0; i<thisCookie.length; i++){
//  alert(i+" "+thisCookie[i].split("=")[0]);
  if(cookieName==thisCookie[i].split("=")[0] && cookieID==thisCookie[i].split("=")[1].split("|")[0]){
   cookie_error=0;
   thisValue=thisCookie[i].split("=")[1];
   for(j=0; j<thisValue.split("|").length; j++)if(thisValue.split("|")[j]=="undefined")cookie_error=2;
   userid=thisValue.split("|")[1];
   replaceFrames=thisValue.split("|")[2];
   defview=thisValue.split("|")[3];
   molmol=thisValue.split("|")[4];
   rasmol=thisValue.split("|")[5];
   chime=thisValue.split("|")[6];
   pdbdir=thisValue.split("|")[7];
   bookm=thisValue.split("|")[8];
   statem=thisValue.split("|")[9];
   stated=thisValue.split("|")[10];
   return;
   }
  }
//for(i=0; i<top.document.cookie.split("`").length; i++){
// alert("read "+i+" "+top.document.cookie.split("`")[i]);
// }
//alert("Cookie read");
}
function readCookie1(cookieName){
 if(top.cookie_busy==1){
  cookie_error=-1;
  return;
  }
// alert(document.title+"\nReadCookie "+cookieName+"\n"+opener.top.document.cookie);
 thisCookie=opener.top.document.cookie.split("; ");
 cookie_error=1;
 for(i=0; i<thisCookie.length; i++){
//  alert(i+" "+thisCookie[i].split("=")[0]);
  if(cookieName==thisCookie[i].split("=")[0] && cookieID==thisCookie[i].split("=")[1].split("|")[0]){
   cookie_error=0;
   thisValue=thisCookie[i].split("=")[1];
   for(j=0; j<thisValue.split("|").length; j++)if(thisValue.split("|")[j]=="undefined")cookie_error=2;
   userid=thisValue.split("|")[1];
   replaceFrames=thisValue.split("|")[2];
   defview=thisValue.split("|")[3];
   molmol=thisValue.split("|")[4];
   rasmol=thisValue.split("|")[5];
   chime=thisValue.split("|")[6];
   pdbdir=thisValue.split("|")[7];
   bookm=thisValue.split("|")[8];
   statem=thisValue.split("|")[9];
   stated=thisValue.split("|")[10];
   return;
   }
  }
}
function clearCookies(){
 expireDate = new Date;
 expireDate.setMonth(expireDate.getMonth()-6);
 if(!confirm("Are you completely sure to delete ALL profiles?"))return;
 top.document.cookie="ALL=ERASED"+";expires="+expireDate.toGMTString(); 
}
function clearCookie(cookieName){
 if(!confirm("Are you completely sure to delete profile for "+cookieName+" ?"))return;
 expireDate = new Date;
 expireDate.setMonth(expireDate.getMonth()-6);
 thisCookie=top.document.cookie.split("; ");
 iset=0;
 for(i=0; i<thisCookie.length; i++){
   thisName=thisCookie[i].split("=")[0];
   if(thisName=="default" && cookieName==thisCookie[i].split("=")[1].split("|")[1])iset=1;
   if(thisName==cookieName)
    top.document.cookie=cookieName+"=ERASED"+";expires="+expireDate.toGMTString();
  }
 if(iset==1)setCookie("default","default",0,0,0,0,0,0,"","","");
}
function clearCookie1(cookieName){
// alert("ClearCookie1 "+cookieName);
 expireDate = new Date;
 expireDate.setMonth(expireDate.getMonth()-6);
 thisCookie=top.document.cookie.split("; ");
 iset=0;
 top.document.cookie="";
 for(i=0; i<thisCookie.length; i++){
   thisName=thisCookie[i].split("=")[0];
   if(thisName=="default" && cookieName==thisCookie[i].split("=")[1].split("|")[1])iset=1;
   if(thisName==cookieName)
    top.document.cookie=cookieName+"=ERASED"+";expires="+expireDate.toGMTString();
  }
 if(iset==1)setCookie("default","default",0,0,0,0,0,0,"","","");
}


