

var fromSta,toSta,whenDate

var testing
var fromIndex=0
var toIndex=0
var whenIndex=0
var whenValue="tba"
var whenOK=0
var fromSta="Bishops Lydeard"
var toSta="Minehead"
var whenDate="Sat 9 February"
var whenString="Off Peak"
var depResult=""
var returnFlag="off"
var qryResult=""         
var qryHeader=""
var finalResult=""
var adultReturn=""
var adultSingle=""
var childReturn=""
var childSingle=""
var childComment="[]"
var returnFare=""
var singleFare=""
var seniorReturn=""
var seniorSingle=""
var familyReturn=""
var familyComment=""
var comment=""
var specialComment=""

function checkDirection()
{
finalResult=""
qryResult=""
qryHeader=""
if ( whenValue == "tba" )
	{
	adultReturn="to be announced";
	adultSingle="to be announced";	
	seniorReturn="to be announced";
	seniorSingle="to be announced";
	childComment="";
	familyComment="";
	}
else if ( whenValue == "santa*" )
	{
	adultReturn="";
	adultSingle="";	
	seniorReturn="";
	seniorSingle="";
	childComment="";
	familyComment="";
	}
else
	{
	fares()
	}

if ( fromIndex == (9-toIndex) )
	{
	alert("From and To Stations are the Same!")
	}
else
	{

	if ( fromIndex < (9-toIndex) )
		{
		finalResult=""
		qryResult=""
		downArray()
		finalResult=qryHeader+qryResult
		var fromTmp=fromIndex
		var toTmp=toIndex
		fromIndex=9-toIndex
		toIndex=9-fromTmp
		
		upArray()	
		finalResult=finalResult+"\nReturn trains:\n"+qryResult
		displayResult()
		fromIndex=fromTmp
		toIndex=toTmp
		}
	else
		{
		finalResult=""
		qryResult=""
		upArray()
		finalResult=qryHeader+qryResult
		var fromTmp=fromIndex
		var toTmp=toIndex
		fromIndex=9-toIndex
		toIndex=9-fromTmp
				
		downArray()	
		finalResult=finalResult+"\nReturn trains:\n"+qryResult
		displayResult()
		fromIndex=fromTmp
		toIndex=toTmp
		}
	}
}


