var img_ir = Array();
var img_vi = Array();

function Imagen(nombre, link)
{
	this.nombre = nombre;
	this.link   = link;
}

img_ir[0] = new Imagen("Infrarrojo Europa-Oeste.",         "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039EColor-westernEurope.jpg");
img_ir[1] = new Imagen("Infrarrojo Europa-Central.",       "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039EColor-centralEurope.jpg");
img_ir[2] = new Imagen("Infrarrojo Europa-Este.",          "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039EColor-easternEurope.jpg");
img_ir[3] = new Imagen("Infrarrojo Atlántico-Oeste.",  "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-westAtlantic.jpg");
img_ir[4] = new Imagen("Infrarrojo Africa-Oeste." ,       "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-westernAfrica.jpg");
img_ir[5] = new Imagen("Infrarrojo América.",      "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-america.jpg");
img_ir[6] = new Imagen("Infrarrojo Antártico.",    "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-antarctic.jpg");
img_ir[7] = new Imagen("Infrarrojo Africa-Este." ,        "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-easternAfrica.jpg");
img_ir[8] = new Imagen("Infrarrojo Africa-Central.",      "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-centralAfrica.jpg");
img_ir[9] = new Imagen("Infrarrojo Africa-Sur." ,         "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-southernAfrica.jpg");
img_ir[10] = new Imagen("Infrarrojo, todo el globo." ,    "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_IR039Color-all.jpg");

img_vi[0] = new Imagen("Visible Europa-Oeste.",           "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006EColor-westernEurope.jpg");
img_vi[1] = new Imagen("Visible Europa-Central.",         "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006EColor-centralEurope.jpg");
img_vi[2] = new Imagen("Visible Europa-Este.",            "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006EColor-easternEurope.jpg");
img_vi[3] = new Imagen("Visible Atlántico-Oeste." ,"http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-westAtlantic.jpg");
img_vi[4] = new Imagen("Visible Africa-Oeste." ,          "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-westernAfrica.jpg");
img_vi[5] = new Imagen("Visible América.",         "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-america.jpg");
img_vi[6] = new Imagen("Visible Antártico.",       "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-antarctic.jpg");
img_vi[7] = new Imagen("Visible Africa-Este." ,           "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-easternAfrica.jpg");
img_vi[8] = new Imagen("Visible Africa-Central.",         "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-centralAfrica.jpg");
img_vi[9] = new Imagen("Visible Africa-Sur." ,            "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-southernAfrica.jpg");
img_vi[10] = new Imagen("Visible, todo el globo." ,       "http://oiswww.eumetsat.org/IPPS/html/latestImages/EUMETSAT_MSG_VIS006Color-all.jpg");

var visible;
var actual;
function PonerIndice(v)
{
	if(v){
		$("var_title").innerHTML = "Imágenes del Meteosat, visible.";
		$("var_lnk").innerHTML = "| " + linkFalse("infrarrojo", "PonerIndice(0);") + " |";
		$("var_img").src = "http://oiswww.eumetsat.org/IPPS/html/MSG/IMAGERY/VIS006/COLOR/map.jpg";
	}
	else{
		$("var_title").innerHTML = "Imágenes del Meteosat, infrarrojo.";
		$("var_lnk").innerHTML = "| " + linkFalse("visible", "PonerIndice(1);") + " |";
		$("var_img").src = "http://oiswww.eumetsat.org/IPPS/html/MSG/IMAGERY/IR039/COLOR/map.jpg";
	}
	$("var_img").useMap = "#globe";
	visible = v;
	actual = -1;
}
function onLoadPage()
{
	PonerIndice(0);
}
window.onload = onLoadPage;

function onClickMap(m)
{
	if(visible){
		$("var_title").innerHTML = img_vi[m].nombre
		$("var_lnk").innerHTML = "| " + linkFalse("índice", "PonerIndice(1);") + " | " + linkFalse("infrarroja", "onClickCambio();") + " |";
		$("var_img").src = img_vi[m].link;
	}
	else{
		$("var_title").innerHTML = img_ir[m].nombre
		$("var_lnk").innerHTML = "| " + linkFalse("índice", "PonerIndice(0);") + " | " + linkFalse("visible", "onClickCambio();") + " |";
		$("var_img").src = img_ir[m].link;
	}
	$("var_img").useMap = "";
	actual = m;
}

function onClickCambio()
{
	visible = !visible;
	onClickMap(actual);
}


/*
<h2 id="var_title"></h2>
<p id="var_ink"></p>
<hr>
<img id="var_img" src="" />
*/