// http://www.btinternet.com/~madmole/vindecoder.html


function VINDecode() {
	var VIN;
	//get VIN value from screen
	VIN = document.VINDecoder.vin.value;
	
	//check VIN length
	if (VIN === "") {
		alert("please enter your VIN Code");
		return false;
	}
	if (VIN.length != 11) {
		alert("Your VIN is not the correct length");
		return false;
	}

	//uppercase VIN to be consistant
	VIN = VIN.toUpperCase();
	

	// Initialize

	// VIN
	MY = "";				// Manufacturing Year
	Site = "";				// Manufacturing Site
	Series = "";			// Series Code
	Eng = "";				// Engine Code
	Eng_cyl = "";			// Engine, cylinders
	Eng_cid = "";			// Engine cid
	Eng_carb = "";			// Engine carburetor
	Eng_year = "";			// Engine used thru
	Eng_other = "";			// Engine, other info
	MN = "";				// Manufacturing number
	
	//Other
	Date ="";				//Date
	
	// Data Plate
	Body = "";				// Body
	Color = "";				// Color
	Trim = "";				// Trim
	Trans = "";				// Trans
	Axle = "";				// Axle
	DSO = "";				// DSO
	
	Message = "";			// ...
	
	// Decode VIN
	MY = VIN.charAt(0);
	Site = VIN.charAt(1);	
	Series = VIN.substring(2,4);
	Eng = VIN.charAt(4);
	MN = VIN.substring(5,12);
	
	//Other
	Date=document.VINDecoder.Date_1.value;
	
	//Decode Data Plate
	Body=document.VINDecoder.Body_1.value;
	Color=document.VINDecoder.Color_1.value;
	Trim=document.VINDecoder.Trim_1.value;
	Trans=document.VINDecoder.Trans_1.value;
	Axle=document.VINDecoder.Axle_1.value;
	DSO=document.VINDecoder.DSO_1.value;
	
	//Upper case
	Body=Body.toUpperCase();
	Color=Color.toUpperCase();
	Trim=Trim.toUpperCase();
	Trans=Trans.toUpperCase();
	Axle=Axle.toUpperCase();
	DSO=DSO.toUpperCase();
	
	//Manuf. year
	if (MY == "1") {MY = "1971";}
	if (MY == "2") {MY = "1972";}
	if (MY == "3") {MY = "1973";}
	if (MY == "4") {MY = "1974";}
	if (MY == "5") {MY = "1975";}
	if (MY == "6") {MY = "1976";}
	if (MY == "7") {MY = "Not valid !";}
	if (MY == "8") {MY = "1968";}
	if (MY == "9") {MY = "1969";}
	if (MY == "0") {MY = "1970";}
	//Check if still valid...
	if (MY.length<2) MY="Not valid year code";
	

	//Manuf. Month
	Date=Date.substring(0,2);
	if (Date == "01") {Date = "January";}
	if (Date == "02") {Date = "February";}
	if (Date == "03") {Date = "March";}
	if (Date == "04") {Date = "April";}
	if (Date == "05") {Date = "May";}
	if (Date == "06") {Date = "June";}
	if (Date == "07") {Date = "July";}
	if (Date == "08") {Date = "August";}
	if (Date == "09") {Date = "September";}
	if (Date == "10") {Date = "October";}
	if (Date == "11") {Date = "November";}
	if (Date == "12") {Date = "December";}
	
	//Manuf. site
	if (Site == "A") {Site = "Atlanta";}
	if (Site == "B") {Site = "Oakville";}					//Canada
	if (Site == "C") {Site = "Chester";}
	if (Site == "D") {Site = "Dallas";}
	if (Site == "E") {Site = "Mahwah";}
	if (Site == "F") {Site = "Dearborn";}
	if (Site == "G") {Site = "Chicago";}
	if (Site == "H") {Site = "Lorain";}
	if (Site == "J") {Site = "Los Angeles";}
	if (Site == "K") {Site = "Kansas City";}
	if (Site == "L") {Site = "Long Beach (1965)";}
	if (Site == "M") {Site = "Memphis";}
	if (Site == "N") {Site = "Norfolk";}
	if (Site == "P") {Site = "Twin Cities";}
	if (Site == "R") {Site = "San Jose";}
	if (Site == "S") {Site = "Pilot Plant (Allen Park)";}
	if (Site == "T") {Site = "Metuchen";}
	if (Site == "U") {Site = "Louisville";}
	if (Site == "W") {Site = "Wayne";}
	if (Site == "X") {Site = "St. Thomas";}				//Canada
	if (Site == "Y") {Site = "Wixom";}
	if (Site == "Z") {Site = "St. Louis";}


	//Series code
	if (Series == "21") Series = "Gran Torino Elite 2D HT ";											//65M		74-76
	if (Series == "25") Series = "2D HT ";																//65B 72-76, 65A 71
	if (Series == "27" && MY == "1971") Series = "4D Sedan";											//53B 		71
	if (Series == "27") Series = "4D Pillared HT";														//53B		72-76
	if (Series == "28") Series = "500 4D Sedan";														//54B		70
	if (Series == "29") Series = "500 2D HT";															//65B		70
	if (Series == "30" && MY == "1970") Series = "2D HT";												//65C		70
	if (Series == "30" && MY == "1971") Series = "500 2D HT";											//65C		71
	if (Series == "30") Series = "Gran Torino 2D HT";													//65D		72-76
	if (Series == "31" && (MY == "1968" || MY == "1969")) Series = "4D Sedan";							//54A		68-69
	if (Series == "31" && MY == "1970") Series = "4D Sedan";											//54C		70
	if (Series == "31" && MY == "1971") Series = "500 4D Sedan";										//54C		71
	if (Series == "31") Series = "Gran Torino 4D Pillared HT";											//53D		72-76
	if (Series == "32" && (MY == "1968" || MY == "1969")) Series = "4D Station Wagon";					//71D		68-69
	if (Series == "32" && MY == "1970") Series = "4D HT";												//57C		70
	if (Series == "32" && MY == "1971") Series = "500 4D HT";											//57C		71
	if (Series == "32") Series = "Gran Torino Brougham 2D Pillared HT";									//65K		74-76
	if (Series == "33" && (MY == "1968" || MY == "1969")) Series = "500 2D HT";							//65B,65E	68-69
	if (Series == "33" && (MY == "1970" || MY == "1971")) Series = "Brougham 2D HT";					//65E		70-71
	if (Series == "33") Series = "Gran Torino Brougham 4D Pillared HT";									//53K		74-76
	if (Series == "34" && (MY == "1968" || MY == "1969")) Series = "500 4D Sedan";						//54B		68-69
	if (Series == "34" && MY == "1971") Series = "500 2D HT Fastback";									//63C		71
	if (Series == "35" && (MY == "1968" || MY == "1969")) Series = "500 2D HT Fastback";				//63B,63E	68-69
	if (Series == "35" && (MY == "1970" || MY == "1971")) Series = "GT 2D HT Fastback";					//63F		70-71
	if (Series == "35" && (MY == "1972" || MY == "1973")) Series = "Gran Torino Sport 2D HT Fastback";	//63R		72-73
	if (Series == "36" && (MY == "1968" || MY == "1969")) Series = "500 Convertible";					//76B,76E	68-69
	if (Series == "36" && (MY == "1970" || MY == "1971")) Series = "Brougham 4D HT";					//57E		70-71
	if (Series == "37") Series = "GT Convertible";														//76F		70-72
	if (Series == "37" && (MY == "1968" || MY == "1969")) Series = "500 4D Station Wagon";				//71B		68-69 (ei Torino)
	if (Series == "38" && (MY == "1968" || MY == "1969")) Series = "Squire 4D Station Wagon";			//71E		68-69
	if (Series == "38" && (MY == "1970" || MY == "1971")) Series = "Cobra 2D HT Fastback";				//63H		70-71
	if (Series == "38") Series = "Gran Torino Sport 2D HT";												//65R		72-75
	if (Series == "40" && (MY == "1968" || MY == "1969")) Series = "2D HT";								//65C		68-69
	if (Series == "40" && MY == "1971") Series = "4D Station Wagon";									//71D		71
	if (Series == "40") Series = "4D Station Wagon";													//71B		72-76
	if (Series == "41" && MY == "1968") Series = "4D Sedan";											//54C		68
	if (Series == "41" && MY == "1970") Series = "500 4D Station Wagon";								//71B		70
	if (Series == "42" && (MY == "1968" || MY == "1969")) Series = "GT 2D HT Fastback";					//63D,63F	68-69
	if (Series == "42" && MY == "1970") Series = "4D Station Wagon";									//71C		70
	if (Series == "42" && MY == "1971") Series = "500 4D Station Wagon";								//71C		71
	if (Series == "42") Series = "Gran Torino 4D Station Wagon";										//71D		72-76
	if (Series == "43" && (MY == "1968" || MY == "1969")) Series = "GT Convertible";					//76D,76F	68-69
	if (Series == "43" && (MY == "1970" || MY == "1971")) Series = "Squire 4D Station Wagon";			//71E		70-71
	if (Series == "43") Series = "Gran Torino Squire 4D Station Wagon";									//71K		72-76
	if (Series == "44" && (MY == "1968" || MY == "1969")) Series = "GT 2D HT";							//65F,65D	68-69
	if (Series == "45" && MY == "1969") Series = "Cobra 2D HT";											//65A,65E	69
	if (Series == "46" && MY == "1969") Series = "Cobra 2D HT";											//63B,63E	69
	
	//Check validity
	if (Series.length < 3) Series="Not valid Series code/Body type";
	
	//Body
	// Body=Series;	
		switch(Body){
			case "65M":
				Body="Gran Torino Elite 2D HT";
				break
			case "65B":
				if (MY <= "1970") 
					Body = "500 2D HT";
				else {
					Body = "2D HT";
					}
				break
			case "65A":
				if (MY == "1969")
					Body = "Cobra 2D HT";
				else {
					Body = "2D HT";
					}
				break
			case "53B":
				if (MY < "1972")
					Body = "4D Sedan";
				else {
					Body = "4D Pillared HT";
					}
				break
			case "54B":
					Body = "500 4D Sedan";
				break
			case "65C":
				if (MY < "1971")
					Body = "2D HT";
				else {
					Body = "500 2D HT";
					}
				break
			case "65D":
				if (MY < "1972")
					Body = "GT 2D HT";
				else {
					Body = "Gran Torino 2D HT";
					}
				break
			case "54A":
				Body="4D Sedan";
				break
			case "54C":
				if (MY < "1971")
					Body = "4D Sedan";
				else {
					Body = "500 4D Sedan";
					}
				break
			case "53D":
					Body = "Gran Torino 4D Pillared HT";
				break
			case "71D":
				if (MY < "1972")
					Body = "4D Station Wagon";
				else {
					Body="Gran Torino 4D Station Wagon";
					}
				break
			case "57C":
				if (MY < "1971")
					Body = "4D HT";
				else {
					Body = "500 4D HT";
					}
				break
			case "65K":
				Body = "Gran Torino Brougham 2D Pillared HT";
				break
			case "65E":
				if (Series == "Cobra 2D HT")
					Body = "Cobra 2D HT";				
				if (MY < "1970")
					Body = "500 2D HT";
				else {
					Body = "Brougham 2D HT";
					}
				break
			case "53K":
				Body = "Gran Torino 2D Pillared HT";
				break
			case "63C":
				Body = "500 2D HT Fastback";
				break
			case ("63B" || "63C"):
				if (Series == "Cobra 2D HT")
					Body = "Cobra 2D HT";
				else {
					Body = "500 2D HT Fastback";
					}
				break
			case ("63F" || "63D"):
				Body = "GT 2D HT Fastback";
				break
			case "63R":
				Body = "Gran Torino Sport 2D HT Fastback";
				break
			case ("76B" || "76E"):
				Body = "500 Convertible";
				break
			case "57E":
				Body = "Brougham 4D HT";
				break
			case ("76F" || "76D"):
				Body = "GT Convertible";
				break
			case "71B":
				if (MY < "1972")
					Body = "500 4D Station Wagon";
				else {
					Body = "4D Station Wagon";				
					}
				break
			case "71E":
				Body = "Squire 4D Station Wagon";
				break
			case "63H":
				Body = "Cobra 2D HT Fastback";
				break
			case "65R":
				Body = "Gran Torino Sport 2D HT";
				break
			case "71C":
				if (MY < "1971")
					Body = "4D Station Wagon";
				else {
					Body = "500 4D Station Wagon";
					}
				break
			default:
				Body = Series;			
		}

	if (Body!=Series) Body=Series;
	
	//Color
	switch(MY) {
		case "1968": 					//OK
			switch(Color) {
				case "A":
					Color="Raven Black (Mustang only) PPG 9300";
					break
				case "B":
					Color="Royal Maroon PPG 50746";
					break
				case "D":
					Color="Acapulco Blue Poly (Mustang only) PPG 13357";
					break
				case "F":
					Color="Gulfstream Aqua Poly Poly PPG 13329";
					break
				case "I":
					Color="Lime Gold Poly Poly PPG 43576";
					break
				case "M":
					Color="Wimbledon White 1#: PPG 8378, 2#: PPG 8734";
					break
				case "N":
					Color="Diamond Blue PPG 11683";
					break
				case "O":
					Color="Sea Foam Green PPG 43529";
					break
				case "Q":
					Color="Brittany Blue Poly PPG 13619";
					break
				case "R":
					Color="Highland Green Poly PPG 43644";
					break
				case "S":
					Color="Low Gloss Black (Mustang only, hood and cowl) PPG 9295";
					break
				case "T":
					Color="Candyapple Red PPG 71528";
					break
				case "U":
					Color="Tahoe Turquoise Poly PPG 12745";
					break
				case "W":
					Color="Meadowlark Yellow PPG 81584";
					break
				case "X":
					Color="Presidential Blue Poly PPG 13356";
					break
				case "Y":
					Color="Sunlit Gold Poly PPG 22833";
					break
				case "6":
					Color="Pebble Beige PPG 22249";
					break					
				default:
					Color="Not valid color code";
				}
				break
		case "1969":						//OK
			switch(Color) {
				case "A":
					Color="Raven Black (Mustang only) PPG 9000,9300";
					break
				case "B":
					Color="Royal Maroon PPG 50746";
					break
				case "C":
					Color="Black Jade Poly PPG 2037";
					break
				case "D":
					Color="Pastel Gray PPG 2038";
					break
				case "E":
					Color="Aztec Aqua PPG 2039";
					break
				case "F":
					Color="Gulfstream Aqua Poly PPG 13329";
					break
				case "I":
					Color="Lime Gold Poly PPG 2054";
					break
				case "K":
					Color="Freudian Gilt Poly PPG 2156";
					break
				case "M":
					Color="Wimbledon White #1: PPG 8378 #2: PPG 8734";
					break
				case "P":
					Color="Winter Blue Poly PPG 2042";
					break
				case "Q":
					Color="Brittany Blue Poly PPG 13619";
					break
				case "S":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "T":
					Color="Candyapple Red PPG 71528";
					break
				case "W":
					Color="Meadowlark Yellow PPG 81584";
					break
				case "X":
					Color="Presidential Blue Poly PPG 2056";
					break
				case "Y":
					Color="Indian Fire Poly PPG 2046";
					break
				case "2":
					Color="New Lime PPG 2047";
					break	
				case "3":
					Color="Thanks Vermillion PPG 2151, Calypso Coral PPG 60449";
					break					
				case "4":
					Color="Silver Jade Poly 2048";
					break					
				case "5":
					Color="Sage Bronze PPG 22749";
					break					
				case "6":
					Color="Acapulco Blue Poly PPG 22249, Hulla Blue Poly";
					break					
				case "7":
					Color="Anti-Establish Mint PPG 2149";
					break					
				case "8":
					Color="Dresden Blue PPG 2050";
					break					
				case "9":
					Color="Yellow PPG 2052";
					break					
									
				default:
					Color="Not valid color code";
				}
				break
		case "1970":							//OK
			switch(Color) {
				case "A":
					Color="Raven Black, History Onyx PPG 9000,9300";
					break
				case "B":
					Color="Dark Maroon PPG 2150";
					break
				case "C":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "D":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "F":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "G":
					Color="Medium Lime Poly PPG 2152";
					break
				case "J":
					Color="Grabber Blue PPG 2230";
					break
				case "K":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "M":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "N":
					Color="Diamond Blue PPG 11683";
					break
				case "O":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "P":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "Q":
					Color="MediumBlue Poly PPG 2138";
					break
				case "S":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "T":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "U":
					Color="Grabber Orange PPG 2232";
					break	
				case "W":
					Color="Yellow PPG 2157";
					break					
				case "X":
					Color="Dark Blue PPG 2139";
					break					
				case "Y":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "Z":
					Color="Grabber Green PPG 2231";
					break					
				case "1":
					Color="Calypso Coral PPG 60449";
					break					
				case "2":
					Color="New Lime PPG 2047";
					break					
				case "5":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "6":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "7":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "8":
					Color="Morning Gold PPG 2043";
					break					
				case "9":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break
		case "1971":						
			switch(Color) {
				case "A":
					Color="Raven Black, History Onyx PPG 9000,9300";
					break
				case "B":
					Color="Dark Maroon PPG 2150";
					break
				case "C":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "D":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "E":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "F":
					Color="Medium Lime Poly PPG 2152";
					break
				case "H":
					Color="Grabber Blue PPG 2230";
					break
				case "I":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "J":
					Color="Grabber Blue PPG 2230";
					break
				case "M":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "N":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "O":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "P":
					Color="MediumBlue Poly PPG 2138";
					break
				case "Q":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "S":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "T":
					Color="Grabber Orange PPG 2232";
					break	
				case "V":
					Color="Yellow PPG 2157";
					break					
				case "X":
					Color="Dark Blue PPG 2139";
					break					
				case "Y":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "Z":
					Color="Grabber Green PPG 2231";
					break					
				case "2":
					Color="Calypso Coral PPG 60449";
					break					
				case "3":
					Color="New Lime PPG 2047";
					break					
				case "4":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "5":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "6":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "7":
					Color="Morning Gold PPG 2043";
					break					
				case "8":
					Color="Pastel Yellow PPG 81584";
					break														
				case "9":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break
		case "1972":
			switch(Color) {
				case "1A":
					Color="Raven Black, History Onyx PPG 9000,9300";
					break
				case "1C":
					Color="Pastel Yellow PPG 81584";
					break														
				case "2A":
					Color="Dark Maroon PPG 2150";
					break
				case "2B":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "2E":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "2J":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "7":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "3B":
					Color="Medium Lime Poly PPG 2152";
					break
				case "3D":
					Color="Grabber Blue PPG 2230";
					break
				case "F":
					Color="Grabber Blue PPG 2230";
					break
				case "3F":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "3H":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "3J":
					Color="Diamond Blue PPG 11683";
					break
				case "3K":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "4B":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "4C":
					Color="MediumBlue Poly PPG 2138";
					break
				case "4E":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "4":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "4F":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "4P":
					Color="Grabber Orange PPG 2232";
					break	
				case "4Q":
					Color="Yellow PPG 2157";
					break					
				case "4S":
					Color="Dark Blue PPG 2139";
					break					
				case "5A":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "5H":
					Color="Grabber Green PPG 2231";
					break					
				case "5J":
					Color="Calypso Coral PPG 60449";
					break					
				case "5N":
					Color="New Lime PPG 2047";
					break					
				case "6B":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "6C":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "6D":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "6E":
					Color="Morning Gold PPG 2043";
					break					
				case "2":
					Color="Morning Gold PPG 2043";
					break					
				case "6F":
					Color="Pastel Yellow PPG 81584";
					break														
				case "6J":
					Color="Pastel Yellow PPG 81584";
					break														
				case "9A":
					Color="Pastel Yellow PPG 81584";
					break														
				case "9C":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break
		case "1973":
			switch(Color) {
				case "1C":
					Color="Pastel Yellow PPG 81584";
					break														
				case "2B":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "2E":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "2J":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "7":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "3B":
					Color="Medium Lime Poly PPG 2152";
					break
				case "3D":
					Color="Grabber Blue PPG 2230";
					break
				case "F":
					Color="Grabber Blue PPG 2230";
					break
				case "3F":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "3H":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "3J":
					Color="Diamond Blue PPG 11683";
					break
				case "3K":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "4B":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "4C":
					Color="MediumBlue Poly PPG 2138";
					break
				case "4E":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "4":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "4F":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "4P":
					Color="Grabber Orange PPG 2232";
					break	
				case "4Q":
					Color="Yellow PPG 2157";
					break					
				case "4S":
					Color="Dark Blue PPG 2139";
					break					
				case "5A":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "5H":
					Color="Grabber Green PPG 2231";
					break					
				case "5J":
					Color="Calypso Coral PPG 60449";
					break					
				case "5N":
					Color="New Lime PPG 2047";
					break					
				case "6B":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "6C":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "6D":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "6E":
					Color="Morning Gold PPG 2043";
					break					
				case "2":
					Color="Morning Gold PPG 2043";
					break					
				case "6F":
					Color="Pastel Yellow PPG 81584";
					break														
				case "6J":
					Color="Pastel Yellow PPG 81584";
					break														
				case "9A":
					Color="Pastel Yellow PPG 81584";
					break														
				case "9C":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break
		case "1974":
			switch(Color) {
				case "A":
					Color="Raven Black, History Onyx PPG 9000,9300";
					break
				case "B":
					Color="Dark Maroon PPG 2150";
					break
				case "C":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "D":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "F":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "G":
					Color="Medium Lime Poly PPG 2152";
					break
				case "J":
					Color="Grabber Blue PPG 2230";
					break
				case "K":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "M":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "N":
					Color="Diamond Blue PPG 11683";
					break
				case "O":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "P":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "Q":
					Color="MediumBlue Poly PPG 2138";
					break
				case "S":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "T":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "U":
					Color="Grabber Orange PPG 2232";
					break	
				case "W":
					Color="Yellow PPG 2157";
					break					
				case "X":
					Color="Dark Blue PPG 2139";
					break					
				case "Y":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "Z":
					Color="Grabber Green PPG 2231";
					break					
				case "1":
					Color="Calypso Coral PPG 60449";
					break					
				case "2":
					Color="New Lime PPG 2047";
					break					
				case "5":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "6":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "7":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "8":
					Color="Morning Gold PPG 2043";
					break					
				case "9":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break
		case "1975":
			switch(Color) {
				case "A":
					Color="Raven Black, History Onyx PPG 9000,9300";
					break
				case "B":
					Color="Dark Maroon PPG 2150";
					break
				case "C":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "D":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "F":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "G":
					Color="Medium Lime Poly PPG 2152";
					break
				case "J":
					Color="Grabber Blue PPG 2230";
					break
				case "K":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "M":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "N":
					Color="Diamond Blue PPG 11683";
					break
				case "O":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "P":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "Q":
					Color="MediumBlue Poly PPG 2138";
					break
				case "S":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "T":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "U":
					Color="Grabber Orange PPG 2232";
					break	
				case "W":
					Color="Yellow PPG 2157";
					break					
				case "X":
					Color="Dark Blue PPG 2139";
					break					
				case "Y":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "Z":
					Color="Grabber Green PPG 2231";
					break					
				case "1":
					Color="Calypso Coral PPG 60449";
					break					
				case "2":
					Color="New Lime PPG 2047";
					break					
				case "5":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "6":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "7":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "8":
					Color="Morning Gold PPG 2043";
					break					
				case "9":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break
		case "1976":
			switch(Color) {
				case "A":
					Color="Raven Black, History Onyx PPG 9000,9300";
					break
				case "B":
					Color="Dark Maroon PPG 2150";
					break
				case "C":
					Color="Dark Ivy Green Poly, Bring 'em back Olive Poly PPG 2146";
					break
				case "D":
					Color="Bright Yellow, Last Stand Custard PPG 2214";
					break
				case "F":
					Color="Dark Bright Aqua Poly, Young Turquoise Poly PPG 13329";
					break
				case "G":
					Color="Medium Lime Poly PPG 2152";
					break
				case "J":
					Color="Grabber Blue PPG 2230";
					break
				case "K":
					Color="Bright Gold Poly, Freudian Gilt Poly PPG 2156";
					break
				case "M":
					Color="Wimbledon White, Knight White PPG 8378";
					break
				case "N":
					Color="Diamond Blue PPG 11683";
					break
				case "O":
					Color="Original Cinnamon Poly PPG 2046";
					break
				case "P":
					Color="Medium Ivy Green Poly, Three Putt Green Poly PPG 2138";
					break
				case "Q":
					Color="MediumBlue Poly PPG 2138";
					break
				case "S":
					Color="Champagne Gold Poly PPG 2044";
					break
				case "T":
					Color="Candyapple Red, Counter Revolutionary Red PPG 71528";
					break
				case "U":
					Color="Grabber Orange PPG 2232";
					break	
				case "W":
					Color="Yellow PPG 2157";
					break					
				case "X":
					Color="Dark Blue PPG 2139";
					break					
				case "Y":
					Color="Medium Bronze Poly PPG 2142";
					break					
				case "Z":
					Color="Grabber Green PPG 2231";
					break					
				case "1":
					Color="Calypso Coral PPG 60449";
					break					
				case "2":
					Color="New Lime PPG 2047";
					break					
				case "5":
					Color="Ginger Poly, Medium Brown Poly PPG 2160";
					break					
				case "6":
					Color="Acapulco Blue Poly, Hulla Blue Poly PPG 13357";
					break					
				case "7":
					Color="Anti-Eastablish Mint Poly PPG 2149";
					break					
				case "8":
					Color="Morning Gold PPG 2043";
					break					
				case "9":
					Color="Pastel Yellow PPG 81584";
					break														
				default:
					Color="Not valid color code";
				}
				break								
		default:
			Color="Not valid color code";
		}


	//Trim (not defined yet...)
	Trim="Sorry, not available yet...";


	if ((MY < "1973") && (MY >"1964"))
	{
	// Engine
	if (Eng == "A") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="4 BC"; Eng_year="1965-67"; Eng_other="P/F";}
	if (Eng == "B") {Eng_cyl = "6"; Eng_cid ="240"; Eng_carb="1 BC"; Eng_year="1967-70"; Eng_other="Police";}
	if (Eng == "C") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="2 BC"; Eng_year="1965-68"; Eng_other="P/F";}
	if (Eng == "C" && (MY=="1970" || MY=="1971")) {Eng_cyl = "8"; Eng_cid ="429"; Eng_carb="4 BC"; Eng_year="1970-71"; Eng_other="Cobra Jet";}
	if (Eng == "D") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="4 BC"; Eng_year="1965"; Eng_other="-";}
	if (Eng == "D") {Eng_cyl = "8"; Eng_cid ="302"; Eng_carb="2 BC"; Eng_year="1969-72"; Eng_other="Police & Taxi";}
	if (Eng == "E") {Eng_cyl = "6"; Eng_cid ="240"; Eng_carb="1 BC"; Eng_year="1965-72"; Eng_other="Taxi";}
	if (Eng == "F") {Eng_cyl = "8"; Eng_cid ="260"; Eng_carb="2 BC"; Eng_year="1965"; Eng_other="-";}
	if (Eng == "F") {Eng_cyl = "8"; Eng_cid ="302"; Eng_carb="2 BC"; Eng_year="1968-72"; Eng_other="-";}
	if (Eng == "G") {Eng_cyl = "8"; Eng_cid ="300"; Eng_carb="4 BC"; Eng_year="1969-71"; Eng_other="Boss";}
	if (Eng == "H") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="2 BC"; Eng_year="1966-67"; Eng_other="-";}
	if (Eng == "H") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="2 BC"; Eng_year="1969-72"; Eng_other="351W & 351C";}
	if (Eng == "J") {Eng_cyl = "8"; Eng_cid ="302"; Eng_carb="4 BC"; Eng_year="1968"; Eng_other="-";}
	if (Eng == "J") {Eng_cyl = "8"; Eng_cid ="429"; Eng_carb="4 BC"; Eng_year="1970-71"; Eng_other="Cobra Jet";}
	if (Eng == "K") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="4 BC"; Eng_year="1965-67"; Eng_other="HiPo";}
	if (Eng == "K") {Eng_cyl = "8"; Eng_cid ="429"; Eng_carb="2 BC"; Eng_year="1969-71"; Eng_other="-";}
	if (Eng == "L") {Eng_cyl = "6"; Eng_cid ="250"; Eng_carb="1 BC"; Eng_year="1969-72"; Eng_other="-";}
	if (Eng == "M") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="4 BC"; Eng_year="1969-71"; Eng_other="-";}
	if (Eng == "N") {Eng_cyl = "8"; Eng_cid ="429"; Eng_carb="4 BC"; Eng_year="1968-72"; Eng_other="-";}
	if (Eng == "P") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="1965-66"; Eng_other="Police";}
	if (Eng == "P") {Eng_cyl = "8"; Eng_cid ="428"; Eng_carb="4 BC"; Eng_year="1967-70"; Eng_other="Police";}
	if (Eng == "P") {Eng_cyl = "8"; Eng_cid ="429"; Eng_carb="4 BC"; Eng_year="1971-72"; Eng_other="Police";}
	if (Eng == "Q") {Eng_cyl = "8"; Eng_cid ="428"; Eng_carb="4 BC"; Eng_year="1966-70"; Eng_other="-";}
	if (Eng == "Q") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="4 BC"; Eng_year="1971-72"; Eng_other="GT";}
	if (Eng == "R") {Eng_cyl = "8"; Eng_cid ="427"; Eng_carb="8 BC"; Eng_year="1965-67"; Eng_other="HiPo";}
	if (Eng == "R") {Eng_cyl = "8"; Eng_cid ="428"; Eng_carb="4 BC"; Eng_year="1968-70"; Eng_other="Cobra Jet (hydr. lifters)";}
	if (Eng == "R") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="4 BC"; Eng_year="1971-72"; Eng_other="Boss";}
	if (Eng == "S") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="1966-69"; Eng_other="-";}
	if (Eng == "S") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="1967"; Eng_other="GT";}
	if (Eng == "S") {Eng_cyl = "8"; Eng_cid ="400"; Eng_carb="2 BC"; Eng_year="1971-72"; Eng_other="-";}
	if (Eng == "T") {Eng_cyl = "6"; Eng_cid ="200"; Eng_carb="1 BC"; Eng_year="1965-72"; Eng_other="-";}
	if (Eng == "U") {Eng_cyl = "6"; Eng_cid ="170"; Eng_carb="1 BC"; Eng_year="1965-72"; Eng_other="-";}
	if (Eng == "V") {Eng_cyl = "6"; Eng_cid ="240"; Eng_carb="1 BC"; Eng_year="1965-72"; Eng_other="-";}
	if (Eng == "W") {Eng_cyl = "8"; Eng_cid ="427"; Eng_carb="4 BC"; Eng_year="1966-68"; Eng_other="HiPo";}
	if (Eng == "W") {Eng_cyl = "4"; Eng_cid ="98"; Eng_carb="1 BC"; Eng_year="1971-72"; Eng_other="1.6L";}
	if (Eng == "X") {Eng_cyl = "8"; Eng_cid ="352"; Eng_carb="4 BC"; Eng_year="1965-66"; Eng_other="-";}
	if (Eng == "X") {Eng_cyl = "4"; Eng_cid ="122"; Eng_carb="2 BC"; Eng_year="1971-72"; Eng_other="2.0L";}
	if (Eng == "Y") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="2 BC"; Eng_year="1966-67"; Eng_other="-";}
	if (Eng == "Y") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="2 BC"; Eng_year="1968"; Eng_other="-";}
	if (Eng == "Y") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="2 BC"; Eng_year="1969-71"; Eng_other="P/F";}
	if (Eng == "Z") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="1965-68"; Eng_other="R/F";}
	}
