//----------------------------------------------------------------
// CUENTA LOS DIAS DE CADA MES
//----------------------------------------------------------------	
function contar_dias_mes(mes,ano){ 
	di=28;
	f = new Date(ano,mes-1,di); 
	while(f.getMonth()==mes-1){ 
		di++; 
		f = new Date(ano,mes-1,di); 
	} 
	return di-1; 
} 
//----------------------------------------------------------------
// NOMBRE DEL DIA ACTUAL
//----------------------------------------------------------------
function nombre_dia(f_numdia){ 
	if (f_numdia == 0){ f_numdia = 7; }
	f_numdia--;
	var nombres_dia = new Array("Lunes","Martes","Miércoles","Jueves","Viernes","Sábado","Domingo");
	return nombres_dia[f_numdia];
}
//----------------------------------------------------------------
// NOMBRE DEL MES ACTUAL
//----------------------------------------------------------------
function nombre_mes(f_nummes){ 
	var nombres_meses = new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre"); 
	return nombres_meses[f_nummes];
}
//----------------------------------------------------------------
// ENTERO DE FECHA
//----------------------------------------------------------------
function date_integer(fnc_day,fnc_month,fnc_year){ 
	var fnc_Fecha_Actual = new Date();
	//---- Numero del dia actual del mes -------------
	if (fnc_day=="n"){ var int_num_actual_day = fnc_Fecha_Actual.getDate(); }
	else{ var int_num_actual_day = fnc_day; }
	if (String(int_num_actual_day).length==1){ int_num_actual_day = 0+""+int_num_actual_day; }

	//---- Numero del mes ----------------------------
	if (fnc_month=="n"){ var int_num_actual_month = fnc_Fecha_Actual.getMonth()+1; }
	else{ var int_num_actual_month = fnc_month+1; }		
	if (String(int_num_actual_month).length==1){ int_num_actual_month = 0+""+int_num_actual_month; }
	
	//---- Año ----------------------------
	if (fnc_year=="n"){ var int_num_actual_year = f_Fecha_Actual.getFullYear(); }
	else{ int_num_actual_year = fnc_year; }	

	var fnc_int_fecha_actual = int_num_actual_year+""+int_num_actual_month+""+int_num_actual_day;
	
	return fnc_int_fecha_actual;
}


