stofind = "canto.romancemusical.net"; // Directorio Raíz, puede ser "dominio.net"
defaulturl="http://canto.romancemusical.net/";  // Dirección principal del sitio
baseurl = "";
getBaseUrl();


secc = new Array();
subs = new Array();

//Menú principal de Canto, Poesía... ¡y más!

secc['ini'] = 'Inicio:index.html';
secc['can'] = 'Canciones:canto/index.html';
secc['poe'] = 'Poesías:poemas/index.html';
secc['pro'] = 'Prosas:prosas/index.html';
secc['ref'] = 'Algo para reflexionar:reflexiones/index.html';
secc['esc'] = 'Nuestro escudo:escudo.html';
secc['con'] = 'Participación y Contacto:contacto.php';
secc['rec'] = 'Reconocimientos:reconocimientos.html';

subs['ini'] = new Array();	// Subsecciones de la sección principal
subs['ini']['lnk'] = 'Ligas a sitios afines:ligas.html';

subs['can'] = new Array();	// Subsecciones de la sección de canto
subs['can']['cag'] = 'Índice General:canto/indexaazz.html';
// subs['can']['cad'] = 'Índice de la <strong>A</strong> a la <strong>D</strong>:canto/indexad.html';
// subs['can']['cel'] = 'Índice de la <strong>E</strong> a la <strong>L</strong>:canto/indexel.html';
// subs['can']['cmz'] = 'Índice de la <strong>M</strong> a la <strong>Z</strong>:canto/indexmz.html';

subs['poe'] = new Array();	// Subsecciones de la sección de poemas
subs['poe']['aa'] = 'por <strong>Autores</strong>:poemas/indexaa.html';
subs['poe']['pp'] = 'por <strong>Título</strong>:poemas/indexpp.html';
// subs['poe']['amz'] = 'Autores de la <strong>M</strong> a la <strong>Z</strong>:poemas/indexamz.html';
// subs['poe']['pad'] = 'Poesías de la <strong>A</strong> a la <strong>D</strong>:poemas/indexpad.html';
// subs['poe']['pel'] = 'Poesías de la <strong>E</strong> a la <strong>L</strong>:poemas/indexpel.html';
//subs['poe']['pmz'] = 'Poesías de la <strong>M</strong> a la <strong>Z</strong>:poemas/indexpmz.html';

//subs['ref'] = new Array();	// Subsecciones de la sección principal
//subs['ref']['ind'] = 'Índice de Ligas:reflexiones/index.html';


function doMenu(cursec, cursub) {
	for(seck in secc) {
		stmp=secc[seck].split(':');
		if(seck==cursec) {
			document.writeln('<div class="menuopc"><a class="cur" href="' + baseurl + stmp[1] + '">' + stmp[0] + '</a></div>');
			doSubm(cursec, cursub);
		} else {
			document.writeln('<div class="menuopc"><a href="' + baseurl + stmp[1] + '">' + stmp[0] + '</a></div>');
		}
	}
}

function doSubm(cursec, cursub) {
	if(!subs[cursec]) { return; }
	document.writeln('<div class="subopc">');
	for(subk in subs[cursec]) {
		curcl=' ';
		curch='» ';
		if(subk==cursub) {
			curcl=' class="cur" ';
			curch='• ';
		}
		atmp=subs[cursec][subk].split(':');
		document.writeln('<a' + curcl + 'href="' + baseurl + atmp[1] + '">' + curch + atmp[0] + '</a>');
	}
	document.writeln('</div>');
}

function getBaseUrl() {
	var igual=0;
	var docpath=document.location.pathname;
	docname=docpath;
	x=docpath.indexOf(stofind);
	y=x+stofind.length;
	if(x >= 0) {
		if(docpath.substring(x,y) == stofind) {
			docname=docpath.substring(y+1,docpath.length);
			igual=1;
		}
	}
	if(docname=='/' || docname=='') {
		docname='default.htm';
	}
	charfind='\\';
	x=docname.indexOf(charfind);
	while (x >= 0) {
		docname=docname.substring(0,x) + '/' + docname.substring(x+1,docname.length);
		x=docname.indexOf(charfind);
	}
	if(docname.charAt(0)=='/') {
		docname=docname.substring(1,docname.length);
	}
	if (igual == 0) {
		baseurl=defaulturl;
		return;
	}
	baseurl="";
	dcn=docname;
	x=dcn.indexOf('/');
	while (x >= 0) {
		dcn=dcn.substring(x+1, dcn.length);
		baseurl= baseurl + "../";
		x=dcn.indexOf('/');
	}
//	alert(docname + ' - ' + baseurl);
}