if (MY > "1972")
	{
	if (Eng == "A") {Eng_cyl = "8"; Eng_cid ="460"; Eng_carb="4 BC"; Eng_year="1973-78"; Eng_other="Not Police";}
	if (Eng == "C") {Eng_cyl = "8"; Eng_cid ="460"; Eng_carb="4 BC"; Eng_year="1973-78"; Eng_other="Police";}
	if (Eng == "F") {Eng_cyl = "8"; Eng_cid ="302"; Eng_carb="2 BC"; Eng_year="1973-79"; Eng_other="-";}
	if (Eng == "H") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="2 BC"; Eng_year="1973-79"; Eng_other="-";}
	if (Eng == "L") {Eng_cyl = "6"; Eng_cid ="250"; Eng_carb="1 BC"; Eng_year="1973-79"; Eng_other="-";}
	if (Eng == "N") {Eng_cyl = "8"; Eng_cid ="429"; Eng_carb="4 BC"; Eng_year="1973"; Eng_other="-";}
	if (Eng == "Q") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="4 BC"; Eng_year="1973-74"; Eng_other="GT";}
	if (Eng == "R") {Eng_cyl = "8"; Eng_cid ="351"; Eng_carb="4 BC"; Eng_year="1973"; Eng_other="HO";}
	if (Eng == "S") {Eng_cyl = "8"; Eng_cid ="400"; Eng_carb="2 BC"; Eng_year="1973-79"; Eng_other="-";}
	if (Eng == "T") {Eng_cyl = "6"; Eng_cid ="200"; Eng_carb="1 BC"; Eng_year="1973-79"; Eng_other="-";}
	if (Eng == "W") {Eng_cyl = "4"; Eng_cid ="98"; Eng_carb="1 BC"; Eng_year="1973"; Eng_other="-";}
	if (Eng == "X") {Eng_cyl = "4"; Eng_cid ="122"; Eng_carb="2 BC"; Eng_year="1973-74"; Eng_other="-";}
	if (Eng == "Y") {Eng_cyl = "4"; Eng_cid ="140"; Eng_carb="2 BC"; Eng_year="1974-79"; Eng_other="-";}
	if (Eng == "Z") {Eng_cyl = "6"; Eng_cid ="171"; Eng_carb="2 BC"; Eng_year="1974-79"; Eng_other="-";}	
	}
