MSIE=document.all;
NC=document.layers;

xPos=0;
yPos=0;
ie5fix1=0;
ie5fix2=0;
p_vis=0;
prim_X=0;
prim_Y=0;

if (NC) {
document.write('<layer id=prim top=0 left=0 width='+150+' visibility=hide>&nbsp;</layer>');
}
else if (MSIE) {document.write('<div id=prim style="position:absolute;visibility:hidden;top:0;left:0;width:'+150+'">&nbsp;</div>');}

function cycle(){
//if (IE5) 
if (document.all&&window.print){
ie5fix1=document.body.scrollLeft;
ie5fix2=document.body.scrollTop;
}
}


function newPos(e){
xPos=(MSIE)?event.clientX+ie5fix1:e.pageX+2;
yPos=(MSIE)?event.clientY+ie5fix2:e.pageY+2;
if (p_vis) {
	need_close=0;
	if (MSIE) {
		need_close=((xPos<prim_X-10)||(xPos>prim_X+prim.scrollWidth+10)||(yPos<prim_Y-15)||(yPos>prim_Y+prim.scrollHeight+10));
	}
	else if (NC) {
		need_close=((xPos<prim_X-10)||(xPos>prim_X+document.prim.document.width+10)||(yPos<prim_Y-15)||(yPos>prim_Y+document.prim.document.height+10));
	}
	if (need_close) {
		if (MSIE) {c=MSIE['prim'].style;}
		else if (NC) {c=NC['prim'];}
		if (MSIE || NC) {c.visibility='hidden';}
		p_vis=0;
	}
}
}

if(document.layers) {document.captureEvents(Event.MOUSEMOVE);}
else if(MSIE) {document.body.onscroll=newPos}
document.onmousemove=newPos;
if (MSIE || NC) {setInterval("cycle()",50);}

function fprim(txt,full) {
if (txt) {
	if (p_vis) {
		if (MSIE) {c=MSIE['prim'].style;}
		else if (NC) {c=NC['prim'];}
		if (MSIE || NC) {c.visibility='hidden';}
		p_vis=0;
	}
	
                if (MSIE && txt.length>400) {wi=600;}
	else if (MSIE && txt.length>300) {wi=500;}
                else if (MSIE && txt.length>200) {wi=400;}
	else if (MSIE && txt.length>100) {wi=300;}
	else {wi=150;}
	cont='<table cellpadding=3 border=1 width='+wi+' BORDERCOLORDARK=#9A9A9A bgcolor=#CFFFFF><tr><td><font size=-1><br>'+txt+'</td></tr></table>';
	if (MSIE) {
		c=MSIE['prim'].style;
		c.width=wi;
		MSIE['prim'].innerHTML=cont;
		if (xPos + prim.scrollWidth >= document.body.clientWidth) {xPos=document.body.clientWidth-prim.scrollWidth;}
		c.left=xPos;
		if(yPos+prim.scrollHeight >= document.body.clientHeight+document.body.scrollTop) yPos=yPos-prim.scrollHeight;
		c.top=yPos;
		c.visibility='visible';
	}
	else if (NC) {
		c=NC['prim'];
            c.document.open();
            c.document.write(cont);
            c.document.close();
		if(xPos + c.document.width >= innerWidth) {xPos = innerWidth-170;}
            if(yPos+c.document.height>=window.innerHeight+window.pageYOffset) {yPos=window.innerHeight+window.pageYOffset-c.document.height-5;}
		c.left=xPos;
		c.top=yPos;
		c.visibility='show';
	}
	prim_X=xPos;
	prim_Y=yPos;
	if (full) {p_vis=1;}
}
else if (!p_vis) {
	if (MSIE) {c=MSIE['prim'].style;}
	else if (NC) {c=NC['prim'];}
	if (MSIE || NC) {c.visibility='hidden';}
}
}