function validate_recipe_feedback(thisform) {	// Validation of required input fields
// Verify that all number forms are numbers and are within range
// Verify that at least one form input has content (not null, not spaces, and not empty string)
// If error, alert error and return false.  Else no alert and return true.
return true;	//temp to disable js
var err_temp;
var err_alert = "";
var err_display = "";
with (thisform) {
 if (og.value<1 || og.value>1.5) {
  err_temp="OG out of range.";
  if (err_alert!="") {err_alert+="\n"; err_msg+="<br>";}
  err_alert+=err_temp;
  err_display+=err_temp;
 }
 if (fg.value==null || fg.value=="") {
  err_temp="Please enter a value for FG.";
  if (err_alert!="") {err_alert+="\n"; err_display+="<br>";}
  err_alert+=err_temp;
  err_display+=err_temp;
 }
}
if (err_alert != "") {
 alert(err_alert);
 document.getElementById("err_msg").innerHTML = err_display+"<br>";
 return false;
}
else {return true;}
}

function validate_get_recipes(thisform) {	// Validation of required input fields
// Verify that all number forms are numbers and are within range
// Verify that at least one form input has content (not null, not spaces, and not empty string)
// If error, alert error and return false.  Else no alert and return true.
return true;	//temp to disable js
var err_temp;
var err_alert = "";
var err_display = "";
with (thisform) {
 if (og.value<1 || og.value>1.5) {
  err_temp="OG out of range.";
  if (err_alert!="") {err_alert+="\n"; err_msg+="<br>";}
  err_alert+=err_temp;
  err_display+=err_temp;
 }
 if (fg.value==null || fg.value=="") {
  err_temp="Please enter a value for FG.";
  if (err_alert!="") {err_alert+="\n"; err_display+="<br>";}
  err_alert+=err_temp;
  err_display+=err_temp;
 }
}
if (err_alert != "") {
 alert(err_alert);
 document.getElementById("err_msg").innerHTML = err_display+"<br>";
 return false;
}
else {return true;}
}

function validate_registration(thisform) {	// Validation of required input fields
// Verify that all values are adaquate
// If error, alert error and return false.  Else no alert and return true.
return true;	//temp to disable js
var err_message = "";

with (thisform) {
 if( first_name.value && last_name.value && email.value && user_name.value && password.value )
  {
  if( email.value==email_2.value )
   { err_message=validate_email(email); }
  else
   {err_message="Email inputs do not match.";}
  }
 else
  {err_message="Please fill out all items.";}
}

if (err_message != "") {
 alert(err_message);
 document.getElementById("err_msg").innerHTML = err_message+"<br>";
 return false;
}
else {return true;}
}

function logon() {
	cursor_wait();
	var user_name=document.getElementById('logon_user_name').value;
	var password=document.getElementById('logon_password').value;
	// Confirm all information is filled out
	if( !user_name || !password )
		{
		alert("Please fill out all items");
		cursor_clear();
		}
	else
		{		
		// create new script element and set its relative URL (including ID arguments)
		var script = document.createElement( 'script' );
		script.src = '/j/external_logon.php?user_name='+user_name+'&password='+password+'&pass=okay';
		// attach (load) script element to document head
		document.getElementsByTagName( 'head' )[0].appendChild( script );
		}
}

function validate_email(temail)
{ 
  if( temail.indexOf("@")== -1 )  // look for an @ character
   return "No '@' in address";
  else
  {
    var adr = temail.split("@");
    // look for part address before the @ character
    if(adr[0].length < 1 ) return "User address absent";
    else // look for a dot
    if(adr[1].indexOf(".")== -1) return "No dot";
    else // look for domain name after the @ character
    if(adr[1].length < 3) return "Domain incorrect";
    else return true;
  }                              
}                                               
function fail(msg)	// a function to display an error message
{	alert("Email Address Error:\n" +msg);	}   


