function linkInput(pagina){
	alert("http://www.negrillo.es/" + pagina);
	window.location("http://www.negrillo.es/" + pagina);
}

function ventana(imagename, ancho, alto){
ancho=ancho+20
alto=alto+30
if (ancho > 790) {ancho=790;};
if (alto > 550) {alto=500;};
window.open(imagename,"Imagen","menubar=no,scrollbars=yes,status=no,width="+ancho+",height="+alto+", top=0, left=0, screenX=0, screenY=0")
}


 function infoscroll(seed,looped)
  {
    var text1  = " REPUESTOS NEGRILLO, recambios para automoviles y vehiculos comerciales  - NEGRILLO TUNING, accesorios para la personalizacion de su vehiculo -  WWW.NEGRILLO.ES";
    var msg    = text1;
    var putout = " ";
    var c      = 1;
    if (looped > 3) {
      
    }
    else if (seed > 100) {
         seed--;
         var cmd="infoscroll(" + seed + "," + looped + ")";
         timerTwo=window.setTimeout(cmd,100);
    }
    else if (seed <= 100 && seed > 0) {
      for (c=0 ; c < seed ; c++)
        putout += " ";
      putout += msg.substring(0, 100-seed);
      seed--;
      var cmd = "infoscroll(" + seed + "," + looped + ")";
      window.status = putout;
      timerTwo = window.setTimeout(cmd,100);
    }
    else if (seed <= 0) {
      if (-seed < msg.length) {
        putout+=msg.substring(-seed,msg.length);
        seed--;
        var cmd="infoscroll(" + seed + "," + looped + ")";
        window.status=putout;
        timerTwo=window.setTimeout(cmd,100); // 100
      }
      else {
        window.status=" ";
        looped += 1;
        var cmd = "infoscroll(100," + looped + ")";
        timerTwo=window.setTimeout(cmd,75); // 75
      }
    }
  }

  infoscroll(100,1);
  
  //empieza el codigo imagenes de empresa
image=new Array("imagenes/empresa/imag4.jpg","imagenes/empresa/imag5.jpg","imagenes/empresa/imag6.jpg","imagenes/empresa/imag7.jpg")
adelante=0

function mover(num){
	imgemp = document.getElementById("empresa");
	adelante=adelante+num
	if(adelante<0 || adelante==image.length){
	alert("Estas en la ultima imagen")
	adelante=0
	}
	imgemp.src=image[adelante]

}

//termina el codigo imagenes de empresa


// CODIGO GALERIA DE FOTOS DE TRABAJOS

