//ECC2007.09.07 Instruciones comunes para páginas WEB.

//Declaración de variables y contantes.
var btn00  = 'navluzbaja';
var btn01  = 'navluzalta';
var btn02  = 'btnluzbajaTXT';
var btn03  = 'btnluzaltaTXT';

var msg01   = 'Predicciónes Cumplidas.';
var msg02   = 'Predicciones en Potencial Progreso.';
var msg03   = 'Autores Proféticos.';
var msg04   = 'Autores Proféticos: Links de Bibliografía Electrónica.';
var msg05   = 'Predicciones Cumpliéndose.';

var msg08   = 'Requiere clave de autorización al solicitar esta opción.';
var msg08a  = 'Acceso restringido solo para Adminitradores del Sitio.';
var msg08b  = 'Buscando datos en el Sistema.';
var msg09   = 'Borrar Archivo.';
var msg10   = 'Predicciones por Cumplirse.';
var msg10b  = 'Predicciones Cumplidas';
var msg10bb = 'Presione aquí para ver lista de eventos ocurridos del tsunami del 2004 a Diciembre 2009 entre Crisis Financiera y el inicio de la 3a G.M./WWIII.';
var msg10c  = 'Predicciones en Potencial Progreso';
var msg10cc = 'Presione aquí para ver lista de eventos avanzando para su cumplimiento.';
var msg10d  = 'Predicciones Cumpliéndose';
var msg10dd = 'Presione aquí para ver lista de eventos cumpliendose en estos momentos o están apunto de cumplirse. Inclusive algunos eventos que se estan anticipando proyectados para dentro de un o dos años.';
var msg10e  = 'Autoría y Bibliografía Electrónica';
var msg10ee = 'Presione aquí para ver la Introdicción al mundo profético con base a los autores proféticos de todos los tiempos mismos que han predicho los eventos actuales y del tiempo futuro.';
var msg10f  = 'Nuevas Predicciones';
var msg10ff = 'Presione aquí para ver lista de eventos que faltan por cumplirse del presente año, del 2010 al 2012 y más allá.';

var msg10z  = 'Web Master';
var msg10zz = 'Favor de seleccionar alguna opción y enseguida presione.';

var msg11   = 'Servicio al PC';
var msg12   = 'Database Manager SQL Server.';
var msg13   = 'Redes Windows Server.';
var msg14   = 'Analistas Desarrolladores de Sitios WEB';
var msg15   = 'Redes Inalámbricas.';
var msg16   = 'Windows-office.';
var msg17   = 'Analista Programador Net.';
var msg18   = 'Básico de PICs.';
var msg19   = 'Intermedio de PICs.';
var msg20   = 'Avanzado de PICs.';
var msg21   = 'Logotipo ISEA.';

var msgErr01 = 'Falta Completar en el campo ';
var msgErr02 = 'Falta Seleccionar en en el campo ';

var sPag='';
var nextFocus='';

function maxWin()
{
  window.moveTo(0,0); window.resizeTo(screen.width,screen.height);
}

//ECC2005.10.21
dayNames = new Array ("Lunes","Martes","Miércoles","Jueves","Viernes","Sábado","Domingo");
monthNames = new Array ("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");now = new Date;

function FechaActual() 
{ 
   var diaOK = now.getDay()-1;
   with(document)
   {
     write("<CENTER><TABLE colspan='2' cellpadding='1' border='0'>");
     write("<TR><TD style='font-family: Verdana, Helvetica, sans-serif; font-size: 12px; font-weight: bold; color: #cc4433; text-decoration: none;'>&nbsp;");
     if(diaOK == -1)
        write('&nbsp;' + dayNames[6] + ', ' + now.getDate() + ' de ' + monthNames[now.getMonth()] + ' de ' + now.getYear() + '.&nbsp;');
     else 
        write('&nbsp;' + dayNames[now.getDay()-1] + ', ' + now.getDate() + ' de ' + monthNames[now.getMonth()] + ' de ' + now.getYear() + '&nbsp;');
     write("</TD></TR>");
     write("</TABLE></CENTER>");
   }
}


//ECC2007.09.07
function inicializar(bMSG)
{
   if(bMSG == 1) window.document.getElementById('ticker').value = '';
   if(bMSG == 1) window.document.getElementById('imgSnd').src = './comun/avEQCLEAR.GIF';
   maxWin();
   if(bMSG == 1) TipMSG(0);
}


function activa_btn(oCampo,b_activo)
{
	with(oCampo)
	{
		switch(b_activo)
		{
		   case 0: className='btn00'; break;
		   case 1: className='btn01'; break;
		}
	}
}

function ongoTo(nPag)
{
   with(window.location)
   {
	switch(nPag) 
	{
	   case 0: sPag ='index.html'; gotoPag(); break;
	   case 1: href='../predicciones01.html'; break;
	   case 3: href='../autores.html'; break;
	   case 4: href='../predicciones02.html'; break;
	   case 2: href='http://www.newprophecy.com.mx/'; break;
	}
   }
   
}

function gotoPag()
{
   with(document.main)
   {
	action=sPag; submit();
   }
}

function gotoLoc()
{
	window.location.href = sPag;
}