function logoff() {
	// create new script element and set its relative URL (including ID arguments)
	var script = document.createElement( 'script' );
	script.src = '/j/external_logoff.php?pass=okay';
	// attach (load) script element to document head
	document.getElementsByTagName( 'head' )[0].appendChild( script );
}


function check_if_logged_on() {
 if(readCookie('auth')=="yes") return true;
else {alert("Please Log In");return false;}
}

function get_recipes() {
// document.forms.recipe_list.submit();
window.open("recipe_list.php","","top=20,left=20,width=250,height=500, status, location, menubar, resizable,scrollbars,toolbar");
}

function CheckForm(form) {
 if ((form.logon_user_name.value) && (form.logon_password.value))
  return true;
 else
  return false;
}

function noenter() {	//prevents enter from working
return !(window.event && window.event.keyCode == 13); }
function enter_logon(e) {	//calls logon() instead of enter
// alert("enter_logon-event:"+e+" event.which:"+e.which);
  if (e && e.which == 13)
    {// alert("enter return");
     logon();}
  else
    {// alert("enter not return");
     return true;}
    }

function enter(nextfield) {	//goes to next form input instead of enter (not used?)
if(window.event && window.event.keyCode == 13) {
  nextfield.focus();
  return false; }
else
  return true; }

var g_controlMenu=null;	//global variables used to show control panel display using showMenu in create_recipes only
function showMenu(controlMenu) {	//uses g_controlMenu declared in main js
 var l_controlMenu = document.getElementById(controlMenu);
 if (g_controlMenu==null) {
  l_controlMenu.style.display = "block";
  g_controlMenu=l_controlMenu.id;
 }
 else
 {
  document.getElementById(g_controlMenu).style.display = "none";
  if (g_controlMenu!=l_controlMenu.id) {
   l_controlMenu.style.display = "block";
   g_controlMenu=l_controlMenu.id;
  }
  else {
   g_controlMenu=null;
  }
 }
}

function toggleMenu(currMenu) {
	if (document.getElementById) {
		thisMenu = document.getElementById(currMenu).style
		if (thisMenu.display == "block") {
			thisMenu.display = "none";
		}
		else {
			thisMenu.display = "block";
		}
		return false;
	}
	else {
		return true;
	}
}

