function load(text,id)
{
	if (document.getElementById)
	{
		x = document.getElementById(id);
		x.innerHTML = '';
		x.innerHTML = text;
	}
	else if (document.all)
	{
		x = document.all[id];
		x.innerHTML = text;
	}
	else if (document.layers)
	{
		x = document.layers[id];
		text2 = '<P CLASS="testclass">' + text + '</P>';
		x.document.open();
		x.document.write(text2);
		x.document.close();
	}
	return false;
}

function copy(src, adr, len)
{
	var data="";
	if(src.length>adr)
	{
		if((adr+len)>src.length)
		{
			len=src.length-adr;
		}
		
		for (clock=0; clock < len; ++clock)
		{
			data=data+src.charAt(clock+adr);
		}
		
	}
	else
	{
		return;
	}
	return(data);
}
function ecopy(text,bol,eol)
{
	return copy(text,bol, eol-bol);
}
function find(phrase, text, start)
{
	for (clock2=start; clock2 < (text.length-phrase.length+1); ++clock2)
	{
		str=copy(text,clock2,phrase.length)
		if(str==phrase)
		{
			return(clock2);
		}
	
	}
	return(-1);
}
function findc(letter, text, start)
{

	for (var clock4=start; clock4 < text.length; ++clock4)
	{
		if(text.charAt(clock4)==letter)
		{return(clock4);}
	}
	return(-1);

}
function count(text, letter)
{
	var count=0;
	for (fc=0; fc < text.length; ++fc)
	{
		if(text.charAt(fc)==letter)
		{
			++count;
		}
	}
	return count;
}
function gethref(text, start)
{
	var qp1=0;
	var qp2=0;
	qp1=parent.find("href",text,start);
	qp1=parent.findc("\"",text,qp1)+1;
	qp2=parent.findc("\"",text,qp1);
	return parent.ecopy(text,qp1,qp2);
}
function createXMLHTTP() 
{
	var request;// = false;
	try 
	{
		request = new ActiveXObject('Msxml2.XMLHTTP');
	}
	catch (err2) 
	{
		try 
		{
			request = new ActiveXObject('Microsoft.XMLHTTP');
		}
		catch (err3) 
		{
			try 
			{
				request = new XMLHttpRequest();
			}
			catch (err1) 
			{
				request = false;
			}
		}
	}
	return request;
}