// ====================================================================================================================================
// This script file contains the information for the birdspot tree

function clearTree()
{
	var treeElem = document.getElementById("tree");

	while (treeElem.length > 0)
	{
		treeElem.remove(0);
	}
};


function addTreeOption(text, data)
{
	var o = document.createElement('option');
  	o.text = text;
  	if (data == null || data == "") {
  		o.value = text;
  	} else {
  		o.value = data;
  	};
 	
	var treeElem = document.getElementById("tree");
	
	try
	{
    	treeElem.add(o, null); /* standards compliant */
    }
    catch(ex)
    {
    	treeElem.add(o); /* IE only */
    }	
};

function defaultTree()
{
	clearTree();
/*  	addTreeOption("Western Cape");
  	addTreeOption("Eastern Cape");
  	addTreeOption("Northern Cape");
  	addTreeOption("Kwazulu-Natal");
  	addTreeOption("Gauteng");
  	addTreeOption("Limpopo Province");
  	addTreeOption("North-West Province");
  	addTreeOption("Mpumalanga");
  	addTreeOption("Free State");
  	addTreeOption("Namibia");
  	addTreeOption("Botswana");
  	addTreeOption("Zimbabwe");
  	addTreeOption("Swaziland");
  	addTreeOption("Mozambique");
  	addTreeOption("Lesotho");
  	addTreeOption("Zambia"); */
  	
  	addTreeOption("SOUTH AFRICA");
  	addTreeOption("Eastern Cape");
  	addTreeOption("Free State");
  	addTreeOption("Gauteng");
  	addTreeOption("Kwazulu-Natal");
  	addTreeOption("Limpopo Province");
  	addTreeOption("Mpumalanga");
  	addTreeOption("North-West Province");
  	addTreeOption("Northern Cape");
  	addTreeOption("Western Cape");
  	addTreeOption("BOTSWANA");
  	addTreeOption("LESOTHO");
  	addTreeOption("MOZAMBIQUE");
  	addTreeOption("NAMIBIA");
  	addTreeOption("SWAZILAND");
  	addTreeOption("ZAMBIA");
  	addTreeOption("ZIMBABWE");
  	
};


