// Para compatibilidad con NS
function mostrarTexto (texto, fuente) {
if (document.all) return texto;
return '' + texto + '';
}
// Sólo muestra el texto en IE
function mostrarIE (texto) {
if (document.all) return texto;
return "";
}
// Principal
function EVNews(ancho, borde, fuente, colorborde, colorfondo, colorlinks, cantidadNOT, cantidadALE, formato, colorletra, verBuscador) {
var j = 1;
var widthNOT = 100;
var widthALE = 100;
var urlpag = 'http://www.enciclopediavirus.com';
// Si el formato es horizontal, se dividen a la mitad
if (formato == "H") {
widthNOT = widthALE = 50;
}
// Encabezado
var encabezado = '
| ' + mostrarTexto('VIRUS INFORMATICOS', fuente) + ' |
|
';
// Buscador
var buscador = '';
// Noticias
var noticiasTXT = '| ' + mostrarTexto('NOTICIAS',fuente) + ' |
';
noticiasTXT += ' |
'
for (j=1;j<=cantidadNOT;j++){
noticiasTXT += '| ° | |
';
noticiasTXT += ' |
'
}
noticiasTXT += '
';
// Alertas
var alertasTXT = '| ' + mostrarTexto('ALERTAS',fuente) + ' |
';
alertasTXT += ' |
'
for (j=1;j<=cantidadALE;j++){
alertasTXT += '| ° | |
';
alertasTXT += ' |
'
}
if (formato == "H" && verBuscador != "0") {
alertasTXT += '| ' + buscador + ' |
';
}
alertasTXT += '
';
var texto = '';
texto += '';
texto += '| ' + encabezado + ' | ';
if (cantidadNOT > 0) {
texto += '| ' + noticiasTXT + ' | ';
if (formato == "V") texto += ' ';
}
if (cantidadALE > 0) {
if ((formato == "V") || (cantidadNOT <= 0)) {
texto += '';
} else {
if (cantidadNOT > 0) {
texto += '| | ';
}
}
texto += '' + alertasTXT + ' | ';
}
if (formato == "V" && verBuscador != "0"){
texto += '| ' + buscador + ' | ';
texto += ' | ';
}
texto += '| www.enciclopediavirus.com | ';
texto += ' |
';
texto += '
';
return texto;
}
function noticia(id, titulo, fecha){
this.id = id;
this.titulo = titulo;
this.fecha = fecha;
}
function alerta(id, nombre, fecha){
this.id = id;
this.nombre = nombre;
this.fecha = fecha;
}
var vError;
var vNot = new Array();
var vAle = new Array();
vNot[1] = new noticia(997,'Troyano que entra por Gmail','09/05/2008');vNot[2] = new noticia(996,'Llegó el SP3 para XP','06/05/2008');vNot[3] = new noticia(995,'El investigador forense COFEE','05/05/2008');vNot[4] = new noticia(994,'Un ASF puede infectar','30/04/2008');vNot[5] = new noticia(993,'Nueva estafa usando el banco Banesto','28/04/2008');vAle[1] = new alerta(4263,'Win32/Tvido.B','17/04/2008');vAle[2] = new alerta(4262,'Adware.UniGrayAntivirus','11/03/2008');vAle[3] = new alerta(4261,'Zlob.BOK','07/03/2008');vAle[4] = new alerta(4260,'Spy.Banker.IMU','07/03/2008');vAle[5] = new alerta(4259,'Win32/Bifrose.NDL','07/03/2008');