//capas y cosas raras
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//controla el 2º boton del ratincito perez
function derecha(e) {
if (navigator.appName == 'Netscape' && (e.which == 3 || e.which == 2)){
alert('http://www.elvalledeljerte.com\rAV. Luis Barbosa 29\rCabezuela del Valle\r10610 - Cáceres\r\r SI QUIERES PUBLICITARTE, LLAMANOS !!!\r Telf. 902995244 - Fax 927472661\r Email atcliente@tiendainformaticatotal.com')
return false;
}

else if (navigator.appName == 'Microsoft Internet Explorer' && (event.button == 2)){
alert('http://www.elvalledeljerte.com\rAV. Luis Barbosa 29\rCabezuela del Valle\r10610 - Cáceres\r\r SI QUIERES PUBLICITARTE LLAMANOS !!!\r Telf. 902995244 - Fax 927472661\r Email atcliente@tiendainformaticatotal.com')
}
}
document.onmousedown=derecha
//-----------------------------------------------------------------
//abrir ventanas
function winopen (pagina,ancho,alto,barra) {
msg=open("","NewWindow","fullscreen=no,height="+ancho+",width="+alto+",channelmode=0,hotkeys=0,dependent=0,directories=0,location=0,menubar=0,resizable=0,scrollbars="+barra+",status=0,toolbar=0");
msg.location = 'http://'+document.domain+'/'+pagina
msg.focus();
}
//----------------------------------------------------
//muestra la fecha actual
function fecha(){
var mydate=new Date();
var year=mydate.getYear();
if (year < 1000)
	year+=1900;
var day=mydate.getDay();
var month=mydate.getMonth();
var daym=mydate.getDate();
if (daym<10)
	daym="0"+daym;

var dayarray=new Array("Domingo","Lunes","Martes","Miercoles","Jueves","Viernes","Sábado");
var montharray=new Array("Ene","Feb","Mar","Abr","May","Jun","Jul","Ago","Sep","Oct","Nov","Dic");
document.write("Hoy es  " + dayarray[day] +" "+daym + "-" + montharray[month] + "-" + year);
}
//-----------------------------------------------------------------------------
//dias on-line
function countup(yr,m,d){
var montharray=new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
var today=new Date()
var todayy=today.getYear()
if (todayy < 1000)
todayy+=1900
var todaym=today.getMonth()
var todayd=today.getDate()
var todaystring=montharray[todaym]+" "+todayd+", "+todayy
var paststring=montharray[m-1]+" "+d+", "+yr
var difference=(Math.round((Date.parse(todaystring)-Date.parse(paststring))/(24*60*60*1000))*1)
difference+=" días"
document.write(""+difference+" On-Line")
}
//-----------------------------------------------------------------------------
//traduce la web/ingles/es|en/español/en|es
function idioma(url,lan) { //v3.0
	if (lan == "es"){
		window.location= url
	}else{
		window.location="trans.asp?u="+url+"&id="+lan
	}
}
//-----------------------------------------------------------------------------
//controla las direcciones de correos electronicos
function validateEmail(email) {
    var caracteres =
"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789_-.";
    var i;
    var valido = true;
    var pos_arroba = email.indexOf("@");
    var pos_ultimo_punto = email.lastIndexOf(".");
    var email_minus = email.toLowerCase();
    var trozo;

    if (pos_arroba == -1) {
        return false;
    }
    if (email_minus.indexOf("usuario@servidor.es") != -1){
        return false;
    }
    if (pos_ultimo_punto == -1) {
        return false;
    }
    trozo = email.substring(0, pos_arroba);
    for(i=0;i<trozo.length;i++) {
        if (caracteres.indexOf(trozo.charAt(i)) == -1) {
            valido = false;
            break;
        }
    }
    if (!valido) {
        return false;
    }
    valido = true;
    trozo = email.substring(1+pos_arroba, pos_ultimo_punto);
    for(i=0;i<trozo.length;i++) {
        if (caracteres.indexOf(trozo.charAt(i)) == -1) {
            valido = false;
            break;
        }
    }
    if (!valido) {
        return false;
    }
    valido = true;
    trozo = email.substring(1+pos_ultimo_punto, email.length);
    if ((trozo.length >= 2)&&(trozo.length <= 3)) {
        for(i=0;i<trozo.length;i++) {
            if (caracteres.indexOf(trozo.charAt(i)) == -1) {
                valido = false;
                break;
            }
        }
        if (!valido) {
            return false;
        }
    } else {
        return false;
    }
    return true;
}
//-------------------------------------------------------------------------------------------
//comprueva que una cadena es un digito
function esDigito(cadenaEntrada)
{

	for (i=0;i<cadenaEntrada.length;i++)
	{

		if  ( isNaN(parseInt(cadenaEntrada.substring(i,i+1),10)) ) return (false);	//Netscape

		if ((cadenaEntrada.substring(i,i+1))!=(parseInt(cadenaEntrada.substring(i,i+1),10))) return (false);	//Explorer


	}
	return (true);

}
//------------------------------------------------------------
//	FADES DE IMAGENES EN COMUNES SERVICIOS
//------------------------------------------------------------
function high(which2)
{
theobject=which2;
highlighting=setInterval("highlightit(theobject)",30);

}
function low(which2)
{
clearInterval(highlighting);
which2.filters.alpha.opacity=50;
}
function highlightit(cur2)
{
if(cur2.filters.alpha.opacity<100)
cur2.filters.alpha.opacity+=5
else if(window.highlighting)
clearInterval(highlighting)
}
//*************************************
function muestra_imagen(archivo,ancho,alto,nombre){
	//xInnerHtml('c1','')
	xWidth ('ampliacion',ancho + 6)
	if (ancho > 200){
		xWidth ('cerrarampliacion',ancho)
		xWidth ('ampliacion',ancho + 6)
		xHeight ('ampliacion',alto + 6 + 20 + 18)
	}else{
		xWidth ('cerrarampliacion',200)
		xWidth ('ampliacion',200)
	xHeight ('ampliacion',alto + 20 + 18)
	}
	xWidth ('c1',ancho)
	xHeight ('c1',alto)
	
	
	
	xInnerHtml('c1','<img src="' + archivo + '" width="' + ancho + '" height="' + alto + '" border="0">')	
	xInnerHtml('na','>>> ' + nombre + ' <<<')
	
	pos_left = parseInt((xClientWidth()-ancho+3)/2)
	pos_left_actual=-ancho
	if (xClientHeight() < alto){
		pos_top = xScrollTop() + 10;
	}else{
		pos_top = xScrollTop() + parseInt((xClientHeight() - alto - 20) / 2)
	}

	xMoveTo('ampliacion',pos_left_actual,pos_top)
	
	situar()
	
	xShow('ampliacion')
}

function cerrar_ampliacion(){
	xHide('ampliacion');
	
}

function situar(){
	if (pos_left_actual < pos_left){
		pos_left_actual += 20
		xMoveTo('ampliacion', pos_left_actual,pos_top);
		setTimeout ('situar()',10)
	}
}