function activeBTN(objetoId,msg,nro)
{ 
     status=msg;

   with(window.document.getElementById(objetoId))
   {
     switch(nro) 
     {
         case 0: className = btn00; break;
         case 1: className = btn01; break;
     }
   }

   with(window)
   {
     switch(msg) 
     {
	 case 'PRED01':   status=msg01; break;
	 case 'PRED02':   status=msg02; break;
	 case 'PRED03':   status=msg05; break;
	 case 'PRED04':   status=msg10; break;
	 case 'AUTORES':  status=msg03; break;
     }
   }

}

//ECC2007.09.21 Pausa de carga antes de ingresar a página.
function showProgressBar(bModo, modo)
{
   with(window.document.getElementById('progressBar').style)
   {
     switch(bModo)
     {
        case 0: visibility = 'hidden';  break;
        case 1: 
		visibility = 'visible'; 
		window.document.getElementById('TBL_BTN').style.visibility = 'hidden';
		window.document.getElementById('TBL_TIPS').style.visibility = 'hidden';
		break;
     }
   }

   if(modo != undefined && modo != '')
   {
     with(window.location)
     {
   	switch(modo) 
	{
	   case 'PRED01':  href="./predicciones01.html"; break;
	   case 'PRED02':  href="./predicciones02.html"; break;
	   case 'PRED03':  href="./predicciones03.html"; break;
	   case 'PRED04':  href="./predicciones04.html"; break;
	   case 'AUTORES': href="./autores.html"; break;
	}
     }
   }
}

function cambiarURL(modo)
{ 
   showProgressBar(1,'');
   with(window.document.getElementById('MSG_LOADING00'))
   {
     switch(modo) 
     {
       case 'PRED01':  
	innerHTML = "&nbsp;<IMG SRC='./comun/nuke01.gif'>&nbsp;";
	setTimeout("showProgressBar(0,'" + modo + "')",2720);
	break;
       case 'PRED02':  
	innerHTML = "&nbsp;<IMG SRC='./comun/nuke02.gif'>&nbsp;";
	setTimeout("showProgressBar(0,'" + modo + "')",7000);
	break;
       case 'PRED03':  
	innerHTML = "&nbsp;<IMG SRC='./comun/nuke03.gif'>&nbsp;";
	setTimeout("showProgressBar(0,'" + modo + "')",1977);
	break;
       case 'PRED04':  
	innerHTML = "&nbsp;<IMG SRC='./comun/nuke04.gif'>&nbsp;";
	setTimeout("showProgressBar(0,'" + modo + "')",5700);
	//innerHTML = "&nbsp;<IMG SRC='./comun/nuke07.gif'>&nbsp;";
	//setTimeout("showProgressBar(0,'" + modo + "')",1977);
	break;
       case 'AUTORES': 
	innerHTML = "&nbsp;<IMG SRC='./comun/nuke00.gif'>&nbsp;";
	setTimeout("showProgressBar(0,'" + modo + "')",4107);
	break;
     }
   }
}

function msgX(msgIN)
{
    alert(msgIN);
}

function fCinta(obj,modo)
{
  with(obj)
  {

  switch(modo)
  {
	case 0: start(); break;
	case 1: stop(); break;
  }

  }
}

//ECC2007.08.27
/*function cursorPos(e) 
{
    e = e || window.event;
    var cursor = {x:0, y:0};
    if (e.pageX || e.pageY) {
        cursor.x = e.pageX;
        cursor.y = e.pageY;
    } 
    else {
        var de = document.documentElement;
        var b = document.body;
        cursor.x = e.clientX + 
            (de.scrollLeft || b.scrollLeft) - (de.clientLeft || 0) ;- 15;
        cursor.y = e.clientY + 
            (de.scrollTop || b.scrollTop) - (de.clientTop || 0) + 25;
    }
    return cursor;
}*/

function TipMSG(iTtl)
{
    var strTtl = '', strMsg = '';
    with(window.document) //ECC2007.07.10
    {
      switch(iTtl)
      {
	case 0 : { strTtl = msg10z; strMsg = msg10zz; break; }
	case 1 : { strTtl = msg10b; strMsg = msg10bb; break; }
	case 2 : { strTtl = msg10c; strMsg = msg10cc; break; }
	case 3 : { strTtl = msg10e; strMsg = msg10ee; break; }
	case 4 : { strTtl = msg10d; strMsg = msg10dd; break; }
	case 5 : { strTtl = msg10f; strMsg = msg10ff; break; }
      }
      getElementById('MSG_TTL').innerHTML = '&nbsp;&nbsp;'+strTtl+'&nbsp;&nbsp;';
      getElementById('MSG_BDY').innerHTML = '&nbsp;&nbsp;'+strMsg+'&nbsp;&nbsp;';
    }
}