function downArray()
{

var dist = new Array();
dist[0] = "0"
dist[1] = "4"
dist[2] = "7"
dist[3] = "10"
dist[4] = "11"
dist[5] = "12"
dist[6] = "14"
dist[7] = "17"
dist[8] = "19"
dist[9] = "20"

if ( whenDate == "Wed 1 January" )
	{
	qryHeader="West Somerset Railway "+whenDate+" 2003 "
	}
else
	{
	qryHeader="West Somerset Railway  "+whenDate+" 2002 "	
	}

//qryHeader="West Somerset Railway  "+whenDate+" 2002 "
var distance = dist[(9-toIndex)]-dist[fromIndex]

//alert(whenValue);
if ( whenValue == "tba" )
	{
	var whenString = ""
	qryHeader =qryHeader + whenString
	}
else if ( whenValue == "earlyfeb" )
	{
	var whenString = "Minehead-Williton Specials"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 2 - 1
	var loco = new Array();
	loco[0] = "Steam Hauled"	
	loco[1] = "Steam Hauled"

	var ddeps = new Array();
	ddeps[0] = ("-----,-----")
	ddeps[1] = ("-----,-----")
	ddeps[2] = ("-----,-----")
	ddeps[3] = ("12.15, 2.50")
	ddeps[4] = ("-----,-----")
	ddeps[5] = ("12.23, 3.00")
	ddeps[6] = ("12.31, 3.08")
	ddeps[7] = ("12.38, 3.15")
	ddeps[8] = ("12.45, 3.22")
	ddeps[9] = ("12.51, 3.30")
	}
else if ( whenValue == "earlymar" )
	{
	var whenString = "Minehead-Williton Specials"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 1 - 1
	var loco = new Array();
	loco[0] = "Steam Hauled"	

	var ddeps = new Array();
	ddeps[0] = ("-----")
	ddeps[1] = ("-----")
	ddeps[2] = ("-----")
	ddeps[3] = (" 2.05")
	ddeps[4] = ("-----")
	ddeps[5] = (" 2.15")
	ddeps[6] = (" 2.23")
	ddeps[7] = (" 2.30")
	ddeps[8] = (" 2.37")
	ddeps[9] = (" 2.43")
	}
else if ( whenValue == "blue" )
	{
	var whenString = "Blue Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 4 - 1
	var loco = new Array();
	loco[0] = "Heritage Diesel"
	loco[1] = "Steam Hauled"
	loco[2] = "Heritage Diesel"
	loco[3] = "Steam Hauled"
	
	var ddeps = new Array();
	ddeps[0] = ("10.25,12.25, 2.35, 4.05")
	ddeps[1] = ("10.36,12.39, 2.45, 4.19")
	ddeps[2] = ("10.44,12.47, 2.53, 4.27")
	ddeps[3] = ("10.57,12.58, 3.07, 4.37")
	ddeps[4] = ("11.00, 1.01, 3.10, 4.40")
	ddeps[5] = ("11.04, 1.05, 3.14, 4.43")
	ddeps[6] = ("11.12, 1.14, 3.22, 4.52")
	ddeps[7] = ("11.19, 1.21, 3.29, 4.59")
	ddeps[8] = ("11.26, 1.28, 3.36, 5.06")
	ddeps[9] = ("11.32, 1.34, 3.42, 5.13")
	}
else if ( whenValue == "red" )
	{
	var whenString = "Red Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 4 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	
	var ddeps = new Array();
	ddeps[0] = ("10.25,12.25, 2.10, 4.05")
	ddeps[1] = ("10.40,12.40, 2.24, 4.19")
	ddeps[2] = ("10.48,12.47, 2.33, 4.28")
	ddeps[3] = ("11.00,12.59, 2.45, 4.39")
	ddeps[4] = ("11.04, 1.03, 2.48, 4.42")
	ddeps[5] = ("11.09, 1.07, 2.52, 4.46")
	ddeps[6] = ("11.17, 1.15, 3.00, 4.54")
	ddeps[7] = ("11.25, 1.22, 3.08, 5.02")
	ddeps[8] = ("11.32, 1.29, 3.14, 5.08")
	ddeps[9] = ("11.38, 1.36, 3.21, 5.15")	
	}
else if ( whenValue == "green" )
	{
	var whenString = "Green Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 7 - 1
	var loco = new Array();
	loco[0] = "(Heritage Diesel)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Heritage Diesel)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Heritage Diesel)"
	loco[6] = "(Steam Hauled)"
	
	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,-----,12.25, 2.10,-----, 4.05")
	ddeps[1] = (" 9.50,10.40,-----,12.40, 2.24,-----, 4.19")
	ddeps[2] = (" 9.57,10.48,-----,12.47, 2.33,-----, 4.28")
	ddeps[3] = ("10.08,11.00,12.05,12.59, 2.45, 3.45, 4.39")
	ddeps[4] = ("10.11,11.04,12.08, 1.03, 2.48, 3.48, 4.42")
	ddeps[5] = ("10.14,11.09,12.12, 1.07, 2.52, 3.52, 4.46")
	ddeps[6] = ("10.22,11.17,12.20, 1.15, 3.00, 4.00, 4.54")
	ddeps[7] = ("10.31,11.25,12.32, 1.22, 3.08, 4.11, 5.02")
	ddeps[8] = ("10.38,11.32,12.39, 1.29, 3.14, 4.17, 5.08")
	ddeps[9] = ("10.44,11.38,12.46, 1.36, 3.21, 4.24, 5.15")	
	}	
else if ( whenValue == "gold" )
	{
	var whenString = "Gold Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Heritage Diesel)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Heritage Diesel)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Steam Hauled)"

	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,11.30,12.25, 1.05, 2.10,-----, 4.05")
	ddeps[1] = (" 9.50,10.40,11.49,12.40, 1.25, 2.24,-----, 4.19")
	ddeps[2] = (" 9.57,10.48,11.57,12.47, 1.33, 2.33,-----, 4.28")
	ddeps[3] = ("10.08,11.00,12.05,12.59, 1.42, 2.45, 3.45, 4.39")
	ddeps[4] = ("10.11,11.04,12.08, 1.03, 1.46, 2.48, 3.48, 4.42")
	ddeps[5] = ("10.14,11.09,12.12, 1.07, 1.50, 2.52, 3.52, 4.46")
	ddeps[6] = ("10.22,11.17,12.20, 1.15, 1.58, 3.00, 4.00, 4.54")
	ddeps[7] = ("10.31,11.25,12.32, 1.22, 2.17, 3.08, 4.11, 5.02")
	ddeps[8] = ("10.38,11.32,12.39, 1.29, 2.24, 3.14, 4.17, 5.08")
	ddeps[9] = ("10.44,11.38,12.46, 1.36, 2.31, 3.21, 4.24, 5.15")	
	}
else if ( whenValue == "anything" )
	{
	var whenString = "Anything Goes Weekend 11,12 May 2002"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9
	var loco = new Array();
	loco[0] = "(DMU)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Diesel Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(DMU)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Steam Hauled)"
	loco[9] = "(Diesel Hauled)"
	
	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,11.10,11.50,12.45, 1.50, 2.25, 3.15, 4.10, 4.55")
	ddeps[1] = (" 9.53,10.39,11.24,12.10, 1.02, 2.04, 2.48, 3.33, 4.24, 5.13")
	ddeps[2] = ("10.00,10.46,11.32,12.18, 1.10, 2.12, 2.56, 3.41, 4.32, 5.21")
	ddeps[3] = ("10.09,10.56,11.46,12.38, 1.30, 2.21, 3.10, 4.00, 4.52, 5.42")
	ddeps[4] = ("10.12,10.59,11.49,12.41, 1.33, 2.23, 3.13, 4.03, 4.55, 5.45")
	ddeps[5] = ("10.16,11.03,11.53,12.45, 1.37, 2.28, 3.16, 4.06, 4.58, 5.48")
	ddeps[6] = ("10.24,11.11,12.01,12.53, 1.45, 2.36, 3.24, 4.14, 5.06, 5.56")
	ddeps[7] = ("10.31,11.23,12.12, 1.02, 1.52, 2.43, 3.36, 4.22, 5.13, 6.03")
	ddeps[8] = ("10.37,11.29,12.19, 1.08, 1.58, 2.50, 3.43, 4.28, 5.19, 6.09")
	ddeps[9] = ("10.43,11.36,12.25, 1.15, 2.05, 2.56, 3.49, 4.35, 5.26, 6.16")	
	}

else if ( whenValue == "silverfri" )
{
	var whenString = "Silver Jubilee Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 10;
	var loco = new Array();
	loco[0] = "Steam Hauled"	
	loco[1] = "Steam Hauled"
	loco[2] = "Steam Hauled"
	loco[3] = "Steam Hauled - Local"
	loco[4] = "Steam Hauled"
	loco[5] = "Steam Hauled - Local"
	loco[6] = "Steam Hauled"
	loco[7] = "Steam Hauled"
	loco[8] = "Steam Hauled - Local"
	loco[9] = "Steam Hauled"
	loco[10] = "Steam Hauled"

	var ddeps = new Array();
	ddeps[0] = (" 9.50,10.25,11.20,11.55,12.45,-----, 2.05, 3.25,-----, 4.55, 5.45")
	ddeps[1] = ("10.05,10.46,-----,12.18,12.59,-----, 2.19, 3.46,-----, 5.18, 6.05")
	ddeps[2] = ("10.13,10.53,-----,12.26, 1.07,-----, 2.27, 3.54,-----, 5.24, 6.13")
	ddeps[3] = ("10.22,11.10,11.53,12.34, 1.24, 1.45, 2.37, 4.10, 5.00, 5.47, 6.35")
	ddeps[4] = ("10.25,-----,-----,-----,-----, 1.48, 2.40,-----, 5.03,-----,-----")
	ddeps[5] = ("10.29,11.16,11.59,-----, 1.30, 1.52, 2.43, 4.16, 5.06, 5.53, 6.41")
	ddeps[6] = ("10.37,11.24.-----,-----, 1.38, 2.00, 2.51, 4.24, 5.14,-----, 6.49")
	ddeps[7] = ("10.45,11.32,12.14,-----,-----, 2.15, 3.01, 4.32, 5.25, 6.07, 6.56")
	ddeps[8] = ("10.52,11.39,12.21,-----,-----, 2.22, 3.07, 4.38, 5.33,-----, 7.03")
	ddeps[9] = ("10.58,11.45,12.27,-----, 1.55, 2.28, 3.13, 4.44, 5.39, 6.18, 7.08")
	}
else if ( whenValue == "silversat" )
	{
	var whenString = "Silver Jubilee Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 13;
	var loco = new Array();
	loco[0] = "Steam Hauled"	
	loco[1] = "Steam Hauled"
	loco[2] = "Steam Hauled"
	loco[3] = "Steam Hauled"
	loco[4] = "Steam Hauled"
	loco[5] = "Steam Hauled"
	loco[6] = "Steam Hauled"
	loco[7] = "Steam Hauled"
	loco[8] = "Steam Hauled"
	loco[9] = "Steam Hauled"
	loco[10] = "Steam Hauled"
	loco[11] = "Steam Hauled"
	loco[12] = "Steam Hauled"
	loco[13] = "Steam Hauled"

	var ddeps = new Array();
	ddeps[0] = (" 9.25,10.10,10.55,12.15,12n55, 1.45, 2.40, 3.30, 4.15,-----, 5n22, 6.20, 8.05,-----")
	ddeps[1] = (" 9.39,10.28,11.10,12.29, 1.20, 2.08, 2.58, 3.48, 4.33,-----, 5.45, 6.35, 8.19,-----")
	ddeps[2] = (" 9.47,10.36,11.18,12.37, 1.28, 2.17, 3.06, 3.56, 4.41,-----, 5.53, 6.43, 8.27,-----")
	ddeps[3] = (" 9.57,10.48,11.36,12.56, 1.46, 2.36, 3.25, 4.12, 4.49, 5.25, 6.15, 7.02, 8.40, 9.05")
	ddeps[4] = ("10.00,10.51,11.39, 1.00, 1.49, 2.39, 3.28,-----,-----, 5.28,-----,-----,-----,-----")
	ddeps[5] = ("10.04,10.54,11.43, 1.03, 1.53, 2.43, 3.31, 4.18,-----, 5.32, 6.21, 7.08,-----, 9.11")
	ddeps[6] = ("10.12,11.02.11.51, 1.11, 2.01, 2.51, 3.39,-----,-----, 5.40, 6.29, 7.15,-----, 9.19")
	ddeps[7] = ("10.25,11.10,11.58, 1.18, 2.10, 2.59, 3.50, 4.35,-----, 5.47, 6.36, 7.22,-----, 9.26")
	ddeps[8] = ("10.31,11.16,12.04, 1.24, 2.16, 3.05, 3.56, 4.41,-----, 5.53, 6.42, 7.28,-----, 9.32")
	ddeps[9] = ("10.37,11.23,12.11, 1.30, 2.22, 3.11, 4.02, 4.47,-----, 5.59, 6.48, 7.35, 9.11, 9.38")
}

else if ( whenValue == "silversun" )
	{
	var whenString = "Silver Jubilee Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 11;
	var loco = new Array();
	loco[0] = "Steam Hauled"	
	loco[1] = "Steam Hauled"
	loco[2] = "Steam Hauled"
	loco[3] = "Steam Hauled"
	loco[4] = "Steam Hauled"
	loco[5] = "Steam Hauled"
	loco[6] = "Steam Hauled"
	loco[7] = "Steam Hauled"
	loco[8] = "Steam Hauled"
	loco[9] = "Steam Hauled"
	loco[10] = "Steam Hauled"
	loco[11] = "Steam Hauled"

	var ddeps = new Array();
	ddeps[0] = (" 9.25,10.10,10.55,12n15,12n55, 1.45, 2.40, 3.30, 4.15,-----, 5.22, 6.20")
	ddeps[1] = (" 9.39,10.28,11.10,12.29, 1.20, 2.08, 2.58, 3.48, 4.33,-----, 5.45, 6.35")
	ddeps[2] = (" 9.47,10.36,11.18,12.37, 1.28, 2.17, 3.06, 3.56, 4.41,-----, 5.53, 6.43")
	ddeps[3] = (" 9.57,10.48,11.36,12.56, 1.46, 2.36, 3.25, 4.12, 4.49, 5.25, 6.15, 7.02")
	ddeps[4] = ("10.00,10.51,11.39, 1.00, 1.49, 2.39, 3.28,-----,-----, 5.28,-----,-----")
	ddeps[5] = ("10.04,10.54,11.43, 1.03, 1.53, 2.43, 3.31, 4.18,-----, 5.32, 6.21, 7.08")
	ddeps[6] = ("10.12,11.02.11.51, 1.11, 2.01, 2.51, 3.39,-----,-----, 5.40, 6.29, 7.15")
	ddeps[7] = ("10.25,11.10,11.58, 1.18, 2.10, 2.59, 3.50, 4.35,-----, 5.47, 6.36, 7.22")
	ddeps[8] = ("10.31,11.16,12.04, 1.24, 2.16, 3.05, 3.56, 4.41,-----, 5.53, 6.42, 7.28")
	ddeps[9] = ("10.37,11.23,12.11, 1.30, 2.22, 3.11, 4.02, 4.47,-----, 5.59, 6.48, 7.35")
	}
else if ( whenValue == "autumnfri" )
{
	var whenString = "Autumn Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 9;
	var loco = new Array();
	loco[0] = "Steam Hauled"	
	loco[1] = "Steam Hauled"
	loco[2] = "Steam Hauled"
	loco[3] = "Steam Hauled"
	loco[4] = "Steam Hauled"
	loco[5] = "Steam Hauled"
	loco[6] = "Steam Hauled"
	loco[7] = "Steam Hauled"
	loco[8] = "Steam Hauled"
	loco[9] = "Steam Hauled"

	var ddeps = new Array();
	ddeps[0] = ("10.10,10.50,11.43,12.35,-----,-----, 2.05,-----, 3.35, 5.00")
	ddeps[1] = ("10.26,11.16,12.01,12.49,-----,-----, 2.21,-----, 3.49, 5.15")
	ddeps[2] = ("10.34,11.24,-----,12.57,-----,-----, 2.30,-----, 3.57, 5.23")
	ddeps[3] = ("10.49,11.40,12.17, 1.07,-----,-----, 2.45,-----, 4.07, 5.34")
	ddeps[4] = ("10.52,11.43,-----, 1.10,-----,-----, 2.48,-----, 4.10, 5.37")
	ddeps[5] = ("10.56,11.46,12.23, 1.14,-----,-----, 2.52,-----, 4.14, 5.41")
	ddeps[6] = ("11.04,11.54.-----, 1.22,-----,-----, 3.00,-----, 4.22, 5.49")
	ddeps[7] = ("11.11,12.01,12.37, 1.29, 1.45, 2.50, 3.07, 4.10, 4.29, 5.56")
	ddeps[8] = ("11.17,12.07,12.44, 1.36, 1.52, 2.57, 3.13, 4.17, 4.35, 6.02")
	ddeps[9] = ("11.24,12.13,12.50, 1.42, 1.58, 3.03, 3.19, 4.23, 4.42, 6.09")
	}
else if ( whenValue == "autumnsatsun" )
	{
	var whenString = "Autumn Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 9;
	var loco = new Array();
	loco[0] = "Steam Hauled"	
	loco[1] = "Steam Hauled"
	loco[2] = "Steam Hauled"
	loco[3] = "Steam Hauled"
	loco[4] = "Steam Hauled"
	loco[5] = "Steam Hauled"
	loco[6] = "Steam Hauled"
	loco[7] = "Steam Hauled"
	loco[8] = "Steam Hauled"
	loco[9] = "Steam Hauled"

	var ddeps = new Array();
	ddeps[0] = (" 9.30,10.12,10.55,11.45,12,45, 2.05, 2.55, 3.40, 4.30, 5.20")
	ddeps[1] = (" 9.44,10.30,11.16,12.05,12.54, 2.24, 3.11, 4.02, 4.52, 5.40")
	ddeps[2] = (" 9.52,10.39,11.24,-----, 1.02, 2.33, 3.19, 4.10,-----, 5.49")
	ddeps[3] = ("10.03,10.53,11.43,12.21, 1.12, 2.46, 3.37, 4.27, 5.17, 6.07")
	ddeps[4] = ("10.07,10.56,11.46,-----, 1.15, 2.49, 3.39, 4.30,-----, 6.10")
	ddeps[5] = ("10.10,11.00,11.49,12.27, 1.19, 2.53, 3.44, 4.34,-----, 6.14")
	ddeps[6] = ("10.18,11.08.11.57,-----, 1.27, 3.01, 3.52, 4.42,-----, 6.22")
	ddeps[7] = ("10.27,11.22,12.04,12.41, 1.34, 3.08, 3.59, 4.49, 5.37, 6.29")
	ddeps[8] = ("10.33,11.28,12.12,12.48, 1.41, 3.14, 4.06, 4.55,-----, 6.35")
	ddeps[9] = ("10.40,11.34,12.17,12.54, 1.47, 3.20, 4.13, 5.02, 5.49, 6.42")
}

else if ( whenValue == "thomas" )
	{
	var whenString = "Day Out with Thomas"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Duck's Train)"
	loco[1] = "(Henry's Train)"
	loco[2] = "(Sodor Express)"
	loco[3] = "(Daisy the Diesel)"
	loco[4] = "(The 1240)"	
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Daisy the Diesel)"
	loco[7] = "(Steam Hauled)"
	
	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,11.10,11.50,12.40, 1.40, 3.05, 4.00")
	ddeps[1] = (" 9.53,10.39,11.24,12.10,12.59, 1.54, 3.25, 4.13")
	ddeps[2] = ("-----,10.46,-----,12.18, 1.08, 2.02, 3.32, 4.21")
	ddeps[3] = ("10.09,10.56,11.46,12.38, 1.18, 2.11, 3.51, 4.36")
	ddeps[4] = ("-----,-----,-----,-----,-----,-----,-----,-----")
	ddeps[5] = ("10.16,11.03,11.53,12.45, 1.25, 2.18, 3.58, 4.42")
	ddeps[6] = ("10.24,11.11,12.01,12.53, 1.33, 2.26, 4.06, 4.50")
	ddeps[7] = ("10.31,11.23,12.12, 1.01, 1.41, 2.34, 4.14, 4.57")
	ddeps[8] = ("-----,11.29,12.19, 1.07, 1.47, 2.40, 4.21, 5.03")
	ddeps[9] = ("10.43,11.36,12.25, 1.13, 1.53, 2.46, 4.28, 5.11")
	}
