function button(script)
{
	with (document)
	{
		open();
		writeln("<embed");
		writeln("	type='application/x-spt'");
		writeln("	width=15");
		writeln("	height=15");
		writeln("	button=push");
		writeln("	target='chime_graphic'");
		writeln("	script='" + script + "'");
		writeln(">");
		close();
	}
}

function footer()
{
	with (document)
	{
		open();

// history.back() runs you back thru all the button presses, so is useless.

		writeln("<form>");
		writeln("<input type=button value=\"Back\"");
		writeln("onClick=\"location.href='contents.htm'\">");
		writeln("</form>");

//		writeln("<table border=1><tr><td>");
//		writeln("</td></tr></table>");

		writeln("<p><a href=\"rightutl.htm\">Utilities</a>");
		writeln("<a href=\"rightucs.htm\">Color Schemes</a>");

		// This puts enough space at the bottom of each page so that
		// in continuous play mode, the current button can be placed
		// at the top of the page.
		if (parent.ContinuousPlay)
		{
			writeln("<hr>");
			writeln("<br><br><br><br><br><br><br><br><br><br>");
			writeln("<br><br><br><br><br><br><br><br><br><br>");
		}

		close();
	}

}

//- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 

function wr_doc(to_write)
{
	with(document)
	{
		open();
		write(to_write);
		close();
	}
}

/*----------------------------------------------------------*/

function key_top()
{
	wr_doc(
//		"<table bgcolor='black'>" +
//		"<tr><td>" +
		"<a href='colors.htm' target='cpk_window'>" +
//		"<tt>" +
		"<font size='+2'><b>"
	);
}

function key_bottom()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>"+
		"</b></font>" +
//		"</tt>" +
		"</a>" //+
//		"</td></tr>" +
//		"</table>"
	);
}

/*-----------------------------------------------------------*/

function C_key()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>" +
		"<font color='#999999'>C</font>"
	);
}


function Fe_key()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>" +
		"<font color='#FFA500'>Fe</font>"
	);
}

function H_key()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>" +
		"<font color='#FFFFFF'>H</font>"
	);
}


function N_key()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>" +
		"<font color='#8F8FFF'>N</font>"
	);
}



function O_key()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>" +
		"<font color='#F00000'>O</font>"
	);
}



function S_key()
{
	wr_doc(
		"<font color='black'>&nbsp;</font>" +
		"<font color='#FFC832'>S</font>"
	);

}


/*-------------------------------------------------------*/

function chon_key()
{
	key_top();
	C_key();
	H_key();
	O_key();
	N_key();
	key_bottom();
}


function chonfe_key()
{
	key_top();
	C_key();
	H_key();
	O_key();
	N_key();
	Fe_key();
	key_bottom();
}


function chon()
{
	key_top();
	C_key();
	H_key();
	O_key();
	N_key();
	key_bottom();
}


function cons()
{
	key_top();
	C_key();
	N_key();
	O_key();
	S_key();
	key_bottom();
}

function chons_key()
{
	key_top();
	C_key();
	H_key();
	N_key();
	O_key();
	S_key();
	key_bottom();
}