function regresa() {
	document.writeln('<div class="regresa"><strong>[<a href="javascript:history.back();">Página anterior</a>]');
	document.writeln('[<a href="' + baseurl + 'index.html">Inicio</a>]');
	document.writeln('[<a href="' + baseurl + 'canto/indexaazz.html">Cancionero</a>]');
	document.writeln('[<a href="' + baseurl + 'poemas/index.html">Poesía</a>]');
	document.writeln('[<a href="' + baseurl + 'prosas/index.html">Prosa</a>]');
	document.writeln('[<a href="ligas.html">Sitios afines</a>]');
	document.writeln('[<a href="' + baseurl + 'contacto.php">Contacto</a>]');
	document.writeln('[<a href="#arriba">Subir</a>]</strong></div>');
}
function copy() {
	document.writeln('<div class="copy">© 2000-2011 • Todos los derechos reservados. El material aquí presentado está protegido a favor de sus autores o propietarios.<br />');
	document.writeln('Producción: <a href="http://www.aisms.com" target="_blank"><strong>Armando Ideas » Diseño Web</strong></a></div>');
}

function conta() {
	document.writeln('<div align="center"><img src="http://www.elbajio.com/contador/index.php?c=cantoPt" alt="contador" /></div>');
}

function fecha() {
  var dd, mm, aa, hr, pfecha;
  var ii;
  var hoy=new Date();
  var mes=new Array();
  var dia=new Array();
  dia[0]='Domingo';          dia[1]='Lunes';          dia[2]='Martes';
  dia[3]='Miércoles';        dia[4]='Jueves';         dia[5]='Viernes';
  dia[6]='Sábado';

  mes[0]='Ene';		mes[1]='Feb';		mes[2]='Mzo';	mes[3]='Abr';
  mes[4]='May';        mes[5]='Jun';		mes[6]='Jul';  mes[7]='Ago';
  mes[8]='Set';	mes[9]='Oct';		mes[10]='Nov';	mes[11]='Dic';

  dd=hoy.getDate();
  mm=hoy.getMonth();
  aa=hoy.getYear();
  if(aa<2000) {
    aa=aa+1900;
  }
  ii=hoy.getDay();
  hr=hoy.getHours();
  pfecha='<div class="txc8"><strong> ' + dia[ii] + ' ' + dd + '/' + mes[mm] + '/'+aa  + '</strong></div>';
  document.write(pfecha+'');
}

function mail() {
	document.writeln('<a href="mailto:contacto@romancemusical.net?subjet=Contacto a Canto">contacto@romancemusical.net</a>');
}

