var fecha;
var tiempo;
var indice;
var SecuenciaEjecutandose;
var SecuenciaID;
var texto;
var intervalo;
var navegador;

array_nombres = new Array();
array_nombres[0] = "El Loco";
array_nombres[1] = "El Mago";
array_nombres[2] = "La Sacerdotisa";
array_nombres[3] = "La Emperatriz";
array_nombres[4] = "El Emperador";
array_nombres[5] = "El Sumo Sacerdote";
array_nombres[6] = "Los Enamorados";
array_nombres[7] = "El Carro";
array_nombres[8] = "La Fuerza";
array_nombres[9] = "El Ermitaño";
array_nombres[10] = "La Rueda de la Fortuna";
array_nombres[11] = "La Justicia";
array_nombres[12] = "El Colago";
array_nombres[13] = "La Muerte";
array_nombres[14] = "La Templanza";
array_nombres[15] = "El Diablo";
array_nombres[16] = "La Torre";
array_nombres[17] = "La Estrella";
array_nombres[18] = "La Luna";
array_nombres[19] = "El Sol";
array_nombres[20] = "El Juicio";
array_nombres[21] = "El Mundo";

  
array_imagenes = new Array();
array_imagenes[0] = new elementoImagen("Major00.jpg ","Puedes llevar una existencia excéntrica y de excepción. Así es tu carácter. Te atreverás a expresar lo que se pasa por tu cabeza, algo que sorprenderá a tu alrededor, pero acabará siendo muy útil. No trates de parecerte a ciertas personas y no te obligues a ser razonable, sería un error.");
array_imagenes[1] = new elementoImagen("Major01.jpg ","Puedes emprender y hacer muestra de dinamismo, sin hacerte preguntas. Puedes atreverte a provocar un poquito a tu entorno, ya que no se lo tomará mal, gracias a tu sentido del humor y tu cara de niña. En cambio, si te tomas demasiado en serio o tratas de dar lecciones a los demás, no tendrá buena aceptación.");
array_imagenes[2] = new elementoImagen("Major02.jpg ","Simplemente puedes marcar tu presencia, sin necesidad de tener que hablar. No tienes que justificar tus actos, si te mantienes amable con los demás. Puedes vivir en el confort, sin contrariar a nadie. En cambio, tus críticas serán mal tomadas y tus ideas enunciadas de manera premonitoria, lo cual puede causarte algún problema.");
array_imagenes[3] = new elementoImagen("Major03.jpg ","Puedes imaginarte muchas cosas originales, nadie se lo tomará a mal. Sabes contar bellas historias, no te prives, a la gente que te rodea les encantan. Tienes un gran don de gentes y eres muy sociable, por lo que no dudes en expresarte. Por el contrario, no trates de actuar sola contra todos y no pienses que tienes derecho a todo, ya que sería un gran error.");
array_imagenes[4] = new elementoImagen("Major04.jpg ","Puedes actuar con una gran libertad, siempre y cuando no trates de perjudicar a los demás, sino todo lo contrario. Tienes autoridad y puedes hacer uso de ella, sin recibir quejas. Tu espíritu lógico siempre será apreciado. No debes, en ningún caso, dejar que los demás decidan por ti. No bajes la guardia, ya que podría perjudicarte.");
array_imagenes[5] = new elementoImagen("Major05.jpg ","Puedes dar consejos a los demás, siempre serán bien valorados. Posees ciertos conocimientos, transmítelos sin miedo al ridículo. Tienes un sentido innato sobre lo que te conviene hacer, usa tu intuición. En cambio, no te lances sin pensar en una aventura, por muy atractiva que parezca. Evita ser impulsiva, ya que esta actitud no te traería suerte.");
array_imagenes[6] = new elementoImagen("Major06.jpg ","Puedes seducir y manifestar tus sentimientos, tus seres queridos nunca te lo reprocharán. Tu lado sentimental te permite hacer muchas cosas, atrévete a ser romántica y expresa lo que sientes realmente. En cambio, no te muestres tirana y celosa, ya que no es tu estilo. No dejes que tu lado perfeccionista te acabe dominando, ya que podría perjudicarte.");
array_imagenes[7] = new elementoImagen("Major07.jpg ","Puedes irte donde mejor te parezca, tu entorno acepta tu independencia. Sabes convencer a los demás con respecto a tus ideas justas, atrévete a aplicarlas. Tu entusiasmo es muy positivo y sabes transmitirlo a los demás. En cambio, no te encierres en la rutina o en trabajos demasiado largos, ya que te acabaría resultando insoportable.");
array_imagenes[11] = new elementoImagen("Major08.jpg ","Puedes decidir muchas cosas, tu entorno aprecia tu sentido de la medida. Atrévete a afirmar tus ideas sobre el equilibrio de las cosas, algo tan buscado y apreciado. Restablece el orden cuando sea necesario, te escucharán sin reproches. En cambio, no te muestres ligera en tus decisiones, ni impulsiva o irreflexiva, esta actitud podría perjudicarte.");
array_imagenes[9] = new elementoImagen("Major09.jpg ","Puedes tomarte tu tiempo para actuar, esto te conviene y tu entorno aprecia tu búsqueda de lo que es justo y profundo. Puedes atreverte a buscar cosas escondidas u ocultas en la memoria, ya que podría resultarte útil. En cambio, no te disperses y no te dejes deslumbrar por lo que brilla, sería una catástrofe para ti y tus seres queridos.");
array_imagenes[10] = new elementoImagen("Major10.jpg ","Puedes crear tus propias actividades, sin preocuparte demasiado por los demás. Sabes inventar cosas que pueden hacer evolucionar una situación. Tus seres queridos te seguirán siempre en este aspecto. Atrévete a ser creativa y original. En cambio, no te dejes pisar y no gastes para ganar el amor de los demás, sería un error.");
array_imagenes[8] = new elementoImagen("Major11.jpg ","Puedes hacer prueba de energía y determinación, tus amigos y familiares te quieren así. Sabes lo que quieres, exprésate sin rodeos, los demás lo aceptarán sin problemas, gracias a tu dulzura y firmeza. En cambio no te dejes llevar por juegos amorosos que no te convienen. No te muestres cursi o afectada, ya que esta actitud no va para nada con tu verdadera personalidad.");
array_imagenes[12] = new elementoImagen("Major12.jpg ","Puedes pensar y actuar diferente de los demás, te aceptarán tal como eres. Atrévete a llevar tu vida con intuición, te será muy beneficioso. No siempre tienes necesidad de actuar, puedes dejar que las cosas sigan su curso. En cambio, no trates de imponer tu autoridad y no trates de actuar forzando los acontecimientos.");
array_imagenes[13] = new elementoImagen("Major13.jpg ","Puedes mostrarte radical y pasar la página del pasado, algo que será apreciado por todos. Sabes ser cortante, es un punto positivo de tu personalidad que puedes utilizar. No tengas miedo de transformar tu vida, es bueno y necesario. En cambio, no tengas nostalgia del pasado y no te dejes llevar por los sentimientos que te impiden avanzar.");
array_imagenes[14] = new elementoImagen("Major14.jpg ","Puedes encontrar a mucha gente y mantener una vida social rica, sin problemas. Atrévete a tener amigos y relaciones en las que te puedas apoyar. Sé ligera y fiel, se apreciará esta actitud. En cambio, no te muestres altiva y no rompas con tus amistades por tonterías.");
array_imagenes[15] = new elementoImagen("Major15.jpg ","Puedes seducir y provocar a tu entorno, en realidad es lo que le gusta. Te atreverás a ser impertinente y juguetona, serán bien aceptado gracias a tu tacto y jovialidad. Sabes mostrarte alegre y al mismo tiempo sabes como decir verdades profundas. Un consejo, no trates de mostrarte ingenua o mujer ultrajada, ya que no te va en absoluto.");
array_imagenes[16] = new elementoImagen("Major16.jpg ","Puedes ir directamente al grano y crear situaciones un poco explosivas, creando una situación delicada, que podría acabar beneficiando a todos. Atrévete a romper con los a priori y trata de vivir una vida más realista. Te querrán por esto. En cambio, no te sientes a esperar que el destino venga en tu ayuda, ya que podrías perder el tiempo.");
array_imagenes[17] = new elementoImagen("Major17.jpg ","Puedes desarrollar tu sentido artístico y mostrarte con tu fragilidad, nadie te lo echará en cara. Atrévete a revelar las verdades, a veces escondidas, a tus seres queridos. Te mostrarás dulce y pendiente de los demás. En cambio, no te muestres demasiado egoísta, ya que rompería tu felicidad. Mantente moderada a la hora de expresarte.");
array_imagenes[18] = new elementoImagen("Major18.jpg ","Puedes desarrollar tu sentido de la escucha y recepción sin forzarte a dirigir el movimiento, ya que forma parte de tu naturaleza. Atrévete a expresar tu imaginación, serás apreciada de esta manera. Sé femenina y soñadora sin complejos. En cambio, no te muestres autoritaria o activista, sería una catástrofe para ti.");
array_imagenes[19] = new elementoImagen("Major19.jpg ","Puedes mostrarte en público y hacer prueba de tu autoridad, siempre será bien apreciado. Atrévete a expresar tu espíritu brillante , sin pensar en el lugar que ocupan los demás. Puedes dirigir tu mundo sin complejos. En cambio, no trates de mostrarte seductora para obtener lo que deseas, podría acabar perjudicándote.");
array_imagenes[20] = new elementoImagen("Major20.jpg ","Puedes expresar bien alto tus ideas y tus sentimientos, sobre todo los que seas innovadores. Escucha y utiliza tu intuición todo lo que puedas. En cambio, no seas demasiado materialista o celosa, podría acabar volviéndose en tu contra.");
array_imagenes[21] = new elementoImagen("Major21.jpg ","Puedes rodearte de mucha gente y dar una orientación a sus vidas. Atrévete a ocupar un lugar central, no molestarás a nadie. Trata de ser amable con todos, estas actitud será muy apreciada. En cambio, no hagas discriminaciones de cara a ciertas personas, ya que no te lo perdonarían. No seas demasiado personal en tus elecciones, piensa también en los demás.");