/*current = 0;
PicVal = new Array(49);
DatVal = new Array(49);
TxtVal = new Array(49);


PicVal[0] = "imagenes/trabajos/imag46.jpg";
TxtVal[0] = "GALERIA DE IMAGENES";


PicVal[1] = "imagenes/trabajos/imag2.jpg";
TxtVal[1] = "GALERIA DE IMAGENES";

PicVal[2] = "imagenes/trabajos/imag4.jpg";
TxtVal[2] = "GALERIA DE IMAGENES";

PicVal[3] = "imagenes/trabajos/imag5.jpg";
TxtVal[3] = "GALERIA DE IMAGENES";

PicVal[4] = "imagenes/trabajos/imag6.jpg";
TxtVal[4] = "GALERIA DE IMAGENES";

PicVal[5] = "imagenes/trabajos/imag1.jpg";
TxtVal[5] = "GALERIA DE IMAGENES";

PicVal[6] = "imagenes/trabajos/imag7.jpg";
TxtVal[6] = "GALERIA DE IMAGENES";

PicVal[7] = "imagenes/trabajos/imag9.jpg";
TxtVal[7] = "GALERIA DE IMAGENES";

PicVal[8] = "imagenes/trabajos/imag10.jpg";
TxtVal[8] = "GALERIA DE IMAGENES";

PicVal[9] = "imagenes/trabajos/imag11.jpg";
TxtVal[9] = "GALERIA DE IMAGENES";

PicVal[10] = "imagenes/trabajos/imag12.jpg";
TxtVal[10] = "GALERIA DE IMAGENES";

PicVal[11] = "imagenes/trabajos/imag13.jpg";
TxtVal[11] = "GALERIA DE IMAGENES";

PicVal[12] = "imagenes/trabajos/imag14.jpg";
TxtVal[12] = "GALERIA DE IMAGENES";

PicVal[13] = "imagenes/trabajos/imag15.jpg";
TxtVal[13] = "GALERIA DE IMAGENES";

PicVal[14] = "imagenes/trabajos/imag16.jpg";
TxtVal[14] = "GALERIA DE IMAGENES";

PicVal[15] = "imagenes/trabajos/imag17.jpg";
TxtVal[15] = "GALERIA DE IMAGENES";

PicVal[16] = "imagenes/trabajos/imag18.jpg";
TxtVal[16] = "GALERIA DE IMAGENES";

PicVal[17] = "imagenes/trabajos/imag19.jpg";
TxtVal[17] = "GALERIA DE IMAGENES";

PicVal[18] = "imagenes/trabajos/imag20.jpg";
TxtVal[18] = "GALERIA DE IMAGENES";

PicVal[19] = "imagenes/trabajos/imag21.jpg";
TxtVal[19] = "GALERIA DE IMAGENES";

PicVal[20] = "imagenes/trabajos/imag22.jpg";
TxtVal[20] = "GALERIA DE IMAGENES";

PicVal[21] = "imagenes/trabajos/imag23.jpg";
TxtVal[21] = "MANOS LIBRES adaptado en fibra en BMW";

PicVal[22] = "imagenes/trabajos/imag26.jpg";
TxtVal[22] = "MANOS LIBRES adaptado a pilastra en fibra";

PicVal[23] = "imagenes/trabajos/imag28.jpg";
TxtVal[23] = "GALERIA DE IMAGENES";
	   
PicVal[24] = "imagenes/trabajos/imag29.jpg";
TxtVal[24] = "Instalación RADIO CD en ibiza-cordoba 2000";

PicVal[25] = "imagenes/trabajos/imag30.jpg";
TxtVal[25] = "Fundas cosidas a medida, en varios colores";

PicVal[26] = "imagenes/trabajos/imag31.jpg";
TxtVal[26] = "Fundas a medida en varios colores";

PicVal[27] = "imagenes/trabajos/imag37.jpg";
TxtVal[27] = "Radio en Ibiza-Cordoba 2000 eliminando botones radio";

PicVal[28] = "imagenes/trabajos/imag38.jpg";
TxtVal[28] = "Cajon fibra, ventajas: integracion estetica original, ocupa poco espacio en el maletero";

PicVal[29] = "imagenes/trabajos/imag33.jpg";
TxtVal[29] = "GALERIA DE IMAGENES";

PicVal[30] = "imagenes/trabajos/imag32.jpg";
TxtVal[30] = "Puerta modificada, enfibrada y tapizada";

PicVal[31] = "imagenes/trabajos/imag36.jpg";
TxtVal[31] = "Porton Fribra Megane New";

PicVal[32] = "imagenes/trabajos/imag35.jpg";
TxtVal[32] = "Porton Fribra Megane New";

PicVal[33] = "imagenes/trabajos/imag34.jpg";
TxtVal[33] = "Navegador portátil adaptado a rejilla aire";

PicVal[34] = "imagenes/trabajos/imag39.jpg";
TxtVal[34] = "Adaptacion radio fibra en alfa 166";

PicVal[35] = "imagenes/trabajos/imag40.jpg";
TxtVal[35] = "GALERIA DE IMAGENES - SEAT LEON";

PicVal[36] = "imagenes/trabajos/imag41.jpg";
TxtVal[36] = "GALERIA DE IMAGENES - SEAT LEON";

PicVal[37] = "imagenes/trabajos/imag42.jpg";
TxtVal[37] = "GALERIA DE IMAGENES";

PicVal[38] = "imagenes/trabajos/imag45.jpg";
TxtVal[38] = "Cajon fibra lateral bmw. apariencia origen, poquisimo espacio perdido";

PicVal[39] = "imagenes/trabajos/imag8.jpg";
TxtVal[39] = "Bandeja fibra Opel Corsa";

PicVal[40] = "imagenes/trabajos/imag47.jpg";
TxtVal[40] = "Audi fibra 001";

PicVal[41] = "imagenes/trabajos/imag48.jpg";
TxtVal[41] = "Audi fibra 003";

PicVal[42] = "imagenes/trabajos/imag49.jpg";
TxtVal[42] = "Subaru";

PicVal[43] = "imagenes/trabajos/imag50.jpg";
TxtVal[43] = "Subaru";

PicVal[44] = "imagenes/trabajos/imag51.jpg";
TxtVal[44] = "Subaru";

PicVal[45] = "imagenes/trabajos/imag52.jpg";
TxtVal[45] = "Adaptacion navegador en hueco cenicero audi";

PicVal[46] = "imagenes/trabajos/imag53.jpg";
TxtVal[46] = "3ª clasificado, campeonato de españa iasca";

PicVal[47] = "imagenes/trabajos/imag54.jpg";
TxtVal[47] = "Hyundai Coupe";

PicVal[48] = "imagenes/trabajos/imag55.jpg";
TxtVal[48] = "Adaptación Doble";

PicVal[49] = "imagenes/trabajos/imag56.jpg";
TxtVal[49] = "ADAPTACION  FIBRA  NAVEGADOR PORTATIL CON ALTAVOZ A RANGER ROVER";

function ShowSuzyPic(newpic) {
  document.SuzyPic.src = PicVal[newpic];
  document.SuzyForm.SuzyText.value=TxtVal[newpic];      
  SelectionBox = document.SuzyForm.SuzyDropdown;
  SelectionBox.options[newpic].selected = true;
  current = newpic;
}
function RandomSuzyPic() {
  TotalImages = document.SuzyForm.SuzyDropdown.options.length;
  current = Math.floor(Math.random()*TotalImages);
  ShowSuzyPic(current);
}
function PreviousSuzyPic() {
  TotalImages = document.SuzyForm.SuzyDropdown.options.length;
  current--;
  if(current<0) current = TotalImages - 1;
  ShowSuzyPic(current);
}
function NextSuzyPic() {  
  var TotalImages = document.SuzyForm.SuzyDropdown.options.length;
  current++;
  if (current>=TotalImages) current = 0;
  ShowSuzyPic(current);
}*/
// -->TERMINA EL CODIGO DE TRABAJOS




<!--//formulario
function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' no valido.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' no valido.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+'.\n'; }
  } if (errors) alert('Debe rellenar:\n'+errors);
  document.MM_returnValue = (errors == '');
}
//--> termina