function CargaBan() {
  a = 0;
  maxBan = 4;  // Igual a número de banners a presentar
  BanHref = new Array();
    BanHref[1] = "http://www.aisms.com";
    BanHref[2] = "http://www.elbajio.com";
    BanHref[3] = "http://ranitashow.com";
    BanHref[4] = "http://literatura.elbajio.com";
  BanImg = new Array();
    BanImg[1] = "http://canto.romancemusical.net/images/banners/400_aisms_ideas.gif";
    BanImg[2] = "http://canto.romancemusical.net/images/banners/400_elbajio_piensa.gif";
    BanImg[3] = "http://canto.romancemusical.net/images/banners/400_ranita.gif";
    BanImg[4] = "http://canto.romancemusical.net/images/banners/400_literatura.gif";
}
function rotateBanner(s) { 
  window.setTimeout('changeBanner()', s*600);
}
function Elige() {
  var secs="";
  var num=0;
  var eDate=new Date();
  num= Math.abs(Math.sin(eDate.getTime()));
  secs=num+"";
  secs=secs.substring(secs.length-2,secs.length-0);
  if (secs.substring(0,1)=='0') {
    secs=secs.substring(1,2,3,4);
  }
  for (i=1; secs>maxBan; i++) {
     secs=secs-maxBan;
  }
  if (secs==0) {
    secs=1;
  }
  // alert('secs='+secs,'');
  return secs;
}
function changeBanner() {
  // a = a + 1;  
  // if (a==maxBan+1) a = 1;
  a = Elige();
  document.banner.src=BanImg[a];
  DestHref=BanHref[a];
  rotateBanner(5);
}
function banners400() {
  CargaBan();
  a = Elige();
  document.write('<div class="banner"><a href="¡Visítanos!" onClick="this.href=DestHref" target="_blank">');
  document.write('<img src="'+BanImg[a]+'" name="banner" ></a></div>');
  DestHref=BanHref[a];
  rotateBanner(4);
}
function izquierda() {
	document.writeln('<div class="izquierdo">');
	document.writeln('<div class="publiz"><a target="_blank" href="http://www.romancemusical.net" >Serenatas en la Red<br /><img src="' + baseurl + 'images/romance-lg.gif" title="Romance Musical" alt="logo de Romance Musical" /></a></div>');
	document.writeln('<div class="publiz"><a target="_blank" href="http://www.mexico-canta.org" >Voz y sentimiento de nuestro pueblo a través de la música<br /><img src="' + baseurl + 'images/mexico-canta_izq.jpg" title="Romance Musical" alt="logo de Romance Musical" /></a></div>');
	document.writeln('<div class="publiz"><a target="_blank" href="http://www.aisms.com/">¿Publicidad en la Red?<br />¿Servicios Web?<br /><img src="' + baseurl + 'images/lgaisms75.jpg" title="Armando Ideas" alt="logo: Armando Ideas" /><br /><strong>¡Contáctenos!</strong></a></div>');
	document.writeln('<div class="publiz"><a target="_blank" href="http://www.elbajio.com/"><img src="' + baseurl + 'images/lgelbajio100.gif" alt="logo: El Bajío" /><br />Directorio Comercial, Industrial y de Servicios</a></div>');
	document.writeln('<div class="publiz"><a target="_blank" href="http://www.leonmx.com/"><img src="' + baseurl + 'images/leonmx100_60.gif" alt="logo: LeónMx" /><br />Revista electrónica de la<br />ciudad de León, Guanajuato</a></div>');
	document.writeln('<div class="publiz"><a target="_blank" href="http://.literatura.elbajio.com/"><img src="' + baseurl + 'images/lgliterat.gif" title="Literatura... ¡y algo más! "alt="logo: Literatura... ¡y algo más!" /><br />Un Oasis cultural<br />en la Red</a></div></div>');
}
function derecha() {
	document.writeln('<h4>Padrinos del Sitio</h4>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.ranitashow.com">Para sus fiestas infantiles...<br /><img src="' + baseurl + 'images/pub/ranita_show145.gif" title="Ranita Show - Cuentacuentos" alt="logo: Ranita Show - Cuentacuentos y diversión infantil" /></a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.leonmx.com/terapiagestalt"><img src="' + baseurl + 'images/pub/samy_190.jpg" title="Cuauhcalli, Cultura y terapia en movimiento" alt="logo: Cuauhcalli, Cultura y terapia en movimiento" /><br />Terapia Gestalt, Reiki, Masajes Holísticos, Manualidades...<br /><strong>¡y más!</strong><br />Atención a niños, adolescentes y adultos</a></div>');
	document.writeln('<h4>Visita también:</h4>');
	document.writeln('<div class="derc"><a target="_blank" href="http://musicapopulardemexico.blogspot.com/" ><img src="' + baseurl + 'images/mpm-ch.gif" alt="Música Popular Mexicana" /></a></div>');
	document.writeln('<div class="dercf"><a target="_blank" href="http://musicapopularlatinoamericana.blogspot.com/" ><img src="' + baseurl + 'images/mpl-ch.gif" alt="Música Popular Latinoamericana" /></a></div>');
}
function derecha2() {
	document.writeln('<h4>Padrinos del sitio</h4>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.ranitashow.com">Para sus fiestas infantiles...<br /><img src="' + baseurl + 'images/pub/ranita_show145.gif" title="Ranita Show - Cuentacuentos" alt="logo: Ranita Show - Cuentacuentos y diversión infantil" /></a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.leonmx.com/terapiagestalt"><img src="' + baseurl + 'images/pub/samy_190.jpg" title="Cuauhcalli, Cultura y terapia en movimiento" alt="logo: Cuauhcalli, Cultura y terapia en movimiento" /><br />Terapia Gestalt, Reiki, Masajes Holísticos, Manualidades...<br /><strong>¡y más!</strong><br />Atención a niños, adolescentes y adultos</a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.rezza.com.mx/"><img src="' + baseurl + 'images/rezzalg.gif" title="Rezza Editores" alt="logo Rezza Editores" /></a></div>');
	document.writeln('<h4>Visita también:</h4>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.joaquinpantoja.com.mx/"><strong>El Trovador michoacano</strong><br /><img src="' + baseurl + 'images/joaquin-pantoja.jpg" title="Joaquín Pantoja" alt="portada Joaquín Pantoja" /></a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://musicapopulardemexico.blogspot.com/"><img src="' + baseurl + 'images/mpm-ch.gif" alt="Música Popular Mexicana" /></a></div>');
	document.writeln('<div class="dercf"><a target="_blank" href="http://musicapopularlatinoamericana.blogspot.com/" ><img src="' + baseurl + 'images/mpl-ch.gif" alt="Música Popular Latinoamericana" /></a></div>');
}
function derecha3() {
	document.writeln('<h4>Padrinos del Sitio</h4>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.ranitashow.com">Para sus fiestas infantiles...<br /><img src="' + baseurl + 'images/pub/ranita_show145.gif" title="Ranita Show - Cuentacuentos" alt="logo: Ranita Show - Cuentacuentos y diversión infantil" /></a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.leonmx.com/terapiagestalt"><img src="' + baseurl + 'images/pub/samy_190.jpg" title="Cuauhcalli, Cultura y terapia en movimiento" alt="logo: Cuauhcalli, Cultura y terapia en movimiento" /><br />Terapia Gestalt, Reiki, Masajes Holísticos, Manualidades...<br /><strong>¡y más!</strong><br />Atención a niños, adolescentes y adultos</a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.rezza.com.mx/"><img src="' + baseurl + 'images/rezzalg.gif" title="Rezza Editores" alt="logo Rezza Editores" /></a></div>');
	document.writeln('<h4>Visita también:</h4>');
}
function derecha4() {
	document.writeln('<h4>Padrinos del Sitio</h4>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.ranitashow.com">Para sus fiestas infantiles...<br /><img src="' + baseurl + 'images/pub/ranita_show145.gif" title="Ranita Show - Cuentacuentos" alt="logo: Ranita Show - Cuentacuentos y diversión infantil" /></a></div>');
	document.writeln('<div class="derc"><a target="_blank" href="http://www.leonmx.com/terapiagestalt"><img src="' + baseurl + 'images/pub/samy_190.jpg" title="Cuauhcalli, Cultura y terapia en movimiento" alt="logo: Cuauhcalli, Cultura y terapia en movimiento" /><br />Terapia Gestalt, Reiki, Masajes Holísticos, Manualidades...<br /><strong>¡y más!</strong><br />Atención a niños, adolescentes y adultos</a></div>');
}
function canciones() {
	document.write('<div class="canciones"><ul>');
	document.write('<li><a href="#a">A</a></li><li><a href="#b">B</a></li><li><a href="#c">C</a></li><li><a href="#d">D</a></li>');
	document.write('<li><a href="#e">E</a></li><li><a href="#f">F</a></li><li><a href="#g">G</a></li><li><a href="#h">H</a></li>');
	document.write('<li><a href="#i">I</a></li><li><a href="#j">J - K</a></li><li><a href="#l">L</a></li><br /><br/><li><a href="#m">M</a></li>');
	document.write('<li><a href="#n">N</a></li><li><a href="#o">O</a></li><li><a href="#p">P</a></li><li><a href="#q">Q</a></li>');
	document.write('<li><a href="#r">R</a></li><li><a href="#s">S</a></li><li><a href="#t">T</a></li><li><a href="#u">U - Z</a></li><li><a href="#arriba">Subir</a></li></ul></div>');
}

