$MESABREVIADO[1] = 'Ene';
$MESABREVIADO[2] = 'Feb';
$MESABREVIADO[3] = 'Mar';
$MESABREVIADO[4] = 'Abr';
$MESABREVIADO[5] = 'May';
$MESABREVIADO[6] = 'Jun';
$MESABREVIADO[7] = 'Jul';
$MESABREVIADO[8] = 'Ago';
$MESABREVIADO[9] = 'Sep';
$MESABREVIADO[10] = 'Oct';
$MESABREVIADO[11] = 'Nov';
$MESABREVIADO[12] = 'Dic';
$SEMANAABREVIADA[0] = 'Dom';
$SEMANAABREVIADA[1] = 'Lun';
$SEMANAABREVIADA[2] = 'Mar';
$SEMANAABREVIADA[3] = 'Mie';
$SEMANAABREVIADA[4] = 'Jue';
$SEMANAABREVIADA[5] = 'Vie';
$SEMANAABREVIADA[6] = 'Sáb';
$ARRDIASSEMANA = $SEMANAABREVIADA;
$ARRMES = $MESABREVIADO;
$dia = date(d);
$mes = date(n);
$ano = date(Y);
$TotalDiasMes = date(t, mktime(0, 0, 0, $mes, $dia, $ano));
$DiaSemanaEmpiezaMes = date(w, mktime(0, 0, 0, $mes, 1, $ano));
$DiaSemanaTerminaMes = date(w, mktime(0, 0, 0, $mes, $TotalDiasMes, $ano));
$EmpiezaMesCalOffset = $DiaSemanaEmpiezaMes;
$TerminaMesCalOffset = 6 - $DiaSemanaTerminaMes;
$TotalDeCeldas = $TotalDiasMes + $DiaSemanaEmpiezaMes + $TerminaMesCalOffset;
print "
";
print "";
foreach ($ARRDIASSEMANA AS $key)
{
print "| $key | ";
}
print "
";
for ($a = 1; $a <= $TotalDeCeldas; $a++)
{
if (!$b)
$b = 0;
if ($b == 7)
$b = 0;
if ($b == 0)
print '';
if (!$c)
$c = 1;
if ($a > $EmpiezaMesCalOffset AND $c <= $TotalDiasMes)
{
if ($c == date(d) && $mes == date(m) && $ano == date(Y))
{
print "$c
| ";
}
elseif ($b == 0 OR $b == 6)
{
print "$c | ";
}
else
{
print "$c | ";
}
$c++;
}
else
{
print " | ";
}
if ($b == 6)
print '
';
$b++;
}
print "
";
?>