Array.prototype.inArray = function (value) {
	var i;
	for (i=0; i < this.length; i++) {
		if (this[i] === value) {
			return true;
		}
	}
	return false;
};

function addEvent( obj, type, fn ) {
	if (obj.addEventListener) {
		obj.addEventListener( type, fn, false );
		EventCache.add(obj, type, fn);
	}
	else if (obj.attachEvent) {
		obj["e"+type+fn] = fn;
		obj[type+fn] = function() { obj["e"+type+fn]( window.event ); }
		obj.attachEvent( "on"+type, obj[type+fn] );
		EventCache.add(obj, type, fn);
	}
	else {
		obj["on"+type] = obj["e"+type+fn];
	}
}
	
var EventCache = function(){
	var listEvents = [];
	return {
		listEvents : listEvents,
		add : function(node, sEventName, fHandler){
			listEvents.push(arguments);
		},
		flush : function(){
			var i, item;
			for(i = listEvents.length - 1; i >= 0; i = i - 1){
				item = listEvents[i];
				if(item[0].removeEventListener){
					item[0].removeEventListener(item[1], item[2], item[3]);
				};
				if(item[1].substring(0, 2) != "on"){
					item[1] = "on" + item[1];
				};
				if(item[0].detachEvent){
					item[0].detachEvent(item[1], item[2]);
				};
				item[0][item[1]] = null;
			};
		}
	};
}();
addEvent(window,'unload',EventCache.flush);



var HalsteadHelp = { 
	xCord: 0,								
	yCord: 0,								
	helpElements: ['a'],	
	obj: Object,							
	help: Object,							
	active: 0,								
	init: function() {
		if ( !document.getElementById ||
			!document.createElement ||
			!document.getElementsByTagName ) {
			return;
		}
		
		var i,j;
		this.help = document.createElement('div');
		this.help.id = 'Helper';
						
		document.getElementsByTagName('body')[0].appendChild(this.help);
		this.help.style.top = '0';
		this.help.style.visibility = 'hidden';
		var helpLen = this.helpElements.length;
		for ( i=0; i<helpLen; i++ ) {
			var current = document.getElementsByTagName(this.helpElements[i]);
			var curLen = current.length;
			

			for ( j=0; j<curLen; j++ ) {
				
				if (current[j].getAttribute('title') != null && current[j].getAttribute('title') != '') {
					addEvent(current[j],'mouseover',this.helpOver);
					addEvent(current[j],'mouseout',this.helpOut);
					current[j].setAttribute('help',current[j].title);
					current[j].removeAttribute('title');
				}
			}
		}
	},
	updateXY : function(e) {
		if ( document.captureEvents ) {
			HalsteadHelp.xCord = e.pageX;
			HalsteadHelp.yCord = e.pageY;
		} else if ( window.event.clientX ) {
			HalsteadHelp.xCord = window.event.clientX+document.documentElement.scrollLeft;
			HalsteadHelp.yCord = window.event.clientY+document.documentElement.scrollTop;
		}
	},
	helpOut: function() {
		if ( window.tID ) {
			clearTimeout(tID);
		}
		if ( window.opacityID ) {
			clearTimeout(opacityID);
		}
		HalsteadHelp.help.style.visibility = 'hidden';
	},
	checkNode : function() {
		var trueObj = this.obj;
		if ( this.helpElements.inArray(trueObj.nodeName.toLowerCase()) ) {
			return trueObj;
		} else {
			return trueObj.parentNode;
		}
	},
	helpOver : function(e) {
		HalsteadHelp.obj = this;
		tID = window.setTimeout("HalsteadHelp.helpShow()",500);
		HalsteadHelp.updateXY(e);
	},
	helpShow : function() {		
		var scrX = Number(this.xCord);
		var scrY = Number(this.yCord);
		var tp = parseInt(scrY+15);
		var lt = parseInt(scrX+10);
		var anch = this.checkNode();
		var addy = '';
		var access = '';
		if ( anch.nodeName.toLowerCase() == 'a' ) {
			//addy = (anch.href.length > 25 ? anch.href.toString().substring(0,25)+"..." : anch.href);
			var access = ( anch.accessKey ? ' <span>['+anch.accessKey+']</span> ' : '' );
		} else {
			//addy = anch.firstChild.nodeValue;
		}
		this.help.innerHTML = "<p>"+anch.getAttribute('help')+"<em>"+access+addy+"</em></p>";
		if ( parseInt(document.documentElement.clientWidth+document.documentElement.scrollLeft) < parseInt(this.help.offsetWidth+lt) ) {
			this.help.style.left = parseInt(lt-(this.help.offsetWidth+10))+'px';
		} else {
			this.help.style.left = lt+'px';
		}
		if ( parseInt(document.documentElement.clientHeight+document.documentElement.scrollTop) < parseInt(this.help.offsetHeight+tp) ) {
			this.help.style.top = parseInt(tp-(this.help.offsetHeight+10))+'px';
		} else {
			this.help.style.top = tp+'px';
		}
		this.help.style.visibility = 'visible';
		this.help.style.opacity = '.1';
		this.helpFade(10);
	},
	helpFade: function(opac) {
		var passed = parseInt(opac);
		var newOpac = parseInt(passed+10);
		if ( newOpac < 100 ) {
			this.help.style.opacity = '.'+newOpac;
			this.help.style.filter = "alpha(opacity:"+newOpac+")";
			opacityID = window.setTimeout("HalsteadHelp.helpFade('"+newOpac+"')",20);
		}
		else { 
			this.help.style.opacity = '1';
			this.help.style.filter = "alpha(opacity:100)";
		}
	}
};
function pageLoader() {
	HalsteadHelp.init();
}
addEvent(window,'load',pageLoader);