// Crea en el documento que lo carge un elemento que va a ser la nueva capa
document.write("<span id='trail' style='visibility:hidden'></span>")

// Esta función define las propiedades de la capa flotante
function cursor(text)
{
	trail.innerHTML=text
	{
		trail.style.zIndex=900;
		trail.style.visibility="visible"
		trail.style.position="absolute"
		trail.style.right='';
		trail.style.left=event.clientX+12+document.body.scrollLeft;
		trail.style.top=event.clientY+10+document.body.scrollTop+5;
	}
}
function cursorTop(text)
{
	trail.innerHTML=text
	{
		trail.style.zIndex=900;
		trail.style.visibility="visible"
		trail.style.position="absolute"
		trail.style.right='';
		trail.style.left=event.clientX+12+document.body.scrollLeft;
		trail.style.top=event.clientY-25+document.body.scrollTop+5;
	}
}
function rCursor(text)
{
	trail.innerHTML=text
	{
		trail.style.zIndex=900;
		trail.style.visibility="visible"
		trail.style.position="absolute"
		trail.style.left='';
		trail.style.right=document.body.offsetWidth-event.clientX+document.body.scrollLeft-12;
		trail.style.top=event.clientY+10+document.body.scrollTop+5;
	}
}
function rCursorTop(text)
{
	trail.innerHTML=text
	{
		trail.style.zIndex=900;
		trail.style.visibility="visible"
		trail.style.position="absolute"
		trail.style.left='';
		trail.style.right=document.body.offsetWidth-event.clientX+document.body.scrollLeft-12;
		trail.style.top=event.clientY-25+document.body.scrollTop+5;
	}
}
function hidecursor()
{
	trail.style.visibility="hidden"
}
function ocultaTitulo()
{
	trail.style.visibility="hidden"
}
function titulo(param)
{
	if (param!='')
	{
		param = '<TABLE STYLE="z-index:900;border:1px solid #aaaaaa;background:#FFFFDD;font:Normal 10 arial" CELLSPACING=0 CELLPADDING=1><TR><TD STYLE="font:Normal 11 arial;PADDING-LEFT:4px;PADDING-RIGHT:4px">'+param;
		cursor(param);
	}
}
function rTitulo(param)
{
	param = '<TABLE STYLE="border:1px solid #aaaaaa;background:#FFFFDD;font:Normal 10 arial" CELLSPACING=0 CELLPADDING=1><TR><TD STYLE="font:Normal 11 arial;PADDING-LEFT:4px;PADDING-RIGHT:4px">'+param;
	rCursor(param);
}
function rTituloTop(param)
{
	param = '<TABLE STYLE="border:1px solid #aaaaaa;background:#FFFFDD;font:Normal 10 arial" CELLSPACING=0 CELLPADDING=1><TR><TD STYLE="font:Normal 11 arial;PADDING-LEFT:4px;PADDING-RIGHT:4px">'+param;
	rCursorTop(param);
}