if ((MY == "1963") || (MY == "1964"))
	{
	if (Eng == "A") {Eng_cyl = "6"; Eng_cid ="223"; Eng_carb="1 BC"; Eng_year="1963-64"; Eng_other="Police";}
	if (Eng == "B") {Eng_cyl = "8"; Eng_cid ="406"; Eng_carb="4 BC"; Eng_year="1962-63"; Eng_other="-";}
	if (Eng == "C") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="2 BC"; Eng_year="1963-64"; Eng_other="-";}
	if (Eng == "E") {Eng_cyl = "8"; Eng_cid ="260"; Eng_carb="2 BC"; Eng_year="1962-64"; Eng_other="-";}
	if (Eng == "G") {Eng_cyl = "6"; Eng_cid ="260"; Eng_carb="2 BC"; Eng_year="1962-63"; Eng_other="-";}
	if (Eng == "K") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="4 BC"; Eng_year="1963-64"; Eng_other="-";}
	if (Eng == "L") {Eng_cyl = "8"; Eng_cid ="221"; Eng_carb="2 BC"; Eng_year="1962-63"; Eng_other="-";}
	if (Eng == "M") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="6 BC"; Eng_year="1962-63"; Eng_other="-";}
	if (Eng == "P") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="1962-63"; Eng_other="-";}
	if (Eng == "Q") {Eng_cyl = "8"; Eng_cid ="427"; Eng_carb="4 BC"; Eng_year="1963-64"; Eng_other="-";}
	if (Eng == "R") {Eng_cyl = "8"; Eng_cid ="427"; Eng_carb="8 BC"; Eng_year="1963-64"; Eng_other="-";}
	if (Eng == "S") {Eng_cyl = "6"; Eng_cid ="144"; Eng_carb="1 BC"; Eng_year="1960-64"; Eng_other="-";}
	if (Eng == "T") {Eng_cyl = "6"; Eng_cid ="200"; Eng_carb="1 BC"; Eng_year="1963-64"; Eng_other="-";}
	if (Eng == "U") {Eng_cyl = "6"; Eng_cid ="170"; Eng_carb="1 BC"; Eng_year="1961-64"; Eng_other="-";}	
	if (Eng == "V") {Eng_cyl = "6"; Eng_cid ="223"; Eng_carb="1 BC"; Eng_year="1960-64"; Eng_other="-";}	
	if (Eng == "X") {Eng_cyl = "8"; Eng_cid ="352"; Eng_carb="2 BC"; Eng_year="1960-63"; Eng_other="-";}	
	if (Eng == "Z") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="1961-64"; Eng_other="-61 myös 375 CID, teho 400";}		
	}