else if ( whenValue == "santas" )
	{
	var whenString = "Santa Specials"
	qryHeader=qryHeader+whenString+"\n"
	qryResult="Reservations strongly recommended.\nRing 01643 704996 for full details"
	}

else if ( whenValue == 32 )
	{
	var whenString = "21st Anniversary Sunday 11 June 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Diesel)"
	loco[7] = "(Steam Hauled)"
	
	var ddeps = new Array();
	ddeps[0] = (" 8.45, 9.40,10.43,12.00, 1.30, 3.02, 4.25, 6.40")
	ddeps[1] = (" 8.58, 9.55,10.59,12.15, 1.44, 3.17, 4.40, 6.55")
	ddeps[2] = ("-----,10.03,11.06,12.23, 1.53, 3.25, 4.48,-----")
	ddeps[3] = ("-----,10.14,11.18,12.35, 2.05, 3.36, 4.59, 7.15")
	ddeps[4] = ("-----,10.17,11.21,-----,-----, 3.40, 5.02,-----")
	ddeps[5] = ("-----,10.20,11.24,12.43, 2.12, 3.44, 5.06, 7.23")
	ddeps[6] = ("-----,10.29,11.32,12.51, 2.20, 3.53, 5.15, 7.32")
	ddeps[7] = ("-----,10.39,11.40, 1.01, 2.32, 4.02, 5.26, 7.41")
	ddeps[8] = ("-----,10.44,11.46, 1.08, 2.40, 4.09, 5.33,-----")
	ddeps[9] = ("-----,10.50,11.52, 1.15, 2.47, 4.16, 5.40, 7.54")	
	}

else if ( whenValue == 33 )
	{
	var whenString = "Teddy Bears Picnic Saturday 4 June 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Diesel)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Diesel)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Diesel)"
	loco[8] = "(Diesel)"

	var ddeps = new Array();
	ddeps[0] = ("10.25,11.35,12.25, 1.30, 2.10, 3.20, 4.05, 5.15, 6.10")
	ddeps[1] = ("10.39,-----,12.39,-----, 2.24,-----, 4.19,-----, 6.21")
	ddeps[2] = ("10.47,11.53,12.47, 1.48, 2.33, 3.37, 4.28, 5.35, 6.30")
	ddeps[3] = ("10.57,-----,12.58,-----, 2.45,-----, 4.39,-----, 6.40")
	ddeps[4] = ("11.00,-----, 1.01,-----, 2.48,-----, 4.42,-----,-----")
	ddeps[5] = ("11.04,-----, 1.05,-----, 2.52,-----, 4.46,-----,-----")
	ddeps[6] = ("11.12,-----, 1.14,-----, 3.00,-----, 4.54,-----,-----")
	ddeps[7] = ("11.19,-----, 1.21,-----, 3.08,-----, 5.02,-----,-----")
	ddeps[8] = ("11.26,-----, 1.28,-----, 3.14,-----, 5.08,-----,-----")
	ddeps[9] = ("11.32,-----, 1.34,-----, 3.21,-----, 5.15,-----, 7.10")	
	}

else if ( whenValue == 34 )
	{
	var whenString = "Teddy Bears Picnic Sunday 4 June 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Diesel)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Diesel)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Diesel)"

	var ddeps = new Array();
	ddeps[0] = ("10.25,11.35,12.25, 1.30, 2.10, 3.20, 4.05, 5.15")
	ddeps[1] = ("10.39,-----,12.39,-----, 2.24,-----, 4.19,-----")
	ddeps[2] = ("10.47,11.53,12.47, 1.48, 2.33, 3.37, 4.28, 5.35")
	ddeps[3] = ("10.57,-----,12.58,-----, 2.45,-----, 4.39,-----")
	ddeps[4] = ("11.00,-----, 1.01,-----, 2.48,-----, 4.42,-----")
	ddeps[5] = ("11.04,-----, 1.05,-----, 2.52,-----, 4.46,-----")
	ddeps[6] = ("11.12,-----, 1.14,-----, 3.00,-----, 4.54,-----")
	ddeps[7] = ("11.19,-----, 1.21,-----, 3.08,-----, 5.02,-----")
	ddeps[8] = ("11.26,-----, 1.28,-----, 3.14,-----, 5.08,-----")
	ddeps[9] = ("11.32,-----, 1.34,-----, 3.21,-----, 5.15,-----")	
	}

else if ( whenValue == 40 )
	{
	var whenString = "Diesel Running Weekend 20 and 21 May 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 7- 1
	var loco = new Array();
	loco[0] = "(Heritage Diesel)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Heritage Diesel)"
	loco[4] = "(Heritage Diesel)"
	loco[5] = "(Heritage Diesel)"
	loco[6] = "(Steam Hauled)"
	
	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,12.25, 1.45, 2.35,-----, 4.05")
	ddeps[1] = (" 9.50,10.36,12.40, 1.56, 2.45,-----, 4.19")
	ddeps[2] = (" 9.57,10.44,12.47,-----, 2.53,-----, 4.27")
	ddeps[3] = ("10.06,10.57,12.59, 2.16, 3.07, 3.50, 4.37")
	ddeps[4] = ("-----,11.00, 1.03,-----, 3.10,-----, 4.40")
	ddeps[5] = ("10.11,11.04, 1.07, 2.20, 3.14, 3.55, 4.43")
	ddeps[6] = ("10.19,11.12, 1.15,-----, 3.21,-----, 4.52")
	ddeps[7] = ("10.31,11.19, 1.22, 2.42, 3.28, 4.15, 4.59")
	ddeps[8] = ("10.37,11.26, 1.29, 2.48, 3.36, 4.21, 5.05")
	ddeps[9] = ("10.43,11.32, 1.36, 2.54, 3.42, 4.27, 5.11")
}


else if ( whenValue == "sixties" )
	{
	var whenString = "1960s Weekend"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 10 - 1
	var loco = new Array();
	loco[0] = "(Heritage Diesel)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Heritage Diesel)"
	loco[4] = "(Steam Hauled)"	
	loco[5] = "(Heritage Diesel)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Heritage Diesel)"
	loco[8] = "(Steam Hauled)"
	loco[9] = "(Heritage Diesel)"
	
	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,-----,11.20,12.25, 1.05, 2.10, 3.00, 4.05, 5.35")
	ddeps[1] = (" 9.50,10.40,-----,11.40,12.40, 1.25, 2.24, 3.20, 4.19, 5.55")
	ddeps[2] = (" 9.57,10.48,-----,11.48,12.47, 1.33, 2.33, 3.28, 4.28,-----")
	ddeps[3] = ("10.06,11.00,-----,12.05,12.59, 1.50, 2.45, 3.45, 4.39, 6.15")
	ddeps[4] = ("10.09,11.04,-----,12.08, 1.03, 1.53, 2.48, 3.48, 4.42,-----")
	ddeps[5] = ("10.12,11.09,-----,12.12, 1.07, 1.57, 2.52, 3.52, 4.46,-----")
	ddeps[6] = ("10.20,11.17,-----,12.20, 1.15, 2.05, 3.00, 4.00, 4.54,-----")
	ddeps[7] = ("10.31,11.25,12.00,12.32, 1.22, 2.20, 3.08, 4.11, 5.02,-----")
	ddeps[8] = ("10.38,11.32,12.08,12.39, 1.29, 2.27, 3.14, 4.17, 5.08,-----")
	ddeps[9] = ("10.44,11.38,12.19,12.46, 1.36, 2.34, 3.21, 4.24, 5.15, 6.45")
	}

