// Calendario
	var StMv='background-color:#fc9303;font-size:9px;font-family:verdana;color:white;border:1px solid black;';
	var flotaId=(document.all)?0:1; var ob; var over=false; var alternar=0; var fecha=new Date(); var tamano=140;
	var tmes=['Enero','Febrero','Marzo','Abril','Mayo','Junio','Julio','Agosto','Septiembre','Octubre','Noviembre','Diciembre'];
	document.write("<div><table width="+tamano+" style='"+StMv+"' border=1 cellpadding=0 cellspacing=2>");
	document.write("<tr><td align='center'><b>Calendar War</b></td></tr></table></div>");
	document.write("<div id='calendario' style='position:absolute;top:2px;'></div>");
	document.write("<div id='reloj'></div>");
	calendario(0,17,(fecha.getMonth()+1),fecha.getFullYear()); reloj();
// Crear reloj
function reloj(){
 var clockId=document.getElementById?document.getElementById("reloj"):document.all.reloj;
 var digital=new Date(); var dn="AM"; alternar=(alternar==0)?1:0;
 var horas=digital.getHours(); var minutos=digital.getMinutes(); var segundos=digital.getSeconds();
 var mes=digital.getMonth()+1; var ano=digital.getFullYear();
 var dia=(ano==fecha.getFullYear() && mes==fecha.getMonth()+1)?digital.getDate():0;

 if (horas==12)dn="PM"; if (horas>12){dn="PM";horas-=12;}
 if (horas==0 && minutos==0 && segundos==0) calendario(0,18,mes,ano); if (horas==0)horas=12;
 if (minutos<=9)minutos="0"+minutos; if (horas<=9)horas="0"+horas; if (dia<=9)dia="0"+dia; if (mes<=9)mes="0"+mes;
 if (alternar==0)horas+=":"+minutos;
 else horas+="<b style='color:red;'>"+":"+"</b>"+minutos;

 var txt="<table border=1 style='position:absolute;top:118px;width:"+tamano+"px;"+StMv+"'>";
 txt+="<tr><td><b>&nbsp;"+dia+"/"+mes+"/"+ano+"</b><b style='position:absolute;right:8px;'>"+horas+"<sup style='color:green;'>"+dn+"</sup></b></td></tr></table>";

 clockId.innerHTML=txt; setTimeout("reloj()",1000);
}

// Crear calendario
function caldivon(idspan){
	document.getElementById(idspan).style.fontSize="10px";
	document.getElementById(idspan).style.color="red";
}
function caldivoff(idspan){
	document.getElementById(idspan).style.fontSize="9px";
	document.getElementById(idspan).style.color="yellow";
}
function calendario(xx,yy,mes,ano){
 var borde=0; var txt='';
 var Stfont="font:bold 9px verdana;color:white;"
 var StM="width:140px;height:100px;border:1px solid black;cursor:default;";
 var StH="background-color:black;"+Stfont;
 var StDW="background-color:gray;"+Stfont;
 var StD="font-size:9px;font-family:verdana;color:black;background-color:lightyellow;";
 var StHoy="background-color:blue;"+Stfont;
 var nmes=[31,0,31,30,31,30,31,31,30,31,30,31];
 var txt2='DLMXJVS'; var cDia=2; // Empieze por lunes
 var hoy=new Date();
 var calId=document.getElementById?document.getElementById("calendario"):document.all.calendario;
 var tamano=(flotaId)?12:0;

 for(var tabla=0;tabla<1;tabla++){
  xx+=(tabla)?(122-tamano):0; mes+=tabla; if(mes>12){mes=1;ano++;} if(mes<1){mes=12;ano--;}

  var oD = new Date(ano,mes-1, 1); oD.od=oD.getDay()+1;
  var tmpod=oD.od-cDia; if(tmpod<0)tmpod=7+tmpod;
  oD.od=tmpod+1;

  var wkstr=txt2.substr(cDia-1,txt2.length)+txt2.substr(0,cDia-1);
  var buscahoy=(ano==hoy.getFullYear() && mes==hoy.getMonth()+1)?hoy.getDate():0;

  nmes[1]=(((oD.getFullYear()%100!=0)&&(oD.getFullYear()%4==0))||(oD.getFullYear()%400==0))?29:28;

  txt+='<div Style="left:'+xx+';top:'+yy+';position:absolute;Style="'+StM+'">';
  txt+='<table Style="'+StM+'"cols=7 cellpadding=0 border="'+borde+'" cellspacing=0><tr>';
  txt+=(tabla)?'':'<td align="left" Style="'+StH+'"><a id="retro" style="cursor:pointer;color:yellow;font-size:8px;" onMouseOver=caldivon("retro") onMouseOut=caldivoff("retro") onclick="calendario(0,17,'+(mes-1)+','+ano+');"><<</a></td>';
  txt+='<td align="center" colspan=5 align="center" Style="'+StH+'">'+hoy.getDate()+' '+tmes[mes-1]+' '+ano+'</td>';
  txt+='<td align="right" Style="'+StH+'"><a id="avance" style="cursor:pointer;color:yellow;font-size:8px;" onMouseOver=caldivon("avance") onMouseOut=caldivoff("avance") onclick="calendario(0,17,'+(mes+1)+','+ano+');">>></a></td>';
  txt+='</tr><tr align="center">';

  for(i=0;i<7;i++)txt+='<td Style="'+StDW+'">'+wkstr.substr(i,1)+'</td>';
  txt+='</tr><tr align="center">';
  for(i=1;i<=42;i++){
	var x=((i-oD.od>=0)&&(i-oD.od<nmes[mes-1]))?i-oD.od+1:'&nbsp;&nbsp;';
	if (x==buscahoy){x=(x<10)?'&nbsp;'+x:x; x='<span Style="'+StHoy+'">'+x+'</span>';}
	x=(x<10)?'&nbsp;'+x:x;
	txt+='<td Style="'+StD+'">'+x+'</td>';
	if(((i)%7==0)&&(i<36))txt+='</tr><tr align="center">';}
  txt+='</tr></table></div>';}
  calId.innerHTML=txt; 
}