//ECC2007.09.07 Deja en blanco barra de status.
function imgSt(nImg)
{
    status = '';
  
    with(window.document.getElementById('imgTipo'))
    {
      //src = './logoisea.GIF';

      switch(nImg)
      {
	case 'A': { src = './cursos_computacion/mpcs.GIF';     alt=msg11; break; }
	case 'B': { src = './cursos_computacion/sql.GIF';      alt=msg12; break; }
	case 'C': { src = './cursos_computacion/w2003srv.GIF'; alt=msg13; break; }
	case 'D': { src = './cursos_computacion/web.GIF';      alt=msg14; break; }
	case 'E': { src = './cursos_computacion/ri.GIF';       alt=msg15; break; }
	case 'F': { src = './cursos_computacion/windows.GIF';  alt=msg16; break; }
	case 'G': { src = './cursos_computacion/net.GIF';      alt=msg17; break; }
	case 'H': { src = './cursos_computacion/pics01.GIF';   alt=msg18; break; }
	case 'I': { src = './cursos_computacion/pics02.GIF';   alt=msg19; break; }
	case 'J': { src = './cursos_computacion/pics03.GIF';   alt=msg20; break; }
	//case '' : { src = './logoisea.GIF';   		       alt=msg21; break; }
 
      }
    }

}

//ECC2007.09.19 FUNCIONES DE CUENTA REGRESVA Y CONFIGURACION PARA HTML.
//STEP 2: Change the two text below to reflect the occasion, and message to display on that occasion, respectively
var occasion = 'que la etapa de transición comience!';
var message_on_occasion = 'HA COMENZADO LA ERA DE TRANSFORMACION DESDE DICIEMBRE 21, 2012.';

//STEP 3: Configure the below 5 variables to set the width, height, background color, and text style of the countdown area
var countdownwidth = '97%', countdownheight = '30px'; countdownbgcolor = '', opentags = '<font face="Verdana"><medium>', closetags = '</small></font>';
var montharray = new Array('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'), crosscount = '';

function setcountdown(theyear,themonth,theday) { yr = theyear; mo = themonth; da = theday; }

//STEP 1: Configure the countdown-to date, in the format year, month, day:
setcountdown(2012,12,21);

function countdown()
{
var today = new Date();
var todayy = today.getYear();

if(todayy < 1000) todayy += 1900;

with(today)
{
 var todaym = getMonth(), todayd = getDate(), todayh = getHours(), todaymin = getMinutes(), todaysec = getSeconds();
 var todaystring = montharray[todaym]+' '+todayd+', '+todayy+' '+todayh+':'+todaymin+':'+todaysec
}

futurestring = montharray[mo-1]+' '+da+', '+yr;

with(Math)
{
  dd = Date.parse(futurestring)-Date.parse(todaystring);
  dday = floor(dd/(60*60*1000*24)*1);
  dhour = floor((dd%(60*60*1000*24))/(60*60*1000)*1);
  dmin = floor(((dd%(60*60*1000*24))%(60*60*1000))/(60*1000)*1);
  dsec = floor((((dd%(60*60*1000*24))%(60*60*1000))%(60*1000))/1000*1);
}

with(document)
{

if(dday<=0&&dhour<=0&&dmin<=0&&dsec<=1&&todayd==da) //Si llega el día de la ocasión...
{
	if (document.layers)
	{
		countdownnsmain.document.countdownnssub.document.write(opentags+message_on_occasion+closetags);
		countdownnsmain.document.countdownnssub.document.close();
	}
	else if(all||getElementById)
		crosscount.innerHTML = opentags + message_on_occasion + closetags;
	return;
}

else if(dday <= -1) //Si pasa del día de la ocasión...
{

	if(document.layers)
	{
	  	countdownnsmain.document.countdownnssub.document.write(opentags + 'La ocasión ha pasado! ' + closetags);
		countdownnsmain.document.countdownnssub.document.close();
	}
	else if(all||getElementById)
		crosscount.innerHTML = opentags + 'La ocasión ha pasado! ' + closetags;
	return;
}
else //si todavía està en curso mostrar mensaje de aviso.
{ 

	if(document.layers)
	{
		countdownnsmain.document.countdownnssub.document.write('¡' + opentags + dday + ' días, ' + dhour + ' horas, ' + dmin + ' minutos, y ' + dsec + ' segundos quedan para ' + occasion + closetags);
		countdownnsmain.document.countdownnssub.document.close();
	}
	else if (all||getElementById)
		crosscount.innerHTML = '¡Quédan ' + opentags + dday + ' días, '+dhour+' hrs, '+dmin+' mins, ' + dsec + ' segundos para ' + occasion + closetags;

}

}

setTimeout('countdown()',1000);
}


function putCountDown()
{
	with(window.document)
	{
	  if(all||getElementById)
	   write('<span id="countdownie" style="width:'+countdownwidth+'; background-color:'+countdownbgcolor+'"></span>');
	  if(document.layers)
	    countdownnsmain.visibility = 'show';
	  else if(all||getElementById)
	    crosscount = getElementById&&!document.all ? getElementById('countdownie') : countdownie;
	}
        countdown();
}


//ECC2007.09.24 Bloquea click derecho del mouse.
function right(e) 
{
  var msg = 'Derechos Reservados (c)2010. http://www.newprophecy.com.mx/';
  if (navigator.appName == 'Netscape' && e.which == 3) 
  {alert(msg); return false; }
  else if (navigator.appName == 'Microsoft Internet Explorer' && event.button==2) 
  {alert(msg); return false; }
  return true;
}

document.onmousedown = right;

//ECC2007.10.02 Ticker

//array de mensajes.
var arrNoticias =  new Array, strNoticia = '';