var numero_de_imagenes= array_imagenes.length;

//función que crea una imagen indicando su url (localizacion)
function elementoImagen(localizacion_imagen,texto)
{
  this.elemento_Imagen = new Image();
  this.elemento_Imagen.src = localizacion_imagen;
  this.elemento_Imagen.texto = texto;
}

function dameLocalizacionImagen(objetoImagen)
{
  return(objetoImagen.elemento_Imagen.src);
}

function dameTextoImagen(objetoImagen)
{
  return(objetoImagen.elemento_Imagen.texto);
}


function generarIndice(x,y)
{
  var rango =y-x+1;
  var numero = Math.floor(Math.random()*rango)+x;
  if (numero==indice)
    numero = generarIndice(0,numero_de_imagenes-1);
  return (numero);
}

function generarTiempo(x,y)
{
  var rango =y-x+1;
  var numero = (Math.floor(Math.random()*rango)+x)*1000;
  return (numero);
}

function dameSiguienteImagen()
{
  indice = generarIndice(0,numero_de_imagenes-1);
  var nueva_imagen= dameLocalizacionImagen(array_imagenes[indice]);
  return(nueva_imagen);
}

function comprobarTiempo()
{
   var parar=0; //0 no se para la ejecución
   var fecha2 = new Date();
   var tiempoActual = fecha2.getTime();
   if (tiempoActual>= (tiempo+tiempoInicial))
     parar = 1;
   return (parar);
}