else if ( whenValue == 62 )
	{
	var whenString = "Beer Festival - Saturday 2 September 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9 - 1
	var loco = new Array();
	loco[0] = "(Heritage Diesel)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Heritage Diesel)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Heritage Diesel)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Heritage Diesel)"
	loco[8] = "(Heritage Diesel)"
	
	var ddeps = new Array();
	ddeps[0] = (" 9.40,10.25,-----,12.25, 2.10,-----, 4.05, 6.45,-----")
	ddeps[1] = (" 9.50,10.40,-----,12.40, 2.24,-----, 4.19, 6.55,-----")
	ddeps[2] = (" 9.57,10.48,-----,12.47, 2.33,-----, 4.28, 7.02,-----")
	ddeps[3] = ("10.06,11.00,12.05,12.59, 2.45, 3.45, 4.39, 7.11, 9.35")
	ddeps[4] = ("10.09,11.04,12.08, 1.03, 2.48, 3.48, 4.42,-----,-----")
	ddeps[5] = ("10.12,11.09,12.12, 1.07, 2.52, 3.52, 4.46, 7.17, 9.41")
	ddeps[6] = ("10.20,11.17,12.20, 1.15, 3.00, 4.00, 4.54, 7.24, 9.48")
	ddeps[7] = ("10.31,11.25,12.32, 1.22, 3.08, 4.11, 5.02, 7.31, 9.55")
	ddeps[8] = ("10.38,11.32,12.39, 1.29, 3.14, 4.17, 5.08, 7.38,10.01")
	ddeps[9] = ("10.44,11.38,12.46, 1.36, 3.21, 4.24, 5.15, 7.44,10.07")	
	}	
else if ( whenValue == 60 )
	{
	var whenString = "Autumn Steam Gala  "
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"	
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Steam Hauled)"


	var ddeps = new Array();
	ddeps[0] = (" 9.25,10.10,11.10,12.10,12.55, 1.55, 2.45, 3.40, 5.15")
	ddeps[1] = (" 9.39,10.24,11.24,12.23,-----, 2.18, 3.05, 3.56, 5.30")
	ddeps[2] = (" 9.47,10.32,11.32,11.32,-----, 2.27, 3.15, 4.05, 5.39")
	ddeps[3] = (" 9.58,10.45,11.46,12.44, 1.33, 2.43, 3.33, 4.23, 5.53")
	ddeps[4] = ("10.01,10.48,11.49,12.47,-----, 2.46, 3.36, 4.26,-----")
	ddeps[5] = ("10.04,10.52,11.53,12.51,-----, 2.49, 3.40, 4.30, 5.59")
	ddeps[6] = ("10.12,11.00,12.03,12.59,-----, 2.57, 3.48, 4.38, 6.07")
	ddeps[7] = ("10.19,11.15,12.14, 1.08,-----, 3.04, 3.55, 4.47, 6.15")
	ddeps[8] = ("10.26,11.21,12.22, 1.14,-----, 3.11, 4.01, 4.53, 6.21")
	ddeps[9] = ("10.33,11.28,12.28, 1.21, 2.02, 3.17, 4.08, 5.00, 6.27")	
	}
else if ( whenValue == 61 )
	{
	var whenString = "Autumn Steam Gala"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 10 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"	
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Steam Hauled)"
	loco[9] = "(Steam Hauled)"

	var ddeps = new Array();
	ddeps[0] = (" 9.25,10.10,11.10,12.10,12.55, 1.55, 2.45, 3.40, 5.15, 9.15")
	ddeps[1] = (" 9.39,10.24,11.24,12.23,-----, 2.18, 3.05, 3.56, 5.30,-----")
	ddeps[2] = (" 9.47,10.32,11.32,12.32,-----, 2.27, 3.15, 4.05, 5.39,-----")
	ddeps[3] = (" 9.58,10.45,11.46,12.44, 1.33, 2.43, 3.33, 4.23, 5.53, 9.45")
	ddeps[4] = ("10.01,10.48,11.49,12.47,-----, 2.46, 3.36, 4.26,-----,-----")
	ddeps[5] = ("10.04,10.52,11.53,12.51,-----, 2.49, 3.40, 4.30, 5.59, 9.52")
	ddeps[6] = ("10.12,11.00,12.03,12.59,-----, 2.57, 3.48, 4.38, 6.07,10.01")
	ddeps[7] = ("10.19,11.15,12.14, 1.08,-----, 3.04, 3.55, 4.47, 6.15,10.08")
	ddeps[8] = ("10.26,11.21,12.22, 1.14,-----, 3.11, 4.01, 4.53, 6.21,-----")
	ddeps[9] = ("10.33,11.28,12.28, 1.21, 2.02, 3.17, 4.08, 5.00, 6.27,10.20")	
	}

		
else if ( whenValue == 90 )
	{
	var whenString = "Santa Specials"
	qryHeader=qryHeader+whenString+"\n"
	qryResult="Details not available. Ring 01643 704996."
	}

var start = 0;
var end = 5;
var detail="";
qryResult="";
for (var i=0; i<=num_of_departures;i++)
	{
	num = i + 1
	var dep = ddeps[fromIndex].substring(start,end)
	var arr = ddeps[(9-toIndex)].substring(start,end)		
	var comment = ""
if ( dep.substring(2,3) == "n" )
	{ var comment = "  Note: starts at Norton Fitzwarren" }
if ( dep.substring(2,3) == "t" )
	{ var comment = "  Note: train terminates" }	
if ( dep == "-----" || arr == "-----" )
	{
	detail = ""
	}
else 
	{
	detail = "Depart at\t"+dep+"\tand arrive at "+arr+"\t"+loco[i]+" "+comment+"\n"
	}
qryResult=qryResult+detail
start = start + 6
end = start + 5
	}

	finalresult=qryHeader+qryResult+"\n"
}

function displayResult()
{

if ( fromSta == "Doniford Halt" || toSta == "Doniford Halt" )
	{
	finalResult=finalResult+"\nNOTE: Doniford Halt is a Request Halt\nTo board a train, please give a clear hand signal to the driver\nTo alight, please inform the guard"
	}

if ( whenValue == "tba" )
	{
	finalResult="\n Details for " + whenDate + " 2002 not yet available...";
	}
else if ( whenValue == "dummy" )
	{
	finalResult="\n No date selected";
	}
else if ( whenValue == "santa" )
	{
	finalResult="\nSanta Trains. \nPlease ring 01643 704996 for details or check out the Santa Specials pages on this web site";
	}
else
	{
	finalResult=finalResult+"\nFares:\nAdult Return £"+adultReturn+"  Single £"+adultSingle+"\n"+childComment+"\nSenior Citizen Return £"+seniorReturn+"  Single £"+seniorSingle+"\n"+familyComment+"\n"+specialComment+"\n"
	}
document.ttQuery.result.value=(finalResult)
document.print=(finalResult)
}

