/*
* Defines which map slides belong with which map.
*/

// These are the map names as defined in the configuration file
var mapNames = new Array(4);
mapNames[0] = 'nreserves';
mapNames[1] = 'sssi';
mapNames[2] = 'int_sites';
mapNames[3] = 'bap'
mapNames[4] = 'geology';

// 1D array of slide images that are just for general stuff
var generalSlides = new Array();
// 1D array of slide captions that are just for general stuff
var generalCaptions = new Array();
generalSlides[0] = 'images/misc/misc_12939.jpg';
generalCaptions[0] = 'Honey fungus (Armillaria mellea), Vinney Ridge, New Forest. Peter Wakely';
generalSlides[1] = 'images/misc/misc_20285.jpg';
generalCaptions[1] = 'Yellow Marsh Saxifrage (Saxifraga hirculus). Peter Wakely';
generalSlides[2] = 'images/misc/misc_20453.jpg';
generalCaptions[2] = 'Spotted Catsear (Hypochaeris maculata). Peter Wakely';
generalSlides[3] = 'images/misc/misc_21169.jpg';
generalCaptions[3] = 'Hoary Plantain. Peter Wakely';
generalSlides[4] = 'images/misc/misc_21312.jpg';
generalCaptions[4] = 'Cross Leaved Heath (Erica tetralix). Peter Wakely';
generalSlides[5] = 'images/misc/misc_21520.jpg';
generalCaptions[5] = 'Red Tarn, Helvellyn and Fairfield SSSI. Peter Wakely';
generalSlides[6] = 'images/misc/misc_21701.jpg';
generalCaptions[6] = 'Sweet Chestnuts, Fishpool Valley SSSI. Peter Wakely';
generalSlides[7] = 'images/misc/misc_6164A.jpg';
generalCaptions[7] = 'Dahlia Anenome. F Dipper';
generalSlides[8] = 'images/misc/misc_6592a.jpg';
generalCaptions[8] = 'Seal Sands SSSI. Peter Wakely';
generalSlides[9] = 'images/misc/misc_7250.jpg';
generalCaptions[9] = 'Ashberry and Reins SSSI. Peter Wakely';
generalSlides[10] = 'images/misc/misc_7401A.jpg';
generalCaptions[10] = 'Rainbow over Kettlewell, River Wharfe SSSI. Peter Wakely';
generalSlides[11] = 'images/misc/misc_7931.jpg';
generalCaptions[11] = 'Bowber Meadows SSSI. Peter Wakely';
generalSlides[12] = 'images/misc/misc_7976.jpg';
generalCaptions[12] = 'From above Mickleton, Teesdale. Peter Wakely';
generalSlides[13] = 'images/misc/misc_8125.jpg';
generalCaptions[13] = 'Cherry Hill SSSI. Conservation headland with poppies. Peter Wakely';
generalSlides[14] = 'images/misc/misc_838.jpg';
generalCaptions[14] = 'Marsh Marigold. Peter Wakely';
generalSlides[15] = 'images/misc/misc_8540.jpg';
generalCaptions[15] = 'Rape field near Peterborough. Peter Wakely';
generalSlides[16] = 'images/misc/misc_8724.jpg';
generalCaptions[16] = 'Poppies in cereal field, near Ferrybridge. Peter Wakely';
generalSlides[17] = 'images/misc/misc_9074.jpg';
generalCaptions[17] = 'Field Eryngo (Eryngium campestre), Plymouth. Peter Wakely';
generalSlides[18] = 'images/misc/misc_9609.jpg';
generalCaptions[18] = 'Grass of Parnassus, Ainsdale. Peter Wakely';
generalSlides[19] = 'images/misc/misc_9933.jpg';
generalCaptions[19] = 'Humber Estuary SSSI, Welwick Saltmarsh. Peter Wakely';

