function initcal() {
var dim = new Array(31,28,31,30,31,30,31,31,30,31,30,31)
var mon = new Array('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec')

 td=new Date()
 mo=td.getMonth()
 dy=td.getDate()
 yr=td.getFullYear()
 dw=td.getDay()
 cd=dy-dw

 mc=mo
// must check if dy <= 0
 if (cd<=0) {
   mc--
   cd=dim[mc]+cd
 }  
//alert(dw+' '+(1+mo)+'/'+dy+'/'+yr)
 tm="<table>"
 for (i=0;i<ms.length;i++) {
   tm+="<tr><td>"+ms[i].toString()+"<td>"+dat[i].toString()+"<td>"+ev[i]
 }
 tm+="</table>"
 ts="<table cellspacing=0 width='100%'><tr><th colspan=7><font color=#993366>"+mon[mc]
 if (mc!=mo) ts+="-"+mon[mo]
 if ((cd+28)>dim[mo]) ts+='-'+mon[mo+1] 
 ts+="<tr class=hcd><th class=h>Su<th class=h>Mo<th class=h>Tu<th class=h>We<th class=h>Th<th class=h>Fr<th class=h>Sa"
  for (i=0;i<4;i++) {
    ts+="<tr>"
    for (k=0;k<7;k++) {
      if (cd>dim[mc]) {
         mc++
         cd=1
      }
      ts+="<td class=c"
      for (kk=0;kk<ev.length;kk++) {
        if ((dat[kk]==cd) && (ms[kk]==mc)) {
           ts+=" bgcolor=#f0c0c0 onmouseout=n() onmouseover=s("+cd+")"         
        }
      }

      
      if (cd==dy) {
        ts+=" bgcolor=#80ff80"
      } 
      ts+='>'+cd
      
      cd++
    }
  }
//  alert(ts)
  ts+="<tr><td class=b colspan=7>BI-Binghamton CO-Cortland <br>OW-Owego NO-Norwich<br>ON-Oneonta EN-Endicott<br>SI-Sidney HO-Homer<br>VE-Vestal <br>JC-Johnson City</table>" // +  tm 
  tbl.innerHTML=ts
}
function s(dt) {
  ts="<table border=2 cellspacing=0 bgcolor=#f0f0f0 cellpadding=3 width=190>";
  for (i=0;i<ev.length;i++) {
    if (dt==dat[i]) {
      lm=lv[i].substring(0,2).toUpperCase()
      if (lm=='JO') lm='JC'
      ts+="<tr><td class=d>"+lm+"<td class=d>"+ev[i]
    }
  }
  ts+="</table>"
  flt.innerHTML=ts
  flt.style.left=650
  flt.style.top=150
  flt.style.visibility='visible'
}
function n() {
  flt.style.visibility='hidden'
}