function upArray()
{

var dist = new Array();
dist[0] = "20"
dist[1] = "16"
dist[2] = "13"
dist[3] = "10"
dist[4] = "9"
dist[5] = "8"
dist[6] = "6"
dist[7] = "3"
dist[8] = "1"
dist[9] = "0"


if ( whenDate == "Wed 1 January" )
	{
	qryHeader="West Somerset Railway "+whenDate+" 2003 "
	}
else
	{
	qryHeader="West Somerset Railway  "+whenDate+" 2002 "	
	}
var distance = dist[(9-toIndex)]-dist[fromIndex]

if ( whenValue == "tba" )
	{
	var whenString = ""
	qryHeader =qryHeader + whenString
	}
else if ( whenValue == "earlyfeb" )
	{
	var whenString = "Minehead-Williton Specials"
	qryHeader=qryHeader + " Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 2 - 1
	var loco = new Array();
	loco[0] = "Steam Hauled";
	loco[1] = "Steam Hauled";		

	var udeps = new Array();
	udeps[0] = ("11.15, 2.00")
	udeps[1] = ("11.21, 2.06")
	udeps[2] = ("11.29, 2.14")
	udeps[3] = ("11.38, 2.23")
	udeps[4] = ("11.46, 2.30")
	udeps[5] = ("-----,-----")
	udeps[6] = ("11.53, 2.36")
	udeps[7] = ("-----,-----")
	udeps[8] = ("-----,-----")
	udeps[9] = ("-----,-----")
	}
else if ( whenValue == "earlymar" )
	{
	var whenString = "Minehead-Williton Specials"
	qryHeader=qryHeader + " Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 1 - 1
	var loco = new Array();
	loco[0] = "Steam Hauled";		

	var udeps = new Array();
	udeps[0] = (" 1.15")
	udeps[1] = (" 1.21")
	udeps[2] = (" 1.29")
	udeps[3] = (" 1.38")
	udeps[4] = (" 1.45")
	udeps[5] = ("-----")
	udeps[6] = (" 1.51")
	udeps[7] = ("-----")
	udeps[8] = ("-----")
	udeps[9] = ("-----")
	}
else if ( whenValue == "blue" )
	{
	var whenString = "Blue Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 4 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Heritage Diesel)"
	
	var udeps = new Array();
	udeps[0] = ("10.15,12.15, 2.25, 4.00")
	udeps[1] = ("10.21,12.21, 2.31, 4.06")
	udeps[2] = ("10.29,12.29, 2.39, 4.12")
	udeps[3] = ("10.38,12.38, 2.48, 4.20")
	udeps[4] = ("10.46,12.46, 2.56, 4.28")
	udeps[5] = ("10.50,12.50, 3.00, 4.32")
	udeps[6] = ("10.58,12.58, 3.06, 4.40")
	udeps[7] = ("11.09, 1.09, 3.17, 4.49")
	udeps[8] = ("11.19, 1.16, 3.27, 4.56")
	udeps[9] = ("11.29, 1.26, 3.37, 5.06")
	}	
else if ( whenValue == "red" )
	{
	var whenString = "Red Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 4 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	
	var udeps = new Array();
	udeps[0] = ("10.15,12.15, 2.00, 3.55")
	udeps[1] = ("10.21,12.21, 2.06, 4.01")
	udeps[2] = ("10.29,12.30, 2.15, 4.10")
	udeps[3] = ("10.38,12.39, 2.24, 4.19")
	udeps[4] = ("10.46,12.48, 2.34, 4.28")
	udeps[5] = ("10.50,12.51, 2.38, 4.32")
	udeps[6] = ("10.58,12.58, 2.45, 4.39")
	udeps[7] = ("11.09, 1.10, 2.57, 4.51")
	udeps[8] = ("11.19, 1.20, 3.07, 5.01")
	udeps[9] = ("11.29, 1.30, 3.17, 5.11")	
	}
else if ( whenValue == "green" )
	{
	var whenString = "Green Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 7 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Heritage Diesel)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Heritage Diesel)"	
	
	var udeps = new Array();
	udeps[0] = ("10.15,11.10,12.15, 2.00, 2.50, 3.55, 5.30")
	udeps[1] = ("10.21,11.16,12.21, 2.06, 2.56, 4.01, 5.36")
	udeps[2] = ("10.29,11.31,12.30, 2.15, 3.11, 4.10, 5.42")
	udeps[3] = ("10.38,11.39,12.39, 2.24, 3.20, 4.19, 5.50")
	udeps[4] = ("10.46,11.47,12.48, 2.34, 3.28, 4.28, 5.58")
	udeps[5] = ("10.50,11.50,12.51, 2.38, 3.31, 4.32, 6.01")
	udeps[6] = ("10.58,11.54,12.58, 2.45, 3.34, 4.39, 6.04")
	udeps[7] = ("11.09,-----, 1.10, 2.57,-----, 4.51, 6.13")
	udeps[8] = ("11.19,-----, 1.20, 3.07,-----, 5.01, 6.21")
	udeps[9] = ("11.29,-----, 1.30, 3.17,-----, 5.11, 6.31")	
	}	
else if ( whenValue == "gold" )
	{
	var whenString = "Gold Dates"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"	
	loco[7] = "(Heritage Diesel)"

	var udeps = new Array();
	udeps[0] = ("10.15,11.10,12.15, 2.00, 2.50, 3.55, 4.45, 5.30")
	udeps[1] = ("10.21,11.16,12.21, 2.06, 2.56, 4.01, 4.51, 5.36")
	udeps[2] = ("10.30,11.31,12.30, 2.15, 3.11, 4.10, 5.05, 5.42")
	udeps[3] = ("10.38,11.39,12.39, 2.24, 3.20, 4.19, 5.14, 5.50")
	udeps[4] = ("10.46,11.47,12.48, 2.34, 3.28, 4.28, 5.22, 5.58")
	udeps[5] = ("10.50,11.50,12.51, 2.38, 3.31, 4.32, 5.25, 6.01")
	udeps[6] = ("10.58,12.07,12.58, 2.45, 3.34, 4.39, 5.30, 6.04")
	udeps[7] = ("11.09,12.16, 1.10, 2.57,-----, 4.51, 5.42, 6.13")
	udeps[8] = ("11.19,12.40, 1.20, 3.07,-----, 5.01, 5.52, 6.21")
	udeps[9] = ("11.29,12.50, 1.30, 3.17,-----, 5.11, 6.02, 6.31")	
	}	
else if ( whenValue == "silverfri" )
	{
	var whenString = "Silver Jubilee Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9
	var loco = new Array();
	loco[0] = "Steam Hauled";
	loco[1] = "Steam Hauled - Local";
	loco[2] = "Steam Hauled";
	loco[3] = "Steam Hauled";
	loco[4] = "Steam Hauled";
	loco[5] = "Steam Hauled";
	loco[6] = "Steam Hauled - Local";
	loco[7] = "Steam Hauled";
	loco[8] = "Steam Hauled";
	loco[9] = "Steam Hauled";
	

	var udeps = new Array();
	udeps[0] = (" 9.40,10.25,11.15,12.45, 1.57, 2.45, 3.30, 4.15, 5.10, 5.50")
	udeps[1] = (" 9.46,10.31,11.21,12.51,-----, 2.51, 3.36, 4.21,-----, 5.56")
	udeps[2] = (" 9.53,10.46,11.33,12.59,-----, 3.01, 3.44, 4.33,-----, 6.10")
	udeps[3] = ("10.01,10.54,-----, 1.07,-----, 3.09, 3.52, 4.41,-----, 6.18")
	udeps[4] = ("10.09,11.02,11.47, 1.15, 2.24, 3.17, 4.00, 4.48, 5.37, 6.26")
	udeps[5] = ("10.12,11.05,-----, 1.18,-----, 3.20, 4.03,-----,-----,-----")
	udeps[6] = ("10.24,11.10,11.55, 1.22, 2.38, 3.24, 4.07, 4.55, 5.44, 6.34")
	udeps[7] = ("10.35,11.21,-----, 1.33,-----, 3.35,-----, 5.06,-----, 6.45")
	udeps[8] = ("10.44,11.35,12.16, 1.42,-----, 3.45,-----, 5.15, 6.02, 6.54")
	udeps[9] = ("10.54,11.45,12.26, 1.52, 3.07, 3.55,-----, 5.25, 6.12, 7.04")
	}
else if ( whenValue == "silversat" )
	{
	var whenString = "Silver Jubilee Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 12
	var loco = new Array();
	loco[0] = "Steam Hauled";
	loco[1] = "Steam Hauled";
	loco[2] = "Steam Hauled";
	loco[3] = "Steam Hauled";
	loco[4] = "Steam Hauled";
	loco[5] = "Steam Hauled";
	loco[6] = "Steam Hauled";
	loco[7] = "Steam Hauled";
	loco[8] = "Steam Hauled";
	loco[9] = "Steam Hauled";
	loco[10] = "Steam Hauled";
	loco[11] = "Steam Hauled";
	loco[12] = "Steam Hauled";


	var udeps = new Array();
	udeps[0] = (" 9.20,10.10,10.55,12.13, 1.00, 1.55, 2.45, 3.35, 4.20, 5.30, 6.20, 8.00,10.00")
	udeps[1] = (" 9.26,10.16,11.01,12.19, 1.07, 2.01, 2.51, 3.41, 4.26, 5.36, 6.26, 8.06,10.06")
	udeps[2] = (" 9.33,10.23,11.09,12.32, 1.20, 2.11, 3.00, 3.48, 4.34, 5.50, 6.38, 8.14,10.14")
	udeps[3] = (" 9.41,10.31,11.16,12.40, 1.28, 2.19, 3.08, 3.56,-----, 5.58, 6.46, 8.22,10.22")
	udeps[4] = (" 9.49,10.39,11.24,12.48, 1.36, 2.27, 3.16, 4.04, 4.47, 6.06, 6.54, 8.29,10.30")
	udeps[5] = (" 9.52,10.42,-----,12.51, 1.40, 2.30, 3.19, 4.07,-----,-----,-----,-----,-----")
	udeps[6] = (" 9.59,10.47,11.31,12.54, 1.44, 2.35, 3.25, 4.11, 4.53, 6.13, 7.02, 8.35,10.37")
	udeps[7] = ("10.11,10.59,-----, 1.06, 1.56, 2.47, 3.37, 4.23,-----, 6.24, 7.14,-----,10.48")
	udeps[8] = ("10.26,11.10,11.55, 1.15, 2.05, 2.57, 3.46, 4.32, 5.09, 6.37, 7.23,-----,10.55")
	udeps[9] = ("10.36,11.20,12n05, 1.25, 2.15, 3.07, 3.56, 4n42, 5.19, 6.47, 7.33,-----,11.05")
	}
else if ( whenValue == "silversun" )
	{
	var whenString = "Silver Jubilee Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9
	var loco = new Array();
	loco[0] = "Steam Hauled";
	loco[1] = "Steam Hauled";
	loco[2] = "Steam Hauled";
	loco[3] = "Steam Hauled";
	loco[4] = "Steam Hauled";
	loco[5] = "Steam Hauled";
	loco[6] = "Steam Hauled";
	loco[7] = "Steam Hauled";
	loco[8] = "Steam Hauled";
	loco[9] = "Steam Hauled";
	loco[10] = "Steam Hauled";
	loco[11] = "Steam Hauled";
	loco[12] = "Steam Hauled";


	var udeps = new Array();
	udeps[0] = (" 9.20,10.10,10.55,12.13, 1.00, 1.55, 2.45, 3.35, 4.20, 5.30")
	udeps[1] = (" 9.26,10.16,11.01,12.19, 1.07, 2.01, 2.51, 3.41, 4.26, 5.36")
	udeps[2] = (" 9.33,10.23,11.09,12.32, 1.20, 2.11, 3.00, 3.48, 4.34, 5.50")
	udeps[3] = (" 9.41,10.31,11.16,12.40, 1.28, 2.19, 3.08, 3.56,-----, 5.58")
	udeps[4] = (" 9.49,10.39,11.24,12.48, 1.36, 2.27, 3.16, 4.04, 4.47, 6.06")
	udeps[5] = (" 9.52,10.42,-----,12.51, 1.40, 2.30, 3.19, 4.07,-----,-----")
	udeps[6] = (" 9.59,10.47,11.31,12.54, 1.44, 2.35, 3.25, 4.11, 4.53, 6.13")
	udeps[7] = ("10.11,10.59,-----, 1.06, 1.56, 2.47, 3.37, 4.23,-----, 6.24")
	udeps[8] = ("10.26,11.10,11.55, 1.15, 2.05, 2.57, 3.46, 4.32, 5.09, 6.37")
	udeps[9] = ("10.36,11n20,12n05, 1.25, 2.15, 3.07, 3.56, 4.42, 5.19, 6.47")
	}
else if ( whenValue == "autumnfri" )
	{
	var whenString = "Autumn Steam Gala"
	qryHeader=qryHeader + "  Timetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 9
	var loco = new Array();
	loco[0] = "Steam Hauled";
	loco[1] = "Steam Hauled";
	loco[2] = "Steam Hauled";
	loco[3] = "Steam Hauled";
	loco[4] = "Steam Hauled";
	loco[5] = "Steam Hauled";
	loco[6] = "Steam Hauled";
	loco[7] = "Steam Hauled";
	loco[8] = "Steam Hauled";
	loco[9] = "Steam Hauled";
	

	var udeps = new Array();
	udeps[0] = ("10.10,10.55,12.20,12.55, 2.05, 2.25, 3.25, 3.45, 4.50, 5.35")
	udeps[1] = ("10.16,11.01,12.26, 1.01, 2.11, 2.31, 3.31, 3.51, 4.50, 5.41")
	udeps[2] = ("10.25,11.14,12.40, 1.08, 2.19, 2.37, 3.38, 3.57, 5.05, 5.58")
	udeps[3] = ("10.33,11.22,12.48,-----, 2.27,-----, 3.46,-----, 5.13, 6.06")
	udeps[4] = ("10.41,11.30,12.56,-----, 2.36,-----, 3.55,-----, 5.21, 6.14")
	udeps[5] = ("10.44,11.33,12.59,-----, 2.39,-----, 3.58,-----, 5.24, 6.17")
	udeps[6] = ("10.50,11.38, 1.10,-----, 2.45,-----, 4.10,-----, 5.36, 6.21")
	udeps[7] = ("11.01,11.50, 1.27,-----, 2.57,-----, 4.20,-----, 5.48, 6.32")
	udeps[8] = ("11.12,12.03, 1.32,-----, 3.07,-----, 4.30,-----, 5.57, 6.42")
	udeps[9] = ("11.22,12.13, 1.42,-----, 3.17,-----, 4.40,-----, 6.07, 6.52")
	}
else if ( whenValue == "thomas" )
	{
	var whenString = "Day Out with Thomas"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 7
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Daisy the Diesel)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Daisy the Diesel)"
	loco[7] = "(Steam Hauled)"

	var udeps = new Array();
	udeps[0] = ("11.05,11.55, 1.25, 2.15, 3.10, 3.55, 4.40, 5.35")
	udeps[1] = ("11.12.12.02, 1.31, 2.21, 3.16, 4.02, 4.47, 5.41")
	udeps[2] = ("11.22,12.14, 1.43, 2.35, 3.24, 4.13, 4.58, 5.48")
	udeps[3] = ("11.30,12.22, 1.51, 2.43, 3.32, 4.21, 5.06, 5.56")
	udeps[4] = ("11.38,12.30, 1.59, 2.51, 3.40, 4.28, 5.14, 6.04")
	udeps[5] = ("11.41,-----,-----,-----,-----,-----,-----,-----")
	udeps[6] = ("11.47,12.37, 2.13, 2.59, 3.50, 4.38, 5.22, 6.12")
	udeps[7] = ("11.58,12.48, 2.23, 3.11, 4.01, 4.49, 5.33, 6.23")
	udeps[8] = ("12.08, 1.00, 2.31, 3.20, 4.14, 4.58, 5.42, 6.32")
	udeps[9] = ("12.18, 1.10, 2.41, 3.30, 4.24, 5.08, 5.52, 6.42")
}
else if ( whenValue == "anything")
	{
	var whenString = "Anything Goes Weekend 11,12 May 2002"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 9
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(DMU)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Diesel Hauled)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Steam Hauled)"
	loco[9] = "(DMU)"

	var udeps = new Array();
	udeps[0] = (" 9.25,11.05,11.55,12.45, 1.35, 2.25, 3.20, 4.05, 4.55, 5.45")
	udeps[1] = (" 9.31,11.12,12.02,12.51, 1.41, 2.31, 3.26, 4.12, 5.02, 5.51")
	udeps[2] = (" 9.39,11.22,12.14, 1.06, 1.53, 2.45, 3.34, 4.27, 5.16, 6.06")
	udeps[3] = (" 9.47,11.30,12.22, 1.13, 2.01, 2,53, 3.42, 4.35, 5.24, 6.13")
	udeps[4] = (" 9.55,11.38,12.30, 1.20, 2.09, 3.01, 3.50, 4.43, 5.32, 6.21")
	udeps[5] = (" 9.58,11.41,12.33, 1.23, 2.12, 3.04, 3.53, 4.46, 5.35, 6.24")
	udeps[6] = ("10.11,11.47,12.37, 1.35, 2.23, 3.09, 4.00, 4.50, 5.39, 6.28")
	udeps[7] = ("10.23,11.59,12.49, 1.47, 2.35, 3.21, 4.12, 5.02, 5.51, 6.39")
	udeps[8] = ("10.40,12.08, 1.03, 2.08, 2.44, 3.30, 4.26, 5.11, 6.00, 6.48")
	udeps[9] = ("10.50,12.18, 1.13, 2.18, 2.54, 3.40, 4.36, 5.21, 6.10, 6.58")	
	}