// 2D array of slide images that are specific to the map
var mapSlides = new Array();
// 2D array of slide captions that are specific to the map
var mapCaptions = new Array();
// Nature reserves mapSlides
mapSlides[0] = new Array();
mapCaptions[0] = new Array();
mapSlides[0][0] = 'images/nreserves/nr_12221.jpg';
mapCaptions[0][0] = 'Wicken Fen SSSI, old brickpit, white waterlily. Peter Wakely';
mapSlides[0][1] = 'images/nreserves/nr_12263.jpg';
mapCaptions[0][1] = 'Knapweed broomrape (Orobanche elatior), Barnack NNR. Peter Wakely';
mapSlides[0][2] = 'images/nreserves/nr_18995.jpg';
mapCaptions[0][2] = 'Holme Fen NNR, wood and dyke. Peter Wakely';
mapSlides[0][3] = 'images/nreserves/nr_19599.jpg';
mapCaptions[0][3] = 'Bee orchid (Ophrys spheapodes), Hardington Moor NNR. Peter Wakely';
mapSlides[0][4] = 'images/nreserves/nr_19815.jpg';
mapCaptions[0][4] = 'Hamford Water NNR, boats at the white house. Peter Wakely';
mapSlides[0][5] = 'images/nreserves/nr_20101a.jpg';
mapCaptions[0][5] = 'Ashford Hangers NNR, SAC, beech/yew site. Peter Wakely';
mapSlides[0][6] = 'images/nreserves/nr_20440A.jpg';
mapCaptions[0][6] = 'Castor Hanglands NNR, reserve under deep frost. Peter Wakely';
mapSlides[0][7] = 'images/nreserves/nr_20843.jpg';
mapCaptions[0][7] = 'Humberhead Peatlands NNR. Peter Wakely';
mapSlides[0][8] = 'images/nreserves/nr_21578A.jpg';
mapCaptions[0][8] = 'Bassenthwaite Lake NNR. Peter Wakely';
mapSlides[0][9] = 'images/nreserves/nr_21851a.jpg';
mapCaptions[0][9] = 'Lullington Heath NNR, Erica cinerea sward. Peter Wakely';
// SSSI mapSlides
mapSlides[1] = new Array();
mapCaptions[1] = new Array();
mapSlides[1][0] = 'images/sssi/sssi_10153.jpg';
mapCaptions[1][0] = 'Itchen Valley Water Meadows SSSI, proposed route for M3 extension. Peter Wakely';
mapSlides[1][1] = 'images/sssi/sssi_10159.jpg';
mapCaptions[1][1] = 'Basingstoke Canal SSSI, Greywell, subject of two public enquiries. Peter Wakely';
mapSlides[1][2] = 'images/sssi/sssi_10388.jpg';
mapCaptions[1][2] = 'Beech fern. Peter Wakely';
mapSlides[1][3] = 'images/sssi/sssi_12017.jpg';
mapCaptions[1][3] = 'Cheddar Gorge SSSI, young ash wood. Peter Wakely';
mapSlides[1][4] = 'images/sssi/sssi_12629.jpg';
mapCaptions[1][4] = 'Exmoor National Park, view west across Horner-Holnicote Woods SSSI. Peter Wakely';
mapSlides[1][5] = 'images/sssi/sssi_13828.jpg';
mapCaptions[1][5] = 'Compton Down SSSI, sea pink near Compton Chine. Peter Wakely';
mapSlides[1][6] = 'images/sssi/sssi_15035.jpg';
mapCaptions[1][6] = 'River Nar SSSI, West Acre. Peter Wakely';
mapSlides[1][7] = 'images/sssi/sssi_15267.jpg';
mapCaptions[1][7] = 'Newbiggin Cresswell SSSI, Lynemouth colliery. Peter Wakely';
mapSlides[1][8] = 'images/sssi/sssi_15601.jpg';
mapCaptions[1][8] = 'Crag Lough, Roman Wall SSSI. Peter Wakely';
mapSlides[1][9] = 'images/sssi/sssi_16958.jpg';
mapCaptions[1][9] = 'Pevensey Levels SSSI. Peter Wakely';
mapSlides[1][10] = 'images/sssi/sssi_17205.jpg';
mapCaptions[1][10] = 'West Exmoor Coast and Woods SSSI, Valley of the Rocks. Peter Wakely';
mapSlides[1][11] = 'images/sssi/sssi_17311.jpg';
mapCaptions[1][11] = 'Wildlife enhancement scheme - Pevensey Levels SSSI, 6 month old scrape. Peter Wakely';
mapSlides[1][12] = 'images/sssi/sssi_18178.jpg';
mapCaptions[1][12] = 'Upper Thurne Broads and Marshes SSSI. Peter Wakely';
mapSlides[1][13] = 'images/sssi/sssi_18180a.jpg';
mapCaptions[1][13] = 'Upper Thurne Broads and Marshes SSSI, Phragmites marsh. Peter Wakely';
mapSlides[1][14] = 'images/sssi/sssi_18537a.jpg';
mapCaptions[1][14] = 'Ancient Oak, Sherwood Forest SSSI. Peter Wakely';
mapSlides[1][15] = 'images/sssi/sssi_18802.jpg';
mapCaptions[1][15] = 'River Wharfe SSSI, prior to gravel removal by YWA, near Kettlewell. Peter Wakely';
mapSlides[1][16] = 'images/sssi/sssi_18994.jpg';
mapCaptions[1][16] = 'Vixen Tor, North Dartmoor SSSI. Peter Wakely';
mapSlides[1][17] = 'images/sssi/sssi_18996.jpg';
mapCaptions[1][17] = 'Compton Down SSSI, abundant kidney retch. Peter Wakely';
mapSlides[1][18] = 'images/sssi/sssi_19036.jpg';
mapCaptions[1][18] = 'Mark ash wood, New Forest SSSI, holly growing from dead beech hulk. Peter Wakely';
mapSlides[1][19] = 'images/sssi/sssi_19380.jpg';
mapCaptions[1][19] = 'Chilbolton Common SSSI, River Test. Peter Wakely';
// BAP Slides
mapSlides[3] = new Array();
mapCaptions[3] = new Array();
mapSlides[3][0] = 'images/bap/bap_11425.jpg';
mapCaptions[3][0] = 'Wren\'s Nest NNR. Peter Wakely';
mapSlides[3][1] = 'images/bap/bap_12870.jpg';
mapCaptions[3][1] = 'Slapton Ley NNR, habitat of strapwort, north shore. Peter Wakely';
mapSlides[3][2] = 'images/bap/bap_13743.jpg';
mapCaptions[3][2] = 'Siccaridge Wood, dormouse habitat. Peter Wakely';
mapSlides[3][3] = 'images/bap/bap_18092.jpg';
mapCaptions[3][3] = 'The Lizard NNR, Bray\'s Cot pool. Peter Wakely';
mapSlides[3][4] = 'images/bap/bap_18841.jpg';
mapCaptions[3][4] = 'Walberswick NNR, Phragmites marsh. Peter Wakely';
mapSlides[3][5] = 'images/bap/bap_20145.jpg';
mapCaptions[3][5] = 'Savernake Forest SSSI, fallen limb from veteran oak provides new habitat. Peter Wakely';
mapSlides[3][6] = 'images/bap/bap_20623.jpg';
mapCaptions[3][6] = 'Adonis blue (Lysandra bellargus). Peter Wakely';
mapSlides[3][7] = 'images/bap/bap_20624.jpg';
mapCaptions[3][7] = 'Large skipper (Ochlodes venata). Peter Wakely';
mapSlides[3][8] = 'images/bap/bap_21724.jpg';
mapCaptions[3][8] = 'Donnington Park SSSI, deadwood invertebrate habitat. Peter Wakely';
mapSlides[3][9] = 'images/bap/bap_2413.jpg';
mapCaptions[3][9] = 'Nesting fulmars. R A Harris';
mapSlides[3][10] = 'images/bap/bap_2420.jpg';
mapCaptions[3][10] = 'Puffins. R A Harris';
mapSlides[3][11] = 'images/bap/bap_7200.jpg';
mapCaptions[3][11] = 'Blood star (Henricia oculata). Roger Mitchell';
mapSlides[3][12] = 'images/bap/bap_7338.jpg';
mapCaptions[3][12] = 'Large blue butterfly. Peter Wakely';
// Geological slides
mapSlides[4] = new Array();
mapCaptions[4] = new Array();
mapSlides[4][0] = 'images/geo/geo_10917.jpg';
mapCaptions[4][0] = 'North Norfolk Coast SSSI, Hunstanton cliffs. Peter Wakely';
mapSlides[4][1] = 'images/geo/geo_11277.jpg';
mapCaptions[4][1] = 'Hengistbury Head, Christchurch Harbour SSSI. Peter Wakely';
mapSlides[4][2] = 'images/geo/geo_12662.jpg';
mapCaptions[4][2] = 'Scar Close. Peter Wakely';
mapSlides[4][3] = 'images/geo/geo_13079.jpg';
mapCaptions[4][3] = 'Lulworth Cove. Peter Wakely';
mapSlides[4][4] = 'images/geo/geo_14960.jpg';
mapCaptions[4][4] = 'Gaitbarrows NNR. Peter Wakely';
mapSlides[4][5] = 'images/geo/geo_18778a.jpg';
mapCaptions[4][5] = 'Derbyshire Dales NNR, Lathkill Dale. Peter Wakely';
mapSlides[4][6] = 'images/geo/geo_19652.jpg';
mapCaptions[4][6] = 'Malham Arncliffe SSSI,, Gordale Scar. Peter Wakely';
mapSlides[4][7] = 'images/geo/geo_19706.jpg';
mapCaptions[4][7] = 'Malham Arncliffe SSSI, Catons Wes exclosure, 3rd year. Peter Wakely';
mapSlides[4][8] = 'images/geo/geo_19952.jpg';
mapCaptions[4][8] = 'Lancelot Clark Storth. Peter Wakely';
mapSlides[4][9] = 'images/geo/geo_21001a.jpg';
mapCaptions[4][9] = 'Saddle Tor SSSI, North Dartmoor. Peter Wakely';

