// valores pos default
	/*
	var defC="http://holamundoc.blogspot.com/2008/04/default.html";
	var defJava="http://holamundojavaaye.blogspot.com";
	var defPascal="http://holamundopascal.blogspot.com";
	*/
	var MARKNULL="#NOEXISTE";

	// array de direcciones de HM Pascal
	var aPascal=new Array();
	
	// array de direcciones de HM C
	var aC=new Array();

	// array de direcciones de HM Java	
	var aJava= new Array();


	// CAPITULO 1
	aPascal[0]="http://holamundopascal.blogspot.com/2007/08/capitulo-1_9518.html"; 
	aC[0]="http://holamundoc.blogspot.com/2008/03/comenzando-programar-en-c.html"; 
	aJava[0] ="http://holamundojavaaye.blogspot.com/2009/02/capitulo-1.html";
	
	// CAPITULO 2
	aPascal[1]="http://holamundopascal.blogspot.com/2007/08/capitulo-2.html"; 
	aC[1]="http://holamundoc.blogspot.com/2008/03/operadores-y-strings.html"; 
	aJava[1] ="http://holamundojavaaye.blogspot.com/2009/02/capitulo-2.html";
	
	// CAPITULO 3
	aPascal[2]="http://holamundopascal.blogspot.com/2007/08/capitulo-3.html"; 
	aC[2]="http://holamundoc.blogspot.com/2008/04/funciones.html"; 	
	aJava[2] ="http://holamundojavaaye.blogspot.com/2009/03/capitulo-3.html";


	// CAPITULO 4
	aPascal[3]="http://holamundopascal.blogspot.com/2007/08/capitulo-4.html"; 
	aC[3]=MARKNULL;
	aJava[3] ="http://holamundojavaaye.blogspot.com/2009/03/capitulo-4.html";

	// CAPITULO 5
	aPascal[4]="http://holamundopascal.blogspot.com/2007/08/capitulo-5.html";
	aC[4]="http://holamundoc.blogspot.com/2008/04/arrays.html";
	aJava[4]="http://holamundojavaaye.blogspot.com/2009/03/capitulo-5.html";

	// CAPITULO 6
	aPascal[5]="http://holamundopascal.blogspot.com/2007/08/capitulo-6.html";
	aC[5]="http://holamundoc.blogspot.com/2008/04/tipos-de-datos-definidos-por-el.html";
	aJava[5] =MARKNULL;

	// CAPITULO 7
	aPascal[6]="http://holamundopascal.blogspot.com/2007/08/capitulo-7.html";
	aC[6]="http://holamundoc.blogspot.com/2008/04/operaciones-sobre-estructuras.html";
	aJava[6] =MARKNULL;
	
	// CAPITULO 8
	aPascal[7]="http://holamundopascal.blogspot.com/2008/03/capitulo-8.html";
	aC[7]=MARKNULL;
	aJava[7]=MARKNULL;
	
	// CAPITULO 9
	aPascal[8]="http://holamundopascal.blogspot.com/2007/08/capitulo-9.html";
	aC[8]=MARKNULL;
	aJava[8]=MARKNULL;

	// ej 1.6
	aPascal[9]="http://holamundopascal.blogspot.com/2007/08/muestra-multiplos.html";
	aC[9]="http://holamundoc.blogspot.com/2008/04/muestra-multiplos.html";
	aJava[9]=MARKNULL;

	// ej 1.7
	aPascal[10]="http://holamundopascal.blogspot.com/2007/08/blog-post_24.html";
	aC[10]="http://holamundoc.blogspot.com/2008/04/prode.html";
	aJava[10]=MARKNULL;

	// ej 3.3
	aPascal[11]="http://holamundopascal.blogspot.com/2007/08/numeros-primos.html";
	aC[11]="http://holamundoc.blogspot.com/2008/04/blog-post.html";
	aJava[11]=MARKNULL;

	// ej 3.4
	aPascal[12]="http://holamundopascal.blogspot.com/2007/08/sueldos.html";
	aC[12]="http://holamundoc.blogspot.com/2008/04/sueldos.html";
	aJava[12]=MARKNULL;

	// ej 3.5
	aPascal[13]="http://holamundopascal.blogspot.com/2007/08/conversion-numerica.html";
	aC[13]="http://holamundoc.blogspot.com/2008/10/problema-35.html";
	aJava[13]=MARKNULL;

	// ej 3.6
	aPascal[14]="http://holamundopascal.blogspot.com/2007/10/funciones-de-manejo-de-string.html";
	aC[14]="http://holamundoc.blogspot.com/2008/11/problema-36.html";
	aJava[14]=MARKNULL;
	aPascal[15]="http://holamundopascal.blogspot.com/2007/10/untstringpas.html";
	aC[15]="http://holamundoc.blogspot.com/2008/11/problema-36.html";
	aJava[15]=MARKNULL;
	
	// ej 4.3	
	aPascal[16]="http://holamundopascal.blogspot.com/2007/08/discos.html";
	aC[16]="http://holamundoc.blogspot.com/2008/11/problema-43.html";
	aJava[16]=MARKNULL;

	// HolaMundoPascal.blogspot.com (pagina por default del blog)
	aPascal[17]="http://holamundopascal.blogspot.com/"; 
	aC[17]=aC[0];
	aJava[17]=aJava[0];
	aPascal[18]="http://www.holamundopascal.blogspot.com/"; 
	aC[18]=aC[0];
	aJava[18]=aJava[0];
	
	
	// ---[ SINONIMOS ]-------------------
	var mPascal=new Array();
	mPascal[0]=new Array(2,"http://holamundopascal.blogspot.com/2008/05/operadores-binarios.html");
	mPascal[1]=new Array(6,"http://holamundopascal.blogspot.com/2007/08/capitulo-7_24.html");	
	mPascal[2]=new Array(6,"http://holamundopascal.blogspot.com/2007/08/capitulo-7_3210.html");	
	mPascal[3]=new Array(8,"http://holamundopascal.blogspot.com/2007/08/capitulo-9_24.html");	

	var mC=new Array();
	mC[0]=new Array(1,"http://holamundoc.blogspot.com/2008/04/manejo-de-cadenas-de-caracteres.html");
	
	var mJava=new Array();
	mJava[0]=new Array(2,"http://holamundojavaaye.blogspot.com/2009/03/capitulo-3param.html");
	mJava[1]=new Array(2,"http://holamundojavaaye.blogspot.com/2009/03/capitulo-3-oper.html");
	mJava[2]=new Array(4,"http://holamundojavaaye.blogspot.com/2009/03/capitulo-5-objetos.html");
	mJava[3]=new Array(4,"http://holamundojavaaye.blogspot.com/2009/03/capitulo-5-interfaces.html");	
	mJava[4]=new Array(4,"http://holamundojavaaye.blogspot.com/2009/03/capitulo-5-coll.html");		
	mJava[5]=new Array(4,"http://holamundojavaaye.blogspot.com/2009/04/capitulo-5-coll-imple.html");		


	// sobreescribe la funcion contains de la clase String
	String.prototype.contains = function(t) { return this.indexOf(t) >= 0 ? true : false }	

	// recibe una url y un array y retorna la posicion en la que el array
	// contiene esa url o -1 si la url no esta contenida en el array
	function contains(unaUrl, unArray, exacto) 
	{
		var contiene;
	   for(var i=0; i<unArray.length; i++)
		{
			if( !exacto )
			{
				contiene=unaUrl.contains(unArray[i])>=0;
			}
			else
			{
				contiene=unaUrl==unArray[i];
			}
			
			if( contiene )
			{
				return i;
			}
		}

	//			if( unaUrl.contains(unArray[i]) )
	//			if( unaUrl==unArray[i] )
	//			{
	//			return i;
	//		}
		
		return -1;
	}

	function _getHMResource(URL,origenArray,mSinonimos,destinoArray,def)
	{
		var pos=contains(URL,origenArray,true);
		if( pos<0 )
		{
			var x=URL.indexOf("#");
			if( x>=0 )
			{
				var z=URL.substring(0,x);
				pos=contains(z,origenArray,true);
			}
		}
		
		if( pos>=0 /*&& pos<destinoArray.length*/ )
		{
			return destinoArray[pos];
		}
		else
		{
			var pos2=_getSinonimo(URL,mSinonimos);			
			return pos2>=0?destinoArray[pos2]:def;
		}
	}

	

	function _getSinonimo(url,mSinonimos)
	{
		for(var i=0; i<mSinonimos.length; i++)
		{
			if(mSinonimos[i][1]==url)
			{
				return mSinonimos[i][0];
			}
		}
		return -1;
	}

	function procesarSolapas(url)
	{	
		if( url.contains("holamundopascal") )
		{  /*
			var lnkC=_getHMResource(url,aPascal,mPascal,aC,defC);
			var lnkJ=_getHMResource(url,aPascal,mPascal,aJava,defJava);			
			*/
			
			var lnkC=_getHMResource(url,aPascal,mPascal,aC,MARKNULL);
			var lnkJ=_getHMResource(url,aPascal,mPascal,aJava,MARKNULL);
			var lnkP=null;
			escribirHTMLSolapas(lnkP,lnkC,lnkJ);
			return;	
		}

		if( url.contains("holamundoc") )
		{  /*
			var lnkP=_getHMResource(url,aC,mC,aPascal,defPascal);
			var lnkJ=_getHMResource(url,aC,mC,aJava,mJava,defJava);
			*/
			var lnkP=_getHMResource(url,aC,mC,aPascal,MARKNULL);
			var lnkJ=_getHMResource(url,aC,mC,aJava,MARKNULL);
			
			var lnkC=null;
			escribirHTMLSolapas(lnkP,lnkC,lnkJ);
			return;
		}
		
		if( url.contains("holamundojava") )
		{  /*
			var lnkC=_getHMResource(url,aJava,mJava,aC,defC);
			var lnkP=_getHMResource(url,aJava,mJava,aPascal,defPascal);
			*/
			var lnkC=_getHMResource(url,aJava,mJava,aC,MARKNULL);
			var lnkP=_getHMResource(url,aJava,mJava,aPascal,MARKNULL);
			
			var lnkJ=null;
			escribirHTMLSolapas(lnkP,lnkC,lnkJ);
			return;
		}
	}
	
	function evalLink(lnk)
	{
		var ret=new Array();
		
		if( lnk!=null )
		{
			if(lnk!=MARKNULL)
			{
				ret[0]="<li><a href='"+lnk+"'>";
				ret[1]="</a></li>";
			}
			else
			{
				ret[0]="<li class='tachado'>";
				ret[1]="</li>";
			}
		}
		else
		{
			ret[0]="<li class='activo'>";
			ret[1]="</li>";
		}

		return ret;
	}
	
	
	function escribirHTMLSolapas(lnkP,lnkC,lnkJ)
	{
		/*
		var P=lnkP!=null?"<li><a href='"+lnkP+"'>":"<li class='activo'>";
		var C=lnkC!=null?"<li><a href='"+lnkC+"'>":"<li class='activo'>";
		var J=lnkJ!=null?"<li><a href='"+lnkJ+"'>":"<li class='activo'>";
			
		var cierraP=lnkP!=null?"</a></li>":"</li>";
		var cierraC=lnkC!=null?"</a></li>":"</li>";
		var cierraJ=lnkJ!=null?"</a></li>":"</li>";
		*/
		
		var aux=evalLink(lnkP);
		var P=aux[0];
		var cierraP=aux[1];		

		aux=evalLink(lnkC);
		var C=aux[0];
		var cierraC=aux[1];		
		
		aux=evalLink(lnkJ);
		var J=aux[0];
		var cierraJ=aux[1];		
								
		document.write(
			" <div class='menu_contenedor'>" + 
			" <ul> " + 
						J + "&nbsp;&nbsp;&nbsp;" 			+ ".java" 	+ "&nbsp;&nbsp;&nbsp;" + cierraJ +
						C + "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" 	+ ".c" 		+ "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" + cierraC +
						P + "&nbsp;&nbsp;&nbsp;" 			+ ".pas" 	+ "&nbsp;&nbsp;&nbsp;" + cierraP +
			" </ul> " +
			"</div>" +
			" <div id='linea'></div>"
			//+"<p class='help_solapa'>Ver este mismo cap&iacute;tulo codificado en <b>C</b> o <b>Java</b></p>"
		);
			
		return;
	}