if ( whenValue == 32)
	{
	var whenString = "21st Anniversary Sunday 11 June 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Diesel)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Steam Hauled)"

	var udeps = new Array();
	udeps[0] = ("-----, 9.40,10.25,11.55, 1.25, 2.55, 4.20, 5.10")
	udeps[1] = ("-----, 9.45,10.31,-----, 1.31, 3.02, 4.26, 5.16")
	udeps[2] = ("-----, 9.52,10.44,12.10, 1.40, 3.10, 4.34, 5.25")
	udeps[3] = ("-----, 9.59,10.53,12.20, 1.49, 3.18, 4.42, 5.34")
	udeps[4] = ("-----,10.06,11.01,12.27, 1.58, 3.26, 4.48, 5.43")
	udeps[5] = ("-----,10.09,11.04,-----, 2.01,-----, 4.51,-----")
	udeps[6] = ("-----,10.13,11.18,12.35, 2.05, 3.35, 4.58, 5.56")
	udeps[7] = ("-----,10.23,11.28,-----, 2.15, 3.45, 5.07,-----")
	udeps[8] = (" 9.10,10.30,11.39,12.52, 2.26, 3.58, 5.16, 6.15")
	udeps[9] = (" 9.20,10.40,11.49, 1.02, 2.36, 4.08, 5.26, 6.25")	
	}

if ( whenValue == 33 )
	{
	var whenString = "Teddy Bears Picnic Saturday 3 June 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 9 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Diesel)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Diesel)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Diesel)"
	loco[8] = "(Diesel)"

	var udeps = new Array();
	udeps[0] = ("10.15,-----,12.15,-----, 2.00,-----, 3.55,-----, 7.15")
	udeps[1] = ("10.21,-----,12.21,-----, 2.06,-----, 4.01,-----,-----")
	udeps[2] = ("10.29,-----,12.29,-----, 2.15,-----, 4.10,-----,-----")
	udeps[3] = ("10.38,-----,12.38,-----, 2.24,-----, 4.19,-----,-----")
	udeps[4] = ("10.46,-----,12.46,-----, 2.34,-----, 4.28,-----,-----")
	udeps[5] = ("10.50,-----,12.50,-----, 2.38,-----, 4.32,-----,-----")
	udeps[6] = ("10.58,-----,12.58,-----, 2.45,-----, 4.39,-----, 7.45")
	udeps[7] = ("11.09,11.55, 1.09, 1.50, 2.57, 3.40, 4.51, 5.40, 7.55")
	udeps[8] = ("11.19,-----, 1.19,-----, 3.07,-----, 5.01,-----,-----")
	udeps[9] = ("11.29,12.13, 1.29, 2.07, 3.17, 3.58, 5.11, 6.00, 8.15")	
	}

if ( whenValue == 34 )
	{
	var whenString = "Teddy Bears Picnic Sunday 4 June 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 8 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Diesel)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Diesel)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Diesel)"


	var udeps = new Array();
	udeps[0] = ("10.15,-----,12.15,-----, 2.00,-----, 3.55,-----")
	udeps[1] = ("10.21,-----,12.21,-----, 2.06,-----, 4.01,-----")
	udeps[2] = ("10.29,-----,12.29,-----, 2.15,-----, 4.10,-----")
	udeps[3] = ("10.38,-----,12.38,-----, 2.24,-----, 4.19,-----")
	udeps[4] = ("10.46,-----,12.46,-----, 2.34,-----, 4.28,-----")
	udeps[5] = ("10.50,-----,12.50,-----, 2.38,-----, 4.32,-----")
	udeps[6] = ("10.58,-----,12.58,-----, 2.45,-----, 4.39,-----")
	udeps[7] = ("11.09,11.55, 1.09, 1.50, 2.57, 3.40, 4.51, 5.40")
	udeps[8] = ("11.19,-----, 1.19,-----, 3.07,-----, 5.01,-----")
	udeps[9] = ("11.29,12.13, 1.29, 2.07, 3.17, 3.58, 5.11, 6.00")	
	}

