function Estats(origen){
	var fsubpaisos=0; 		// final subcadena pais ','
	var tediv=0;			// te divisa?
	var divisa=""; 
	document.write('<select name="' + origen + '" size="1">');
	
  for(i=0;i<=npp;i++){
	fsubpaisos=pd[i].indexOf(',');
	pdpais=pd[i].substring(0,fsubpaisos);
	tediv=pd[i].indexOf(':');
	if (tediv > 0){
		divisa=pd[i].substring(tediv,fsubpaisos);
		document.write('<option ');
		if (pdpais=="España y Eurozona" & origen=="O"){document.write('selected ');
		}else if(pdpais=="Estados Unidos América" & origen=="F"){document.write('selected ');}
		document.write('value="');
		document.write(pdpais+divisa);
		document.write('">');
		document.write(pdpais+divisa);
		document.write('</option>');
	}
  }	
  document.write('</select>');
}

function ComaPunt(n){			// passar de , a .
	var nSigneDec=n.indexOf(',');
	if(nSigneDec>0){n=n.substring(0,nSigneDec)+"."+n.substring(nSigneDec+1);}
	return n;
}

function PuntComa(n,d){				// passar de . a ,
	n=String(n);					// d -> decimals que volem
	var nPunt=n.indexOf('.');		// número d'ordre del punt en la cadena
	if(nPunt>0){n=n.substring(0,nPunt)+","+n.substring(nPunt+1,nPunt+1+d);}
	return n;
}

function Cotitza(pais){
	var i=0;
	var paisB="";		//pais buscat
	var fsubpa=0;		//final subcadena pais
	var cot=0;
	while (i<=npp & pais!=paisB){
		fsubpa=pd[i].indexOf(',');
		paisB=pd[i].substring(0,fsubpa);
		i++;
	}
	i--;
	cot=(pd[i].substring(pd[i].indexOf(':')+1));
	return cot;
}

function Convertir(){
 var imp=ComaPunt(document.Conv.Q.value);
 document.Conv.Q.value=imp;
 if(document.Conv.O.value==document.Conv.F.value) {
 	document.Conv.D.value='Ha seleccionado dos veces la misma divisa.'; 	
 } else if(isNaN(document.Conv.Q.value)==true){
 	document.Conv.D.value='La cantidad introducida no es válida.'; 
 } else {
	var paisdivO=document.Conv.O.value;							//país i divisa origen
	var paisO=paisdivO.substring(0,paisdivO.indexOf(','));		//nom país origen
	var divO=paisdivO.substring(paisdivO.indexOf(',')+2);		//nom divisa origen
	var paisdivF=document.Conv.F.value;							//país i divisa final
	var paisF=paisdivF.substring(0,paisdivF.indexOf(','));		//nom país final
	var divF=paisdivF.substring(paisdivF.indexOf(',')+2);		//nom divisa final
	var cotO=Cotitza(paisO);
	var cotF=Cotitza(paisF);
	var cotOF=cotO/cotF;
	var cotFO=cotF/cotO;
	var impConv=imp*cotF/cotO;
	if(cotFO < 0.01) { document.Conv.CO.value='1 '+divO+' < 0,01 '+ divF+'.';
	} else { document.Conv.CO.value='1 '+divO+' = '+PuntComa(cotFO,2) +' '+ divF+'.';}
	if(cotOF < 0.01) { document.Conv.CF.value='1 '+divF+' < 0,01 '+ divO+'.';
	} else { document.Conv.CF.value='1 '+divF+' = '+PuntComa(cotOF,2) +' '+ divO+'.';}
	if(imp==1){ document.Conv.D.value='';
	} else if(imp < 0.01 || impConv < 0.01) {document.Conv.D.value='Por favor, introduzca un importe mayor.';
	} else {document.Conv.D.value=PuntComa(imp,2)+' '+divO+' = '+PuntComa(impConv,2) +' '+divF+'.';}
 }
}