function set_cookie ( name, value, expires_year, expires_month, expires_day, path, domain, secure )
{
  var cookie_string = name + "=" + escape ( value );

  if ( expires_year )
  {
    var expires = new Date ( expires_year, expires_month, expires_day );
    cookie_string += "; expires=" + expires.toGMTString();
  }

  if ( path )
	cookie_string += "; path=" + escape ( path );

  if ( domain )
	cookie_string += "; domain=" + escape ( domain );

  if ( secure )
	cookie_string += "; secure";

  document.cookie = cookie_string;

}

function delete_cookie ( cookie_name )
{
  var cookie_date = new Date ( );  // current date & time
  cookie_date.setTime ( cookie_date.getTime() - 1 );
  document.cookie = cookie_name += "=; expires=" + cookie_date.toGMTString();
}

function get_cookie ( cookie_name )
{
  var results = document.cookie.match ( cookie_name + '=(.*?)(;|$)' );

  if ( results )
    return ( unescape ( results[1] ) );
  else
    return null;
}


function setFontSize(ev, percentage, prevent)
{
    if (document.getElementsByTagName) {
	currentSize = percentage;
	document.getElementById("Body_Text").style.fontSize = currentSize + '%';

	}
}





function loadFontSize()
{

	if ( ! get_cookie ( "sbar" ) )
	{
   		var  currentSize = 100;
   		var current_date = new Date;
		var cookie_year = current_date.getFullYear ( ) + 1;
    	var cookie_month = current_date.getMonth ( );
    	var cookie_day = current_date.getDate ( );
		var cookie_path = "/";
    	set_cookie ( "sbar", currentSize, cookie_year, cookie_month, cookie_day, cookie_path );
	}
	else
	{
 		var currentSize = get_cookie ( "sbar" );
 		document.getElementById("Body_Text").style.fontSize = currentSize + '%';
	}

}



if ( ! get_cookie ( "sbar" ) )
	{
   		var  currentSize = 100;
   		var current_date = new Date;
		var cookie_year = current_date.getFullYear ( ) + 1;
    	var cookie_month = current_date.getMonth ( );
    	var cookie_day = current_date.getDate ( );
		var cookie_path = "/";
    	set_cookie ( "sbar", currentSize, cookie_year, cookie_month, cookie_day, cookie_path );
	}
	else
	{
 		var currentSize = get_cookie ( "sbar" );
	}



function setFontSize(ev, percentage, prevent)
{
    if (document.getElementsByTagName) {
	currentSize = percentage;
	document.getElementById("Body_Text").style.fontSize = currentSize + '%';
   		
		var current_date = new Date;
		var cookie_year = current_date.getFullYear ( ) + 1;
    	var cookie_month = current_date.getMonth ( );
    	var cookie_day = current_date.getDate ( );
		var cookie_path = "/";
    	set_cookie ( "sbar", currentSize, cookie_year, cookie_month, cookie_day, cookie_path );
	}
}

function decreaseFontSize(ev)
{
	delete_cookie("sbar")
    setFontSize(ev, currentSize / 1.13, true);
}


function defaultFontSize(ev)
{
	delete_cookie("sbar")
    setFontSize(ev, 100, true);
}


function increaseFontSize(ev)
{
	delete_cookie("sbar")
    setFontSize(ev, currentSize * 1.13, true);
}