//----------------------------------------------------------------
// AL SELECCIONAR UN NUEVO MES/AÑO
//----------------------------------------------------------------
function iniciar_calendario(f_url_script,bool_fecha_actual){
	var str_cont;
	
	//***************************************************************************
	// FECHA INICIAL
	//***************************************************************************
	var f_Fecha_Actual = new Date();
	
	//------------------------------------------------------
	//Entero de fecha actual para posterior comparacion
	//------------------------------------------------------
	var int_actual_day = f_Fecha_Actual.getDate();
	var int_actual_month = f_Fecha_Actual.getMonth();
	var int_actual_year = f_Fecha_Actual.getFullYear();
	int_fecha_actual = date_integer(int_actual_day,int_actual_month,int_actual_year);
	//------------------------------------------------------
	
	if (bool_fecha_actual){ 
		// ----------- MES ACTUAL -------------------------------
		var f_num_mes_actual = f_Fecha_Actual.getMonth();
		document.frm_calendar.frm_month.options[f_num_mes_actual].selected = true;
		
		// ----------- AÑO ACTUAL -------------------------------
		var f_ano_actual = f_Fecha_Actual.getFullYear();
		for(f_year=0;f_year<document.frm_calendar.frm_year.length;f_year++){
			if (f_ano_actual == document.frm_calendar.frm_year.options[f_year].value){
				document.frm_calendar.frm_year.options[f_year].selected = true;
				var mostrar_indice_anno = f_year;
				var mostrar_numero_anno = document.frm_calendar.frm_year.options[f_year].value;
			}
		}
		//----------- FECHA ACTUAL  ---------------------------------------------
		//-----------------------------------------------------------------------		
		var mostrar_numero_mes = f_num_mes_actual; //Numero del mes 0=Enero,1=Febrero...
		var mostrar_nombre_mes = nombre_mes(f_num_mes_actual); //Nombre del mes Enero,Febrero...
		var mostrar_numero_dias_mes = contar_dias_mes(mostrar_numero_mes+1,mostrar_numero_anno);
		
		var mostrar_num_dia_semana = f_Fecha_Actual.getDay(); //Dia de la semana 1=lunes,2=Martes,3=Miercoles...
		var mostrar_num_dia_mes = f_Fecha_Actual.getDate(); //Dia actual		

		//----------- FECHA INICIAL  --------------------------------------------
		//-----------------------------------------------------------------------		
		var f_Fecha_Inicial = new Date(mostrar_numero_anno, mostrar_numero_mes, 1);
		var mostrar_num_dia_semana_inicial = f_Fecha_Inicial.getDay(); //Dia de la semana 1=lunes,2=Martes,3=Miercoles...
	}else{
	
		// ----------- MES SELECCIONADO -------------------------
		var mostrar_numero_mes = document.frm_calendar.frm_month.selectedIndex; //Numero del mes 0=Enero,1=Febrero...
		var mostrar_nombre_mes = nombre_mes(mostrar_numero_mes); //Nombre del mes Enero,Febrero...
		
		// ----------- AÑO SELECCIONADO -------------------------

		for(f_year=0;f_year<document.frm_calendar.frm_year.length;f_year++){
			if (document.frm_calendar.frm_year.options[f_year].selected){
				var mostrar_indice_anno = f_year;
				var mostrar_numero_anno = document.frm_calendar.frm_year.options[f_year].value;
			}
		}
		
		//----------- FECHA SELECCIONADA ----------------------------------------
		//-----------------------------------------------------------------------
		var mostrar_nombre_mes = nombre_mes(mostrar_numero_mes); //Nombre del mes Enero,Febrero...
		var mostrar_numero_dias_mes = contar_dias_mes(mostrar_numero_mes+1,mostrar_numero_anno);
		
		//Si se muestra el mismo dia del mes y año seleccionados
		var mostrar_num_dia_semana = f_Fecha_Actual.getDay(); //Dia de la semana 1=lunes,2=Martes,3=Miercoles...
		var mostrar_num_dia_mes = f_Fecha_Actual.getDate(); //Dia actual		
	
		//----------- FECHA INICIAL  --------------------------------------------
		//-----------------------------------------------------------------------		
		var f_Fecha_Inicial = new Date(mostrar_numero_anno, mostrar_numero_mes, 1);
		var mostrar_num_dia_semana_inicial = f_Fecha_Inicial.getDay(); //Dia de la semana 1=lunes,2=Martes,3=Miercoles...
	}

	//Imprime el mes en el calendario
	//--------------------------------------------------
	str_cont = "<table border=\"0\" width=\"280\" id=\"table2\" cellspacing=\"0\" cellpadding=\"0\">";
	str_cont = str_cont +"<tr><td  align=\"center\" colspan=\"7\" bgcolor=\"#355772\"><font class=txt_calendar_month color=FFFFFF><b>"+mostrar_nombre_mes+"</b></font></td></tr>";
	str_cont = str_cont +"</table>";	
	
	//***************************************************************************
	// Dias semanales
	//***************************************************************************
	str_cont = str_cont+"<table border=\"0\" width=\"270\" id=\"table1\" style=\"border-left: 1px solid #C0C0C0; border-right: 1px solid #C0C0C0; border-top-width: 1px; border-bottom: 1px solid #C0C0C0\">";

	//----------- Nombre Dias de la semana ----------------------------------
	//-----------------------------------------------------------------------
	str_cont = str_cont+"  <tr>";
	str_cont = str_cont+"  	<td align=\"center\" style=\"background-color: #D8DDE1\">";
	str_cont = str_cont+"  	<div align=\"center\">";
	str_cont = str_cont+"  	<table align=\"center\" border=\"0\" width=\"270\" id=\"table2\" cellspacing=\"0\" cellpadding=\"0\">";
	str_cont = str_cont+" 	 <tr>";
	
	var arr_dias_semana = new Array("Lu","Ma","Mi","Ju","Vi","Sa","Do");
	var num_dias_semana = arr_dias_semana.length;	
	for(n_nm_day=0;n_nm_day<num_dias_semana;n_nm_day++){
		str_cont = str_cont+" 	<td width=\"34\" align=\"center\"><font class=txt_calendar_day color=000000><b>"+arr_dias_semana[n_nm_day]+"</b></font></td>";
	}
	
	str_cont = str_cont+" 	 </tr>";
	
	//----------- Dias de la semana -----------------------------------------
	//-----------------------------------------------------------------------
	str_cont = str_cont+" 	 <tr style=\"background-color: #FFFFFF\">";
	if(mostrar_num_dia_semana_inicial == 0){ mostrar_num_dia_semana_inicial = 7 }
	var cnt_day = mostrar_num_dia_semana_inicial-1;
	var num_day = 0;
	
	for(n_day=0;n_day<cnt_day;n_day++){
		str_cont = str_cont+"<td height=\"18\" width=\"34\" align=\"center\">&nbsp;</td>";	
	}
	
	// - -  Impresion de numeros de dias
	//-----------------------------------------------------------------------
	for(n_nm_day=0;n_nm_day<mostrar_numero_dias_mes;n_nm_day++){
		num_day++; cnt_day++;
	
		num_mes = mostrar_numero_mes+1;
		//link_day = "?fecha="+num_day+"/"+num_mes+"/"+mostrar_numero_anno;
		link_day = ""+num_day+"-"+num_mes+"-"+mostrar_numero_anno+"/listado_articulos.html";
		int_fecha_selec = date_integer(num_day,mostrar_numero_mes,mostrar_numero_anno);
		if (int_fecha_selec <= int_fecha_actual){
			if(int_fecha_selec == int_fecha_actual){
				//Si es Domingo Festivo
				color_day = "FFFFFF";
				//Estilo del enlace
				style_sublink = "onClick=\"window.location='"+f_url_script+link_day+"'\"";
				//Imprime el día
				str_cont = str_cont+"<td bgcolor=\"#355772\" style=\"cursor:pointer;\" height=\"18\" "+style_sublink+" width=\"34\" align=\"center\"><font color="+color_day+" class=txt_calendar>"+num_day+"</font></td>";			
			}else{
				//Si es Domingo Festivo
				if (cnt_day == num_dias_semana){ color_day = "F00000"; }
				else { color_day = "000000"; }
				
				//Estilo del enlace
				style_sublink = "onClick=\"window.location='"+f_url_script+link_day+"'\" onmouseover=\"bgColor='#F2F2F2'\" onmouseout=\"bgColor='#FFFFFF'\"";
				//Imprime el día
				str_cont = str_cont+"<td style=\"cursor:pointer;\" height=\"18\" "+style_sublink+" width=\"34\" align=\"center\"><font color="+color_day+" class=txt_calendar>"+num_day+"</font></td>";
			}
		}else{
			//Si es Domingo Festivo
			if (cnt_day == num_dias_semana){ color_day = "800000"; }
			else { color_day = "808080"; }
			//Estilo del enlace
			style_sublink = "onClick=\"window.location='"+f_url_script+link_day+"'\"";
			//Imprime el día
			str_cont = str_cont+"<td bgcolor=\"#FFFFFF\" height=\"18\" width=\"34\" align=\"center\"><font color="+color_day+" class=txt_calendar>"+num_day+"</font></td>";			
		}

		//Semanas
		if (num_day != mostrar_numero_dias_mes){
			if (cnt_day == num_dias_semana){
				str_cont = str_cont+"</tr><tr style=\"background-color: #FFFFFF\">";
				cnt_day = 0;
			}
		}
	}
	str_cont = str_cont+" 	 </tr>";
	str_cont = str_cont+"  	</td>";
	str_cont = str_cont+"	</table>";
	str_cont = str_cont+"  	</div>";	
	str_cont = str_cont+"  </tr>";	
	//---------------------------------------------------

	str_cont = str_cont+"</table>";	

	//***************************************************************************
	// Imprimiendo calendario
	//***************************************************************************
	document.getElementById("calendario").innerHTML = str_cont;

}


