cookies= new Array;
//------------------------------------------------------
function browser(arg)
{
 var result=-1;
 if (arg==1)
  { if (navigator.appName=='Netscape')
     {result=1}
    if (navigator.appName=='Microsoft Internet Explorer')
     {result=0}
    if(navigator.userAgent.indexOf('Opera')!=-1)
     {result=2}
  }
 if (arg==2)
  {
   result=navigator.appVersion.substring(0,1);
   if (navigator.userAgent.indexOf('MSIE 5')!=-1){
    result=5;
   }
  }
return result;
}
//--------------------------------------------------------

function Hex2Dec(str){
 i=0;
 result=0;
 while (i<str.length){
  s=str.substring(str.length-i-1,str.length-i);
  if (isNaN(s)){
   switch(s){
    case "A":
     sTemp=10;
     break;
    case "B" :
     sTemp=11;
     break;
    case "C" :
     sTemp=12;
     break;
    case "D" :
     sTemp=13;
     break;
    case "E" :
     sTemp=14;
     break;
    case "F" :
     sTemp=15;
     break;
    case "a":
     sTemp=10;
     break;
    case "b" :
     sTemp=11;
     break;
    case "c" :
     sTemp=12;
     break;
    case "d" :
     sTemp=13;
     break;
    case "e" :
     sTemp=14;
     break;
    case "f" :
     sTemp=15;
     break;
    default :
     return false;
   }
   i++;
  }
  else{
   sTemp=parseInt(s);
   i++;
  }
  result=result+sTemp*Math.exp(Math.LN2*4*(i-1));
 }
 return result;
}


function escapeRAW(str){
 var result="";
 if (browser(1)==0){
  for (var i=0;i<str.length;i++){
   ascS=getAsc(str.charAt(i));
   if ((ascS<48)||((ascS>57)&&(ascS<65))||((ascS>90)&&(ascS<97))||(ascS>122)){
    result=result+"%"+getHex(ascS);
   }
   else{
    result=result+str.charAt(i);
   }
  }
 }
 else{
  result=escape(str);
 }

 return result;
}


function escapeAsPHP(str){
 var result="";
 if (browser(1)==0){
  for (var i=0;i<str.length;i++){
   ascS=getAsc(str.charAt(i));
   if (ascS==32){
    result=result+"+";
   }
   else{
    if ((ascS<48)||((ascS>57)&&(ascS<65))||((ascS>90)&&(ascS<97))||(ascS>122)){
     result=result+"%"+getHex(ascS);
    }
    else{
     result=result+str.charAt(i);
    }
   }
  }
 }
 else{
  for (i=0;i<str.length;i++){
   if (str.charAt(i)==" "){
    result=result+"+";
   }
   else{
    if (str.charAt(i)=="+"){
     result=result+"%2B";
    }
    else{
     result=result+escape(str.charAt(i));
    }
   }
  }
 }

 return result;
}

function unescapeRAW(str){
 var result="";
 if (str==null){
  Length=0;
 }
 else{
  Length=str.length;
 }
 if (browser(1)==0){
  var i=0;
  while (i<Length){
   if (str.charAt(i)=="%"){
    temp=str.substring(i+1,i+3);
    result=result+getChr(Hex2Dec(temp));
    i=i+3;
   }
   else{
    result=result+str.charAt(i);
    i++;
   }
  }
 }
 else{
  result=unescape(str);
 }
 return result;
}


function unescapeAsPHP(str){
 var result="";
 if (str==null){
  Length=0;
 }
 else{
  Length=str.length;
 }
 if (browser(1)==0){
  var i=0;
    while (i<Length){
    if (str.charAt(i)=="%"){
    temp=str.substring(i+1,i+3);
    result=result+getChr(Hex2Dec(temp));
    i=i+3;
   }
   else{
    if(str.charAt(i)=="+"){
     result=result+" ";
     i++;
    }
    else{
     result=result+str.charAt(i);
     i++;
    }
   }
  }
 }
 else{
  for (i=0;i<Length;i++){
   if (str.charAt(i)=="+"){
    result=result+" ";
   }
   else{
    result=result+str.charAt(i);
   }
  }
  result=unescape(result);
 }
 return result;
}

//----------------------------------------------------------
function parseCookie(mode){
 switch (mode){
  case 0 :
   ext="";
   break;
  case 1 :
   ext="RAW";
   break;
  case 2 :
   ext="AsPHP";
   break;
 }
 var cookieList=document.cookie.split("; ");
 var cookieArray=new Array();
  for (var i=0;i<cookieList.length;i++){
  var name = cookieList[i].split("=");
  eval('cookieArray[unescape'+ext+'(name[0])]=unescape'+ext+'(name[1])');
 }
return cookieArray;
}
//----------------------------------------------------------


//----------------------------------------------------------------
function setCookie(mode,name,value,expires){
 switch (mode){
  case 0 :
   ext="";
   break;
  case 1 :
   ext="RAW";
   break;
  case 2 :
   ext="AsPHP";
   break;
 }
 if(expires!=""){
  eval('document.cookie=escape'+ext+'(name)+"="+escape'+ext+'(value)+"; expires="+expires.toGMTString()+";"');
 }
 else{
  eval('document.cookie=escape'+ext+'(name)+"="+escape'+ext+'(value)+";"');
 }
}
//----------------------------------------------------------------


function removeFrames(){
 if(top.document.location!=document.location){
  top.document.location=document.location;
 }
}



//----------------------------END_FUNCTIONS-------------------------------

document.write('<script language="vbscript">');
document.write('Function getHex(num)');
document.write('getHex=hex(num)');
document.writeln('end Function');
document.write('Function getChr(num)');
document.write('getChr=chr(num)');
document.writeln('end Function');
document.write('Function getAsc(str)');
document.write('getAsc=asc(str)');
document.write('end Function');
document.write('</s','cript>');