if ((MY == "1965") && ((Site =="Oakville") || (Site=="St. Thomas")))	//1965, only Canada
	{
	if (Eng == "B") {Eng_cyl = "6"; Eng_cid ="170"; Eng_carb="1 BC"; Eng_year="-"; Eng_other="-";}
	if (Eng == "C") {Eng_cyl = "6"; Eng_cid ="240"; Eng_carb="1 BC"; Eng_year="-"; Eng_other="-";}
	if (Eng == "D") {Eng_cyl = "6"; Eng_cid ="200"; Eng_carb="1 BC"; Eng_year="-"; Eng_other="-";}
	if (Eng == "F") {Eng_cyl = "8"; Eng_cid ="289"; Eng_carb="2/4 BC"; Eng_year="-"; Eng_other="-";}
	if (Eng == "G") {Eng_cyl = "8"; Eng_cid ="352"; Eng_carb="4 BC"; Eng_year="-"; Eng_other="-";}
	if (Eng == "J") {Eng_cyl = "8"; Eng_cid ="390"; Eng_carb="4 BC"; Eng_year="-"; Eng_other="-";}
	if (Eng == "M") {Eng_cyl = "8"; Eng_cid ="260"; Eng_carb="2 BC"; Eng_year="-"; Eng_other="-";}
	
	}	
	