function muestra_imagen(src_img,ancho,alto)
{
	document.open('/mostrar_imagen.php?imagen='+src_img,'Imagen','toolbar=0,scrollbars=0,location=0,statusbar=0,menubar=0,resizable=0,width='+ancho+',height='+alto);
}

function obrfin(nom,e){
	wincode= (new Date()).getTime();
	ancho=(screen.width*90)/100;
	alto=((screen.height-80)*70)/100;
	izq=(screen.width-ancho)/2;
	arr=(screen.height-80-alto)/3;
	v1=open("about:blank",wincode,"location=1,menubar=1,resizable=1,scrollbars=1,status=1,toolbar=1,width="+ancho+",height="+alto+",left="+izq+",top="+arr);
	v1.document.open();
	v1.document.write('<title>'+nom+'</title><table width="100%" height="100%"><tr><td align="middle" valign="center"><font color="#000000" size="3" face="Verdana">');
		if(e==""){
			v1.document.write('Cargando '+nom+'...</font>');
		}else{
			v1.document.write('Buscando directamente en '+nom+'...');

			v1.document.write("<p><font size='1' color='#ff0000'><strong>Si no encuentras</strong> lo que buscas aquí, prueba en otro buscador desde la ventana madre.</font>");
			if(nom!="Domain&nbsp;Surfer"){
				v1.document.write('<p><font color="#000000" size="1" face="Verdana">(Si la búsqueda se hace lenta, prueba en otro buscador. Los servidores de '+nom+' deben estar saturados.)');
			}
		}
	if(nom=="Whois&nbsp;Report"){
		v1.document.write('<p><font color="#000000" size="2" face="Verdana">ADVERTENCIA: Los resultados de Whois Report sólo son direcciones (.com, .net o .org)<br>que ya estan registradas, lo cual no implica que ya estén en funcionamento.</font>');
	}

	v1.document.write('</td><tr></table>');
}
function borbot(){
	for (var x=2; document.f.length>x; x++){document.f.elements[x].className='b';}
}

