25/03/2002, 17:55
|
| | | Fecha de Ingreso: febrero-2002
Mensajes: 503
Antigüedad: 22 años, 9 meses Puntos: 0 | |
| Re: Los Mejores Scripts de lo que sea
Euro Calculadora
Calificacion : 10
<html>
<head>
<title> New Document </title>
<script language="JavaScript">
<!--
//*************** http://www.ctv.es/USERS/hidromed/eurocalculadora.htm
var euroValue=166.386;
//***************
function parse2Euros(f) {
if(!isNaN(parseFloat(f.intro.value))) {
redondeo=parseFloat(f.intro.value)/euroValue;
redondeoMil=""+redondeo*1000;
redondeoMilF=0.0;
if(redondeoMil.indexOf(".")>0) {
redondeoMilF=parseFloat(redondeoMil.substring(0,re dondeoMil.indexOf(".")));
}
else {
redondeoMilF=parseFloat(redondeoMil);
}
ajuste=Math.round(redondeoMilF/10)/100;
f.resultado.value=ajuste+" Euros";
i=f.resultado.value.indexOf(".");
s=f.resultado.value;
if(i>0)
f.resultado.value=f.resultado.value.substring(0,i) +","+s.substring(i+1,f.resultado.value.l ength);
}
}
function parse2Pesetas(f) {
i=f.intro.value.indexOf(",");
if(i>0) {
s=f.intro.value;
f.intro.value=f.intro.value.substring(0,i)+". "+s.substring(i+1,f.intro.value.length);
}
if(!isNaN(parseFloat(f.intro.value))) {
redondeo=parseFloat(f.intro.value)*euroValue;
ajuste=Math.round(redondeo);
f.resultado.value=ajuste+" Pts";
}
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF">
<form name="form1" method=post action="">
Introduce la cantidad a transformar: <input type="text" name="intro" size="16" maxlength="16">
<input type="button" value="a euros" onClick="parse2Euros(form1)"> &nbsp;&nbsp;
<input type="button" value="a pesetas" onClick="parse2Pesetas(form1)"> <br><br>
RESULTADO <input type="TEXT" name="resultado" size="25" maxlength="40">
</form>
</body>
</html>
|