function clickTree(forcevalue)
{
    /* if the argument 'forcevalue' is supplied, the click is triggered rather than real. */

	var treeElem = document.getElementById("tree");
	
	if (forcevalue == null)
	{
		var value = treeElem.options[treeElem.selectedIndex].value;
	} else {
		value = forcevalue;
	};

    /* Places have their names as their values, spots have their numbers as their values */
	if (value.charAt(0) < "0" || value.charAt(0) > "9")
	{
		switch (value)
		{
			case "Southern Africa":
				defaultTree();
				defaultZoom();
				break;
				
			case "Western Cape":
				clearTree();
				addTreeOption("WESTERN CAPE", '');
				addTreeOption("Cape Town", '');
				addTreeOption("--- Boulders Beach", '010101');
				addTreeOption("--- Cape of Good Hope NR", '010102');
				addTreeOption("--- Cape Pelagic Birding", '010109');
				addTreeOption("--- Kirstenbosch Gardens", '010103');
				addTreeOption("--- Kommetjie", '010104');
				addTreeOption("--- Robben Island", '010105');
				addTreeOption("--- Rietvlei", '010129');
				addTreeOption("--- Rondevlei NR", '010106');
				addTreeOption("--- Strandfontein ", '010107');
				addTreeOption("--- Tokai Forest", '010108');
				addTreeOption("South Coast", '');
				addTreeOption("--- Agulhas Plain", '010232');
				addTreeOption("--- Bettys Bay", '010210');
				addTreeOption("--- Bontebok NP", '010211');
				addTreeOption("--- De Hoop NR", '010212');
				addTreeOption("--- Fernkloof NR", '010230');
				addTreeOption("--- Grootvadersbos NR", '010213');
				addTreeOption("--- Helderberg NR", '010214');
				addTreeOption("--- Rooi-Els", '010231');
				addTreeOption("--- Sir Lowrys Pass", '010215');
				addTreeOption("Central", '');
				addTreeOption("--- Karoo NP", '010316');
				addTreeOption("--- Karoopoort", '010317');
				addTreeOption("--- Touws River", '010333');
				addTreeOption("--- Jonkershoek", '010336');
				addTreeOption("--- Paarl Mountain", '010334');
				addTreeOption("---  Paarl Sewage Works", '010335');
				addTreeOption("---  Tankwa Karoo NP", '010337');
				addTreeOption("--- Vrolijkheid NR", '010319');
				addTreeOption("West Coast", '');
				addTreeOption("--- Berg River Estuary", '010420');
				addTreeOption("--- Clanwilliam", '010421');
				addTreeOption("--- Lamberts Bay", '010422');
				addTreeOption("--- Mountain Mist", '010437');
				addTreeOption("--- Swartland Grasslands", '010423');
				addTreeOption("--- West Coast NP", '010424');
				addTreeOption("Garden Route", '');
				addTreeOption("--- Knysna ", '010525');
				addTreeOption("--- Mossel Bay", '010528');
				addTreeOption("--- Natures Valley", '010529');
				addTreeOption("--- Plettenberg Bay", '010526');
				addTreeOption("--- Wilderness", '010527');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Eastern Cape":
				clearTree();
				addTreeOption("EASTERN CAPE", '');
				addTreeOption("Addo Elephant NP", '020101');
				addTreeOption("Alexandria Forest", '020202');
				addTreeOption("Amatola Mountains", '020709');
				addTreeOption("Commandodrift NR", '020025');
				addTreeOption("East London", '');
				addTreeOption("--- Amalinda NR", '020303');
				addTreeOption("--- Pelagic Birding", '020026');
				addTreeOption("--- Nahoon Estuary", '020304');
				addTreeOption("--- Umtiza NR", '020305');
				addTreeOption("Grahamstown", '020406');
				addTreeOption("Hogsback", '020507');
				addTreeOption("Jeffrey's Bay", '020608');
				addTreeOption("Karoo Birding", '020810');
				addTreeOption("Mountain Zebra NP", '020911');
				addTreeOption("Port Elizabeth", '');
				addTreeOption("--- Bethelsdorp Common", '021012');
				addTreeOption("--- Cape Recife NR", '021013');
				addTreeOption("--- Gamtoos River", '021014');
				addTreeOption("--- Mondplaas Ponds", '021015');
				addTreeOption("--- Settlers Park", '021016');
				addTreeOption("--- Swartkops Estuary", '021017');
				addTreeOption("--- The Island Forest", '021018');
				addTreeOption("Rhodes/Barkly East", '021220');
				addTreeOption("Van Stadens FR", '021119');
				addTreeOption("Wild Coast", '');
				addTreeOption("--- Cwebe and Dwesa", '021323');
				addTreeOption("--- Wavecrest", '021322');
				addTreeOption("St. Francois Bay", '021324');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;				
				
			case "Northern Cape":
				clearTree();
				addTreeOption("NORTHERN CAPE", '');
				addTreeOption("Akkerendam", '030101');
				addTreeOption("Augrabies", '030202');
				addTreeOption("Bushmanland", '030303');
				addTreeOption("Kamfers Dam ", '030707');
				addTreeOption("Kgalagadi Transfrontier Park", '030404');
				addTreeOption("Klipkolk Dam", '030808');
				addTreeOption("Kuruman", '030909');
				addTreeOption("Namaqualand", '030505');
				addTreeOption("Upington", '030606');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
								
			case "Kwazulu-Natal":
				clearTree();
				addTreeOption("KWAZULU-NATAL", '');
				addTreeOption("Durban and area", '');
				addTreeOption("--- Burman Bush", '040101');
				addTreeOption("--- Bayhead", '040110');
				addTreeOption("--- Durban Pelagic", '040102');
				addTreeOption("--- Kenneth Stainbank NR", '040107');
				addTreeOption("--- Krantzkloof NR", '040103');
				addTreeOption("--- Pigeon Valley", '040104');
				addTreeOption("--- Shongweni Dam", '040106');
				addTreeOption("--- Umgeni River Mouth", '040108');
				addTreeOption("--- Umhlanga Conservancy", '040109');
				addTreeOption("Pietermaritzburg", '');
				addTreeOption("--- Bisley Valley", '040210');
				addTreeOption("--- Cumberland NR", '040252');
				addTreeOption("--- Darvill Park", '040211');
				addTreeOption("--- Doreen Clark NR", '040212');
				addTreeOption("--- Ferncliffe Forest", '040213');
				addTreeOption("--- Queen Elizabeth Park", '040214');
				addTreeOption("Southern Natal", '');
				addTreeOption("--- Albert Falls", '040315');
				addTreeOption("--- Donnybrook", '040316');
				addTreeOption("--- Fort Nottingham", '040317');
				addTreeOption("--- Franklin Marsh", '040318');
				addTreeOption("--- Giants Castle", '040319');
				addTreeOption("--- Hela-Hela", '040320');
				addTreeOption("--- Hlatikulu", '040321');
				addTreeOption("--- Impendle NR ", '040322');
				addTreeOption("--- Karkloof", '040324');
				addTreeOption("--- Matatiele", '040325');
				addTreeOption("--- Mhlopeni NR", '040326');
				addTreeOption("--- Midmar Dam", '040327');
				addTreeOption("--- Mount Currie NR", '040651');
				addTreeOption("--- Oribi Gorge NR", '040328');
				addTreeOption("--- Sani Pass", '040329');
				addTreeOption("--- Sappi-Stanger", '040354');
				addTreeOption("--- Umgeni Valley", '040330');
				addTreeOption("--- Umdoni Park", '040353');
				addTreeOption("--- Vernon Crookes NR", '040331');
				addTreeOption("--- Weza Forest", '040332');
				addTreeOption("Northern Natal", '');
				addTreeOption("--- Chelmsford Dam", '040433');
				addTreeOption("--- Ladysmith", '040435');
				addTreeOption("--- Spioenkop Dam", '040436');
				addTreeOption("--- Weenen NR", '040437');
				addTreeOption("Zululand", '');
				addTreeOption("---  Amatikulu NR", '040549');
				addTreeOption("--- Bonamanzi", '040538');
				addTreeOption("--- Eshowe ", '040539');
				addTreeOption("--- Hluhluwe/Umfolozi", '040540');
				addTreeOption("--- Itala NR", '040434');
				addTreeOption("--- Kosi Bay", '040548');
				addTreeOption("--- Mkuze", '040541');
				addTreeOption("--- Mtunzini", '040542');
				addTreeOption("--- Ndumo GR", '040543');
				addTreeOption("--- Ongoye Forest", '040544');
				addTreeOption("--- Phinda", '040550');
				addTreeOption("--- Pumulanga NR", '040556');
				addTreeOption("--- Richards Bay", '040545');
				addTreeOption("--- St Lucia Wetland Park", '040546');
				addTreeOption("--- Tembe Elephant Park", '040547');
				addTreeOption("--- Umvoti River Mouth", '040323');
				addTreeOption("--- Vryheid area", '040438');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Gauteng":
				clearTree();
				addTreeOption("GAUTENG", '');
				addTreeOption("Johannesburg", '');
				addTreeOption("--- Con Joubert Bird Park", '050101');
				addTreeOption("--- Northern Farm (Diepsloot)", '050102');
				addTreeOption("--- East Rand Pans", '050104');
				addTreeOption("--- Florence Bloom BS", '050105');
				addTreeOption("--- Krugersdorp GR", '050106');
				addTreeOption("--- Rondebult NR", '050108');
				addTreeOption("--- Witwatersrand Gardens", '050109');
				addTreeOption("Pretoria", '');
				addTreeOption("--- Austin Roberts BS", '050210');
				addTreeOption("--- Botanical Gardens", '050211');
				addTreeOption("--- Faerie Glen NR", '050212');
				addTreeOption("--- Moreletta Kloof", '050213');
				addTreeOption("--- Rietvleidam NR", '050214');
				addTreeOption("--- Tswaing (Soutpan)", '050216');
				addTreeOption("--- Wonderboom NR", '050217');
				addTreeOption("North-east Gauteng", '050723');
				addTreeOption("--- Buffelsdrif Conservancy", '050334');
				addTreeOption("--- Bronkhorstspruit Dam", '050419');
				addTreeOption("--- Ditholo NR", '050333');
				addTreeOption("--- Ezemvelo NR", '050722');
				addTreeOption("--- Roodeplaat Dam", '050215');
				addTreeOption("--- Seringveld Conservancy", '050332');
				addTreeOption("--- Zonderwater", '050724');
				addTreeOption("Southern Gauteng", '');
				addTreeOption("--- Abe Bailey NR", '050318');
				addTreeOption("--- Marievale", '050520');
				addTreeOption("--- Suikerbosrand NR", '050621');
				addTreeOption("--- Elandsvlei and Bapsfontein", '050232');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
				
			case "Limpopo Province":
				clearTree();
				addTreeOption("LIMPOPO PROVINCE", '');
				addTreeOption("Ben Lavin NR", '060101');
				addTreeOption("Blouberg NR", '060202');
				addTreeOption("Doorndraai Dam NR", '060303');
				addTreeOption("Entabeni Forest", '061010');
				addTreeOption("Hangklip Forest", '061111');
				addTreeOption("Hans Merensky NR", '061212');
				addTreeOption("Happy Rest", '060404');
				addTreeOption("Kruger NP", '060909');
				addTreeOption("Mabula GR", '061414');
				addTreeOption("Magoebaskloof", '060505');
				addTreeOption("Moletzie", '060606');
				addTreeOption("Mapungubwe", '061818');
				addTreeOption("Nylsvlei NR", '060707');
				addTreeOption("Pietersburg", '');
				addTreeOption("---  Pietersburg BS", '060810');
				addTreeOption("---  Pietersburg NR", '060808');
				addTreeOption("Roodewal NR", '061313');
				addTreeOption("Rust de Winter NR", '061717');
				addTreeOption("Tathe Vondo Forest", '061515');
				addTreeOption("The Downs", '061616');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
				
			case "North-West Province":
				clearTree();
				addTreeOption("NORTH-WEST PROVINCE", '');
				addTreeOption("Barberspan", '070101');
				addTreeOption("Borakalolo NR", '070202');
				addTreeOption("Faan Meintjies Nr", '070303');
				addTreeOption("Lichtenberg NR", '070404');
				addTreeOption("Madikwe GR", '070505');
				addTreeOption("Magaliesberg Mountains", '070606');
				addTreeOption("Pilanesberg NP", '070707');
				addTreeOption("Potchefstroom ", '070808');
				addTreeOption("Rustenburg NR", '070909');
				addTreeOption("Vaalkop Dam NR", '071010');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
				
			case "Mpumalanga":
				clearTree();
				addTreeOption("MPUMALANGA", '');
				addTreeOption("Blyde Canyon", '080101');
				addTreeOption("Crystal Springs", '080110');
				addTreeOption("Dullstroom", '080202');
				addTreeOption("Kaapsehoop", '080707');
				addTreeOption("Kruger NP", '080303');
				addTreeOption("Lydenburg NR", '080808');
				addTreeOption("Mount Sheba", '080909');
				addTreeOption("Nelspruit", '080404');
				addTreeOption("Peddlars Bush", '080505');
				addTreeOption("Wakkerstroom", '080606');
				addTreeOption("Wonderfontein Pans", '081111');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
				
			case "Free State":
				clearTree();
				addTreeOption("FREE STATE", '');
				addTreeOption("Bloemfontein Gardens", '090101');
				addTreeOption("Golden Gate", '090202');
				addTreeOption("Hagesdam", '091011');
				addTreeOption("Koppies Dam", '090303');
				addTreeOption("Memel", '091012');
				addTreeOption("Qwa Qwa NP", '090404');
				addTreeOption("Sandveld NR", '090505');
				addTreeOption("Soetdoring NR", '090606');
				addTreeOption("Sterkfontein Dam", '090909');
				addTreeOption("Tussen-die-Riviere NR", '091010');
				addTreeOption("Willem Pretorius GR", '090707');
				addTreeOption("Witsieshoek", '090808');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
				
			case "Namibia":
			case "NAMIBIA":
				clearTree();
				addTreeOption("NAMIBIA", '');
				addTreeOption("Aus", '100101');
				addTreeOption("Cunene", '100305');
				addTreeOption("Etosha", '100406');
				addTreeOption("Hobatere", '101212');
				addTreeOption("Impalila Island", '100211');
				addTreeOption("Katima Mulilo", '100202');
				addTreeOption("Kwando", '100203');
				addTreeOption("Mahango", '100204');
				addTreeOption("Omaruru", '101010');
				addTreeOption("Spitzkoppe", '100507');
				addTreeOption("Walvis Bay", '100608');
				addTreeOption("Waterberg", '100709');
				addTreeOption("Windhoek", '100810');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
			
			case "Botswana":
			case "BOTSWANA":
				clearTree();
				addTreeOption("BOTSWANA", '');
				addTreeOption("Chobe", '110101');
				addTreeOption("Gaborone", '110506');
				addTreeOption("Linyanti and Kwando Rivers", '110505');
				addTreeOption("Mabuasehube", '110508');
				addTreeOption("Nata", '110202');
				addTreeOption("Okavango", '110303');
				addTreeOption("Shakawe", '110404');
				addTreeOption("S.E.Botswana", '110507');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Zimbabwe":
			case "ZIMBABWE":
				clearTree();
				addTreeOption("ZIMBABWE", '');
				addTreeOption("Bulawayo", '120101');
				addTreeOption("Eastern Highlands", '');
				addTreeOption("--- Chimanimani", '120202');
				addTreeOption("--- Chipinge", '120203');
				addTreeOption("--- Honde Valley", '120204');
				addTreeOption("---  Mutare", '120208');
				addTreeOption("--- Nyanga", '120205');
				addTreeOption("--- Vumba", '120206');
				addTreeOption("Ewanrigg Bot Gardens", '120307');
				addTreeOption("Harare", '');
				addTreeOption("--- Mukivisi Woodlands", '120408');
				addTreeOption("--- Haka Game Park", '120409');
				addTreeOption("--- Marlborough Vlei", '120410');
				addTreeOption("--- Monavale Vlei", '120411');
				addTreeOption("Hwange NP", '120512');
				addTreeOption("Kariba", '120613');
				addTreeOption("Lake Muturikwe", '120714');
				addTreeOption("Mana Pools", '120815');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Swaziland":
			case "SWAZILAND":
				clearTree();
				addTreeOption("SWAZILAND", '');
				addTreeOption("Hlane GR", '130101');
				addTreeOption("Malolotja NR", '130202');
				addTreeOption("Mbuluzi GR", '130606');
				addTreeOption("Mkhaya NR", '130303');
				addTreeOption("Mlawula GR", '130404');
				addTreeOption("Mlilwane NR", '130505');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Mozambique":
			case "MOZAMBIQUE":
				clearTree();
				addTreeOption("MOZAMBIQUE", '');
				addTreeOption("Bazaruto", '140101');
				addTreeOption("Chinizua", '140102');
				addTreeOption("Casa Msika", '140103');
				addTreeOption("Gorongosa NP", '140104');
				addTreeOption("Gorongosa Mountain", '140105');
				addTreeOption("Inhambane area", '140106');
				addTreeOption("Maputo Special Res", '140108');
				addTreeOption("Mount Tsetsera", '140109');
				addTreeOption("Panda", '140110');
				addTreeOption("Rio Savane", '140111');
				addTreeOption("Rio Save Game Reserve", '140113');
				addTreeOption("Zambezi Delta area", '140112');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Lesotho":
			case "LESOTHO":
				clearTree();
				addTreeOption("LESOTHO", '');
				addTreeOption("Sani Pass", '150001');
				addTreeOption("Sehlabathebe NP", '150002');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;

			case "Zambia":
			case "ZAMBIA":
				clearTree();
				addTreeOption("ZAMBIA", '');
				addTreeOption("Birding Zambia", '160000');
				addTreeOption("Lochinvar", '160010');
				addTreeOption("Luangwa", '160020');
				addTreeOption("Kasanka", '160030');
				addTreeOption("Bangweulu", '160040');
				addTreeOption("Nyika", '160050');
				addTreeOption("Mwinilunga", '160060');
				addTreeOption("Sesheke", '160070');
				addTreeOption("Matobo NP", '120916');
				addTreeOption("McIlwaine Rec Park", '121017');
				addTreeOption("South-east Lowveld", '121118');
				addTreeOption("Victoria Falls", '121219');
				addTreeOption("<-- Back to Southern Africa...", 'Southern Africa');
				break;
		};
		
	} else {
		
		/* a spot has been clicked */
        for (spot in spots)
        {
            if (spots[spot].number==value)
            {
            	if (map.getZoom() < 9)
            	{
	            	map.setCenter(spots[spot].location, 9);
	            } else {
   	            	map.panTo(spots[spot].location);
	            };
	            break;
            };
        };
        
	};
};


function clickViewSpot()
{
	var treeElem = document.getElementById("tree");
	var value = treeElem.options[treeElem.selectedIndex].value;
	window.location.href = "../" + value + ".asp";
	
};

function clickViewGoogleEarth()
{
	var treeElem = document.getElementById("tree");
	var value = treeElem.options[treeElem.selectedIndex].value;
	window.location.href = "../kml/" + value + ".kml";
};