// 3rbg (external .js + header link + function call in body)small clander in HTML table
function CLNDR_S() {
DT = new Date();

DY = DT.getDate();
  MNTH = DT.getMonth();
  YR = DT.getFullYear();

  MNTHs = new Array('January','February','March','April','May','June','July','August','September','October','November','December');

  MNTHnw = new Date(YR, MNTH, 1);
  MNTHnxt = new Date(YR, MNTH + 1, 1);

  //  which is first day
  WKdy1 = MNTHnw.getDay();
  DYinMNTH = Math.round((MNTHnxt.getTime() - MNTHnw.getTime()) / (1000 * 60 * 60 * 24));
var stl1='style="background-color:ff0000; color:ffffff;text-align:center;font-size: 10pt;font-family: sassoonprimaryinfant, arial, sans-serif;">'
var stl2='style="background-color:ffffcc; color:000000;text-align:center;font-size: 10pt;font-family: sassoonprimaryinfant, arial, sans-serif;">'
var stl3='style="background-color:0000ff; color:ffffff;text-align:center;font-size: 10pt;font-family: sassoonprimaryinfant, arial, sans-serif;">'
var stl4='style="background-color:0000ff; color:ffffff;text-align:center;font-size: 10pt;font-family: sassoonprimaryinfant, arial, sans-serif;">'
var stl5='style="background-color:0000ff; color:ffffff;text-align:center;font-size: 14pt;font-family: sassoonprimaryinfant, arial, sans-serif;">'
 


CLNDRtbl = '<table '+stl5;
  CLNDRtbl += '<tr><td colspan="7" style="background-color:ffffcc; color:000000; text-align: center;"><b>' + MNTHs[MNTH] + '<br>' + YR + '</b></td></tr>';
  CLNDRtbl += '<tr><td '+stl1+'Su</td>'
  CLNDRtbl += '<td '+stl3+'M</td><td '+stl3+'Tu</td><td '+stl3+'W</td><td '+stl3+'Th</td><td '+stl3+'Fr</td>'
  CLNDRtbl += '<td '+stl1+'Sa</td></tr>';
  CLNDRtbl += '<tr>';

  // blank until first day
  for(WKdy = 0; WKdy < WKdy1; WKdy++) {
    CLNDRtbl += '<td style="background-color:ddddcc; color:000000;"> </td>';
  }

  WKdy = WKdy1;
  for(DYnr = 1; DYnr <= DYinMNTH; DYnr++) {
    WKdy %= 7;    //	Modulus (division remainder) that is the remainder after dividing WKdy by 7
    if(WKdy == 0)
      CLNDRtbl += '</tr><tr>';

    // format of today's date cell 
    if(DY == DYnr)
      CLNDRtbl += '<td '+stl3+'<b>' + DYnr + '</b></td>';
    else
	// format of other days cells
      CLNDRtbl += '<td '+stl2 + DYnr + ' </td>';

    WKdy++; //indexing) WKdy+1
  }

  CLNDRtbl += '</tr>';
  CLNDRtbl += '</table>';

  // calendar show
  document.write(CLNDRtbl);

}