<!--
function preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.p) d.p=new Array();
    var i,j=d.p.length,a=preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.p[j]=new Image; d.p[j++].src=a[i];}}
}

function swapImgRestore() { //v3.0
  var i,x,a=document.sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function 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=findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function swapImage() { //v3.0
  var i,j=0,x,a=swapImage.arguments; document.sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=findObj(a[i]))!=null){document.sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function picturewindow(url, picwidth, picheight) {

        factor = 0;
        scr_x = screen.width - 20;
        scr_y = screen.height - 60;
        if (scr_x <= picwidth || scr_y <= picheight) {
                factor_x = scr_x/picwidth;
                factor_y = scr_y/picheight;

                if (factor_x < factor_y) {
                        factor = factor_x;
                } else {
                        factor = factor_y;
                }
                picwidth = picwidth*factor;
                picheight = picheight*factor;
        }
        win_left = (screen.width - picwidth) / 2;
        win_top = (screen.height - picheight) / 2;


        picwindow=window.open('','picwindow','toolbar=no,location=no,directories=no,status=no,scrollbars=no,resizable=no,copyhistory=no,dependent=yes,width='+picwidth+',height='+picheight+', left='+win_left+', top='+win_top+'');
        with (picwindow) {

                focus();
                document.open();
                document.write("<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>" );
                document.write("<html xmlns='http://www.w3.org/1999/xhtml'><head><meta http-equiv='imagetoolbar' content='no' /><title>Para cerrar hacer click sobre la imagen</title></head>" );
                document.write("<body onblur='window.close()'" );
                document.write(" style='margin: 0'><a href='javascript:window.close()' onmousedown='window.close()'>" );
                document.write("<img src='"+url+"' width='"+picwidth+"' height='"+picheight+"' border='0' alt=''/></a>" );
                document.write("</body></html>" );
                document.close();
        }
}
//-->