//Trans codes
	if ((MY < "1973") && MY > "1964") {
		if (Trans == "1") {
			if ((MY < "1973") && (MY > "1967"))  Trans = "3 speed manual (3.03)";												
			if ((MY == "1966") || (MY=="1967"))  Trans = "3 speed manual (2.77)";		
			if (MY == "1965")  Trans = "3 speed manual";		
		}
		if ((Trans == "2") && ((MY <"1968") && (MY>"1964"))) Trans = "overdrive";	
		if ((Trans == "3") && ((MY>"1965") && (MY<"1968"))) Trans = "3 speed manual (3.03)";	
		if (Trans == "4") {
			if (MY == "1965")  Trans = "Cruise-O-Matic";												
			if (MY == "1966")  Trans = "C6 (XPL)";															
			}
		if (Trans == "5") {
			if ((MY>"1967") && (MY < "1973"))  Trans = "4 speed manual, 1st gear 2.78";												
			if (MY>"1964" && (MY < "1968"))  Trans = "4 speed manual";															
			}
		if (Trans == "6") {
			if ((MY < "1972") && (MY>"1967"))  Trans = "4 speed manual, 1st gear 2.32";												
			if ((MY < "1967") && (MY>"1964"))  Trans = "C4 (XP)";															
			}
		if ((Trans == "7") && (MY="1966")) Trans = "Cruise-O-Matic (FX)";	
		if ((Trans == "8") && (MY=="1966")) Trans = "Cruise-O-Matic (MX)";	
		if ((Trans == "E") && ((MY>"1970") && (MY < "1973"))) Trans = "4 speed manual (Colt)";	
		if ((Trans == "T") && (MY=="1968")) Trans = "Cruise-O-Matic (FMX-L)";	
		if ((Trans == "U") && ((MY>"1966") && (MY < "1973"))) Trans = "C6 (XPL)";	
		if ((Trans == "V") && (MY=="1970")) Trans = "C4 semi-automatic";	
		if (Trans == "W") {
			if ((MY>"1967") && (MY < "1973"))  Trans = "C4 (XP3)";												
			if (MY == "1967")  Trans = "C4 (XP)";															
			}
		if (Trans == "X") {
			if ((MY>"1967") && (MY < "1973"))  Trans = "Cruise-O-Matic FMX";												
			if (MY == "1967")  Trans = "Cruise-O-Matic FX";															
			}
		if (Trans == "Y") Trans = "Cruise-O-Matic (MX)";	
		if ((Trans == "Z") && ((MY>"1966") && (MY < "1973"))) Trans = "C6 Special (XPL), Police and trailer package";													
	}
	if (MY < "1965") {
		if (Trans == "1")  Trans = "3 speed manual";												
		if (Trans == "2")  Trans = "overdrive";												
		if (Trans == "3")  Trans = "2 speed Fordomatic";												
		if (Trans == "4")  Trans = "Cruise-O-Matic FX, FMX";												
		if (Trans == "5")  Trans = "4 speed manual";	
		if (Trans == "6")  Trans = "C4";																						
	}
	if (MY > "1972") {
		if ((Trans == "1") && (MY <"1978") && (MY > "1972"))  Trans = "3 speed manual";												
		if ((Trans == "5") && (MY <"1977") && (MY > "1972"))  Trans = "4 speed manual, USA or Germany";												
		if ((Trans == "6") && (MY <"1980") && (MY > "1973"))  Trans = "4 speed manual, Borg-Warner";												
		if ((Trans == "E") && (MY=="1973"))  Trans = "4 speed manual, UK";												
		if ((Trans == "U") && (MY <"1980") && (MY > "1972"))  Trans = "C6";	
		if ((Trans == "V") && (MY <"1980") && (MY > "1972"))  Trans = "C3";																						
		if ((Trans == "W") && (MY <"1980") && (MY > "1972"))  Trans = "C4";																						
		if ((Trans == "X") && (MY <"1980") && (MY > "1972"))  Trans = "Cruise-O-Matic (FMX)";																						
		if ((Trans == "Y") && (((MY <"1975") && (MY > "1972")) || (MY=="1979")))  Trans = "Cruise-O-Matic, Borg-Warner";																						
		if ((Trans == "Z")) Trans = "C6 Special (XPL), Police and trailer package";																						
	}

	// Canada trannies here...
	if ((MY == "1965") && ((Site == "St. Thomas") || (Site =="Oakville"))) {
		if (Trans == "1") Trans = "3 speed manual";		
		if (Trans == "2") Trans = "4 speed manual";		
		if (Trans == "3") Trans = "automatic, steering column shifter";		
		if (Trans == "4") Trans = "automatic, floor shifter";				
	}

	if ((MY < "1965") && MY > "1959") {
		if (Trans == "1") Trans = "3 speed manual";		
		if (Trans == "2") Trans = "overdrive";		
		if (Trans == "3") Trans = "2 speed Fordomatic";		
		if (Trans == "4") Trans = "Cruise-O-Matic FX, FMX";				
		if (Trans == "5") Trans = "4 speed manual";				
		if (Trans == "6") Trans = "C4";				
	}
	
	//Check Trans code valid
	if 	(Trans.length < 2) Trans = "Not valid Trans type" ;	