// Find the array index for a given map name, or -1 if not found
function getMapIndex(map) {
	var index = -1;
	for (var i = 0; i < mapNames.length; i++) {
		if (mapNames[i] == map) index = i;
	}
	return index;
}

// Fetch a random internal array index for a given map
function getRandomImageIndex(map) {
	var i = -1;
	if (map && (map != '')) {
		i = getMapIndex(map);
	}
	// Fix for internationsl sites - make same as SSSIs
	if (i == 2) i = 1;
	if (i >= 0) {
		var slides = mapSlides[i];
		var slideIndex = Math.round(Math.random() * slides.length);
		if (slideIndex == slides.length) slideIndex = slides.length - 1;
		return slideIndex;
	}
	else {
		var slideIndex = Math.round(Math.random() * generalSlides.length);
		if (slideIndex == generalSlides.length) slideIndex = generalSlides.length - 1;
		return slideIndex;
	}
}

// Fetch the relative URL to an image at a given index for a given map
function getImage(map, slideIndex) {
	var i = -1;
	if (map && (map != '')) {
		i = getMapIndex(map);
	}
	// Fix for international sites - make same as SSSIs
	if (i == 2) {
		i = 1;
	}
	if (i >= 0) {
		return mapSlides[i][slideIndex];
	}
	else {
		return generalSlides[slideIndex];
	}
}