function rotarImagen(imagen)
{
  if (navegador)
  {
    textoimagen.innerHTML=texto;
  }
  else
  {
    document.layers.textoimagen.document.write(texto);
    document.layers.textoimagen.document.close();
  }
  SecuenciaEjecutandose = true;
  var nueva_imagen = dameSiguienteImagen();
  document[imagen].src = nueva_imagen;
  //antes de que se cargue la siguiente imagen comprobamos si el tiempo se ha superado 
  if (comprobarTiempo()==1)
  {
    detenerSecuencia(document.images[0].name);
  }
  else
  {
    var llamada_recursiva = "rotarImagen('"+imagen+"')";
    SecuenciaID =setTimeout(llamada_recursiva,intervalo);
  }
}

function detenerSecuencia (imagen)
{
  if(SecuenciaEjecutandose)
    clearTimeout(SecuenciaID);
  SecuenciaEjecutandose = false;
  
  texto= dameTextoImagen(array_imagenes[indice]);
  if (navegador)
  {
    nombre = array_nombres[indice]
    textoimagen.innerHTML="<p align='center'><font face='tahoma'><b>" + nombre +"</b><br><br>"+ texto + "</font></p>";
  }
  else
  {
    document.layers.textoimagen.document.write(texto);
    document.layers.textoimagen.document.close();
  }
}

function comenzartirar()
{
  location.href="#runa";
  fecha=new Date();
  tiempo = generarTiempo(4,8);
  indice=0;
  SecuenciaEjecutandose=false;
  SecuenciaID =null;
  texto="";
  intervalo = 100;
  navegador =(navigator.appName.indexOf("Microsoft")>=0);
  tiempoInicial = fecha.getTime();
  rotarImagen(document.images['rImage'].name);
  
}