/*******************************************************************/
/**** BATIBURRILLO JS v.2.3                                      ***/
/**** Ene 2006                                                   ***/
/**** http://batiburrillo.redliberal.com                         ***/
/****                                                            ***/
/**** Fecha           Autor             Cambio                   ***/
/**** 19 Ene 06       John              Funciones archivo por    ***/
/****                                   a?os y lista de          ***/
/****                                   art?culos de autor.      ***/
/**** 23 Feb 06       John              Funci?n pop ups          ***/
/**** 12 Jun 06       John              Mostrar img en popup     ***/
/**** 05 Jul 06       John              ToolTip                  ***/
/*******************************************************************/


function doMenu(strSubMenu, objLink)
{
        var objSubItems = document.getElementById(strSubMenu);

        if(objSubItems)
        {
                if(objSubItems.style.display == "none")
                {
                        objSubItems.style.display = "block";
                        objLink.style.fontWeight = "bold";
                }
                else
                {
                        objSubItems.style.display = "none";
                        objLink.style.fontWeight = "normal";
                }
        }
}



function doYearList()
{

        var datNow = new Date();
        var intInitY = 2004;
        var intNowY = datNow.getYear() + 1900;
        var intNowM = datNow.getMonth() + 1;
        var intMonths;
        var strM;


        for(i = intNowY; i >= intInitY; i--)
        {

                document.write("<LI><A href=\"#lnkYear" + i + "\" onClick=\"javascript:doMenu('year" + i + "', this)\" name=\"lnkYear" + i + "\">A?o " + i + "</A></LI>");
                document.write("<UL id=\"year" + i + "\" style=\"display:none\">");

                if(i==intNowY)
                        intMonths = intNowM;
                else
                        intMonths = 12;

                for(j = intMonths; j >= 1; j--)
                {
                        if(j<10)
                                strM = "0" + j;
                        else
                                strM = j;

                        if(document.getElementById(i + "_" + strM))
                        {
                        arArchive = (document.getElementById(i + "_" + strM).value).split("$");
                        document.write("<LI>");
                        document.write("<A href='" + arArchive[0] + "'>" + arArchive[1] + " (" + arArchive[2] + ")</A>");
                        document.write("</LI>");
                        }
                }

                document.write("</UL>");

        }

}


function doPopUp(strLocation, intWidth, intHeight, intScrollBar)
{

   if(intScrollBar)
      var objWinPopUp = window.open(strLocation,'winPopUp','width='+ intWidth + ',height=' + intHeight + ',toolbar=0,scrollbars=1');
   else
      var objWinPopUp = window.open(strLocation,'winPopUp','width='+ intWidth + ',height=' + intHeight + ',toolbar=0,scrollbars=0');

   objWinPopUp.focus();

}


function showPic(strLocation)
{


   window.open(strLocation,'popup','width=650,height=500,scrollbars=no,resizable=no,toolbar=no,directories=no,location=no,menubar=no,status=no,left=0,top=0');

   return false;


}


//**********************************************
//*** Barra de Navegación
//**********************************************

function setSelected(strID)
{
 var objNavItem = document.getElementById(strID);
 objNavItem.id = "selected";
}


//**********************************************
//*** ToolTip
//**********************************************

/***********************************************
* Cool DHTML tooltip script II- ? Dynamic Drive DHTML code library (www.dynamicdrive.com)
* This notice MUST stay intact for legal use
* Visit Dynamic Drive at http://www.dynamicdrive.com/ for full source code
***********************************************/

var offsetfromcursorX=12 //Customize x offset of tooltip
var offsetfromcursorY=10 //Customize y offset of tooltip

var offsetdivfrompointerX=10 //Customize x offset of tooltip DIV relative to pointer image
var offsetdivfrompointerY=14 //Customize y offset of tooltip DIV relative to pointer image. Tip: Set it to (height_of_pointer_image-1).

document.write('<div id="dhtmltooltip"></div>') //write out tooltip DIV
document.write('<img id="dhtmlpointer" src="arrow2.gif">') //write out pointer image

var ie=document.all
var ns6=document.getElementById && !document.all
var enabletip=false
if (ie||ns6)
var tipobj=document.all? document.all["dhtmltooltip"] : document.getElementById? document.getElementById("dhtmltooltip") : ""

var pointerobj=document.all? document.all["dhtmlpointer"] : document.getElementById? document.getElementById("dhtmlpointer") : ""

function ietruebody(){
return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}

function ddrivetip(thetext, thewidth, thecolor){
if (ns6||ie){
if (typeof thewidth!="undefined") tipobj.style.width=thewidth+"px"
if (typeof thecolor!="undefined" && thecolor!="") tipobj.style.backgroundColor=thecolor
tipobj.innerHTML=thetext
enabletip=true
return false
}
}

function positiontip(e){
if (enabletip){
var nondefaultpos=false
var curX=(ns6)?e.pageX : event.clientX+ietruebody().scrollLeft;
var curY=(ns6)?e.pageY : event.clientY+ietruebody().scrollTop;
//Find out how close the mouse is to the corner of the window
var winwidth=ie&&!window.opera? ietruebody().clientWidth : window.innerWidth-20
var winheight=ie&&!window.opera? ietruebody().clientHeight : window.innerHeight-20

var rightedge=ie&&!window.opera? winwidth-event.clientX-offsetfromcursorX : winwidth-e.clientX-offsetfromcursorX
var bottomedge=ie&&!window.opera? winheight-event.clientY-offsetfromcursorY : winheight-e.clientY-offsetfromcursorY

var leftedge=(offsetfromcursorX<0)? offsetfromcursorX*(-1) : -1000

//if the horizontal distance isn't enough to accomodate the width of the context menu
if (rightedge<tipobj.offsetWidth){
//move the horizontal position of the menu to the left by it's width
tipobj.style.left=curX-tipobj.offsetWidth+"px"
nondefaultpos=true
}
else if (curX<leftedge)
tipobj.style.left="5px"
else{
//position the horizontal position of the menu where the mouse is positioned
tipobj.style.left=curX+offsetfromcursorX-offsetdivfrompointerX+"px"
pointerobj.style.left=curX+offsetfromcursorX+"px"
}

//same concept with the vertical position
if (bottomedge<tipobj.offsetHeight){
tipobj.style.top=curY-tipobj.offsetHeight-offsetfromcursorY+"px"
nondefaultpos=true
}
else{
tipobj.style.top=curY+offsetfromcursorY+offsetdivfrompointerY+"px"
pointerobj.style.top=curY+offsetfromcursorY+"px"
}
tipobj.style.visibility="visible"
if (!nondefaultpos)
pointerobj.style.visibility="visible"
else
pointerobj.style.visibility="hidden"
}
}

function hideddrivetip(){
if (ns6||ie){
enabletip=false
tipobj.style.visibility="hidden"
pointerobj.style.visibility="hidden"
tipobj.style.left="-1000px"
tipobj.style.backgroundColor=''
tipobj.style.width=''
}
}

document.onmousemove=positiontip

//**********************************************
//*** FIN ToolTip
//**********************************************