// Fetch the image caption at a given index for a given map
function getCaption(map, slideIndex) {
	var i = -1;
	if (map && (map != '')) {
		i = getMapIndex(map);
	}
	// Fix for internationsl sites - make same as SSSIs
	if (i == 2) {
		i = 1;
	}
	if (i >= 0) {
		return mapCaptions[i][slideIndex];
	}
	else {
		return generalCaptions[slideIndex];
	}
}

// Fetch the relative URL to an image generated at random
function getRandomImage(map) {
	var i = -1;
	if (map && (map != '')) {
		i = getMapIndex(map);
	}
	// Fix for internationsl sites - make same as SSSIs
	if (i == 2) i = 1;
	if (i >= 0) {
		var slides = mapSlides[i];
		var slideIndex = Math.round(Math.random() * slides.length);
		if (slideIndex == slides.length) slideIndex = slides.length - 1;
		return mapSlides[i][slideIndex];
	}
	else {
		var slideIndex = Math.round(Math.random() * generalSlides.length);
		if (slideIndex == generalSlides.length) slideIndex = generalSlides.length - 1;
		return generalSlides[slideIndex];
	}
}

function isDigit(c) {
	var digits = "1234567890";
	var isNumber = true;
	for (var i = 0; i < (c.length - 1); i++) {
		isNumber = (isNumber && (digits.indexOf(c.substring(i, i + 1)) != -1));
	}
	return isNumber;
}
			


