
/*****************************************************************************
Carousel de imágenes (marquesina horizontal). Script creado por Tunait! (18/8/2003) modificado el 25/12/2003.
Si quieres usar este script en tu sitio eres libre de hacerlo con la condición de que permanezcan intactas estas líneas, osea, los créditos.
No autorizo a publicar y ofrecer el código en sitios de script sin previa autorización
Si quieres publicarlo, por favor, contacta conmigo.
http://javascript.tunait.com/
tunait@yahoo.com 
******************************************************************************/
var ancho = 700  // especifica la anchura a mostrar

if (screen.width<=1024) 
  ancho = 600

if (screen.width<=800) 
  ancho = 450


var alto = 100 // especifica la altura a mostrar (alto de las imágenes)
var velo = 60 // velocidad 
var dis = 1 //cantidad de pixels que desplaza por movimiento

var imagenes = new Array()


// ramdom = 64 ; tutoriales = 232

imagenes[0] = new Image()
imagenes[0].src = "http://www.abalorios.es/imagenes/cursos/coronita/mresultado.jpg"
imagenes[0].a = "http://www.abalorios.es/video.php?ref=68&amp;titulo=Colgante%20Corona"
imagenes[0].target = "_self"
imagenes[0].alt = "Colgante Corona"
imagenes[1] = new Image()
imagenes[1].src = "http://www.abalorios.es/imagenes/cursos/pendal2/mresultado.jpg"
imagenes[1].a = "http://www.abalorios.es/video.php?ref=69&amp;titulo=Pendiente%20Dal"
imagenes[1].target = "_self"
imagenes[1].alt = "Pendiente Dal"
imagenes[2] = new Image()
imagenes[2].src = "http://www.abalorios.es/imagenes/cursos/napo/mresultado.jpg"
imagenes[2].a = "http://www.abalorios.es/articulo.php?ref=70&amp;titulo=Napo"
imagenes[2].target = "_self"
imagenes[2].alt = "Napo"
imagenes[3] = new Image()
imagenes[3].src = "http://www.abalorios.es/imagenes/cursos/florjaponesa/mresultado.jpg"
imagenes[3].a = "http://www.abalorios.es/articulo.php?ref=71&amp;titulo=Colgante%20flor%20japonesa"
imagenes[3].target = "_self"
imagenes[3].alt = "Colgante flor japonesa"
imagenes[4] = new Image()
imagenes[4].src = "http://www.abalorios.es/imagenes/cursos/anillomamen/mportada.jpg"
imagenes[4].a = "http://www.abalorios.es/articulo.php?ref=72&amp;titulo=Anillo%20Mamen"
imagenes[4].target = "_self"
imagenes[4].alt = "Anillo Mamen"
imagenes[5] = new Image()
imagenes[5].src = "http://www.abalorios.es/imagenes/cursos/colgantestargate/mresultado.jpg"
imagenes[5].a = "http://www.abalorios.es/articulo.php?ref=73&amp;titulo=Colgante%20Stargate"
imagenes[5].target = "_self"
imagenes[5].alt = "Colgante Stargate"
imagenes[6] = new Image()
imagenes[6].src = "http://www.abalorios.es/imagenes/cursos/anillopantera/mresultado.jpg"
imagenes[6].a = "http://www.abalorios.es/articulo.php?ref=74&amp;titulo=Anillo%20pantera"
imagenes[6].target = "_self"
imagenes[6].alt = "Anillo pantera"
imagenes[7] = new Image()
imagenes[7].src = "http://www.abalorios.es/imagenes/cursos/lagrima/mresultado.jpg"
imagenes[7].a = "http://www.abalorios.es/articulo.php?ref=75&amp;titulo=Colgante%20lagrima"
imagenes[7].target = "_self"
imagenes[7].alt = "Colgante lágrima"
imagenes[8] = new Image()
imagenes[8].src = "http://www.abalorios.es/imagenes/cursos/pulseramordok/mresultado.jpg"
imagenes[8].a = "http://www.abalorios.es/articulo.php?ref=76&amp;titulo=Pulsera%20Mordok%20elastica"
imagenes[8].target = "_self"
imagenes[8].alt = "Pulsera Mordok elástica"
imagenes[9] = new Image()
imagenes[9].src = "http://www.abalorios.es/imagenes/cursos/4quesos/mresultado.jpg"
imagenes[9].a = "http://www.abalorios.es/articulo.php?ref=77&amp;titulo=Anillo%204%20quesos"
imagenes[9].target = "_self"
imagenes[9].alt = "Anillo 4 quesos"


