var Sb_InTable=0;

if ((typeof SbTit) == 'undefined') var SbTit = new Array();
if ((typeof SbSta) == 'undefined') var SbSta = new Array();
if ((typeof SbCol) == 'undefined') var SbCol = new Array();
if ((typeof SbSpa) == 'undefined') var SbSpa = new Array();

if (! (typeof Sta_is_Txt).indexOf('un')) Sta_is_Txt = 1 ;

function GetVar(V){
  var argv=window.location.search;
  var pvar=V + "=";
  var pvar=argv.indexOf(pvar);
  var len=V.length + 1;
  var endpvar=argv.indexOf("&", pvar+len);

  var rpvar="";

  if (pvar != -1){
    if (endpvar > -1){
      rpvar=argv.substring(pvar+len, endpvar);
    } else{
     rpvar=argv.substring(pvar+len);
    }
  }
  return rpvar;
}

var SbNow = GetVar("sb");
var QArg = 0;

function DW(t){document.write(t);}

function SbT(n){
  if (! (typeof SbTit[n]).indexOf('un'))
    SbTit[n] = SbTxt[n];
  return ('title="'+SbTit[n]+'"');
}

function SbBlnk(b,c){
 DW('<tr><td height=2 colspan=2><img src=""');
 if (c.length)DW(' class="'+c+'"');
 DW(' width=120 height='+b+'></td></tr>');
}

function SbBeg(){
 DW('<table width=120 border=0 cellspacing=0 cellpadding=0>') ;
 SbBlnk("1","");
 Sb_InTable=1;
}

function SbEnd(){
 SbBlnk("1","");
 SbBlnk("2","iicol-hd") ;
 DW('</table>');
 Sb_InTable=0;
}

function GoHtm(h){
 if (!h.indexOf("!"))
 { h=h.substring(1) ;
   eval(h) ;
 } else window.location.href=h ;
}

function SbHdr(col,txt,htm,sbno){
var p2, ih=htm.indexOf("#");
var t='<tr><td width=8 class="iicol-hd" height=16 valign="top">';
  if (sbno==SbNow)
    t+='<img src="/images/arr-rd.gif" height="13" width="8" align="center" alt="" hspace="0" vspace="0">';
  else t+='&nbsp;';
  t+='</td><td width=120 align="left" class="iicol-hd">';
  if (ih){
    p2="";
    if (ih>0){
    p2 = htm.substring(ih);
    htm = htm.substring(0,ih);
    }   
    if (ih>=0 || !htm.indexOf('!')) QArg=1;
    t+='<a '+SbT(sbno)+' class="link'+col+'-nofade" onMouseOver="SbMov('+sbno+');return (Sta_is_Txt?true:false);" onMouseOut="SbOut();" href="javascript:GoHtm(\''+htm;
    if(!QArg) t+='?sb='+sbno;
    t+=p2+'\');">'+txt+'</a>';
  } else t+='<span class="'+col+'">'+txt+'</span>';
  t+='</td></tr>';
  DW(t);
}

function sbNrm(col,txt,htm,sbno){
var p2, ih=htm.indexOf("#");
var t='<tr><td width=8 class="iicol-txt" valign="top">';
  if (sbno==SbNow)
    t+='<img src="/images/arr-rd.gif" height="13" width="8" align="center" alt="" hspace="0" vspace="0">';
  else t+='&nbsp;';
    t+='</td><td width=120 align="left" class="iicol-txt">';
  if (ih){
    p2="";
    if (ih>0){
     p2 = htm.substring(ih);
     htm = htm.substring(0,ih);
    }
    if (ih>=0 || !htm.indexOf('!')) QArg=1;
    t+='<a '+SbT(sbno)+' class="link'+col+'-nofade" onMouseOver="SbMov('+sbno+');return (Sta_is_Txt?true:false);" onMouseOut="SbOut();" href="javascript:GoHtm(\''+htm;
    if (!QArg) t+='?sb='+sbno;
    t+=p2+'\');">'+txt+'</a>';
  } else t+=txt;
  t+='</td></tr>';
  DW(t);
}

function SbMov(n){
  if (Sta_is_Txt){
    if (! (typeof SbSta[n]).indexOf('un'))
      SbSta[n] = SbTxt[n] ;
      status=SbSta[n] ;
  }
  return Sta_is_Txt ;
}

function SbOut(){
if (Sta_is_Txt)
  status="";
  return Sta_is_Txt ;
}

function SideBar(cold){
var i, BegTab;

  for (i = 1 ; i <= MaxSb ; i++){
    if (! (typeof SbTxt[i]).indexOf('un') || ! (typeof SbHtm[i]).indexOf('un')){
      alert("Missing text or html link for side-bar line: "+i);window.close();
    }
    BegTab=0;
    QArg=0;

    col = ((typeof SbCol[i]).indexOf("un")) ? (SbCol[i]) : cold ;
    if (!col.length) {col = cold} ;

    while(SbHtm[i].substring(0,1)=="*"||SbHtm[i].substring(0,1)=="?"){
      if (!SbHtm[i].indexOf("*")){
	SbHtm[i] = SbHtm[i].substr(1);
	BegTab=1;
      }
      if (!SbHtm[i].indexOf("?")){
	SbHtm[i] = SbHtm[i].substr(1);
	QArg=1;
      }
    } 

    while(SbTxt[i].substring(0,1)=="*"||SbTxt[i].substring(0,1)=="?"){
      if (!SbTxt[i].indexOf("*")){
	SbTxt[i] = SbTxt[i].substr(1);
	BegTab=1;
      }
      if (!SbTxt[i].indexOf("?")){
	SbTxt[i] = SbTxt[i].substr(1);
	QArg=1;
      }
    }

    if (BegTab==1){
      if (Sb_InTable) SbEnd();
      SbBeg();
      if ((typeof SbSpa[i]).indexOf("un")){SbBlnk(SbSpa[i],"");}
      SbHdr(col, SbTxt[i], SbHtm[i], i);
    } else{
      if (!Sb_InTable) SbBeg();
      if ((typeof SbSpa[i]).indexOf("un")){SbBlnk(SbSpa[i],"");}
      sbNrm(col, SbTxt[i], SbHtm[i], i);
    }
  }
  if (Sb_InTable) SbEnd();
}