function Supra()
{
	var Info = "";
	var Index = "";

	Info = "Your Supra is as follows:\r";
	Info += "Country:\t\tJapan\r";
	Index = document.forms.calc.model0.selectedIndex;
	switch (Index)
	{	
		case 0: Info += "Chassis:\t\tToyota Supra MkIV - 1978 conforming chassis\r"; break;
		case 1: Info += "Chassis:\t\tToyota Supra MkIV - 1998 conforming chassis\r"; break;
		case 2: Info += "Chassis:\t\tToyota Supra MkIV - Export UK spec\r"; break;
	}

	Info += "Model:\t\tSupra MkIV\r";
	Index = document.forms.calc.model1.selectedIndex;
	switch (Index)
	{	
		case 0: Info += "Body Type:\tLiftback with aero roof\r"; break;
		case 1: Info += "Body Type:\tLiftback\r"; break;
	}
	Index = document.forms.calc.model2.selectedIndex;
	switch (Index)
	{
		case 0: Info += "Gearbox Type:\tGetrag 6 speed\r"; break;
		case 1: Info += "Gearbox Type:\tToyota 5 speed\r"; break;
		case 2: Info += "Gearbox Type:\tToyota 4 speed auto\r"; break;
	}
	Index = document.forms.calc.model3.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Body Grade:\tRZ\r"; break;
		case 1:	Info += "Body Grade:\tSZR\r"; break;
		case 2:	
			if (document.forms.calc.engine.selectedIndex == 0)
				Info += "Body Grade:\tSZ\r";
			else
				Info += "Body Grade:\tRZS\r";
			break;
		case 3:	Info += "Body Grade:\tGZ\r"; break;
	}
	Index = document.forms.calc.model4.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Engine Type:\tEFI & DOHC\r"; break;
		case 1:	Info += "Engine type:\tEFI & DOHC & TT\r"; break;
	}
	Index = document.forms.calc.engine.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Aspiration Type:\tNaturally Aspirated\r"; break;
		case 1:	Info += "Aspiration Type:\tTwin Turbo\r"; break;
	}
	Info += "Frame Type:\tMkiv Supra chassis, twin A-arms, coil over shock\r";
	Info += "Frame Made:\t" + MonthOfManufacture() + "\r";
	Index = document.forms.calc.color.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Paint Color:\tSuper White II\r"; break;				// 040
		case 1:	Info += "Paint Color:\tSilver Metallic\r"; break;				// 199
		case 2:	Info += "Paint Color:\tDark Brown Gray Mica Metallic\r"; break;			// 1A1
		case 3:	Info += "Paint Color:\tQuick Silver Metallic Graphite\r"; break;		// 1B9
		case 4:	Info += "Paint Color:\tBlack\r"; break;						// 202
		case 5:	Info += "Paint Color:\tSuper Red IV\r"; break;					// 3L2
		case 6:	Info += "Paint Color:\tSuper Bright Yellow\r"; break;				// 576
		case 7:	Info += "Paint Color:\tGrayish Green Mica Metallic\r"; break;			// 6N0
		case 8:	Info += "Paint Color:\tDark Green Mica Metallic\r"; break;			// 6P3
		case 9:	Info += "Paint Color:\tDeep Teal Metallic\r"; break;				// 752
		case 10: Info += "Paint Color:\tBlue Mica Metallic\r"; break;				// 8L5
	}
	Index = document.forms.calc.trim1.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Seat Trim:\tFront Cloth seats\r"; break;				// FA20
		case 1:	Info += "Seat Trim:\tFront Recaro seats\r"; break;				// FB20
		case 2:	Info += "Seat Trim:\tFront Cloth seats\r"; break;				// FC20
		case 3:	Info += "Seat Trim:\tFront Cloth seats\r"; break;				// FF20
		case 4:	Info += "Seat Trim:\tFront Recaro seats\r"; break;				// FK20
		case 5:	Info += "Seat Trim:\tFront Recaro seats\r"; break;				// FL20
		case 6:	Info += "Seat Trim:\tFront Leather seats\r"; break;				// LC20
		case 7:	Info += "Seat Trim:\tFront Leather seats\r"; break;				// LE20
		case 8:	Info += "Seat Trim:\tFront Leather seats\r"; break;				// LF20
		case 9:	Info += "Seat Trim:\tFront Leather seats\r"; break;				// LG21
	}
	Index = document.forms.calc.trim2.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Plastic Trim:\tBlack plastic\r"; break;
		case 1:	Info += "Plastic Trim:\tDark Gray plastic\r"; break;
	}
	Index = document.forms.calc.trans.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Transmission:\tToyota 4 speed auto\r"; break;
		case 1:	Info += "Transmission:\tToyota 4 speed auto\r"; break;
		case 2:	Info += "Transmission:\tGetrag 6 speed manual\r"; break;
		case 3:	Info += "Transmission:\tGetrag 6 speed manual\r"; break;
		case 4:	Info += "Transmission:\tToyota 5 speed manual\r"; break;
	}
	Index = document.forms.calc.axle1.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Crown Wheel Size:\t200mm (8.0'' small diff)\r"; break;
		case 1:	Info += "Crown Wheel Size:\t220mm (8.7'' big diff)\r"; break;
	}
	Index = document.forms.calc.axle2.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Differential Ratio:\t4.083:1\r"; break;
		case 1:	Info += "Differential Ratio:\t3.769:1\r"; break;
		case 2:	Info += "Differential Ratio:\t3.267:1\r"; break;
		case 3:	Info += "Differential Ratio:\t3.538:1\r"; break;
		case 4:	Info += "Differential Ratio:\t4.083:1\r"; break;
	}
	Index = document.forms.calc.axle3.selectedIndex;
	switch (Index)
	{
		case 0:	Info += "Differential Type:\tStandard\r"; break;
		case 1:	Info += "Differential Type:\tTorsen LSD\r"; break;
		case 2:	Info += "Differential Type:\tTorsen LSD\r"; break;
	}
	window.alert(Info);
}

