var d, ix, ax = 0, bx = 0, cx = 0, dx = 0, i = 0;
var L = new Array();	
var A = new Array();	
var B = new Array();	
var C = new Array();	
var D = new Array();	
var less_than = -1, more_than =  +1;
// **************
function ShowAllLinks(doc) 
{
d = doc;

SortLinks();
LoadAllArrays();

for (ix = 0; ix < L.length + 3;) 
 	ShowLink();
return;
}
// **************
function f(link, text) 
{
L[i++] = {link: link, text: text};
return;
}
// **************
function ShowLink() 
{

Wr("<tr>");
	Wr("<td width='25%'>");
		if (ax < A.length) 
			ShowCell(A[ax++]);
		++ix;	
	Wr("</td>");	

	Wr("<td width='25%'>");
		if (bx < B.length) 	
			ShowCell(B[bx++]);		
		++ix; 
	Wr("</td>");	
	
	Wr("<td width='25%'>");
		if (cx < C.length) 	
			ShowCell(C[cx++]);		
		++ix; 
	Wr("</td>");		
	
	Wr("<td width='25%'>");
		if (dx < D.length) 		
			ShowCell(D[dx++]);		
		++ix; 
	Wr("</td>");				
Wr("</tr>");	
return;
}
// **************
function ShowCell(obj)
{
ShowImage(obj);		
ShowText(obj);
return;
}
// **************
function ShowImage(obj) 
{
var part1 = '<a href="';
var part2 = '" target="_blank"><img border ="0" src="../images/orbgrn1.gif" height="8" width="8" hspace="4" vspace="6" align="absmiddle"';	
var part3 = '"></a>';
	
Show(part1 + obj.link + part2 + obj.text + part3);	
return;
}
// **************
function ShowText(obj) 
{
var part1 = '<a href="';
// var part2 = '"><b><font size="2">';
var part2 = '" class="Link">';
// var part3 = '</font></b><br></a>';	
var part3 = '<br></a>';	
	
Show(part1 + obj.link + part2 + obj.text + part3);		
return;
}
// **************
function Show(buff) 
{
//if (ix == 24)
//	alert("buff="+buff);
d.write(buff);
return;
}
// ********************
function SortLinks() 
{
L.sort(CompareText);
return;
}
// ********************
function CompareText(a, b) { return(Compare(a.text, b.text));}	
// ********************
function Compare(p1, p2) 
{
if (p1 < p2) return less_than; 
if (p1 > p2) return more_than; 
return(0);	
}
// *****
function LoadAllArrays()
{
var len, i = 0, j = 0;

len = Math.round(L.length / 4);
if (L.length % 4 > 0)
	++len;

for (i = 0; i < len; ++i, j++) 
	A[i] = L[j];

for (i = 0; i < len; i++, j++) 
	B[i] = L[j];	
	
for (i = 0; i < len; i++, j++) 
	C[i] = L[j];		
	
for (i = 0; j < L.length; i++, j++)	
	D[i] = L[j];			
return;
}