//arrNoticias[3] = "PREDICCION CERRADA: PRINCESS SERENITY Y EL ALMIRANTE BRITAY ALCANZAN PARTIR COMETA O LUNA DEL PLANETA EN 7 PEDAZOS.";
//arrNoticias[3] = "10.01.09 -- PREDICCION CUMPLIDA +33% Y EN PROGRESO: EL *BIG ONE* DESTRUYE CALIFORNIA. ATAQUE MASIVO A NIVEL CONTINENTAL ACABA CON AMERICA.";

//arrNoticias[3] = "ECC10.02.26 SE VISLUMBRA UNA GUERRA CIVIL EN MEXICO CONTRA LAS ACCIONES ERRATICAS DE EL GOBIERNO ILEGITIMO -- Ver siguientes notas.";
//arrNoticias[5] = "10.03.06 PREDICCION CUMPLIDA Y EN PROGRESO: GUERRA KARMICA Y LA TERCERA GUERRA MUNDIAL.";

arrNoticias[0] = "";
arrNoticias[1] = "10.03.05 ADVIERTE UNAM DE POSIBLE MEGA-TERREMOTO EN MEXICO CON +8.0 GRADOS MAGNITUD. INVESTIGADOR PREVE SISMO EN GUERRERO. SEGOB RECHAZA.";
arrNoticias[2] = "10.03.07 VECTOR EN CURSO -- GOBIERNO DE LA CIUDAD DE MEXICO PERMITE ACTIVIDAD DE CENTROS NOCTURNOS PARA VENTA DE ALCOHOL LOS DOMINGOS A JOVENES.";
arrNoticias[3] = "10.03.07 VECTOR EN CURSO -- SECRETARIO DE EDUCACION PUBLICA, LUJAMBIO, PONE A LOS NIÑOS A DENUNCIAR A SUS PROPIOS PADRES CON *CARNET ESPECIAL*";
arrNoticias[4] = "10.03.07 INFRAESTRUCTURA DE EMISOR ORIENTE A TERMINARSE PARA 2012 POR CONVENIENCIA POLITICA -- PARA ENTONCES SERA DEMASIADO TARDE.";
arrNoticias[5] = "10.03.08 MUJERES PRESENTADAS POR EL PT EN EL CONGRESO SE MANIFIESTAN DESNUDAS PARA EXIJIR LA DESTITUION DE CALDERON POR FEMINICIDA.";
arrNoticias[6] = "10.03.08 GARANTIZAR LA CANDIDATURA DE PEÑA NIETO A CAMBIO DE FREGARSE A LA SOCIEDAD CON AUMENTO DE IMPUESTOS.";
arrNoticias[7] = "10.03.08 ESCANDALO POLITICO SE DESTAPA ENTRE GOMEZ MONT, PAN Y PRI -- Ver Siguiente Nota.";
arrNoticias[8] = "10.03.08 SUCIO ACUERDO DEL PAN INVOLUCRANDO AL PRI PROVOCA TRAGEDIA ECONOMICA PARA LOS MEXICANOS CON AUMENTO DE IMPUESTOS Y PRECIOS.";
arrNoticias[9] = "10.03.08 ¿PREDICCION 2011 CERRADA?: VECTOR EN CURSO -- CASTIGO UNIVERSAL CONTRA EL GOBIERNO ILEGITIMO Y MILLONES DE MEXICANOS.";
arrNoticias[10] = "****** Ultima actualización -- 2010.03.08 -- GUERRA KARMICA, DEPURACION PLANETARIA, MEGA-CATASTROFES, CRISIS MUNDIAL, WWIII Y LA NUEVA ERA ******";

var iTick = 10;
var iTickIni = iTick, jTick = 0, bSoloCursor = false, iTime = 0, bTickIni = true;

function rotular(bCursor)
{
 var x = document.getElementById('ticker').value, r;
 if(strNoticia != null)
 {
 if(!bSoloCursor) 
 {
   if(jTick < strNoticia.length) //exhibe cambio de renglón de mensajes.
   {
     if(x.length > 1)
      document.getElementById('ticker').value = x.substr(0,(x.length-1));
     
     document.getElementById('ticker').value += strNoticia.substr(jTick,1) + '_';
     jTick = jTick + 1;
     window.setTimeout('rotular(true)', 33);
   }
   else
   { 
     if(iTick == 0) { iTick = iTickIni; } //ECC2008.06.08 Volver a rotar arreglo de noricias.
     jTick = 0; strNoticia = ' ';
     window.setTimeout('rotular(false)', 33); bSoloCursor = true;
   } 
 }
 else
 {    document.getElementById('ticker').value = x.substr(0,(x.length-1));       //if(!bCursor) { document.getElementById('ticker').value = x.substr(0,(x.length-1)); var r = window.setTimeout("rotular(true)", 100);}
      //if(bCursor) { document.getElementById('ticker').value += "_"; var r = window.setTimeout("rotular(false)", 100); }
 }
 }
}

function countRotulos() 
{
 window.document.getElementById('ticker').value = '';
 //ECC2008.05.17
 if(bTickIni == true)
 { window.document.getElementById('ticker').value = ' '; bTickIni = false;}
 else if(bTickIni == false) //exhibe cambio de renglón de mensajes.
 {
    bSoloCursor = false; iTime = 15000;
    strNoticia = arrNoticias[iTick]; jTick = 0;
    rotular(true);
    iTick = iTick - 1;
 }
 var c = window.setTimeout('countRotulos()', iTime);
}


