// Intervalo por defecto entre fotos
var slide_speed = 3000;

// Imágenes y enlaces
var slide_names = new Array();
var slide_links = new Array();
var slide_images = new Array();
var slide_new_window = new Array();
var slide_image_holder = new Array();

// Flag de Internet Explorer
var ie = document.all;

// Variables de control de secuencia
var slide_index = 0;
var slide_whichlink = new Array();
var slide_whichimage = new Array();


// Funciones
function slide_find (name) {
	found = false;
	for (i=0; i<slide_names.length; i++) {
		if (slide_names[i] == name) {
			found = true;
			break;
		}
	}
	if (found) {
		return i;
	} else {
		return false;
	}
}

function slide_set_speed (speed) {
	slide_speed = speed;
}

function slide_new_image (name, link, image_array, new_window) {
	slide_names[slide_index] = name;
	slide_links[slide_index] = new Array (link, link, link);
	slide_images[slide_index] = image_array;
	slide_new_window[slide_index] = (new_window) ? 1 : 0;
	slide_whichlink[slide_index] = 0;
	slide_whichimage[slide_index] = 0;
	slide_index++;
}

function slide_load_images () {
	for (i=0; i<slide_images.length; i++) {
		slide_image_holder[i] = new Array();
		for (j=0; j<slide_images[i].length; j++) {
			slide_image_holder[i][j] = new Image();
			slide_image_holder[i][j].src = slide_images[i][j];
		}
	}
}

function slide_it(name) {
	eval("var slide_blenddelay = (ie) ? document.images."+name+".filters[0].duration*1000 : 0;");
	if (!document.images) return;
	index = slide_find (name);
	if (ie) eval("document.images."+name+".filters[0].apply();");
	eval("document.images."+name+".src = slide_image_holder[index][slide_whichlink[index]].src;");
	if (ie) eval("document.images."+name+".filters[0].play();");
	slide_whichlink[index] = slide_whichimage[index];
	slide_whichimage[index] = (slide_whichimage[index] < slide_images[index].length-1) ? slide_whichimage[index]+1 : 0;
	setTimeout("slide_it(\""+name+"\")",slide_speed + slide_blenddelay);
}

function slide_all () {
	slide_load_images();
	for (i=0; i<slide_names.length; i++) {
		slide_it (slide_names[i]);
	}
}

function slide_go (name) {
	index = slide_find (name);
	if (index === false) return;
	if (slide_new_window[index])
		window.open(slide_links[index][slide_whichlink[index]]);
	else
		window.location=slide_links[index][slide_whichlink[index]];
}