function MonthOfManufacture()
{

	var chassis = document.forms.calc.chassis.value;

	// invalid chassis numbers
	if (chassis == "" || chassis < 1010)
	{
		return "Invalid chassis number";
	}
	// 1992
	if (chassis < 1030)
	{
		return "December 1992";
	}
	// 1993
	if (chassis < 1032)
	{
		return "January 1993";
	}
	if (chassis < 1059)
	{
		return "February 1993";
	}
	if (chassis < 1063)
	{
		return "March 1993";
	}
	if (chassis < 1804)
	{
		return "April 1993";
	}
	if (chassis < 3672)
	{
		return "May 1993";
	}
	if (chassis < 5743)
	{
		return "June 1993";
	}
	if (chassis < 8033)
	{
		return "July 1993";
	}
	if (chassis < 9628)
	{
		return "August 1993";
	}
	if (chassis < 11811)
	{
		return "September 1993";
	}
	if (chassis < 13999)
	{
		return "October 1993";
	}
	if (chassis < 15617)
	{
		return "November 1993";
	}
	if (chassis < 16931)
	{
		return "December 1993";
	}
	// 1994
	if (chassis < 17762)
	{
		return "January 1994";
	}
	if (chassis < 18731)
	{
		return "February 1994";
	}
	if (chassis < 19951)
	{
		return "March 1994";
	}
	if (chassis < 20911)
	{
		return "April 1994";
	}
	if (chassis < 21772)
	{
		return "May 1994";
	}
	if (chassis < 22778)
	{
		return "June 1994";
	}
	if (chassis < 23410)
	{
		return "July 1994";
	}
	if (chassis < 23981)
	{
		return "August 1994";
	}
	if (chassis < 24772)
	{
		return "September 1994";
	}
	if (chassis < 25720)
	{
		return "October 1994";
	}
	if (chassis < 26586)
	{
		return "November 1994";
	}
	if (chassis < 27187)
	{
		return "December 1994";
	}
	// 1995
	if (chassis < 27721)
	{
		return "January 1995";
	}
	if (chassis < 28482)
	{
		return "February 1995";
	}
	if (chassis < 29303)
	{
		return "March 1995";
	}
	if (chassis < 29725)
	{
		return "April 1995";
	}
	if (chassis < 30408)
	{
		return "May 1995";
	}
	if (chassis < 31293)
	{
		return "June 1995";
	}
	if (chassis < 32064)
	{
		return "July 1995";
	}
	if (chassis < 32290)
	{
		return "August 1995";
	}
	if (chassis < 32867)
	{
		return "September 1995";
	}
	if (chassis < 33335)
	{
		return "October 1995";
	}
	if (chassis < 33770)
	{
		return "November 1995";
	}
	if (chassis < 34050)
	{
		return "December 1995";
	}
	// 1996
	if (chassis < 34322)
	{
		return "January 1996";
	}
	if (chassis < 34672)
	{
		return "February 1996";
	}
	if (chassis < 35017)
	{
		return "March 1996";
	}
	if (chassis < 35275)
	{
		return "April 1996";
	}
	if (chassis < 35587)
	{
		return "May 1996";
	}
	if (chassis < 36146)
	{
		return "June 1996";
	}
	if (chassis < 36956)
	{
		return "July 1996";
	}
	if (chassis < 37239)
	{
		return "August 1996";
	}
	if (chassis < 37660)
	{
		return "September 1996";
	}
	if (chassis < 38114)
	{
		return "October 1996";
	}
	if (chassis < 38486)
	{
		return "November 1996";
	}
	if (chassis < 38817)
	{
		return "December 1996";
	}
	// 1997
	if (chassis < 39276)
	{
		return "January 1997";
	}
	if (chassis < 39612)
	{
		return "February 1997";
	}
	if (chassis < 40374)
	{
		return "March 1997";
	}
	if (chassis <= 42000)
	{
		return "April 1997";
	}
	// estimate of last chassis number for first plant production
	if (chassis > 42000 && chassis < 1000000)
	{
		return "Invalid chassis number";
	}
	if (chassis < 1000245)
	{
		return "May 1997";
	}
	if (chassis < 1000499)
	{
		return "June 1997";
	}
	if (chassis < 1000741)
	{
		return "July 1997";
	}
	if (chassis < 1000808)
	{
		return "August 1997";
	}
	if (chassis < 1001084)
	{
		return "September 1997";
	}
	if (chassis < 1001363)
	{
		return "October 1997";
	}
	if (chassis < 1001557)
	{
		return "November 1997";
	}
	if (chassis < 1001747)
	{
		return "December 1997";
	}
	// 1998
	if (chassis < 1001976)
	{
		return "January 1998";
	}
	if (chassis < 1002235)
	{
		return "February 1998";
	}
	if (chassis < 1002538)
	{
		return "March 1998";
	}
	if (chassis < 1002693)
	{
		return "April 1998";
	}
	if (chassis < 1002870)
	{
		return "May 1998";
	}
	if (chassis < 1003109)
	{
		return "June 1998";
	}
	if (chassis < 1003358)
	{
		return "July 1998";
	}
	if (chassis < 1003457)
	{
		return "August 1998";
	}
	if (chassis < 1003545)
	{
		return "September 1998";
	}
	if (chassis < 1003675)
	{
		return "October 1998";
	}
	if (chassis < 1003780)
	{
		return "November 1998";
	}
	if (chassis < 1003832)
	{
		return "December 1998";
	}
	// 1999
	if (chassis < 1003897)
	{
		return "January 1999";
	}
	if (chassis < 1004012)
	{
		return "February 1999";
	}
	if (chassis < 1004130)
	{
		return "March 1999";
	}
	if (chassis < 1004198)
	{
		return "April 1999";
	}
	if (chassis < 1004245)
	{
		return "May 1999";
	}
	if (chassis < 1004334)
	{
		return "June 1999";
	}
	if (chassis < 1004400)
	{
		return "July 1999";
	}
	if (chassis < 1004423)
	{
		return "August 1999";
	}
	if (chassis < 1004496)
	{
		return "September 1999";
	}
	if (chassis < 1004546)
	{
		return "October 1999";
	}
	if (chassis < 1004607)
	{
		return "November 1999";
	}
	if (chassis < 1004645)
	{
		return "December 1999";
	}
	// 2000
	if (chassis < 1004679)
	{
		return "January 2000";
	}
	if (chassis < 1004748)
	{
		return "February 2000";
	}
	if (chassis < 1004811)
	{
		return "March 2000";
	}
	if (chassis < 1004859)
	{
		return "April 2000";
	}
	if (chassis < 1004889)
	{
		return "May 2000";
	}
	if (chassis < 1004923)
	{
		return "June 2000";
	}
	if (chassis < 1004950)
	{
		return "July 2000";
	}
	if (chassis < 1004966)
	{
		return "August 2000";
	}
	if (chassis < 1004985)
	{
		return "September 2000";
	}
	if (chassis < 1005040)
	{
		return "October 2000";
	}
	if (chassis < 1005093)
	{
		return "November 2000";
	}
	if (chassis < 1005113)
	{
		return "December 2000";
	}
	// 2001
	if (chassis < 1005141)
	{
		return "January 2001";
	}
	if (chassis < 1005184)
	{
		return "February 2001";
	}
	if (chassis < 1005227)
	{
		return "March 2001";
	}
	if (chassis < 1005256)
	{
		return "April 2001";
	}
	if (chassis < 1005297)
	{
		return "May 2001";
	}
	if (chassis < 1005333)
	{
		return "June 2001";
	}
	if (chassis < 1005364)
	{
		return "July 2001";
	}
	if (chassis < 1005400)
	{
		return "August 2001";
	}
	if (chassis < 1005441)
	{
		return "September 2001";
	}
	if (chassis < 1005464)
	{
		return "October 2001";
	}
	if (chassis < 1005489)
	{
		return "November 2001";
	}
	if (chassis < 1005520)
	{
		return "December 2001";
	}
	// 2002
	if (chassis < 1005547)
	{
		return "January 2002";
	}
	if (chassis < 1005594)
	{
		return "February 2002";
	}
	if (chassis < 1005655)
	{
		return "March 2002";
	}
	if (chassis < 1005696)
	{
		return "April 2002";
	}
	if (chassis < 1005756)
	{
		return "May 2002";
	}
	if (chassis < 1005806)
	{
		return "June 2002";
	}
	if (chassis <= 1005857)
	{
		return "July 2002";
	}
	// last chassis number
	if (chassis > 1005857)
	{
		return "Invalid chassis number";
	}
}