function changep(){
	document.frames[0].location="banner.php?id=1";

}

function a1(){a='Google&nbsp;';b='http://www.google.com/dirhp?hl=es';c="http://www.google.com/search?hl=es&lr=lang_es&q=";s(a,b,c);}
function a2(){a='Terra';b='http://buscador.terra.es';c='http://buscador.terra.es/default.asp?loc=searchbox&ca=e&x=14&y=10&query=';s(a,b,c);}
function a3(){a='Ya.com';b='http://buscador.ya.com/';c='http://buscar.ya.com/fast-cgi/tsc?type=all&PortalLanguage=es&UserLanguage=es&language=&mandant=toi&device=html&iocr=yes&withoverturehits=yes&search_type=new&context=all&q=';s(a,b,c);}
function a4(){a='Lycos&nbsp;';b='http://www.lycos.es/busqueda/';c='http://buscador.lycos.es/cgi-bin/pursuit?etemp=error&cat=loc&x=21&y=10&query=';s(a,b,c);}
function a5(){a='Altavista&nbsp;';b='http://es.altavista.com/dir/default';c='http://es.altavista.com/web/results?kgs=0&kls=1&q=';s(a,b,c);}
function b1(){a='Yahoo&nbsp;';b='http://es.search.yahoo.com/search/es/dir?qry=&ei=UTF-8&y=';c='http://es.search.yahoo.com/search/es?y=y&hc=25&hs=150&h=s&p=';s(a,b,c);}
function b2(){a='Go';b='http://www.go.com';c="http://search.go.com/web?qsrc=0&o=0&l=dir&q=";s(a,b,c);}
function b3(){a='MSN&nbsp;';b='http://search.msn.es';c="http://search.msn.es/results.asp?RS=CHECKED&CO=20&UDo=es&ULo=&LA=spanish&UN=doc&Form=SMCB&CY=es&MT=";s(a,b,c);}
function b4(){a='Kartoo&nbsp;';b='http://www.kartoo.com/es_index.htm';c="http://www.kartoo.com/flash.php3?langue=es&lg=1&mo=1&&q=";s(a,b,c);}
function b5(){a='Icerocket';b='http://www.icerocket.com/?tab=web&q=';c="http://www.icerocket.com/search?tab=web&q=";s(a,b,c);}
function c1(){a='Askjeeves';b='http://www.ask.com';c="http://www.ask.com//search?cat=web&lang=spanish&query=";s(a,b,c);}
function c2(){a='Excite';b='http://www.excite.com';c="http://www.excite.com/search/query.dll?q=";s(a,b,c);}
function c3(){a='Hotbot';b='http://www.hotbot.com';c="http://www.hotbot.com/do/metasearch.pl?cat=web&cat=web&cmd=process_search&language=espanol&query=";s(a,b,c);}
function c4(){a='Search';b='http://www.search.com';c="http://www.search.com/search?v%3Asources=Web&query=";s(a,b,c);}
function c5(){a='DogPile';b='http://www.dogpile.com';c="http://www.dogpile.com/search/?bh=A&pool=C&rows=20&bc=n&exactfirst=y&q=";s(a,b,c);}
function d1(){a='All&nbsp;the&nbsp;Web';b='http://www.alltheweb.com';c="http://www.alltheweb.com/search?cat=web&lang=spanish&query=";s(a,b,c);}
function d2(){a='WiseNut';b='http://www.wisenut.com';c="http://www.wisenut.com/search/query.dll?q=";s(a,b,c);}
function d3(){a='Ixquick';b='http://www.ixquick.com';c="http://ixquick.com/do/metasearch.pl?cat=web&cat=web&cmd=process_search&language=espanol&query=";s(a,b,c);}
function d4(){a='Vivisímo';b='http://vivisimo.com/';c="http://vivisimo.com/search?v%3Asources=Web&query=";s(a,b,c);}
function d5(){a='Search Live';b='http://search.live.com';c="http://search.live.com/results.aspx?bh=A&pool=C&rows=20&bc=n&exactfirst=y&q=";s(a,b,c);}

