function Dias_Online() {
var Fecha_Creacion = new Date(2000,1,3);
var Fecha_Hoy = new Date();
document.write(""+Math.round( ((Fecha_Hoy-Fecha_Creacion)/86400000) )+"");
document.write(" días online
");
Dia_del_anyo();
}
function Dia_del_anyo() {
var fecha = new Date();
var dia,dia_sem,mes,anyo;
dia = fecha.getDate();
dia_sem = fecha.getDay();
mes = fecha.getMonth();
anyo = fecha.getYear();
if(anyo<2000) anyo += 1900;
switch(dia_sem) {
case 0: dia_sem = 'Domingo'; break;
case 1: dia_sem = 'Lunes'; break;
case 2: dia_sem = 'Martes'; break;
case 3: dia_sem = 'Miércoles'; break;
case 4: dia_sem = 'Jueves'; break;
case 5: dia_sem = 'Viernes'; break;
case 6: dia_sem = 'Sábado'; break;
}
switch(mes) {
case 0: mes = 'Enero'; break;
case 1: mes = 'Febrero'; break;
case 2: mes = 'Marzo'; break;
case 3: mes = 'Abril'; break;
case 4: mes = 'Mayo'; break;
case 5: mes = 'Junio'; break;
case 6: mes = 'Julio'; break;
case 7: mes = 'Agosto'; break;
case 8: mes = 'Septiembre'; break;
case 9: mes = 'Octubre'; break;
case 10: mes = 'Noviembre'; break;
case 11: mes = 'Diciembre'; break;
}
document.write(dia_sem + ", " + dia + " de " + mes + " de " + anyo + " " );
}
function EscribeNovedades() {
var Novedades = "Nueva sección sobre Ensambladores "
+ ", donde encontrareis tutoriales, códigos fuente, prácticas...
"
+ "Esta nueva sección aborda ensambladores de arquitecturas RISC y CISC.
"
+ "centrandose en los procesadores 80x86 y MIPS 2000/3000, os invito a que colaboreis con material.
"
with(document) {
write("\n");
write("
\n\n");
write("| Ultimas novedades | \n");
write("
\n\n| \n");
write(Novedades);
write("La próxima actualización tratará sobre Redes. | \n
\n
\n");
}
}
function Copyright(ElColor) {
var Color,anio;
var fecha = new Date();
anio = fecha.getYear();
if (Copyright.arguments.length == 0)
Color = "#0066cc";
else Color = ElColor;
with(document) {
write("\n\n");
write("| \n");
write("LaPolitecnica.Net © 2000-" + anio + ", Raúl Zambrano Maestre - Todos los derechos reservados | \n");
write("
\n
\n");
}
}