//Axle codes
	if ((MY < "1965") && (MY > "1962")) 
		{
		if (Axle == "A") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.00, lock";												
		}
		if (Axle == "B") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.10, lock";												
		}		
		if (Axle == "C") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.20, lock";												
		}
		if (Axle == "D") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.25, lock";												
		}
		if (Axle == "E") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.50, lock";												
		}
		if (Axle == "F") {
			if (MY == "1964")  Axle = "2.80, lock";												
		}
		if (Axle == "G") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.80, lock";												
		}
		if (Axle == "H") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.89, lock";												
		}
		if (Axle == "I") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "4.00, lock, Falcon. 4.11, lock, Ford, Fairlane";												
		}
		if (Axle == "1") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.00, no lock";												
		}
		if (Axle == "2") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.10, no lock";												
		}
		if (Axle == "3") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.20, no lock";												
		}
		if (Axle == "4") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.25, no lock";												
		}
		if (Axle == "5") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.50, no lock";												
		}
		if (Axle == "6") {
			if (MY == "1964")  Axle = "2.80, no lock";												
		}
		if (Axle == "7") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.80, no lock";												
		}
		if (Axle == "8") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "3.89, no lock";												
		}
		if (Axle == "9") {
			if ((MY > "1961") && (MY < "1965"))  Axle = "4.00, no lock, Falcon. 4.11, no lock, Ford, Fairlane";												
		}		



		}

	if ((MY < "1973") && (MY > "1964")) {
		if (Axle == "A") {
			if ((MY > "1968") && (MY < "1973"))  Axle = "3.50, no lock";												
			if ((MY > "1964") && (MY < "1968"))  Axle = "3.00, lock";		
			if (MY == "1968")  Axle = "2.75, lock";		
		}
		if (Axle == "B") {
			if ((MY > "1968") && (MY < "1973"))  Axle = "3.07, no lock";												
			if ((MY > "1964") && (MY < "1968"))  Axle = "2.83, lock";		
		}		
		if (Axle == "C") {
			if ((MY > "1968") && (MY < "1971"))  Axle = "3.08, no lock";												
			if ((MY > "1964") && (MY < "1968"))  Axle = "2.80, lock";		
			if (MY == "1968")  Axle = "2.80, lock";		
		}
		if (Axle == "D") {
			if (MY == "1969")  Axle = "3.91, no lock";												
			if ((MY > "1964") && (MY < "1968"))  Axle = "3.25, lock";		
			if (MY == "1968")  Axle = "2.83, lock";		
		}
		if (Axle == "E") {
			if (MY == "1969")  Axle = "3.91, no lock";												
			if ((MY > "1964") && (MY < "1968"))  Axle = "3.25, lock";		
			if (MY == "1968")  Axle = "2.83, lock";		
		}
		if (Axle == "F") {
			if (MY == "1969")  Axle = "2.33, no lock";												
			if ((MY > "1964") && (MY < "1968"))  Axle = "2.80, lock";		
			if (MY == "1968")  Axle = "3.20, lock";		
		}
		if (Axle == "G") {
			if ((MY > "1970") && (MY < "1973"))  Axle = "3.55, no lock";												
			if (MY == "1968")  Axle = "3.25, lock";		
			if (MY == "1967")  Axle = "3.36, lock";		
			if (MY == "1965")  Axle = "3.80, lock";		
		}
		if (Axle == "H") {
			if ((MY > "1970") && (MY < "1973"))  Axle = "3.83, no lock";												
			if (MY == "1968")  Axle = "3.50, lock";		
			if (MY == "1967")  Axle = "2.75, lock";		
			if ((MY > "1964") && (MY < "1967"))  Axle = "3.89, lock";		
		}
		if (Axle == "I") {
			if ((MY > "1965") && (MY < "1968"))  Axle = "4.11, lock";												
			if (MY == "1965")  Axle = "4.00, lock (Falcon). 4.11, lock (Ford, Fairlane, Mustang)";		
		}
		if (Axle == "J") {
			if (MY == "1969")  Axle = "2.50 lock";		
		}
		if (Axle == "K") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "2.75 lock";		
		}
		if (Axle == "L") {
			if (MY == "1968")  Axle = "3.36, no lock";												
			if (MY == "1969")  Axle = "2.79, lock";		
		}
		if (Axle == "M") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "2.80 lock";
			if (MY == "1968")  Axle = "3.07, no lock";																	
		}
		if (Axle == "N") {
			if (MY == "1969")  Axle = "2.83 lock";		
		}
		if (Axle == "O") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "3.00 lock";
		}
		if (Axle == "Q") {
			if (MY == "1970")  Axle = "3.20 lock";		
		}
		if (Axle == "R") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "3.25 lock";
		}
		if (Axle == "S") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "3.50 lock";
		}
		if (Axle == "V") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "3.91 lock";
		}
		if (Axle == "W") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "4.30 lock";
		}
		if (Axle == "X") {
			if (MY == "1969")  Axle = "2.33 lock";		
		}
		if (Axle == "Y") {
			if ((MY < "1973") && (MY > "1970"))  Axle = "4.11 lock";
		}
		if (Axle == "0") {
			if ((MY < "1970") && (MY > "1967"))  Axle = "2.50 no lock";
			if (MY == "1967")  Axle = "3.10, no lock, Ford. 2.79, no lock , Fairlane, Falcon, Mustang";		
		}
		if (Axle == "1") {
			if ((MY < "1968") && (MY > "1964"))  Axle = "3.00 no lock";
			if (MY == "1968")  Axle = "2.75, no lock";												
			if (MY == "1969")  Axle = "2.50, no lock";		
		}
		if (Axle == "2") {
			if ((MY < "1968") && (MY > "1964"))  Axle = "2.83 no lock";
			if (MY == "1968")  Axle = "2.79, no lock";												
			if ((MY < "1973") && (MY > "1968"))  Axle = "2.75 no lock";
		}
		if (Axle == "3") {
			if ((MY < "1968") && (MY > "1964"))  Axle = "3.20 no lock";
			if (MY == "1968")  Axle = "2.80, no lock";												
			if ((MY < "1971") && (MY > "1968"))  Axle = "2.80 no lock";
		}
		if (Axle == "4") {
			if ((MY < "1968") && (MY > "1964"))  Axle = "3.25 no lock";
			if (MY == "1968")  Axle = "2.83, no lock";												
			if ((MY < "1973") && (MY > "1968"))  Axle = "2.80 no lock";
		}
		if (Axle == "5") {
			if ((MY < "1968") && (MY > "1964"))  Axle = "3.50 no lock";
			if (MY == "1968")  Axle = "3.00, no lock";												
			if ((MY < "1971") && (MY > "1968"))  Axle = "2.83 no lock";
		}
		if (Axle == "6") {
			if ((MY < "1968") && (MY > "1964"))  Axle = "2.80 no lock";
			if (MY == "1968")  Axle = "3.20, no lock";												
			if ((MY < "1973") && (MY > "1968"))  Axle = "3.00 no lock";
		}
		if (Axle == "7") {
			if ((MY < "1973") && (MY > "1970"))  Axle = "3.18 no lock";
			if (MY == "1965")  Axle = "3.80, lock";		
			if (MY == "1967")  Axle = "3.36, lock";		
			if (MY == "1968")  Axle = "3.25, lock";		
			if (MY == "1969")  Axle = "3.10, lock";		
		}
		if (Axle == "8") {
			if ((MY < "1971") && (MY > "1968"))  Axle = "3.20 no lock";
			if (MY == "1967")  Axle = "2.75, no lock";												
			if (MY == "1968")  Axle = "3.50, no lock";		
			if ((MY < "1967") && (MY > "1964"))  Axle = "3.89 no lock";
		}
		if (Axle == "9") {
			if ((MY < "1973") && (MY > "1968"))  Axle = "3.25 no lock";
			if (MY == "1965")  Axle = "4.00, no lock, Falcon. 4.11, no lock , Ford, Fairlane, Mustang";		
			if (MY == "1966")  Axle = "4.11, no lock";		
			if (MY == "1967")  Axle = "4.11, no lock";		
			if (MY == "1968")  Axle = "3.10, no lock";		
		}		
	}
	if (MY > "1972")	
	{
		if (Axle == "A") {
			if ((MY < "1975") && (MY > "1972"))  Axle = "3.50 no lock";
		}
		if (Axle == "B") {
			if ((MY < "1977") && (MY > "1973"))  Axle = "3.07 no lock";
		}
		if (Axle == "G") {
			if ((MY < "1977") && (MY > "1972"))  Axle = "3.55 no lock";
		}
		if (Axle == "K") {
			if (((MY < "1977") && (MY > "1972")) || MY=="1979")  Axle = "2.75 lock";
		}
		if (Axle == "L") {
			if (((MY < "1977") && (MY > "1972")) || MY=="1979")  Axle = "2.79 lock";
		}
		if (Axle == "O") {
			if ((MY < "1980") && (MY > "1972"))  Axle = "3.00 lock";
		}
		if (Axle == "P") {
			if ((MY < "1977") && (MY > "1972"))  Axle = "3.40 lock";
		}
		if (Axle == "R") {
			if ((MY < "1977") && (MY > "1972"))  Axle = "3.25 lock";
		}
		if (Axle == "S") {
			if ((MY < "1975") && (MY > "1972"))  Axle = "3.50 lock";
		}
		if (Axle == "V") {
			if (MY == "1973")  Axle = "3.91, lock";		
		}
		if (Axle == "X") {
			if ((MY < "1977") && (MY > "1973"))  Axle = "3.55 lock";
		}
		if (Axle == "2") {
			if ((MY < "1980") && (MY > "1972"))  Axle = "2.75 no lock";
		}
		if (Axle == "3") {
			if ((MY < "1980") && (MY > "1972"))  Axle = "2.79 no lock";
		}
		if (Axle == "5") {
			if ((MY < "1977") && (MY > "1973"))  Axle = "3.07 no lock";
		}
		if (Axle == "7") {
			if ((MY < "1979") && (MY > "1972"))  Axle = "3.40 no lock";
		}
		if (Axle == "9") {
			if ((MY < "1977") && (MY > "1972"))  Axle = "3.25 no lock";
		}
	}
	
	//Check Axle code valid
	if 	(Axle.length < 2) Axle = "Not valid axle type" ;	

	//DSO
	
	switch(DSO) {
	case "11":
		DSO="Boston";
		break
	case "12":
		DSO="Buffalo";
		break
	case "12":
		DSO="New York";
		break
	case "14":
		DSO="Pittsburgh (1972)";
		break
	case "15":
		DSO="Newark";
		break
	case "16":
		DSO="Philadelphia";
		break
	case "17":
		DSO="Washington";
		break
	case"21":
		DSO="Atlanta";
		break
	case "22":
		DSO="Charlotte";
		break
	case "23":
		DSO="Memphis (1972)";
		break
	case "24":
		DSO="Jacksonville";
		break
	case "25":
		DSO="Richmond";
		break
	case "26":
		DSO="New Orleans (1972)";
		break
	case "27":
		DSO="Cincinnati";
		break
	case "28":
		DSO="Louisville";
		break
	case "32":
		DSO="Cleveland (1965-71)";
		break
	case "33":
		DSO="Detroit (1965-71)";
		break
	case "34":
		DSO="Indianapolis";
		break
	case "35":
		DSO="Lansing (1965/71)";
		break
	case "37":
		DSO="Buffalo (1965/71)";
		break
	case "38":
		DSO="Pittsburgh";
		break
	case "41":
		DSO="Chicago";
		break
	case "42":
		if (MY <"1972") {DSO="Fargo (1965/71)";} else {DSO="Cleveland (1972)";}
		break
	case "43":
		DSO="Milwaukee";
		break
	case "44":
		DSO="Twin Cities";
		break
	case "45":
		if (MY <"1972") {DSO="Davenport (1965/71)";} else {DSO="Lansing (1972)";}
		break
	case "46":
		DSO="Indianapolis";
		break
	case "47":
		DSO="Cincinnati";
		break
	case "48":
		DSO="Detroit (1972)";
	case "51":
		DSO="Denver (1965/71)";
		break
	case "52":
		if (MY <"1972") {DSO="Des Moines (1965/71)";} else {DSO="Dallas (1972)";}
		break
	case "53":
		DSO="Kansas City";
		break
	case "54":
		DSO="Omaha";
		break
	case "55":
		DSO="St. Louis";
		break
	case "56":
		DSO="Davenport";
		break
	case "57":
		DSO="Houston (1972)";
		break
	case "58":
		DSO="Twin Cities (1972)";
		break
	case "61":
		DSO="Dallas (1965/71)";
		break
	case "62":
		DSO="Houston (1965/71)";
		break
	case "63":
		DSO="Memphis (1965/71)";
		break
	case "64":
		DSO="New Orleans (1965/71)";
		break
	case "65":
		DSO="Oklahoma City"
		break
	case "71":
		DSO="Los Angeles";
		break
	case "72":
		DSO="San Jose";
		break
	case "73":
		DSO="Salt Lake City";
		break
	case "74":
		DSO="Seattle";
		break
	case "75":
		DSO="Phoenix";
		break
	case "76":
		DSO="Denver (1965/71)";
		break
	case "83":
		DSO="Government";
		break
	case "84":
		DSO="Home Office Reserve";
		break
	case "85":
		DSO="American Red Cross";
		break
	case "87":
		DSO="Body Company";
		break
	case "89":
		DSO="Transportation Services";
		break
	case "90":
		DSO="Export";
		break
	case "91":
		DSO="Export";
		break
	case "92":
		DSO="Export";
		break
	case "93":
		DSO="Export";
		break
	case "94":
		DSO="Export";
		break
	case "95":
		DSO="Export";
		break
	case "96":
		DSO="Export";
		break
	case "97":
		DSO="Export";
		break
	case "98":
		DSO="Export";
		break
	case "99":
		DSO="Export";
		break
	case "B1":
		DSO="Ford Canada: Central";
		break
	case "B2":
		DSO="Ford Canada: Eastern";
		break
	case "B3":
		DSO="Ford Canada: Atlantic";
		break
	case "B4":
		DSO="Ford Canada: Midwestern";
		break
	case "B6":
		DSO="Ford Canada: Western";
		break
	case "B7":
		DSO="Ford Canada: Pacific";
		break
	case "B8":
		DSO="Ford Canada: Great Lakes";
		break
	case "120022":
		DSO="Starsky & Hutch Unit";
		break
	default:
		DSO="Not valid DSO code";
	}	
	
	//Set out answer window
	message = "<h1> VIN </h1>";
	message += "</b><br/>";
	message += "<p>The VIN code <b>" + VIN + "</b> breaks down as</p><br/>";
	message += ("<p>Manufactured: <b>" + Date + " " + MY + "</b></p>");
	message += ("<p>Manufacturing site: <b>" + Site + "</b></p>");
	message += ("<p>Body type: <b>" + Series + "</b></p>");
	message += ("<p>Engine:</p>");
	message += ("<p>___Code: <b>" + Eng + "</b></p>");
	message += ("<p>___Cylinders: <b>" + Eng_cyl + "</b></p>");
	message += ("<p>___Displacement: <b>" + Eng_cid + "</b></p>");
	message += ("<p>___Carburettor type: <b>" + Eng_carb +  "</b></p>");
	message += ("<p>___Engine manufactured thru <b>" + Eng_year + "</b></p>");
	message += ("<p>___Other info: <b>" + Eng_other + " </b></p>");
	message += ("<p>Production number: <b>" + MN + "</b></p>");
	message += "<br/>";
	message += "<br/>";
	message += "<h1> Data Plate </h1>";
	message += "<br/>";	
	message += ("<p>Body: <b>" + Body + "</b></p>");
	message += ("<p>Color: <b>" + Color + "</b></p>");
	message += ("<p>Trim: <b>" + Trim + "</b></p>");
	message += ("<p>Transmission: <b>" + Trans + "</b></p>");
	message += ("<p>Axle: <b>" + Axle + "</b></p>");
	message += ("<p>Sales district: <b>" + DSO + "</b></p>");
	
	document.getElementById('texthere').innerHTML = message;
	
	
	var message1;
			
	//Set out answer for mail form
	// Note Word based Outlook rendering; VT (asc 11) needed to break lines. Some other systems may require e.g. CRLF etc...
	message1 += String.fromCharCode(11,11);		
	message1 = "VIN";
	message1 += String.fromCharCode(11,11);		
	message1 += "The VIN code " + VIN + " breaks down as\n";
	message1 += String.fromCharCode(11);		
	message1 += ("Manufactured: " + Date + " " + MY);
	message1 += String.fromCharCode(11);		
	message1 += ("Manufacturing site: " + Site);
	message1 += String.fromCharCode(11);		
	message1 += ("Body type: " + Series);
	message1 += String.fromCharCode(11);		
	message1 += ("Engine: ");
	message1 += String.fromCharCode(11);		
	message1 += ("Code: " + Eng);
	message1 += String.fromCharCode(11);		
	message1 += ("Cylinders: " + Eng_cyl);
	message1 += String.fromCharCode(11);		
	message1 += ("Displacement: " + Eng_cid);
	message1 += String.fromCharCode(11);		
	message1 += ("Carburettor type: " + Eng_carb);
	message1 += String.fromCharCode(11);		
	message1 += ("Engine manufactured thru " + Eng_year);
	message1 += String.fromCharCode(11);		
	message1 += ("Other info: " + Eng_other);
	message1 += String.fromCharCode(11);		
	message1 += ("Production number: " + MN);
	message1 += String.fromCharCode(11,11);		
	message1 += "Data Plate";
	message1 += String.fromCharCode(11,11);		
	message1 += ("Body: " + Body);
	message1 += String.fromCharCode(11);		
	message1 += ("Color: " + Color);
	message1 += String.fromCharCode(11);		
	message1 += ("Trim: " + Trim);
	message1 += String.fromCharCode(11);		
	message1 += ("Transmission: " + Trans);
	message1 += String.fromCharCode(11);		
	message1 += ("Axle: " + Axle);
	message1 += String.fromCharCode(11);		
	message1 += ("Sales district: " + DSO);
	message1 += String.fromCharCode(11);		
	
	document.proxy_form.message_body.value = message1;		

}