if ( whenValue == 40 )
	{
	var whenString = "Diesel Running Weekend 20 and 21 May 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 7 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Heritage Diesel)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Heritage Diesel)"
	loco[5] = "(Heritage Diesel)"
	loco[6] = "(Heritage Diesel)"
	loco[7] = "(Heritage Diesel)"

	var udeps = new Array();
	udeps[0] = ("10.15,11.05,12.15, 2.25, 3.12, 4.00, 4.45")
	udeps[1] = ("10.21,11.11,12.21, 2.31, 3.18, 4.06, 4.51")
	udeps[2] = ("10.29,11.23,12.29, 2.39, 3.28, 4.12, 5.03")
	udeps[3] = ("10.38,11.30,12.38, 2.48,-----, 4.20, 5.11")
	udeps[4] = ("10.46,11.38,12.46, 2.56, 3.42, 4.28, 5.17")
	udeps[5] = ("10.50,11.41,12.50, 3.00,-----, 4.32,-----")
	udeps[6] = ("10.58,11.46,12.58, 3.06, 3.45, 4.40, 5.23")
	udeps[7] = ("11.09,-----, 1.09, 3.17,-----, 4.49, 5.32")
	udeps[8] = ("11.19,12.01, 1.16, 3.27,-----, 4.56, 5.40")
	udeps[9] = ("11.29,12.11, 1.26, 3.37,-----, 5.06, 5.50")
}	



if ( whenValue == "sixties" )
	{
	var whenString = "1960s Weekend"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	
	var num_of_departures = 10 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Heritage Diesel)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Heritage Diesel)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Heritage Diesel)"
	loco[9] = "(Steam Hauled)"

	var udeps = new Array();
	udeps[0] = ("10.15,11.10,11.40,12.20, 1.05, 2.00, 2.50, 3.55, 4.45, 5.30")
	udeps[1] = ("10.21,11.16,11.46,12.26, 1.12, 2.06, 2.56, 4.01, 4.51, 5.37")
	udeps[2] = ("10.30,11.31,11.53,12.34, 1.25, 2.15, 3.11, 4.10, 5.05, 5.46")
	udeps[3] = ("10.39,11.39,-----,12.42, 1.34, 2.24, 3.20, 4.19, 5.14, 5.55")
	udeps[4] = ("10.49,11.47,-----,12.49, 1.43, 2.34, 3.28, 4.28, 5.22, 6.04")
	udeps[5] = ("10.53,11.50,-----,12.52, 1.46, 2.38, 3.31, 4.32, 5.25, 6.07")
	udeps[6] = ("11.05,12.07,-----,12.58, 1.56, 2.45, 3.40, 4.39, 5.30, 6.16")
	udeps[7] = ("11.16,12.16,-----, 1.10, 2.07, 2.57, 3.51, 4.51, 5.42, 6.27")
	udeps[8] = ("11.36,12.40,-----, 1.20, 2.25, 3.17, 4.20, 5.01, 5.52, 6.40")
	udeps[9] = ("11.46,12.50,-----, 1.30, 2.35, 3.27, 4.30, 5.11, 6.02, 6.50")
	}
else if ( whenValue == 62 )
	{
	var whenString = "Beer Festival - Saturday 2 September 2000"
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 9 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Heritage Diesel)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Heritage Diesel)"	
	loco[7] = "(Heritage Diesel)"	
	loco[8] = "(Heritage Diesel)"		

	var udeps = new Array();
	udeps[0] = ("10.15,11.10,12.15, 2.00, 2.50, 3.55, 5.30, 9.00,10.50")
	udeps[1] = ("10.21,11.16,12.21, 2.06, 2.56, 4.01, 5.36, 9.06,10.56")
	udeps[2] = ("10.30,11.31,12.30, 2.15, 3.11, 4.10, 5.43, 9.14,11.02")
	udeps[3] = ("10.39,11.39,12.39, 2.24, 3.20, 4.19, 5.51, 9.21,11.09")
	udeps[4] = ("10.49,11.47,12.48, 2.34, 3.28, 4.28, 5.59, 9.28,11.16")
	udeps[5] = ("10.53,11.50,12.51, 2.38, 3.31, 4.32, 6.02,-----,-----")
	udeps[6] = ("10.59,11.54,12.58, 2.45, 3.34, 4.39, 6.06, 9.33,11.22")
	udeps[7] = ("11.11,-----, 1.10, 2.57,-----, 4.51, 6.15,-----,11.31")
	udeps[8] = ("11.21,-----, 1.20, 3.07,-----, 5.01, 6.23,-----,11.39")
	udeps[9] = ("11.31,-----, 1.30, 3.17,-----, 5.11, 6.33,-----,11.49")	
	}	
else if ( whenValue == "asgfriday" )
	{
	var whenString = "Autumn Steam Gala "
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 10
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Steam Hauled)"
	loco[9] = "(Steam Hauled)"
	loco[10] = "(Steam Hauled)"

	var udeps = new Array();
	udeps[0] = ("10.10,10.55,12.20,12.55, 2.05, 2.25, 3.25, 3.45, 4.50, 5.35, 6.15")
	udeps[1] = ("10.16,11.01,12.26, 1.01, 2.11, 2.31, 3.31, 3.51, 4.56, 5.41,-----")
	udeps[2] = ("10.25,11.14,12.40, 1.08, 2.19, 2.37, 3.36, 3.57, 5.05, 5.58, 6.29")
	udeps[3] = ("10.33,11.22,12.48,-----, 2.27,-----, 3.46,-----, 5.13, 6.06,-----")
	udeps[4] = ("10.41,11.30,12.56,-----, 2.36,-----, 3.55,-----, 5.21, 6.14, 6.44")
	udeps[5] = ("10.44,11.33,12.59,-----, 2.39,-----, 3.58,-----, 5.24, 6.17,-----")
	udeps[6] = ("10.50,11.38, 1.10,-----, 2.45,-----, 4.10,-----, 5.36, 6.21, 6.52")
	udeps[7] = ("11.01,11.50, 1.22,-----, 2.57,-----, 4.21,-----, 5.48, 6.32,-----")
	udeps[8] = ("11.12,12.03, 1.32,-----, 3.07,-----, 4.30,-----, 5.57, 6.42,-----")
	udeps[9] = ("11.22,12.13, 1.42,-----, 3.17,-----, 4.40,-----, 6.07, 6.52, 7.20")	
	}
else if ( whenValue == 61 )
	{
	var whenString = "Autumn Steam Gala "
	qryHeader=qryHeader + "\nTimetable: " + whenString + "\n" + "From " + fromSta + " to " + toSta + ".  Approx " + distance + " miles\n\nOutward trains:\n"
	var num_of_departures = 11 - 1
	var loco = new Array();
	loco[0] = "(Steam Hauled)"
	loco[1] = "(Steam Hauled)"
	loco[2] = "(Steam Hauled)"
	loco[3] = "(Steam Hauled)"
	loco[4] = "(Steam Hauled)"
	loco[5] = "(Steam Hauled)"
	loco[6] = "(Steam Hauled)"
	loco[7] = "(Steam Hauled)"
	loco[8] = "(Steam Hauled)"
	loco[9] = "(Steam Hauled)"
	loco[10] = "(Steam Hauled)"
	
	var udeps = new Array();
	udeps[0] = ("10.00,11.00,12.00,12.50,-----, 2.05, 2.45, 3.40, 5.10, 5.55, 7.00")
	udeps[1] = ("10.06,11.06,12.06,12.56,-----, 2.11, 2.51, 3.46, 5.16, 6.01,-----")
	udeps[2] = ("10.21,11.13,12.15, 1.07,-----, 2.19, 3.08, 3.57, 5.24, 6.17, 7.15")
	udeps[3] = ("10.29,11.21,12.23, 1.15,-----, 2.27, 3.16, 4.05, 5.32,-----, 7.22")
	udeps[4] = ("10,37,11.29,12.31, 1.23,-----, 2.35, 3.24, 4.13, 5.40, 6.31, 7.29")
	udeps[5] = ("10.40,11.32,12.34, 1.26,-----,-----, 3.27, 4.16, 5.43,-----,-----")
	udeps[6] = ("10.55,11.50,12.45, 1.29, 1.55, 2.42, 3.31, 4.21, 5.51, 6.37, 7.36")
	udeps[7] = ("11.06,12.02,12.57,-----, 2.07, 2.52, 3.43, 4.33, 6.02,-----,-----")
	udeps[8] = ("11.25,12.25, 1.10,-----, 2.16, 3.02, 3.55, 4.43, 6.13,-----,-----")
	udeps[9] = ("11.35,12.35, 1.20,-----, 2.26, 3.12, 4.05, 4.53, 6.23, 7.02, 8.02")	
	}


if ( whenValue == "santa" )
	{
	var whenString = "Santa Specials"
	qryHeader=qryHeader+whenString+"\n"
	qryResult="Details not available. Ring 01643 704996."
	}


var start = 0
var end = 5
qryResult = "";
var detail=""

for (var i=0; i<=num_of_departures;i++)
	{
	num = i + 1
	var dep = udeps[(9-fromIndex)].substring(start,end)
	var arr = udeps[toIndex].substring(start,end)
	var comment = ""
	if ( arr.substring(2,3) == "n" )
		{ var comment = "  Note: continues to Norton Fitzwarren" }
	if ( dep.substring(2,3) == "t" )
		{ var comment = "  Note: train terminates" }
	if ( dep == "-----" || arr == "-----" )
		{
		detail = ""
		}
	else 
		{
		detail = "Depart at\t"+dep+"\tand arrive at "+arr+"\t"+loco[i]+" "+comment+"\n"
		}
	qryResult=qryResult+detail
	start = start + 6
	end = start + 5
	}

finalresult=qryHeader+qryResult+"\n"

}


function writeToStatusBar(text)
{
window.status=text
}

function fromDetails(selection)
{

	fromIndex=selection.selectedIndex
	fromSta=selection.options[fromIndex].text
	writeToStatusBar("from:"+fromSta)
}

function toDetails(selection)
{

	toIndex=selection.selectedIndex
	toSta=selection.options[toIndex].text

	writeToStatusBar("To:"+toSta)
}

