var region_count = 0;

function write_countries()
{
	var sum = 0;  // The sum starts off at 0
	count = 1;
	do
	{
		document.write('<option value="' + countries_array[ count ]['code'] + '">' + countries_array[ count ]['name'] + "</option>\n");
		count++;
	}
	while (count < 220);
}

function get_regions_mm()
{
	document.forms.wms_form.gr.length = 0;

	var this_country = document.wms_form.gl.value;
	var counter = do_code[ this_country ]['count'];

	if( counter > 0 )
	{
		var this_ones = 'All ' + country_names[this_country] + ' Regions';
		document.forms.wms_form.gr.options[0] = new Option( this_ones );
		document.forms.wms_form.gr.options[0].value = '';

		for( ii = 1; ii < counter; ii++ )
		{
			document.forms.wms_form.gr.options[ii] = new Option(do_code[ this_country ][ ii ]['name']);
			document.forms.wms_form.gr.options[ii].value = do_code[ this_country ][ ii ]['code'];
		}
	}
}

function check_url()
{

	var redirect_url = 'http://www.google.com/search?adtest=on';
	if( document.forms.wms_form.q.value != '' )
		redirect_url = redirect_url + '&q=' +  document.forms.wms_form.q.value;
	else
	{
		alert( 'Your need to enter a search term' );
		document.forms.wms_form.q.focus();
		return false;
	}
		
	if( document.forms.wms_form.gl.value != '' )
		redirect_url = redirect_url + '&gl=' +  document.forms.wms_form.gl.value;
	if( document.forms.wms_form.gr.value != '' )
		redirect_url = redirect_url + '&gr=' +  document.forms.wms_form.gr.value;
	if( document.forms.wms_form.gcs.value != '' )
		redirect_url = redirect_url + '&gcs=' +  document.forms.wms_form.gcs.value;
	if( document.forms.wms_form.gll.value != '' )
		redirect_url = redirect_url + '&gll=' +  document.forms.wms_form.gll.value;

	if( document.forms.wms_form.gpc.value != '' )
		redirect_url = redirect_url + '&gpc=' +  document.forms.wms_form.gpc.value;
	if( document.forms.wms_form.gm.value != '' )
		redirect_url = redirect_url + '&gm=' +  document.forms.wms_form.gm.value;

	window.location = redirect_url;
	return false;

	/*
	http://www.google.com/webhp?adtest=on&
	gl=AU&
	gcs=asd&
	gll=asd&
	gpc=asd&
	gm=asd
	*/
}