function setCookie(c_name,value,expiredays) {
var exdate=new Date();
exdate.setDate(exdate.getDate()+expiredays);
document.cookie=c_name+ "=" +escape(value)+
((expiredays==null) ? "" : ";expires="+exdate.toGMTString());
}

function invertpagecolors(){
	$('bodyid').toggleClassName('whiteonblack');
	$('bodyid').toggleClassName('blackonwhite');
	$('container_child').toggleClassName('blackonwhite');
	$('container_child').toggleClassName('whiteonblack');
	$('page_content').toggleClassName('blackonwhite');
	$('page_content').toggleClassName('whiteonblack');
	$('accessibility_tools').toggleClassName('blackonwhite');
	$('accessibility_tools').toggleClassName('whiteonblack');
	$('heading_id').toggleClassName('whiteonblack');
	$('heading_id').toggleClassName('blackonwhite');
	if($('bodyid').hasClassName('blackonwhite'))
		setCookie("page_colors",'blackonwhite',100);
	if($('bodyid').hasClassName('whiteonblack'))
		setCookie("page_colors",'whiteonblack',100);	
}
function getTypeSize() {
	if ($('page_typesize').hasClassName('typesize_a')) { return "typesize_a"; }
	else if ($('page_typesize').hasClassName('typesize_b')) { return "typesize_b"; }
	else if ($('page_typesize').hasClassName('typesize_c')) { return "typesize_c"; }
	else if ($('page_typesize').hasClassName('typesize_d')) { return "typesize_d"; }
	else if ($('page_typesize').hasClassName('typesize_e')) { return "typesize_e"; }
	else if ($('page_typesize').hasClassName('typesize_f')) { return "typesize_f"; }
	else { return "typesize_limit"; }
}
function getSmallerType(type_size) {
	switch(type_size){
		case "typesize_a":
			return "typesize_a";
			break;
		case "typesize_b":
			return "typesize_a";
			break;
		case "typesize_c":
			return "typesize_b";
			break;
		case "typesize_d":
			return "typesize_c";
			break;
		case "typesize_e":
			return "typesize_d";
			break;
		case "typesize_f":
			return "typesize_e";
			break;
		case "typesize_limit":
			return "typesize_f";
			break;
		default:
			return "typesize_b";
	}
}
function getLargerType(type_size) {
	switch(type_size){
		case "typesize_a":
			return "typesize_b";
			break;
		case "typesize_b":
			return "typesize_c";
			break;
		case "typesize_c":
			return "typesize_d";
			break;
		case "typesize_d":
			return "typesize_e";
			break;
		case "typesize_e":
			return "typesize_f";
			break;
		case "typesize_f":
			return "typesize_limit";
			break;
		case "typesize_limit":
			return "typesize_limit";
			break;
		default:
			return "typesize_e";
	}
}
function decreaseTypeSize(){
	var type_size = getTypeSize();
	var smaller_type = getSmallerType(type_size);
	$('page_typesize').removeClassName(type_size);
	$('page_typesize').addClassName(smaller_type);
	setCookie("type_size",smaller_type,100);	
}
function increaseTypeSize(){
	var type_size = getTypeSize();
	var larger_type = getLargerType(type_size);
	$('page_typesize').removeClassName(type_size);
	$('page_typesize').addClassName(larger_type);
	setCookie("type_size",larger_type,100);	
}