// This file contains intellectual property and artistic creations
// by Dennis Sandow and is copyright 2000-2010 by the author.
// For use only on websites maintained by Dennis Sandow, or with
// specific permission.  Do not remove this notice.

var UsingSidebarCal_NoOptions=1, maxScanDays=60, minShowDays=8, altMaxShowItems=40;
function fudgehomecal(){
  startMo = dotMo = dotMoBis = cur.getMonth()+1;
  startDat= dotDat= cur.getDate()
//     startDat=dotDat=18; startMo = dotMo= dotMoBis=12
  startInt = 100* dotMo + dotDat; startCx = (dotMoBis>9?'':'0')+startInt
  for (dayCt=0; dayCt < maxScanDays; dayCt++) {
    if( dotDat > MoLengths[dotMo] ) {
      dotDat = 1; dotMo++ ; dotMoBis++;
      if (dotMo>12) dotMo=1;
    };
    if(dayCt == minShowDays) { midInt = 100* dotMoBis + dotDat; midCx = (dotMoBis>9?'':'0')+midInt};
    endInt = 100* dotMoBis + dotDat; endCx = (dotMoBis>9?'':'0')+endInt
    dotDat++;
  };
//  alert (dayCt+' '+dotMo+' '+dotDat+' '+endCx+' '+endInt)

  sord=0;
  for( xx=101; xx<=399; xx++) {
    if ( typeof calA[xx] == udf ) continue;
    oneCalEntry = new Array(); oneCalEntry = calA[xx].split('|')
    cum=''
    for ( xy=6; xy<oneCalEntry.length; xy++ ){
      if ( ! oneCalEntry[xy] ) continue;
      hitDate = parseInt(oneCalEntry[xy]);
      if ( startMo == 12 && hitDate < 199 ) hitDate += 1200 ;
      if ( hitDate < startInt || hitDate > endInt ) continue;

      sortHits[sord++] = (hitDate>999?'':'0')+hitDate+'|'+calA[xx];
//      alert((sord-1)+' '+sortHits[sord-1])
    };
  };
  sortHits.sort(); outStr='';prevMMDD='';

//calA[114] = '1900|7:00|1|M|Mr Ray Concert|Kazoo, sackbut and accordian. Stop by or call us at 908-647-2088 to register for this free concert!^director@longhilllibrary.org|802|';

// alert(sortHits.length);
  for (xy=0; xy<sortHits.length; xy++ ) {
//  alert(sortHits[xy]);
    dayStr=''; oneItem = new Array; oneItem = sortHits[xy].split('|')
//    alert( sortHits[xy]+' '+parseInt(oneItem[0]) +' '+ midInt) 
    if( parseInt(oneItem[0].replace(/^0/,'')) > midInt && 
      xy >= altMaxShowItems && oneItem[0] != prevMMDD ) break;
      prevMMDD=oneItem[0];
//'November 29|
    rMonth=parseInt(oneItem[0].substr(0,2).replace(/^0/,'')); // 1304 -> 13
    aMonth = MoNames[((rMonth-1)%12)+1]; // 13 -> 1 -> January
    aDate = parseInt(oneItem[0].substr(2,9).replace(/^0/,'')); // 1304 ->4
    aMD=aMonth+' '+aDate; // January 4
    aMDY=aMD+', '+( thisYear+( rMonth>12?1:0) ); // Jan 4, 2008
    Mon1 = new Date(aMDY); aDow=DaNames[Mon1.getDay()];
    dayStr+=aDow+' '+aMD+'|'; // Wednesday Jan 4, 2008
//7:00 PM|
    if( oneItem[2] ) {
      nJulTm=parseInt(oneItem[1]);
      aTimSfx = nJulTm<1200?'AM':(nJulTm>1200?'PM':'Noon')
      dayStr += oneItem[2]+' '+aTimSfx+'|';
    } else dayStr+= '|';
//20071129|
    dayStr += ( thisYear+( rMonth>12?1:0) )+oneItem[0]+'|';
//REGISTER:children@longhilllibrary.org|
    xReg = (oneItem[6]+'^').split('^')[1].replace(/ /g,'');
    if (xReg) dayStr += 'REGISTER:'+xReg;
// sneak in type of activity and room
    dayStr += ' GENRE:'+oneItem[3];
    if (oneItem[4]) dayStr += ' ROOM:'+oneItem[4];
    dayStr += '|';
//Secrets for Girls|
    dayStr += oneItem[5]+'|';
//Teens in grades 9 .|'+
    dayStr += ( (oneItem[6]+'^').split('^')[0]?(oneItem[6]+'^').split('^')[0]:oneItem[5] )+'|';

// alert(dayStr);

    outStr += dayStr;
  };
// alert(outStr)
  return outStr;
};