//ECC2008.05.08 Cambio dinámico de melodía con base a la posición vertical de página.var bSndOK = -1;
var bSndOK = 0;

function xSnd(iSnd)
{
  if(bSndOK != iSnd)
  {
   bSndOK = iSnd;
   with(window.document.getElementById('hdrSound'))
   {
      loop = 'infinite'; delay = '7000'; 
      switch(iSnd)
      {
	case 0   : src= './AlmirantBritayStageI.mp3'; break;
	case 1   : src= './predicciones_Cumplidas.mp3'; break;
	case 2   : src= './predicciones_en_Potencial_Progreso.mp3'; break;
	case 3   : src= './predicciones_Cumpliendose.mp3'; break;
	case 4   : src= './Guerra_Karmica_y_la_Tercera_Guerra_Mundial.mp3'; break;
	case 5   : src= './La_Nueva_Era.mp3'; break;
	case 7   : src= './Galactic_Federation_of_Light.mp3'; break;
	case 8   : src= './La_batalla_final.mp3'; break;
	case 9   : src= './Destruccion_Total.mp3'; break;
	case 10  : src= './AlmirantBritayStageII.mp3'; break;
	case 11  : src= './AlmirantBritayStageIII.mp3'; break;
	case 12  : src= './Reconstruccion.mp3'; break;
	case 13  : src= './Guerra_Galactica.mp3'; break;
	case 14  : src= './predicciones2014.mp3'; break;
	case 15  : src= './ready_to_launch.mp3'; break;
	case 16  : src= './ready_to_launch_2.mp3'; break;
	case 17  : src= './WWIII_Begins.mp3'; break;
	case 18  : src= './Retaliation.mp3'; break;
	case 19  : src= './WWIII_Begins02.mp3'; break;
	case 20  : src= './Epic_Challenges.mp3'; break;
	case 24  : src= './predicciones2024.mp3'; break;
	case 41  : src= './predicciones2041.mp3'; break;
	case 50  : src= './predicciones2050.mp3'; break;
	case 201 : src= './predicciones2201.mp3'; break;
	case 321 : src= './Sailor_Wars01.mp3'; break;
	case 322 : src= './Sailor_Wars02.mp3'; break;
	case 323 : src= './Sailor_Wars03.mp3'; break;
	case 324 : src= './Sailor_Wars04.mp3'; break;
	case 325 : src= './Sailor_Wars05.mp3'; break;
	case 326 : src= './Sailor_Wars06.mp3'; break;
	case 327 : src= './Sailor_Wars07.mp3'; break;
	case 328 : src= './Sailor_Wars08.mp3'; break;
	case 329 : src= './Sailor_Wars09.mp3'; break;
	case 330 : src= './Kampte_Sailor_Moon.mp3'; break;
	case 370 : src= './Sailor_Wars09b.mp3'; break;
	case 371 : src= './Sailor_Wars09c.mp3'; break;
	case 372 : src= './Sailor_Wars09d.mp3'; break;
	case 373 : src= './Sailor_Wars09e.mp3'; break;
	case 374 : src= './Sailor_Wars09f.mp3'; break;
	case 375 : src= './Sailor_Wars09g.mp3'; break;
	case 376 : src= './Sailor_Wars09h.mp3'; break;
	case 377 : src= './Sailor_Wars09i.mp3'; break;
	case 378 : src= './Sailor_Wars09j.mp3'; break;
	case 379 : src= './Sailor_Wars09k.mp3'; break;
	case 380 : src= './Sailor_Wars09l.mp3'; break;
	case 381 : src= './Sailor_Wars09m.mp3'; break;
	case 382 : src= './Sailor_Wars09n.mp3'; break;
	case 383 : src= './Sailor_Wars09o.mp3'; break;
	case 384 : src= './Sailor_Wars09p.mp3'; break;
	case 385 : src= './Sailor_Wars09q.mp3'; break;
	case 386 : src= './Sailor_Wars09r.mp3'; break;
	case 387 : src= './Sailor_Wars09s.mp3'; break;
	case 388 : src= './Sailor_Wars09t.mp3'; break;
	case 389 : src= './Sailor_Wars09u.mp3'; break;
	case 390 : src= './Sailor_Wars09v.mp3'; break;
	case 391 : src= './Sailor_Wars09W.mp3'; break;
	case 392 : src= './Sailor_Wars09x.mp3'; break;
	case 393 : src= './Sailor_Wars09y.mp3'; break;
	case 394 : src= './Sailor_Wars09z.mp3'; break;
	case 395 : src= './Sailor_Wars2010a.mp3'; break;
	case 396 : src= './Sailor_Wars2010b.mp3'; break;
	case 397 : src= './Sailor_Wars2010c.mp3'; break;
	case 398 : src= './Sailor_Wars2010d.mp3'; break;
	case 399 : src= './Sailor_Wars2010e.mp3'; break;
	case 400 : src= './Sailor_Wars2010f.mp3'; break;
	case 401 : src= './Sailor_Wars2010g.mp3'; break;
	case 402 : src= './Sailor_Wars2010h.mp3'; break;
	case 403 : src= './Sailor_Wars2010i.mp3'; break;
	case 404 : src= './Sailor_Wars2010j.mp3'; break;
	case 405 : src= './Sailor_Wars2010k.mp3'; break;
	case 501 : src= './Sailor_Wars11.mp3'; break;
	case 500 : src= './We_Will_Win_2012.mp3'; break;

	case 700 : src= ''; break;
	case 701 : src= './Remember_Me_ProjectD2014.mp3'; break;
	case 702 : src= './Dont_stand_so_close_ProjectD2014.mp3'; break;
	case 703 : src= './HeartBeat_ProjectD2015.mp3'; break;
	case 704 : src= './Speed_Boy_ProjectD2017.mp3'; break;
	case 705 : src= './Burning_Desire_ProjectD2014.mp3'; break;
	case 706 : src= './Give_me_my_love_ProjectD2017.mp3'; break;
	case 707 : src= './Gimme_to_night_ProjectD2015.mp3'; break;
	case 708 : src= './Mikado_Super_Power_ProjectD2021_lastest_hit.mp3'; break;
	case 709 : src= './Hinoi_Mix_2019_2027.mp3'; break;
	case 710 : src= './Deja_vu_ProjectD2018.mp3'; break;
	case 711 : src= './Ayukawa_Mix_2016.mp3'; break;
	case 712 : src= './My_Jazzmin_China_Girl_Mozzart2018.mp3'; break;
	case 713 : src= './We_Believe_you_TheMoonies_2023.mp3'; break;
	case 714 : src= './Sailor_StarLights_TheMoonies_2022.mp3'; break;
	case 715 : src= './Aquarium_2026.mp3'; break;
	case 716 : src= './Geometric_City_2027.mp3'; break;
	case 717 : src= './Slaughter_Hour_2035.mp3'; break;
	case 718 : src= './Toxoplasma_2038.mp3'; break;
	case 719 : src= './Luminescence_2034.mp3'; break;
	case 720 : src= './Exodustrain_2037.mp3'; break;

	case 721 : src= './Decision_Setsuna_2034.mp3'; break;
	case 722 : src= './Feel_the_mystical_Kakurine_2035.mp3'; break;
	case 723 : src= './Right_way_Danzaiver_2036.mp3'; break;
	case 724 : src= './Sorrow_long_day_Hiraduca_2037.mp3'; break;
	case 725 : src= './A_Vision_Al_Lazel_2041.mp3'; break;

	case 726 : src= './Endless_stairs_2040.mp3'; break;
	case 727 : src= './Muddling_Through_2041.mp3'; break;
	case 728 : src= './Macross_Plus_50_aniv_VFX_2045.mp3'; break;
	case 729 : src= './Macross_Plus_50_aniv_New_Age_2045.mp3'; break;
	case 730 : src= './Macross_Plus_50_aniv_Be_an_angel_2045.mp3'; break;
	case 731 : src= './Feel_the_pasion_now_ProjectD2017.mp3'; break;
	case 732 : src= './Disco_party_ProjectD2014.mp3'; break;
	case 733 : src= './Hold_me_in_your_arms_ProjectD2019.mp3'; break;
	case 734 : src= './Night_Fever_ProjectD2014.mp3'; break;
	case 735 : src= './Come_on_Sailor_Moon_TheMoonies_2021.mp3'; break;

	case 777 : src= './Vision_en_Viaje_Astral.mp3'; break;
	case 888 : src= './Intro.mp3'; break;
	case 900 : src= './amor00.mp3'; break; 
	case 901 : src= './amor01.mp3'; break; 
	case 902 : src= './amor02.mp3'; break; 
	case 903 : src= './amor03.mp3'; break; 
	case 904 : src= './amor04.mp3'; break; 
	case 905 : src= './amor05.mp3'; break; 
	case 906 : src= './amor06.mp3'; break; 
	case 907 : src= './amor07.mp3'; break; 
	case 908 : src= './amor08.mp3'; break; 
	case 909 : src= './amor09.mp3'; break; 
	case 910 : src= './amor10.mp3'; break; 
	case 911 : src= './amor11.mp3'; break; 
	case 912 : src= './amor12.mp3'; break; 
	case 913 : src= './amor13.mp3'; break; 
	case 914 : src= './amor14.mp3'; break; 
	case 915 : src= './amor15.mp3'; break; 
	case 916 : src= './tiger.mp3'; break; 
	case 999 : src= './Future_Girls.mp3'; break;

      }
   }
  }
}