var vel = velo
pasos = 4
var tot = 0
var tam =0;
var pos,pos2,tam2 =0;
function escribe(){
document.write ('<div id ="fuera" style="position:relative; width:' + ancho + 'px; height:' + alto + 'px;overflow:hidden">');
document.write ('<span id="imas" style="position:absolute; width:' + tam + 'px;height:' + alto + 'px; left = -' + tam + 'px;"  onmouseover="if(detienee == 0){detienee = 1}" onmouseout="clearTimeout(tiempo);detienee=0;atras = false;vel=velo;mueve()">');
for (m=0;m<imagenes.length;m++){
	if(imagenes[m].a != ""){
		document.write('<a href="' + imagenes[m].a + '" target="' + imagenes[m].target + '">')
		}
	document.write ('<img border="0"  src ="' + imagenes[m].src + '" alt="' + imagenes[m].alt + '" id="ima' + m + '" name="ima' + m + '"  onload="tot++;">');
	if(imagenes[m].a != ""){document.write ('</a>')}
	}
document.write ('</span>');
document.write ('<span id="imas2" style="position:absolute; width:' + tam + 'px;height:' + alto + ';left=0;"  onmouseover="if(detienee == 0){detienee = 1}" onmouseout="clearTimeout(tiempo);detienee=0;atras = false;vel=velo;mueve()">');
for (m=0;m<imagenes.length;m++){
	if(imagenes[m].a != ""){
		document.write('<a href="' + imagenes[m].a + '" target="' + imagenes[m].target + '">')
		}
	document.write ('<img border="0" src ="' + imagenes[m].src + '" alt="' + imagenes[m].alt + '" id="imaa' + m + '" name="imaa' + m + '" onload="tot++;">');
	if(imagenes[m].a != ""){document.write ('</a>')}
	}
document.write ('</span>');
document.write ('</div>');
}
var detienee = 0,posb,pos2b;
function mueve(){
pos = document.getElementById('imas').style.left;
pos2 = document.getElementById('imas2').style.left;
pos = pos.replace(/px/,"");
pos = pos.replace(/pt/,"");
pos = new Number(pos);
pos2 = pos2.replace(/px/,"");
pos2 = pos2.replace(/pt/,"");
pos2 = new Number(pos2);
if(detienee == 1){
	posb = pos;
	pos2b = pos2;
	}
if(atras == true){
pos-=dis;
pos2 -=dis;
}
else{
pos += dis;
pos2 += dis;
}
if(pos2 > (ancho + dis)){
	if(detienee == 0){
		document.getElementById('imas2').style.left = pos  - (tam + dis);
		pos2 = document.getElementById('imas2').style.left;
		}
	else{
		document.getElementById('imas').style.left = pos 
		}
	}
else{
	document.getElementById('imas').style.left = pos 
	}

if(pos > (ancho + dis)){
	if(detienee == 0){
		document.getElementById('imas').style.left = pos2 - (tam + dis);
		pos = document.getElementById('imas').style.left;
		}
	else{
		document.getElementById('imas2').style.left = pos2;
		}
	}
else{
	document.getElementById('imas2').style.left = pos2
	}
if(detienee > 0){
	if(detienee == pasos){
		vel = velo;
		atras = true;
		detienee--;
		tiempo = setTimeout('mueve()',vel);
		}
	else{
		if(atras == true){
			if(detienee>(pasos/2))
				{detienee--}
			else{
			vel = velo;
			clearTimeout(tiempo)
			}
			}
	else{
		detienee++
		}
	if(detienee > (pasos/2) && atras == false){vel +=10}
		if(detienee < (pasos/2)){vel +=10}
		tiempo = setTimeout('mueve()',vel)
		}
	}
else{
tiempo = setTimeout('mueve()',vel)
	}
if(atras == true){
		if (pos == posb){
			clearTimeout(tiempo);
			atras = false;
			}
		}
}
var tiempo;
var atras = false, ini;
function inicio(){
if(tot == (imagenes.length * 2)){clearTimeout(ini);reDimCapas();mueve()}
else{ini=setTimeout('inicio()',500)}
}
function reDimCapas(){
for(m=0;m<imagenes.length;m++){
	tam +=document.getElementById('ima'+m).width
	document.getElementById('imas').style.left = (-tam +10);
	document.getElementById('imas').style.width = tam ;
	document.getElementById('imas2').style.width = tam;
	}
}