function check_logged_on_status() {
if(readCookie('auth')=="yes") {
document.getElementById('not_logged_on').style.display = 'none';
document.getElementById('logged_on').style.display = 'block';
document.getElementById('logged_on').getElementsByTagName('h2')[0].firstChild.data = readCookie('user_name')+' is logged on';
}
// write initial cookie
cursor_wait();
var script = document.createElement( 'script' );
script.src = '/j/external_front_door.php?pass=okay';
document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function set_authorization_cookie() {
alert("set_authorization_cookie never used?");
	if(readCookie('auth')=="yes")
		document.getElementById('logoff').style.display = "block";
	else
		document.getElementById('logon').style.display = "block";
}

function save_history() {
//fix this function
// Verify date
document.forms.submit_history.submit();
}

// function recipe_feedback(id) {
// window.open("recipe_feedback.php?id="+id,"","top=20,left=20,width-250,height=500, status, location, menubar, resizable,scrollbars,toolbar");
// }

function recipe_history() {alert("code goes here");}

function retrieve_user_values(source)
// if source = 0, retrieve default valves.  If 1, then stored valves.
{cursor_wait();
 var script = document.createElement( 'script' );
 script.src = '/j/external_retrieve_user_values.php?source=' + source;
 document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function save_user_values()
{cursor_wait();
 var script = document.createElement( 'script' );
 script.src = '/j/external_save_user_values.php?';
 script.src +='mash_efficiency='+document.getElementById('mash_efficiency').value;
 script.src +='&fermentor_losses='+document.getElementById('fermentor_losses').value;
 script.src +='&debris_losses='+document.getElementById('debris_losses').value;
 script.src +='&mash_equipment_losses='+document.getElementById('mash_equipment_losses').value;
 script.src +='&false_bottom_volume='+document.getElementById('false_bottom_volume').value;
 script.src +='&maximum_kettle_size='+document.getElementById('maximum_kettle_size').value;
 script.src +='&altitude='+document.getElementById('altitude').value;
 document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function generate_address( username ) {
// writes without anchors around.
var domain = "tapmeister&#46;&#99;&#111;&#109;";
var recipient = username + "&#064;" + domain;
var url = "&#109;&#097;&#105;&#108;&#116;&#111;:" + recipient;
document.write(recipient.link(url));
}


function instructions_create()
{window.open("instructions_create.html","","top=20,left=20,width-250,height=500, status, location, menubar, resizable,scrollbars,toolbar");}
//{window.location="instructions_create.html";}

function instructions_get()
{window.open("instructions_get.html");}

function table_cell_to_string(table_id,column_no) {
// alert(table_id.id+".rows.length="+table_id.rows.length);
if(table_id.rows.length>0)
{
var a_php = "";
var glue="";
for (var i=0; i<table_id.rows.length; i++) {
// alert(table_id.id+".rows["+i+"].cells["+column_no+"].firstChild.data="+table_id.rows[i].cells[column_no].firstChild.data);
	a_php += glue+table_id.rows[i].cells[column_no].firstChild.data;
	glue="~";
	}
return a_php;
}
else
{
return null;
}
}

function table_value_to_string(table_id,column_no) {
if(table_id.rows.length>0)
{
var a_php = "";
var glue="";
for (var i=0; i<table_id.rows.length; i++) {
	a_php += glue+table_id.rows[i].cells[column_no].firstChild.value;
	glue="~";
	}
return a_php;
}
else
{
return null;
}
}

function table_input_to_string(table_id,column_no) {
if(table_id.rows.length>0)
{
var a_php = "";
var glue="";
for (var i=0; i<table_id.rows.length; i++) {
	a_php += glue+table_id.rows[i].cells[column_no].firstChild.value;
	glue="~";
	}
return a_php;
}
else
{
return null;
}
}

function styleMenu(currMenu) {
	var thisMenu = document.getElementById(currMenu).style
	if (thisMenu.display == "block")
		{thisMenu.display = "none";}
	else {	thisMenu.display = "block";
//		var source=document.getElementById('select_menu').options[document.getElementById('select_menu').selectedIndex];
//		document.getElementById('style_frame').src = source.value;
}
}

function validate(f) { 
var re = /^[0-9,.]*$/; 	//Why are comma's allowed?
window.status = "";
if (!re.test(f.value)) { 
window.status = "Invalid input.";
f.value = f.value.replace(/[^0-9,.]/g,""); 
} 
}

function add_wait(){
	var wait_div = document.createElement("div");
	with(wait_div){id="wait_div";}
	var wait_img=document.createElement("img");
	with(wait_img){id="wait_img"; src="/i/calculating.gif";}
	wait_div.appendChild(wait_img);
	document.body.appendChild(wait_div);
}

function remove_wait(){
	document.body.removeChild(document.getElementById("wait_div"));
}

// Changes the cursor to an hourglass
function cursor_wait() {
document.body.style.cursor = 'wait';
}

// Returns the cursor to the default pointer
function cursor_clear() {
document.body.style.cursor = 'default';
}

function group_menu_changed(menu) {
//Update type menu and description based on group selected option.  Passes data to Javascript/PHP
//menu_selected_option=menu.options[menu.selectedIndex];
cursor_wait();
var script = document.createElement( 'script' );
script.src = '/j/external_group_menu_changed.php?menu_id=' + menu.id+'&menu_selected_option='+menu.options[menu.selectedIndex].value;
document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function type_menu_changed(menu) {	// call to external Javascript/PHP file and pass data to server
//Update description based on selected option.  Passes data to Javascript/PHP
//menu_selected_option=menu.options[menu.selectedIndex];
cursor_wait();
var script = document.createElement( 'script' );
script.src = '/j/external_type_menu_changed.php?menu_id=' + menu.id+'&menu_selected_option='+menu.options[menu.selectedIndex].value;
document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function initialize_page() {
// thisMenu = document.getElementById('tempId');

//used to delete fake nodes in tbody that were added so page would pass validation test.
// TBdy1_water_supplement.parentNode.replaceChild(TBdy1_water_supplement.cloneNode(false), TBdy1_water_supplement); 
//doesn't work

	group_menu_changed( document.getElementById('menu_initial_water') );
	group_menu_changed( document.getElementById('menu_target_water') );
	group_menu_changed( document.getElementById('menu_yeast') );
 	group_menu_changed( document.getElementById('menu_style') );
	group_menu_changed( document.getElementById('menu_mash') );
	group_menu_changed( document.getElementById('menu_steep') );
	group_menu_changed( document.getElementById('menu_extract') );
	group_menu_changed( document.getElementById('menu_hop') );

	type_menu_changed( document.getElementById('menu_water_supplement_type') );

	retrieve_user_values(1); //predict_attributes() is also called here to update water.

//	update_type( menu_style.options[ menu_style.selectedIndex ],'style_menu_type' );
//	update_type( menu_mash.options[ menu_mash.selectedIndex ],'malt_menu_type' );
//	update_type( menu_steep.options[ menu_steep.selectedIndex ],'malt_menu_type' );
//	update_type( menu_extract.options[ menu_extract.selectedIndex ],'extract_menu_type' );
//	update_type( menu_hops.options[ menu_hops.selectedIndex ],'hops_menu_type' );
//	update_type( menu_yeast.options[ menu_yeast.selectedIndex ],'yeast_menu_type' );

}

function save_data() {	//fix this function
cursor_wait();
document.formname.submit();
// alert(document.forms.formname.elementname.value);
// document.forms.formname.elementname.value="goodby";
// call to external Javascript/PHP file and pass group ID's
	// create new script element and set its relative URL (including ID arguments)
	var script = document.createElement( 'script' );
	script.src = '/j/external_save_data.php';	//add URL data
	// attach (load) script element to document head
	document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function add_ingredient (span_id, sql_table_name) {
// call to external Javascript/PHP file and pass type menu ID
	// create new script element and set its relative URL (including ID arguments)
cursor_wait();
	var script = document.createElement( "script" );
	script.src = "/j/external_add_ingriedent.php?span_id=" + span_id+"&menu_selected_option="+document.getElementById('menu_'+span_id+'_type').value+"&sql_table_name="+sql_table_name;
	// attach (load) script element to document head
	document.getElementsByTagName( "head" )[0].appendChild( script );
}

function remove_item(obj){
// TRClone = obj.parentNode.parentNode.id
// TBdy1 = obj.parentNode.parentNode.parentNode.id
var obj=obj.parentNode.parentNode;
//document.getElementById('TBdy1').removeChild(obj);
document.getElementById(obj.parentNode.id).removeChild(obj);
}


function adjust(adjust_what) {
var new_value=prompt("Not Complete Yet.  Will allow changing of charactoristic", "123");
if(new_value==null||new_value=="") new_value=0;
// update ingridients as needed
}

function readCookie(name)
{
	var nameEQ = name + "=";
	var ca = unescape(document.cookie).split(';');
	for(var i=0;i < ca.length;i++)
	{
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}

function createCookie(name,value,days)
{
	if (days)
	{
		var date = new Date();
		date.setTime(date.getTime()+(days*24*60*60*1000));
		var expires = "; expires="+date.toGMTString();
	}
	else var expires = "";
	document.cookie = name+"="+escape(value)+expires+"; path=/";
}

function eraseCookie(name)
{
	createCookie(name,"",-1);
}

function get_radio_value(myrad) {
var i=0, r, radValue;
while(r=myrad[i++]){
r.checked?radValue=r.value:null;
}
return radValue;
}

function predict_attributes() {
add_wait();
cursor_wait();
var script = document.createElement( 'script' );
script.src = '/j/external_predict_attributes.php'+get_data();
// alert ("URL passed from JavaScript client to PHP server:\n"+script.src);	//test only
document.getElementsByTagName( 'head' )[0].appendChild( script );
}

function save_recipe() {
var sr_error="";
//document.forms.submit_save.recipe_name.value
//document.getElementById('recipe_name').value

if (document.forms.submit_save.recipe_name.value.length<1)	//maybe also check if just blanks
 {sr_error += "\nMust fill out recipe name";}
if (document.getElementById('menu_style').options[document.getElementById('menu_style').selectedIndex].value<0)
 {sr_error += "\nMust select beer style";}
else
 {
 if (sr_smt=document.getElementById('menu_style_type').options[document.getElementById('menu_style_type').selectedIndex].value<0)
  {sr_error += "\nMust select beer style";}
 }
if(sr_error!="")
 {alert("ERROR"+sr_error);}
else
 {add_wait();
 cursor_wait();
 var script = document.createElement( 'script' );
 script.src = '/j/external_save_recipe.php'+get_data();
 //alert ("URL passed from JavaScript client to PHP server:\n"+script.src);	//test only
 document.getElementsByTagName( 'head' )[0].appendChild( script );
 }
}

function get_data() {
var data_url ='?id_water_supplements='+table_cell_to_string(document.getElementById('TBdy1_water_supplement'),0);
data_url +='&quanity_water_supplements='+table_input_to_string(document.getElementById('TBdy1_water_supplement'),3);

data_url +='&id_mash='+table_cell_to_string(document.getElementById('TBdy1_mash'),0);
data_url +='&quanity_mash='+table_input_to_string(document.getElementById('TBdy1_mash'),3);

data_url +='&id_steep='+table_cell_to_string(document.getElementById('TBdy1_steep'),0);
data_url +='&quanity_steep='+table_input_to_string(document.getElementById('TBdy1_steep'),3);
data_url +='&time_steep='+table_input_to_string(document.getElementById('TBdy1_steep'),6);

data_url +='&id_extract='+table_cell_to_string(document.getElementById('TBdy1_extract'),0);
data_url +='&quanity_extract='+table_input_to_string(document.getElementById('TBdy1_extract'),3);

data_url +='&id_hops='+table_cell_to_string(document.getElementById('TBdy1_hop'),0);
data_url +='&quanity_hops='+table_input_to_string(document.getElementById('TBdy1_hop'),3);
data_url +='&time_hops='+table_input_to_string(document.getElementById('TBdy1_hop'),6);
data_url +='&bag_hops='+table_value_to_string(document.getElementById('TBdy1_hop'),8);

data_url +='&boil_rate='+get_radio_value(document.getElementsByName('boil_rate'));
data_url +='&pitch_rate='+get_radio_value(document.getElementsByName('pitch_rate'));
data_url +='&airation='+get_radio_value(document.getElementsByName('airation'));
data_url +='&priming='+get_radio_value(document.getElementsByName('priming'));
data_url +='&irish_moss='+get_radio_value(document.getElementsByName('irish_moss'));

data_url +='&initial_water_type='+document.getElementById('menu_initial_water_type').value;
data_url +='&target_water_type='+document.getElementById('menu_target_water_type').value;
data_url +='&yeast_type='+document.getElementById('menu_yeast_type').value;

data_url +='&acid_rest_temperature='+document.getElementById('acid_rest_temperature').value;
data_url +='&acid_rest_time='+document.getElementById('acid_rest_time').value;
data_url +='&acid_rest_heatsource='+document.getElementById('acid_rest_heatsource').value;

data_url +='&protein_rest_temperature='+document.getElementById('protein_rest_temperature').value;
data_url +='&protein_rest_time='+document.getElementById('protein_rest_time').value;
data_url +='&protein_rest_heatsource='+document.getElementById('protein_rest_heatsource').value;

data_url +='&saccharification_rest_temperature='+document.getElementById('saccharification_rest_temperature').value;
data_url +='&saccharification_rest_time='+document.getElementById('saccharification_rest_time').value;
data_url +='&saccharification_rest_heatsource='+document.getElementById('saccharification_rest_heatsource').value;

data_url +='&mashout_temperature='+document.getElementById('mashout_temperature').value;
data_url +='&mashout_heatsource='+document.getElementById('mashout_heatsource').value;

data_url +='&final_volume='+document.getElementById('final_volume').value;
data_url +='&mash_malt_ratio='+document.getElementById('mash_malt_ratio').value;
data_url +='&sparge_malt_ratio='+document.getElementById('sparge_malt_ratio').value;
data_url +='&steep_malt_ratio='+document.getElementById('steep_malt_ratio').value;
data_url +='&steep_malt_ratio='+document.getElementById('steep_malt_ratio').value;
data_url +='&min_boil_time='+document.getElementById('min_boil_time').value;

data_url +='&mash_efficiency='+document.getElementById('mash_efficiency').value;
data_url +='&fermentor_losses='+document.getElementById('fermentor_losses').value;
data_url +='&debris_losses='+document.getElementById('debris_losses').value;
data_url +='&mash_equipment_losses='+document.getElementById('mash_equipment_losses').value;
data_url +='&false_bottom_volume='+document.getElementById('false_bottom_volume').value;
data_url +='&maximum_kettle_size='+document.getElementById('maximum_kettle_size').value;
data_url +='&altitude='+document.getElementById('altitude').value;

return data_url;
}


// Calander Code
var headbg = '#ffcc99';  // table heading background colour was cccccc
var todaybg = '#ff99ff'; // current day of month background colour was 99cccc
var textclr = '#3333ff'; // text colour was 009999
var pageLoaded = 0;
window.onload = function() {pageLoaded = 1;}
var moy = ['January','February','March','April','May','June','July','August','September','October','November','December'];
loaded('calendar',start);

function loaded(i,f) {
if (document.getElementById && document.getElementById(i) != null)
 f();
else if (!pageLoaded)
 setTimeout('loaded(\''+i+'\','+f+')',100);
}

function monthlength(month,year) {var dd = new Date(year, month, 0);return dd.getDate();}

function start() {
document.getElementById('calendar').innerHTML = dispCal(0,0);
var current_date = new Date();	//added
setDate(current_date.getDate(),current_date.getMonth(),current_date.getFullYear());	//added
}

function setDate(dayVal,monthVal,yearVal)
// {document.getElementById('calDate').value = dayVal + ' ' + moy[monthVal] + ' ' + yearVal;}
{
document.getElementById('calDate').value = moy[monthVal] + ' ' + dayVal + ', ' + yearVal;
document.getElementById('brew_date').value = yearVal + '-' + (monthVal+1) + '-' + dayVal;
}

function dispCal(yy,mm) {
if (mm < 0 || mm > 12) {alert('month must be between 1 and 12'); return false;}
if (yy != 0 && (yy < 1901 || yy > 2100)) {alert('year must be after 1900 and before 2101'); return false;}
var dow = ['Sun','Mon','Tue','Wed','Thu','Fri','Sat'];
var calendar = new Date();
var today = calendar.getDate();
var curm=calendar.getMonth();		//added
var cury=calendar.getFullYear();	//added
calendar.setDate(1);
if (yy > 1900) calendar.setFullYear(yy);
if (mm > 0) calendar.setMonth(mm - 1);
var yy = year = calendar.getFullYear();
var month = calendar.getMonth();
calendar.setDate(today);
var weekday = calendar.getDay();
var daysInMonth = monthlength(month+1,year);
var hilite_start = '<td width="30" style="background:' + todaybg + '" align="center"><b>';
var td_start = '<td width="30" align="center">';
var cal = '<div id="cal"><div style="border:1pt solid #cccccc;height:150px;width:238px"><table border="0" cellspacing="0" cellpadding="2"><tr><td colspan="7" style="background:' + headbg + '" align="center"><b>' + moy[month]  + ' ' + year + '<\/b><\/td><\/tr><tr>';
// alert("currentyear="+cury+"\ncurrentmonth="+curm+"\nyear="+year+"\nmonth="+month);	//testing
for(dex=0; dex < 7; dex++) {
// if(weekday == dex)
 if(weekday == dex && month == curm && year == cury) // change so it is only highlighted for actual current day
  cal += td_start + '<b>' + dow[dex] + '<\/b><\/td>'; //Highlight weekday (i.e. monday, tuesday) of current day
 else
  cal += td_start + dow[dex] + '</td>';
}
cal += '<\/tr><tr>';
var day2 = today;
for (dex = today; dex > 6; dex -=7) day2 = dex;
weekday -= day2 - 1;
while (weekday < 0) weekday += 7;
for(dex=0; dex < weekday; dex++) cal += td_start + ' <\/td>';
for(dex=1; dex <= daysInMonth; dex++) {
 if(weekday == 7) {cal += '</tr><tr>'; weekday = 0;}
// if(today==dex)
  if(today == dex && month == curm && year == cury) // change so it is only highlighted for actual current day
// Modify so "#" for anchors are no longer required
  // cal += hilite_start +'<a style="text-decoration:none;color:'+textclr+'" href="#" onclick="setDate(' + dex + ',' + month + ',' + year + ')">' + dex + '<\/a><\/b><\/td>';
  cal += hilite_start +'<a style="text-decoration:none;color:'+textclr+'" href="" onclick="{setDate(' + dex + ',' + month + ',' + year + '); return false;}">' + dex + '<\/a><\/b><\/td>';
 else
//  cal += td_start + '<a style="text-decoration:none;color:'+textclr+'" href="#" onclick="setDate(' + dex + ',' + month + ',' + year + ')">' + dex + '<\/a><\/td>';
  cal += td_start + '<a style="text-decoration:none;color:'+textclr+'" href="" onclick="{setDate(' + dex + ',' + month + ',' + year + '); return false;}">' + dex + '<\/a><\/td>';
 weekday += 1;
}
for(dex=weekday; dex < 7; dex++) cal += td_start + ' <\/td>';
cal += '<\/tr><\/table><\/div>';
if (document.getElementById) {
 var mmb = month;
 mm = month + 1;
 var yya = yyb = yy;
 if (mmb <1) {mmb += 12; yyb--;}
 var mma = month + 2;
 if (mma > 12) {mma -= 12; yya++;}
 var yb = yy -1;
 var ya = yy +1;

//Displays change year and change month buttons with internal links
// If "<<" is clicked, then new calander with year= yb and month= mm
// If  "<" is clicked, then new calander with year=yyb and month=mmb
// If  ">" is clicked, then new calander with year=yya and month=mma
// If ">>" is clicked, then new calander with year= ya and month= mm
// Remove "#" for anchor as they appear not to be needed
// cal += '<table border="0" cellspacing="0" cellpadding="2" width="210"><tr><td><a href="#" onclick="if (cala = dispCal('+yb+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><<</a></td><td><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><</a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">></a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+ya+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">>></a></td></tr></table>';
 cal += '<table border="0" cellspacing="0" cellpadding="2" width="210"><tr><td><a href="" onclick="if (cala = dispCal('+yb+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><<</a></td><td><a href="" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><</a></td><td align="right"><a href="" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">></a></td><td align="right"><a href="" onclick="if (cala = dispCal('+ya+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">>></a></td></tr></table>';

}
else
 {cal += '<div> </div>';}
cal += '</div>';
return cal;
}