var ls,j0=-1,hide,show;
var c=0,c0=0,i0=0;
var is_ntscp = navigator.appName.toLowerCase()=='netscape' ? 1:0;
var vers=navigator.appVersion.substring(0,1);
var is_ntsc4=is_ntscp==1 && vers==4 ? 1:0;
var x=40, y=0, dy=20;
var months = new array(12);
months[0]  = '\ÿíâàðü'; months[1]  = 'ôåâðàëü'; months[2]  = 'ìàðò';
months[3]  = 'àïðåëü';  months[4]  = 'ìàé';     months[5]  = 'èþíü';
months[6]  = 'èþëü';    months[7]  = 'àâãóñò';  months[8]  = 'ñåíò\ÿáðü';
months[9]  = 'îêò\ÿáðü';months[10] = 'íî\ÿáðü'; months[11] = 'äåêàáðü';
var ind_no=new array(100);

init_array(ind_no);

function array(n) {
  this.length=n
}

function init_array(a)
{
 for(i=0;i<a.length;i++) a[i]=-1;
}

function is_arr(i,a) {
  for(k=0;k<a.length && a[k]!=-1;k++) {
   if(a[k]==i) return 1;
  }
  return 0;
}

function  init() {
   var i,n0=0,elms;
   var k=0;
   ls=null;
   j0=-1;
   is_ntscp = navigator.appName.toLowerCase()=='netscape' ? 1:0;
   hide=is_ntsc4==1 ? 'hide':'hidden';
   show=is_ntsc4==1 ? 'show':'visible';
   if(is_ntscp==1) {   // for netscape
    if(vers==4) {
     elms=document.layers; 
     if(c>0) {
      ls=new array(c);
      for(i=0; i<elms.length; i++) { if(is_arr(i,ind_no)==0) ls[k++]=elms[i]; }
     } else ls=null;    
    }
    else if(vers>4) {
     ls=document.getElementsByTagName('div');
    }
    else ls=null;
   }                      
   else {              // for explorer
    if(document.all) {
     elms=document.all;
     for(i=0; i<elms.length; i++ ) { 
      if(elms[i].tagName!=null && elms[i].tagName.toLowerCase()=='div') n0++;
     }
     if(n0>0) {
      ls=new array(n0);
      for(i=0; i<elms.length; i++ ) {
       if(elms[i].tagName!=null && elms[i].tagName.toLowerCase()=='div') ls[k++]=elms[i];
      }
     }else ls=null;
    }
    else ls=null;
   }
}

function setvisib(pvis,val) {
   pvis.visibility=val;
}

function hover1(i1,i2) {
   if(vers>3 && ls!=null) {
    setvisib(is_ntsc4==1 ? ls[i1]:ls[i1].style,hide);
    setvisib(is_ntsc4==1 ? ls[i2]:ls[i2].style,show);
   }
}

function hover(i) {
   if(j0!=-1) hover1( j0+1, j0 );
   hover1( i, (i%2==0 ? i+1:i-1) );
   if(i%2==0) j0=i;
   else j0=-1;
}

function sprint(buf,arr) {
 var s='';
 var i=0,j=0,k=0;
 while(i!=-1) {
  i=buf.indexOf("%s",i);
  if(i!=-1) {
   s+=buf.substring(j,i)+arr[k++];
   i+=2; j=i;
  }
 }
 s+=buf.substring(j,buf.length-1);
 return s;
}

function _layerstr(str) {
 var arr=new array(10);
 var s,lay;
 lay=is_ntsc4==1 ? '<layer left=%s top=%s><nobr>%s</nobr></layer>\n':
     '<a style="position:absolute;left:%s;top:%s"><nobr>%s</nobr></a>\n';
 arr[0]=x; arr[1]=y; arr[2]=str;  
 s=sprint(lay,arr);
 document.write(s);
 y+=dy;
 ind_no[i0++]=c0;
 c0++;
}

/* function _layer(str,url,pretp) {
 _layer(str,url,pretp,0);
}*/

function _layer(str,url,pretp,nmonth,ttl) {
 var arr=new array(10);
 var s,pref,lay1,lay2;
 var KX=0,KY=1,KP=2,KU=3,KC=4,KS=5,KM=6;
 var strmonth='',strfn='',jscr='javascript:',href;
 if(url.indexOf(jscr)!=-1)
   { strfn=url.substring(jscr.length,url.length);
     strfn=' onclick="'+strfn+'"';
     url=jscr+'void(0)';
   } 
 href=' href="'+url+'"'+strfn;              // url reference
 if(ttl!=null) href+=' title="'+ttl+'"';    // note text
// define format string constants
 if(is_ntsc4==1) { // in netscape<=4
  lay1='<layer left=%s top=%s><nobr>%s<a %s '+
       'target=_top onmouseover="hover(%s)">%s%s</a></nobr></layer>\n';

  lay2='<layer left=%s top=%s visibility=hide><nobr>%s<a %s '+
       'target=_top onmouseout="hover(%s)"><font size=4>%s%s</font></a></nobr></layer>\n';
 }
 else {		   // in explorer, netscape>4
  lay1='<div style="position:absolute;left:%s;top:%s"><nobr>%s<a %s '+
       'target=_top onmouseover="hover(%s)">%s%s</a></nobr></div>\n';
  lay2='<div style="position:absolute;left:%s;top:%s;visibility:hidden"><nobr>%s<a %s '+
       'target=_top onmouseout="hover(%s)"><font size=4>%s%s</font></a></nobr></div>\n';
 }
 
// set line prefix
 var pref='';		
 if(pretp==0) pref='';
 else if(pretp==1) pref='<font color=red>*</font> ';
 else if(pretp==2) pref='<font color=red size=-1>!!!</font> ';
 else pref='* ';

// print layer
 if( 1<=nmonth && nmonth<=12 ) {
     var dtObj = new Date();
     var year = dtObj.getYear();
     if(year<2000) year+=1900;
     strmonth = ' - <font color=red face="arial cyr">'+months[nmonth-1]+' '+year+'ã.</font>';
 }

 arr[KX]=x; arr[KY]=y;   arr[KP]=pref; arr[KU]=href;
 arr[KC]=c; arr[KS]=str; arr[KM]=strmonth; 
 s=sprint(lay1,arr);
 if(vers>3) {
  arr[4]=c+1;
  s+=sprint(lay2,arr);  
 }
 else if(is_ntscp==1) s+='<br>';

 // change variables
 c+=2;
 c0+=2;
 y+=dy;
 document.write(s);
}