function o1(){a='Últimas&nbsp;noticias&nbsp;(Google&nbsp;News)';b='http://news.google.es/';c="http://news.google.es/news?hl=es&edition=es&btnG=Buscar+en+News&q=";s(a,b,c);}
function o2(){a='Wikipedia';b='http://es.wikipedia.org';c="http://es.wikipedia.org/w/wiki.phtml?search=";s(a,b,c);}
function o3(){a='Paginas&nbsp;Amarillas';b='http://www.paginas-amarillas.es';c="http://www.paginas-amarillas.es/resultados.asp?pgpv=1&mode=simple&activ=";s(a,b,c);}


function s(a,b,c){
	e=document.forms['f'].e.value;
	obrfin(a,e);
	if (e!=''){
		v1.location=(c+e);
		v1.document.close();
	}else{
		v1.location=b;
		v1.document.close();
	}
}




function bookmark() 
{
    if (document.all) 
    {
        if (navigator.platform.indexOf("Win") != -1) 
        {
            url="http://www.enlacestotal.com/"; 
            titulo="www.enlacestotal.com";
            window.external.AddFavorite(url,titulo);
        }
        if (navigator.platform.indexOf("Mac") != -1) 
        {
			alert("Presione Comando+D para agregar Enlaces TOTAL a sus favoritos"); 
        }
    } 
    else 
    {
		if (navigator.appName.indexOf("Netscape") != -1 || navigator.appName.indexOf("Mozilla") != -1 ) 
		{
            if (navigator.platform.indexOf("Mac") != -1) 
            {
                alert("Presione Comando+D para agregar Enlaces TOTAL a sus favoritos"); 
            } 
            else 
            {
                alert("Presione Ctrl+D para agregar Enlaces TOTAL a sus favoritos"); 
            }
            } 
            else 
            {
            alert("Su navegador no permite agregar de forma automatica nuestra pagina a sus favoritos. Utilice las opciones de su navegador y hagalo manualmente");
            }
    }
}

function bmark(pag,des) 
{
    if (document.all) 
    {
        if (navigator.platform.indexOf("Win") != -1) 
        {
            url=pag; 
            titulo=des;
            window.external.AddFavorite(url,titulo);
        }
        if (navigator.platform.indexOf("Mac") != -1) 
        {
			alert("Presione Comando+D para agregar Programacion a sus favoritos"); 
        }
    } 
    else 
    {
		if (navigator.appName.indexOf("Netscape") != -1 || navigator.appName.indexOf("Mozilla") != -1 ) 
		{
            if (navigator.platform.indexOf("Mac") != -1) 
            {
                alert("Presione Comando+D para agregar Programacion a sus favoritos"); 
            } 
            else 
            {
                alert("Presione Ctrl+D para agregar Programacion a sus favoritos"); 
            }
            } 
            else 
            {
            alert("Su navegador no permite agregar de forma automatica nuestra pagina a sus favoritos. Utilice las opciones de su navegador y hagalo manualmente");
            }
    }
}


function mostrar750(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=600,height=360,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}

function mostrar950(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=400,height=560,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}


function mostrar450(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=450,height=330,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}
function mostrar3(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=220,height=150,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}

function mostrar5(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=220,height=200,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}
function mostrar10(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=300,height=300,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}
function mostrar15(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=300,height=380,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}
function mostrar18(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=300,height=430,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}

function mostrar20(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=300,height=450,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}
function mostrar25(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=220,height=500,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}
function mostrar30(pag)
	{
	var nuevaWin;
	nuevaWin = window.open(pag, 'info', 'width=220,height=600,resize,toolbar=no,scrollbars,status=no,menubar=no,location=no,directories=no');
	}