<!--
function StartUp(){ // defines function called on Page Load.
	win_y = (document.all)? document.body.clientHeight:win_y; //specifies win_y variable = height of browser window for IE
	win_x = (document.all)? document.body.clientWidth:win_x; //  specifies win_x variable
	DefObjects(); // calls DefObjects function
	UseRtt(); // calls UseRtt function : Return To Top layer with link.
	if (page == 5) {} else { PlaceObj(); }// Calls PlaceObj function : moves objects to correct places.
} // end function
var content_obj; // specifies content_obj as a variable
var sub_obj = new Array; // specifies sub_obj as an Array
var sub_obj_w = new Array; // specifies wub_obj_w as an Array - WIDTHS
function DefObjects () { // defines DefObjects function
	content_obj = eval(doc_obj + "content" + style_obj); // specifies object/value for content_obj
	content_obj_t = eval(doc_obj + "content" + top_obj); // specifies value for content_obj_t = it's TOP
	content_obj_h = eval(doc_obj + "content" + height_obj); //specifies value for content_obj_h = it's HEIGHT
	if (page == 5) {}
	else { 
		head_obj = eval(doc_obj + "head" + style_obj); // specifies object/value for head_obj
		head_obj_t = eval(doc_obj + "head" + top_obj); // specifies value for head_obj_t = it's TOP
		head_obj_h = eval(doc_obj + "head" + height_obj); //specifies value for head_obj_h = it's HEIGHT
		intNav_obj = eval(doc_obj + "intNav" + style_obj); // specifies object/value for intNav_obj
		intNav_obj_t = eval(doc_obj + "intNav" + top_obj); // specifies value for intNav_obj_t = it's TOP
	}
	rtt_obj = eval(doc_obj + "rtt" + style_obj); // specifies rtt_obj object
	rtt_obj_h = eval(doc_obj + "rtt" + height_obj); // specifes rtt_objects HEIGHT
	return; // stop function
} // end function
function PosRtt(){ // defines PosRtt function
	dsoctop = (document.all)? document.body.scrollTop : pageYOffset; //define universal dsoc top point : Document Top point which is visible
	if (dsoctop > 0) { rtt_obj.visibility = show; } // if statement : if dsoctop is greater than 0 show rtt object
	else { rtt_obj.visibility = hide; } // else statement : if dsoctop is NOT greater than 0 : hide rtt object
	rtt_obj.top = ((dsoctop + win_y) - (rtt_obj_h + 10)); // specifies TOP point of rtt object relative to dsoctop and window height.
	rtt_time =	setTimeout("PosRtt()",20); // specifies Timeout which repeats PosRtt function.
} // end function
function UseRtt() { // defines UseRtt function called at load up.
	rtt_obj.top = (((content_obj_t + content_obj_h) - rtt_obj_h)-10); // aligns rtt object with bottom edge of main content object.
	if ((content_obj_t + content_obj_h) > win_y ) { PosRtt(); return; } // if main content layer overflows window size calls PosRtt function
	else {} // Or not!
} // end function
var content_level = null; // variable for specifying top of content and nav layers.
var offset = 15; // Gap between head and layers.
function PlaceObj(){
	content_level = (parseInt(head_obj_t) + parseInt(head_obj_h) + offset);
	content_obj.top = content_level;
	intNav_obj.top = content_level;
	rtt_obj.top = content_level;
}
var blockWidth = 750;//parseInt(win_x - 40); // defines blockwidth variable
var	wid = parseInt((blockWidth-100)/menu.length); // defines wid variable as a function of the blockwidth variable dependant on the number of menu items
var init_left = (100+parseInt(wid/2)); // specifies init_left position dependant on WID variable.
var left_pos = init_left; // specifies left_pos variable as being init_left value.
window.onload = StartUp; // Calls STARTUP function when page is loaded.

// Tool Tips display and hide code use [onMouseOver="ToolTip(1,0,event);" onMouseOut="ToolTip(0,0);"] in tag.
var tooltip_obj;
function ToolTip(on,id,evt) {
	var dsocleft = (document.all)? document.body.scrollLeft : pageXOffset; //define universal dsoc left point
	var dsoctop = (document.all)? document.body.scrollTop : pageYOffset; //define universal dsoc top point
	var tt_x = 0 + parseInt(dsocleft);
	var tt_y = 10 + parseInt(dsoctop);
	var lay = ("tooltip" + id);
	tooltip_obj = eval(doc_obj + lay + style_obj);
	if (on) { 
		if (moz || gecko) { 	
			var x = (eval(evt.pageX) + tt_x);
			var y = (eval(evt.pageY) + tt_y);
		}
		else { 
			var x = (eval(event.x) + tt_x);
			var y = (eval(event.y) + tt_y); 
		}
		tooltip_obj.left = x;
		tooltip_obj.top = y;
		tooltip_obj.visibility = show;
	}
	else { 
		tooltip_obj.visibility = hide;  
	}
	return;
}
// -->