function obtiene_fecha()
{
var fecha_actual = new Date()
dia = fecha_actual.getDate()
mes = fecha_actual.getMonth() + 1
anio = fecha_actual.getYear()
if (anio < 100)
anio = '19' + anio
else if ( ( anio > 100 ) && ( anio < 999 ) ) {
var cadena_anio = new String(anio)
anio = '20' + cadena_anio.substring(1,3)
}
if (mes < 10)
mes = '0' + mes
if (dia < 10)
dia = '0' + dia
return (dia + "/" + mes + "/" + anio)
}
function calendari()
{
var x, y, fila, valor
var fecha_actual = new Date()
var dia_mes = fecha_actual.getDate() //dia del mes
var mes = fecha_actual.getMonth() + 1 //mes del a–o
var anio = fecha_actual.getYear() //a–o
var dia_semana = fecha_actual.getDay() - 1 //dia de la semana (-1 para domingo, 0 para lunes, etc.)
//array de dias que tiene cada mes
dias_por_mes = new Array(12)
dias_por_mes[0] = 31
dias_por_mes[1] = 28
dias_por_mes[2] = 31
dias_por_mes[3] = 30
dias_por_mes[4] = 31
dias_por_mes[5] = 30
dias_por_mes[6] = 31
dias_por_mes[7] = 31
dias_por_mes[8] = 30
dias_por_mes[9] = 31
dias_por_mes[10] = 30
dias_por_mes[11] = 31
//corrige dia de la semana
if(dia_semana == -1)
dia_semana = 6
//corrige dias de febrero si a–o bisiesto
if((anio % 4) == 0)
dias_por_mes[1]++
//crea matriz de datos
matriz = new Array(6)
for (fila = 0; fila < 6; fila++)
matriz[fila] = new Array(7)
//obtiene posici—n d’a 1
y = dia_semana + 1
for (x = dia_mes; x > 0; x--) {
y--
if (y < 0)
y = 6
}
//guarda valores en variable matriz
valor = 1
for (fila = 0; fila < 6; fila++) {
for (x = 0; x < 7; x++) {
if ((fila == 0) && (x < y)) { //valores vac’os primera fila
matriz[fila][x] = ""
} else if (valor > dias_por_mes[mes - 1]) { //valores vac’os œltima l’nea
matriz[fila][x] = ""
} else if (valor == dia_mes) { //valor d’a actual
matriz[fila][x] = "" + valor + ""
valor++
} else {
matriz[fila][x] = valor //valores ocupados
valor++
}
}
}
//impresion del calendario
document.write("")
document.write("")
document.write("")
// document.write(" ")
// document.write(" | " + obtiene_fecha() + " | ")
// document.write("
")
// document.write(" ") //crea fila de nombres de d’as
document.write(" | Dl | ")
document.write(" Dm | ")
document.write(" Dx | ")
document.write(" Dj | ")
document.write(" Dv | ")
document.write(" Ds | ")
document.write(" Dg | ")
document.write("
")
for(fila = 0; fila < 6; fila++) {
if ((matriz[fila][0] == "") && (matriz[fila][6] == "")) //no muestra ultima fila vac’a
break
document.write(" ") //crea fila de tabla calendario
document.write(" | " + matriz[fila][0] + " | ")
document.write(" " + matriz[fila][1] + " | ")
document.write(" " + matriz[fila][2] + " | ")
document.write(" " + matriz[fila][3] + " | ")
document.write(" " + matriz[fila][4] + " | ")
document.write(" " + matriz[fila][5] + " | ")
document.write(" " + matriz[fila][6] + " | ")
document.write("
")
}
document.write("
")
document.write(" ")
}