function x2Scroll() { var ScrollTop = window.document.body.scrollTop;  alert(ScrollTop); }

function scrollLeftOK(iPag) //ECC2008.09.11
{
   with(winFdow.document)
   {
	var vScrollLeft 	= body.scrollLeft;
	var vScrollLeftCmp 	= screen.availWidth;
	switch(iPag)
	{
		case 0: vScrollLeftCmp = vScrollLeftCmp / 8; 	break;
		case 1: vScrollLeftCmp = vScrollLeftCmp / 80; 	break;
		case 2: vScrollLeftCmp = vScrollLeftCmp / 4; 	break;
		case 3: vScrollLeftCmp = vScrollLeftCmp / 40; 	break;
		case 4: vScrollLeftCmp = vScrollLeftCmp / 12; 	break;
		case 5: vScrollLeftCmp = vScrollLeftCmp / 70; 	break;
		case 777: vScrollLeftCmp = vScrollLeftCmp / 40; break;
	}

	while(vScrollLeft <= vScrollLeftCmp)
	{
	    vScrollLeft += 1;
        }
	window.document.body.scrollLeft = vScrollLeft;
   }
}

function xScroll(iPag)
{
  var iPos = window.document.body.fscrollTop, iSnd = -1;

  switch(iPag)
  {
    case 0:
      iSnd = 395; //398;
      break;
    case 1:
      iSnd = 14;
      break;
    case 2:
      iSnd = 8;
      if(iPos >= 8584 && iPos < 39315)
      { iSnd = 321; }
      if(iPos >= 33230)
      { iSnd = 324; }
      break;
    case 3:
      iSnd = 10;
      break;
    case 4:
      iSnd = 9;
      if(iPos >= 36108 && iPos < 51419)
      { iSnd = 12; }
      else if(iPos >= 51420 && iPos < 56471)
      { iSnd = 13; }
      else if(iPos >= 56472 && iPos < 74627)
      { iSnd = 14; }
      else if(iPos >= 74628 && iPos < 77410)
      { iSnd = 24; }
      else if(iPos >= 77411)
      { iSnd = 41; }
      break;
    case 50:
      iSnd = 50;
      if(iPos >= 4440)
      { iSnd = 201; }
      break;
    case 777:
      iSnd = 777;
      break;
    case 888:
      iSnd = 888;
      break;
  }
  xSnd(iSnd);
}