function whenDetails(selection)
{

	whenIndex=selection.selectedIndex
	whenDate=selection.options[whenIndex].text
	whenValue=selection.options[whenIndex].value
	if ( whenValue == 0 )
		{
		whenString = "Off Peak"
		}
	else if ( whenValue == 1 )
		{
		whenString = "Low Peak"
		}
	else if ( whenValue == 6 )
		{
		whenString = "Special Timetable"
		}
	
}

function displayHelp(selection)
{
alert ("HELP for InterActive Train Times\nStep 1\tFrom the List under 'From',\n\tclick on the Station you want to leave from\n\t(click on the little black down arrow to reveal all stations)\nStep 2\tFrom the List under 'To',\n\tclick on the Station you want to go to\nStep3\tFrom the List under 'On', \n\tclick on the date you want to travel\n\t(please note only operating dates are displayed)\nStep 4\tClick the 'Start Query' button\nStep 5\tCheck the Query Result Box\n\t\tthen send to your Printer using\n\t\tthe Print option on your Browser;\n\t\tor Clear the Query Result Box\n");
}



function clearResult()
{
finalResult=""
qryHeader=""
qryResult=""
document.ttQuery.result.value=(" ")
}

function displayNow()
{
//leave this in just in case I can work out how to set the Selected thing on the Date To Travel
//list - it would be nice if it defaults to the currr=ent day?

var Months=new Array("January","February","March","April","May","June","July","August","September","October","November","December");
var DaysOfWeek= new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday");
today=new Date()

var DayOfWeekNum=today.getDay()
var DayOfWeekString=DaysOfWeek[DayOfWeekNum]
var DayOfMonth=today.getDate()
var MonthNum=today.getMonth()
var Month=Months[MonthNum]
var Year=today.getYear() + 1900
alert (DayOfWeekString+" "+DayOfMonth+" "+Month+" "+Year)
}

function fares()
{
adultReturn=""
adultSingle=""
childreturn=""
childSingle=""
childComment=""
seniorReturn=""
seniorSingle=""
familyReturn=""
familyComment=""

var familyDesc="\n(Note: a Family ticket covers 2 Adults and 2 Children 5-15 years)"
var fromFare=Math.min(fromIndex,9-toIndex)
var toFare=Math.max(fromIndex,9-toIndex)
if (fromFare == 0 )		//BL
	{ var returnFare = new Array("0","4.20","5.80","7.50","7.80","8.20","8.80","9.30","9.60","9.80")
	  var singleFare = new Array ("0","2.80","3.90","5.00","5.20","5.50","5.90","6.20","6.40","6.50")
	  var scretFare = new Array("0","3.20","4.65","6.00","6.25","6.60","7.05","7.45","7.70","7.85")
	  var scsinFare = new Array("0","2.25","3.10","4.00","4.15","4.35","4.70","4.95","5.10","5.20")
	}
else if (fromFare == 1 )	//CE
	{ var returnFare = new Array("4.20","0","3.60","5.30","5.80","6.50","7.50","8.20","8.80","9.30") 
	  var singleFare = new Array("2.80","0","2.40","3.50","3.90","4.30","5.00","5.50","5.90","6.20")
	  var scretFare = new Array("3.20","0","2.90","4.25","4.65","5.20","6.00","6.60","7.05","7.45")
	  var scsinFare = new Array("2.25","0","1.90","2.80","3.10","3.45","4.00","4.35","4.70","4.95")
	}
else if (fromFare == 2 )	//SR
	{ var returnFare = new Array("5.80","3.60","0","3.60","4.20","4.70","6.50","7.50","8.20","8.50")
	var singleFare = new Array("3.90","2.40","0","2.40","2.80","3.10","4.30","5.00","5.50","5.70") 
	var scretFare = new Array("4.65","2.90","0","2.90","3.40","3.80","5.20","6.00","6.60","6.80")
	var scsinFare = new Array("3.10","1.90","0","1.90","2.25","2.50","3.45","4.00","4.35","4.55")
	}
else if (fromFare == 3 )	//WN
	{ var returnFare = new Array("7.50","5.30","3.60","0","1.90","2.70","4.20","5.30","6.50","7.50")
	var singleFare = new Array("5.00","3.50","2.40","0","1.30","1.80","2.80","3.50","4.30","5.00")
	var scretFare = new Array("6.00","4.25","2.90","0","1.55","2.20","3.40","4.25","5.20","6.00")
	var scsinFare = new Array("4.00","2.80","1.90","0","1.00","1.45","2.25","2.80","3.45","4.00")
	}
else if (fromFare == 4 )	//DD
	{ var returnFare = new Array("7.80","5.80","4.20","1.90","0","1.90","3.60","4.70","5.80","7.00")
	var singleFare = new Array("5.20","3.90","2.80","1.30","0","1.30","2.40","3.10","3.90","4.70") 
	var scretFare = new Array("6.25","4.65","3.40","1.55","0","1.55","2.90","3.80","4.65","5.60")
	var scsinFare = new Array("4.15","3.10","2.25","1.00","0","1.00","1.90","2.50","3.10","3.75")
	}
else if (fromFare == 5 )	//WT
	{ var returnFare = new Array("8.20","6.50","4.70","2.70","1.90","0","2.70","4.20","5.30","7.00")
	var singleFare = new Array("5.50","4.30","3.10","1.80","1.30","0","1.80","2.80","3.50","4.70") 
	var scretFare = new Array("6.25","5.00","3.60","2.10","1.45","0","2.10","3.20","4.00","5.00")
	var scsinFare = new Array("4.35","3.45","2.50","1.45","1.00","0","1.45","2.25","2.80","3.75")
	}
else if (fromFare == 6 )	//WD
	{ var returnFare = new Array("8.80","7.50","6.50","4.20","3.60","2.70","0","2.70","4.20","5.30")
	var singleFare = new Array("5.90","5.00","4.30","2.80","2.40","1.80","0","1.80","2.80","3.50")
	var scretFare = new Array("7.05","6.00","5.20","3.40","2.90","2.20","0","2.20","3.40","4.25")
	var scsinFare = new Array("4.70","4.00","3.45","2.25","1.90","1.45","0","1.45","2.25","2.80")
	}
else if (fromFare == 7 )	//BA
	{ var returnFare = new Array("9.30","8.20","7.50","5.30","4.70","4.20","2.70","0","2.70","4.20")
	var singleFare = new Array("6.20","5.50","5.00","3.50","3.10","2.80","1.80","0","1.80","2.80")
	var scretFare = new Array("7.45","6.60","6.00","4.25","3.80","3.40","2.20","0","2.20","3.40")
	var scsinFare = new Array("4.95","4.35","4.00","2.80","2.50","2.25","1.45","0","1.45","2.25")
	}
else if (fromFare == 8 )	//DR
	{ var returnFare = new Array("9.60","8.80","8.20","6.50","5.80","5.30","4.20","2.70","0","2.70")
	var singleFare = new Array("6.40","5.90","5.50","4.30","3.90","3.50","2.80","1.80","0","1.80")
	var scretFare = new Array("7.70","7.05","6.60","5.20","4.65","4.25","3.40","2.20","0","2.20")
	var scsinFare = new Array("5.10","4.70","4.35","3.45","3.10","2.80","2.25","1.45","0","1.45")
	}
else if (fromFare == 9 )	//MD
	{ var returnFare = new Array("9.80","9.30","8.50","7.50","7.00","7.00","5.30","4.20","2.70","0")
	var singleFare = new Array("6.50","6.20","5.70","5.00","4.70","4.70","3.50","2.80","1.80","0")
	var scretFare = new Array("7.85","7.45","6.80","6.00","5.60","5.60","4.25","3.40","2.20","0")
	var scsinFare = new Array("5.20","4.95","4.55","4.00","3.75","3.75","2.80","2.25","1.45","0")
	}
	
adultReturn = returnFare[toFare]
adultSingle = singleFare[toFare]
childComment = "Children 5-15 years travel at half the above fares\nChildren under five travel free"
seniorReturn = scretFare[toFare]
seniorSingle = scsinFare[toFare]
if (fromSta == "Bishops Lydeard" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £24.70"+familyDesc}
	else if (toSta == "Watchet")
		{ familyComment="Family Return £20.70"+familyDesc }
	else if (toSta == "Williton")
		{ familyComment="Family Return £18.95"+familyDesc }
	}
else if (fromSta == "Minehead" )
	{
	 if (toSta == "Blue Anchor")
		{ familyComment="Family Return £10.70"+familyDesc}
	else if (toSta == "Watchet")
		{ familyComment="Family Return £17.70"+familyDesc }
	else if (toSta == "Williton")
		{ familyComment="Family Return £18.95"+familyDesc }
	else if (toSta == "Bishops Lydeard")
		{ familyComment="Family Return £24.70"+familyDesc }
	}
else if (fromSta == "Blue Anchor" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £10.70"+familyDesc }
	else if (toSta == "Bishops Lydeard")
		{ familyComment="Family Return £23.45"+familyDesc }
	}
else if (fromSta == "Watchet" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £17.70"+familyDesc }
	else if (toSta == "Bishops Lydeard")
		{ familyComment="Family Return £20.70"+familyDesc }
	}
else if (fromSta == "Doniford Halt" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £17.70"+familyDesc }
	else if (toSta == "Bishops Lydeard")
		{ familyComment="Family Return £19.70"+familyDesc }
	}	
else if (fromSta == "Williton" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £18.95"+familyDesc }
	else if (toSta == "Bishops Lydeard")
		{ familyComment="Family Return £18.95"+familyDesc }
	}	
else if (fromSta == "Stogumber" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £21.45"+familyDesc }
	}	
else if (fromSta == "Crowcombe Heathfield" )
	{
	 if (toSta == "Minehead")
		{ familyComment="Family Return £23.45"+familyDesc }
	}		
else
	{ familyComment=""}

if ( whenValue == "12" ) //Thomas
	{ specialComment="\nAll fares to/from Minehead will be surcharged by 50p, which includes a Vintage Bus ride and a brake van trip with 'Thomas' " }


}

//-->


