<!--
/**
 * changeLanguage 03AUG2001 
 * Olivier Combe, UNCTAD
 * no copyright, free of use
*/ 
function changeLanguage(origin,destination){		//les fonctions sont différentes suivant la langue d'origine, il y a trois fonctions pour le site INFOCOMM
													//changelangueen.js, changelanguees.js et changelanguefr.js toutes situées dans imagesroll sous le répertoire de la langue correspondante.

adr=new String(document.location);//alert(adr); //Ecriture de l'adresse de la page dans adr.
posfr=adr.indexOf("/"+origin+"/");//alert(posfr); //Repérage de la position du premier slash encadrant origin (ici origin=anglais).
subad=adr.substr((posfr+9),(adr.length-posfr-9));//alert(subad); //Ecriture de la fin de l'adresse URL contenant uniquement le répertoire et le nom du fichier.htm.
//le chiffre +9 ou -9 correspond à la longueur /anglais/. Subad doit contenirpar exemple: cocoa/crop.htm.
posslash=subad.indexOf("/"); //alert(posslash); //Pour séparer le répertoire du nom du fichier, on repère l'emplacement du / dans subad.

posend=(subad.indexOf(".htm")+4);//alert(posend);//indique la position de .htm afin de découper exactement le nom du fichier

//alert(fiche);
rep=adr.slice((posfr+9),(posfr+9+posslash));//alert(rep); //on affecte à rep le nom du répertoire, soit on découpe de 9 caractères
//après posfr jusqu'à la position du / dans subad.
fiche=adr.slice((posfr+9+posslash+1),(posfr+9+posend));//alert(fiche); //fiche reçoit le nom du fichier, soit de la position après le / de subad jusqu'à la fin 
//la fonction substr(début,nombre de caractères), on obtient le nombre de caractères en calculant la longueur de l'adresse en y soustrayantle nombre de caractères 
//du début de l'adresse URL jusqu'à la position où commence le nom du fichier.


//ces tests remplacent le nom du répertoire lu par celui de la destination, de même pour les noms de fichiers.

if(destination==="francais") if(rep==="cashewnut") rep="anacarde"	//seuls les repertoires dont le nom 
						else if(rep==="pineapple") rep="ananas"    //change entre le francais
						else if(rep==="banana") rep="banane"   //et l'anglais sont repris, ainsi
						else if(rep==="wheat") rep="ble"	//jute, karite, olive, orange, aluminium
						else if(rep==="timber") rep="boistemp"		//nickel, zinc (identiques en francais et en anglais)
						else if(rep==="timbertrop") rep="boistrop"  //n'apparaissent pas dans la liste.
						else if(rep==="rubber") rep="caoutchouc"
						else if(rep==="cotton") rep="coton"
						else if(rep==="spices") rep="epices"
						else if(rep==="maize") rep="mais"
						else if(rep==="mango") rep="mangue"
						else if(rep==="palmoil") rep="palme"
						else if(rep==="sugar") rep="sucre"
						else if(rep==="tobacco") rep="tabac"
						else if(rep==="rice") rep="riz"
						else if(rep==="silver") rep="argent"
						else if(rep==="copper") rep="cuivre"
						else if(rep==="diamond") rep="diamant"
						else if(rep==="fertilizers") rep="engrais"
						else if(rep==="tin") rep="etain"
						else if(rep==="iron") rep="fer"
						else if(rep==="gold") rep="or"
						else if(rep==="palladium") rep="paladium"
						else if(rep==="platinum") rep="platine"
						else if(rep==="lead") rep="plomb"
						else if(rep==="cocoa") rep="cacao"
						else if(rep==="tea") rep="the"
						else if(rep==="coffee") rep="cafe"
						else if(rep==="coal") rep="charbon"
						else if(rep==="electricity") rep="electricite"
						else if(rep==="gas") rep="gaz"
						else if(rep==="nuclear") rep="nucleaire"
						else if(rep==="oil") rep="petrole";
									
if(destination==="francais") if (fiche==="sitemap.htm") fiche="plan.htm" //Apres la modification du repertoire,
						else if(fiche==="crop.htm") fiche="culture.htm"  //la modification du nom du fichier.
						else if(fiche==="characteristics.htm") fiche="descript.htm"
						else if(fiche==="ecopolicies.htm") fiche="ecopol.htm"
						else if(fiche==="chain.htm") fiche="filiere.htm"
						else if(fiche==="market.htm") fiche="marche.htm"
						else if(fiche==="prices.htm") fiche="prix.htm"
						else if(fiche==="quality.htm") fiche="qualite.htm"
						else if(fiche==="companies.htm") fiche="societes.htm"
						else if(fiche==="technology.htm") fiche="technologie.htm"
						else if(fiche==="uses.htm") fiche="utilisat.htm";

if(destination==="espagnol") if(rep==="cashewnut") rep="anacardo"	//seuls les repertoires dont le nom 
						else if(rep==="pineapple")   rep="pinas"  //change entre l'espagnol
						else if(rep==="banana") rep="platano"   //et l'anglais sont repris, ainsi
						else if(rep==="wheat") rep="trigo"	// karite, mango, gas, nuclear, zinc(identiques en espagnol et en anglais)
						else if(rep==="timber") rep="madera"		// n'apparaissent pas dans la liste.
						else if(rep==="timbertrop") rep="maderatrop"  
						else if(rep==="rubber") rep="caucho"
						else if(rep==="cotton") rep="algodon"
						else if(rep==="spices") rep="especies"
						else if(rep==="jute") rep="yute"
						else if(rep==="maize") rep="maiz"
						else if(rep==="olive") rep="olivo"
						else if(rep==="orange") rep="naranja"
						else if(rep==="palmoil") rep="palma"
						else if(rep==="sugar") rep="azucar"
						else if(rep==="tobacco") rep="tabaco"
						else if(rep==="rice") rep="arroz"
						else if(rep==="aluminium") rep="aluminio"
						else if(rep==="silver") rep="plata"
						else if(rep==="copper") rep="cobre"
						else if(rep==="diamond") rep="diamante"
						else if(rep==="fertilizers") rep="fertilizantes"
						else if(rep==="tin") rep="estano"
						else if(rep==="iron") rep="hierro"
						else if(rep==="nickel") rep="niquel"
						else if(rep==="gold") rep="oro"
						else if(rep==="palladium") rep="paladio"
						else if(rep==="platinum") rep="platino"
						else if(rep==="lead") rep="plomo"
						else if(rep==="cocoa") rep="cacao"
						else if(rep==="coffee") rep="cafe"
						else if(rep==="tea") rep="te"
						else if(rep==="coal") rep="carbon"
						else if(rep==="electricity") rep="electricidad"
						else if(rep==="oil") rep="petroleo";	

if (destination==="espagnol") if(fiche==="sitemap.htm") fiche="plane.htm"
						else if(fiche==="crop.htm") fiche="cultivo.htm"
						else if(fiche==="characteristics.htm") fiche="descripc.htm"
						else if(fiche==="ecopolicies.htm") fiche="politicas.htm"
						else if(fiche==="chain.htm") fiche="cadena.htm"
						else if(fiche==="market.htm") fiche="mercado.htm"
						else if(fiche==="prices.htm") fiche="precio.htm"
						else if(fiche==="quality.htm") fiche="calidad.htm"
						else if(fiche==="companies.htm") fiche="empresas.htm"
						else if(fiche==="technology.htm") fiche="tecnologia.htm"
						else if(fiche==="uses.htm") fiche="utilizacion.htm";
						

dest=adr.substr(0,posfr)+"/"+destination+"/"+rep+"/"+fiche; //recomposition de l'adresse URL avec le nouveau répertoire et nom de fichier
document.location=dest; //alert();
}

function redirect(object_name) { // this function redirects a drop down menu
	
	bla2="selected="+object_name+".selectedIndex;";
	
	// alert(bla2);
	
	eval(bla2);
	
	if(selected>0){
		
		bla="dest="+object_name+".options["+object_name+".selectedIndex].value;";
		eval(bla);
	
		document.location=dest;

	} else {
		
			alert("Select a product");
		
	}
		
}
//-->