//ECC2008.10.02
function selMusic(iSnd)
{
    var toLUCES = 0;
    switch(parseInt(iSnd))
    {
      
	case 700 : toLUCES = 0; break;
	case 701 : toLUCES = 16000; break;
	case 702 : toLUCES = 15000; break;
	case 703 : toLUCES = 27000; break;
	case 704 : toLUCES = 39000; break;
	case 705 : toLUCES = 39500; break;
	case 706 : toLUCES = 37000; break;
	case 707 : toLUCES = 29000; break;
	case 708 : toLUCES = 24000; break;
	case 709 : toLUCES = 25000; break;
	case 710 : toLUCES = 45000; break;
	case 711 : toLUCES = 71000; break;
	case 712 : toLUCES = 15000; break;
	case 713 : toLUCES = 65000; break;
	case 714 : toLUCES = 15000; break;
	case 715 : toLUCES = 21000; break;
	case 716 : toLUCES = 15000; break;
	case 717 : toLUCES = 24000; break;
	case 718 : toLUCES = 35000; break;
	case 719 : toLUCES = 54000; break;
	case 720 : toLUCES = 28000; break;
	case 721 : toLUCES = 52000; break;
	case 722 : toLUCES = 15000; break;
	case 723 : toLUCES = 15500; break;
	case 724 : toLUCES = 0;     break;
	case 725 : toLUCES = 21000; break;
	case 726 : toLUCES = 0;     break;
	case 727 : toLUCES = 13000; break;
	case 728 : toLUCES = 73000; break;
	case 729 : toLUCES = 7000;  break;
	case 730 : toLUCES = 50000; break;
	case 731 : toLUCES = 46000; break;
	case 732 : toLUCES = 29000; break;
	case 733 : toLUCES = 26000; break;
	case 734 : toLUCES = 25000; break;
	case 735 : toLUCES = 23000; break;

    }

    turnEQ(700); turnEQLUCES(700); turnEQBG(700); 

    setTimeout('turnEQ(' + iSnd + '); turnEQBG(' + iSnd + ');',2500);
    setTimeout('turnEQLUCES(' + iSnd + ');',toLUCES);
    setVisibleSnd((iSnd == 700 ? true : false));
    xSnd(parseInt(iSnd));
}

//ECC2008.10.03 Conmuta equalizador.
function turnEQ(iSnd)
{
    with(window.document)
    {
    	getElementById('eqL').src = './comun/avEQ' + (parseInt(iSnd) == 700 ? 'OFF' : '') + '.gif';
    	getElementById('eqR').src = './comun/avEQ' + (parseInt(iSnd) == 700 ? 'OFF' : '') + '.gif';
    }
}

function turnEQLUCES(iSnd)
{
    with(window.document)
    {
    	getElementById('eqLT').src = './comun/avEQ' + (parseInt(iSnd) == 700 ? 'OFF' : 'LUCES') + '.gif';
    	getElementById('eqLB').src = './comun/avEQ' + (parseInt(iSnd) == 700 ? 'OFF' : 'LUCES') + '.gif';
    	getElementById('eqRT').src = './comun/avEQ' + (parseInt(iSnd) == 700 ? 'OFF' : 'LUCES') + '.gif';
    	getElementById('eqRB').src = './comun/avEQ' + (parseInt(iSnd) == 700 ? 'OFF' : 'LUCES') + '.gif';
    }
}

