function substr (f_string, f_start, f_length) {

    f_string += '';
 
    if (f_start < 0) {
        f_start += f_string.length;
    }
 
    if (f_length == undefined) {
        f_length = f_string.length;
    } else if (f_length < 0){
        f_length += f_string.length;
    } else {
        f_length += f_start;
    }
 
    if (f_length < f_start) {
        f_length = f_start;
    }
 
    return f_string.substring(f_start, f_length);
}

function trim (str, charlist) {
    var whitespace, l = 0, i = 0;
    str += '';
    
    if (!charlist) {
        // default list
        whitespace = " \n\r\t\f\x0b\xa0\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u200b\u2028\u2029\u3000";
    } else {
        // preg_quote custom list
        charlist += '';
        whitespace = charlist.replace(/([\[\]\(\)\.\?\/\*\{\}\+\$\^\:])/g, '$1');
    }
    
    l = str.length;
    for (i = 0; i < l; i++) {
        if (whitespace.indexOf(str.charAt(i)) === -1) {
            str = str.substring(i);
            break;
        }
    }
    
    l = str.length;
    for (i = l - 1; i >= 0; i--) {
        if (whitespace.indexOf(str.charAt(i)) === -1) {
            str = str.substring(0, i + 1);
            break;
        }
    }
    
    return whitespace.indexOf(str.charAt(0)) === -1 ? str : '';
}

function strpos (haystack, needle, offset) {
    var i = (haystack+'').indexOf(needle, (offset ? offset : 0));
    return i === -1 ? false : i;
}

function strrpos (haystack, needle, offset) {
	var i = (haystack+'').lastIndexOf( needle, offset );
	return i >= 0 ? i : false;
}

function isset(variable_name) {
	try {
		if (typeof(eval(variable_name)) != 'undefined')
		if (eval(variable_name) != null)
		return true;
	} catch(e) { }
	return false;
}

	$(document).ready(function(){

		var num_img = $('.animacion_img').length;
		/*
		var velocidad_transicion = "slow"; //slow, normal, fast
		var velocidad_inicio = 500;
		var velocidad = 2000;
		var velocidad_entre_img = 500;
		var velocidad_final_inicio = 800;
		var efecto = "transicion"; //movimiento, transicion
		*/
		var rotacion = true;

		play_banners();
	
		function play_banners(imagen_exacta) {
			a = 0;
			divshow = 0;
			divmostrado = 0;
			for (i=1; i<num_img+1; i++) {
				if ($("#animacion_img_"+i).is(':visible')) {
					divshow = divshow+1;
					divmostrado = i;
				}
			}
			if(divshow==0) {
				timer = setTimeout(function() {
					if(efecto=="movimiento") {
						$("#animacion_img_1").slideDown(velocidad_transicion);
					} else if(efecto=="transicion") {
						$("#animacion_img_1").fadeIn(velocidad_transicion);
					}
					play_banners();
				}, velocidad_inicio);
			} else {
				if(isset(imagen_exacta)) {
					velocidad = 0;
				} else {
					velocidad = velocidad_defecto_inicio;
				}
				timer = setTimeout(function() {
					if(efecto=="movimiento") {
						$("#animacion_img_"+divmostrado).slideUp(velocidad_transicion);
					} else if(efecto=="transicion") {
						$("#animacion_img_"+divmostrado).fadeOut(velocidad_transicion);
					}
					if(divmostrado==num_img) {
						divsiguiente = 1;
						timer = setTimeout(function() {
							if(efecto=="movimiento") {
								$("#animacion_img_"+divsiguiente).slideDown(velocidad_transicion);
							} else if(efecto=="transicion") {
								$("#animacion_img_"+divsiguiente).fadeIn(velocidad_transicion);
							}
							play_banners();
						}, velocidad_final_inicio);
					} else {
						if(isset(imagen_exacta)) {
							divsiguiente = imagen_exacta;				
						} else {
							divsiguiente = divmostrado+1;
						}
						timer = setTimeout(function() {
							if(efecto=="movimiento") {
								$("#animacion_img_"+divsiguiente).slideDown(velocidad_transicion);
							} else if(efecto=="transicion") {
								$("#animacion_img_"+divsiguiente).fadeIn(velocidad_transicion);
							}
							play_banners();
						}, velocidad_entre_img);
					}
				}, velocidad);
			}
			a++;
		}
		
		function stop_banners() {
			clearTimeout(timer);
		}

		$(".animacion_imgs_p ul li").click(function() {
			html_img = $(this).html();
			html_img_num = substr(html_img,strpos(html_img,"/imagen")+7);
			if(strpos(html_img,".jpg")) {
				html_img_num = trim(substr(html_img_num,0,strpos(html_img_num,".jpg")));
			} else {
				html_img_num = trim(substr(html_img_num,0,strpos(html_img_num,".gif")));
			}
			stop_banners();
			play_banners(html_img_num);
		})
	
	});