function turnEQBG(iSnd)
{
    var srcBG = './comun/';
    var toLUCES = 0;
    switch(parseInt(iSnd))
    {
      
	case 701 : srcBG += 'nuke00'; 		break;
	case 702 : srcBG += 'nuke82'; 		break;
	case 703 : srcBG += 'transf_sv'; 	break;
	case 704 : srcBG += 'nuke42'; 		break; 
	case 705 : srcBG += 'transf_ss'; 	break; 
	case 706 : srcBG += 'transf_sj'; 	break; 
	case 707 : srcBG += 'transf_sp'; 	break;  
	case 708 : srcBG += 'nuke09'; 		break;
	case 709 : srcBG += 'nuke22'; 		break;
	case 710 : srcBG += 'nuke40'; 		break; 
	case 711 : srcBG += 'transf_st'; 	break;
	case 712 : srcBG += 'transf_ss2'; 	break; 
	case 713 : srcBG += 'transf_su'; 	break;
	case 714 : srcBG += 'transf_sn'; 	break;
	case 715 : srcBG += 'nuke31'; 		break;
	case 716 : srcBG += 'nuke15'; 		break;  
	case 717 : srcBG += 'nuke03'; 		break; 
	case 718 : srcBG += 'nuke35'; 		break; 
	case 719 : srcBG += 'nuke12'; 		break; 
	case 720 : srcBG += 'nuke01'; 		break;
	case 721 : srcBG += 'nuke20'; 		break;
	case 722 : srcBG += 'nuke09'; 		break; 
	case 723 : srcBG += 'nuke10'; 		break; 
	case 724 : srcBG += 'nuke04'; 		break;
	case 725 : srcBG += 'nuke30'; 		break;
	case 726 : srcBG += 'nuke21'; 		break;
	case 727 : srcBG += 'nuke37'; 		break;
	case 728 : srcBG += 'nuke81'; 		break;
	case 729 : srcBG += 'nuke19'; 		break;
	case 730 : srcBG += 'nuke24'; 		break;
	case 731 : srcBG += 'nuke89'; 		break;
	case 732 : srcBG += 'nuke86'; 		break;
	case 733 : srcBG += 'nuke85'; 		break;
	case 734 : srcBG += 'nuke10'; 		break;
	case 735 : srcBG += 'nuke90'; 		break;
	default: srcBG += 'avEQCLEAR'; 		break;
    }
    window.document.getElementById('imgSnd').src = srcBG + '.gif';
}

//ECC2008.10.02 Cambio de cursor.
function goCursor(iModo) { window.document.body.style.cursor = (iModo == 0 ? 'default' : iModo == 1 ? 'wait' : 'hand'); }

//ECC2008.10.02 Borde track.
function goBorder(iModo, sCtrl) { window.document.getElementById(sCtrl).style.StyleClass = (iModo == 0 ? 'brd00a' : iModo == 1 ? 'brd00a' : 'brd00b'); }

//ECC2008.10.08
function setVisibleSnd(iModo)
{
   var maxElement = 735;
   with(window.document)
   {
   	for(i = 701; i < maxElement + 1; i++)
   	{
	  getElementById(i.toString()).style.visibility = (iModo == true ? 'visible' : 'hidden');
	}

   }
}

//ECC2008.10.10
function setFocusIndex() { window.document.getElementById('hidPosIndex').focus(); }

  
//ECC2009.07.31
function cntV() 
{    


var nVisitas = '05947';

//Construir contador de visitas
var digito0 = nVisitas.substr(0,1);
var digito1 = nVisitas.substr(1,1);
var digito2 = nVisitas.substr(2,1);
var digito3 = nVisitas.substr(3,1);
var digito4 = nVisitas.substr(4,1);

window.document.getElementById('npCounter').innerHTML = getDigito(digito0) + getDigito(digito1) + getDigito(digito2) + getDigito(digito3) + getDigito(digito4);

//alert(document.location.toString());

return false;


var shtml = '';

//var location = window.location.href + '/cnt.txt';
var location = document.location.toString() + 'httpdocs/cnt.txt';


//alert(location);
//return false;

//Proceso de lectura
//Obtener Ultima Cuenta de archivo general de aplicación 
var fso = new ActiveXObject("Scripting.FileSystemObject");
var tempFile = fso.OpenTextFile(location, 1, false, 0);
var nVisitas = tempFile.ReadLine();
//Liberar recursos.
tempFile.Close(); 
fso = null;

//Construir contador de visitas
var digito0 = nVisitas.substr(0,1);
var digito1 = nVisitas.substr(1,1);
var digito2 = nVisitas.substr(2,1);
var digito3 = nVisitas.substr(3,1);
var digito4 = nVisitas.substr(4,1);

window.document.getElementById('npCounter').innerHTML = getDigito(digito0) + getDigito(digito1) + getDigito(digito2) + getDigito(digito3) + getDigito(digito4);


nVisitas = (nVisitas ? parseFloat(nVisitas) + 1 : 1);

//Proceso de escritura
//Actulizar cuenta de visitantes con el explorador de cliente.
var fso = new ActiveXObject('Scripting.FileSystemObject');
var tempFile = fso.OpenTextFile(location, 2, false, 0);


tempFile.WriteLine((parseFloat(nVisitas) < 10000 ? '0' : '') + (parseFloat(nVisitas) < 1000 ? '0' : '') + (parseFloat(nVisitas) < 100 ? '0' : '') + nVisitas.toString());

//Liberar recursos.
tempFile.Close(); 
fso = null;

} 

function getDigito(sDigito)
{
   return "<img src='./cnt" + sDigito + ".PNG'>";
}
