<!--
function Energ() {
  cms = document.forms[0].cms.value ;
  uni1 = document.forms[0].Uni1.value ;
  kil = document.forms[0].kilos.value ;
  uni2 = document.forms[0].Uni2.value ;
  eda = document.forms[0].Eda.value ;
  sex = document.forms[0].Sex.value ;
  activ = document.forms[0].Activ.value ;
  fisio = document.forms[0].Fisio.value ;
  pato = document.forms[0].Pato.value ;

  cms = CambioComa(cms);
  kil = CambioComa(kil);
  eda = CambioComa(eda);
  if (cms == "" || kil == "" || eda == "" || sex == "Nada") {
    alert("Faltan datos");
  }
  else {
    if (Comprobar(cms, kil, eda) || cms == "." || kil == ".") {
      alert("Datos incorrectos");
    }
    else {
      if (fisio != "uno" && sex == "Hombre") {
        alert("Datos incorrectos");
        document.forms[0].result2.value = "(sexo o est. fisio.)";       
      }
      else {
        if (uni1 == "cms"){
          Metros = eval(cms);
        }
        else {
          if (uni1 == "pul") {
            Metros = eval(cms)*2.54;
          }
          else {
            Metros = eval(cms)*100;
          }  
        }
        if (uni2 == "kil") {
          kilos = eval(kil);
        }
        else {
          kilos = eval(kil)/2.2046;
        }
        if (sex == "Hombre") {
          metbas = 66.55+(13.75*kilos)+(5.003*Metros)-(6.775*eval(eda));
        }
        else {
          metbas = 655.1+(9.563*kilos)+(1.85*Metros)-(4.676*eval(eda));
        }
        if (activ == "uno") {
          fact1 = 1;
        }
        else {
          if (activ == "dos") {
            fact1 = 1.2;
          }
          else {
            if (activ == "tre") {
              fact1 = 1.3;
            }
            else {
              if (activ == "cua") {
                fact1 = 1.5;
              }
              else {
                fact1 = 1.7;
              }
            }
          } 
        }
        if (fisio == "uno") {
          fact2 = 0;
        }
        else {
          if (fisio == "dos") {
            fact2 = 150;
          }
          else {
            if (fisio == "tre") {
              fact2 = 250;
            }
            else {
              if (fisio == "cua") {
                fact2 = 350;
              }
              else {
                fact2 = 500;
              }
            }
          } 
        }
        if (pato == "uno") {
          fact3 = 1;
        }
        else {
          if (pato == "dos") {
            fact3 = 1.05;
          }
          else {
            if (pato == "tre") {
              fact3 = 1.15;
            }
            else {
              if (pato == "cua") {
                fact3 = 1.1;
              }
              else {
                if (pato == "cin") {
                  fact3 = 1.3;
                }
                else {
                  if (pato == "sei") {
                     fact3 = 1.6;
                  }
                  else {
                    if (pato == "sie") {
                      fact3 = 1.275;
                    }
                    else {
                      if (pato == "och") {
                        fact3 = 1.6;
                      }
                      else {
                        if (pato == "nue") {
                          fact3 = 1.25;
                        }
                        else {
                          if (pato == "die") {
                            fact3 = 1.25;
                          }
                          else {
                            if (pato == "onc") {
                              fact3 = 1.85;
                            }
                            else {
                              if (pato == "doc") {
                                fact3 = 1.95;
                              }
                              else {
                                if (pato == "trc") {
                                  fact3 = 1.4;
                                }
                                else {
                                  if (pato == "cat") {
                                    fact3 = 1.8; 
                                  }
                                  else {
                                    if (pato == "qui") {
                                      fact3 = 1.3; 
                                    }
                                    else {
                                      if (pato == "dse") {
                                        fact3 = 1.3; 
                                      }
                                      else {
                                        if (pato == "dsi") {
                                          fact3 = 1.33; 
                                        }
                                        else {
                                          if (pato == "dch") {
                                            fact3 = 1.35; 
                                          }
                                          else {
                                            if (pato == "dnu") {
                                              fact3 = 1.3; 
                                            }
                                            else {
                                              if (pato == "vei") {
                                                fact3 = 1.42; 
                                              }
                                              else {
                                                if (pato == "vun") {
                                                  fact3 = 1.55; 
                                                }
                                                else {
                                                  if (pato == "vdo") {
                                                    fact3 = 1.3;
                                                  }
                                                  else {
                                                    if (pato == "vtr") {
                                                      fact3 = 1.55; 
                                                    }
                                                    else {
                                                      fact3 = 1.8;
                                                    }
                                                  }
                                                }
                                              }
                                            }
                                          }
                                        }
                                      }
                                    }
                                  }
                                }
                              }
                            }
                          }
                        }
                      }
                    }
                  }
                }
              }
            }
          } 
        }
        gasten = (metbas*fact1*fact3)+(metbas/10)+fact2;
        document.forms[0].result1.value = (Math.round(metbas*100)/100);
        document.forms[0].result2.value = (Math.round(gasten*100)/100);         
      }  
    }
  }
}

function Comprobar(crea, kilo, edad) {
var k = 0;
var l = 0;
var m = 0;
var todo = crea+kilo+edad;
var numeros = "0123456789.";
  for (i = 0;  i < crea.length;  i++) {
    if (crea.charAt(i) == ".") {
    k++;
    }
  }
  if (k > 1) {
  return true;
  }
  for (i = 0;  i < kilo.length;  i++) {
    if (kilo.charAt(i) == ".") {
    l++;
    }
  }
  if (l > 1) {
  return true;
  }
  for (i = 0;  i < edad.length;  i++) {
    if (edad.charAt(i) == ".") {
    m++;
    }
  }
  if (m > 0) {
  return true;
  }
  for (i = 0;  i < todo.length;  i++) {
    for (j = 0;  j < numeros.length;  j++) {
      if (todo.charAt(i) == numeros.charAt(j)) {
      break;
      }
    }
    if (j == numeros.length) {
    return true;
    }
  }
return false;
}

function CambioComa(num) {
  num2 = "";
  for (i = 0;  i < num.length;  i++) {
    if (num.charAt(i) == ",") {
      num2 = num2+".";
    }
    else {
      if (num.charAt(i) == " ") {
        num2 = num2;
      }
      else {
        num2 = num2+num.charAt(i);
      }
    }
  }
  return num2;
}

function Borrar() {
 document.forms[0].cms.value = "";
 document.forms[0].Uni1.value = "cms";
 document.forms[0].kilos.value = "";
 document.forms[0].Uni2.value = "kil";
 document.forms[0].Eda.value = "";
 document.forms[0].Sex.value = "Nada";
 document.forms[0].Activ.value = "tre";
 document.forms[0].Fisio.value = "uno";
 document.forms[0].Pato.value = "uno";
 document.forms[0].result1.value = "";
 document.forms[0].result2.value = "";
}

function cambio() {
  fisio = document.forms[0].Fisio.value;
  edad = document.forms[0].Eda.value;
  sexo = document.forms[0].Sex.value;
  if (fisio == "uno") {
  return true;
  }
  else {
    if (edad > 45 && sexo == "Mujer") {
      if (confirm('¿Está seguro del dato que ha elegido?\nCompruebe la edad.')) {
        return true;
      } 
      else {
        document.forms[0].Fisio.value = "uno";
        document.forms[0].Sex.value = "Nada";
      }
    }
    else {
      if (sexo == "Hombre") {
        if (confirm('¿Está seguro del dato que ha elegido?\nCompruebe el sexo.')) {
          return true;
        }
        else {
          document.forms[0].Fisio.value = "uno";
          document.forms[0].Sex.value = "Nada";
        }
      }
      else {
        return true;
      }
    }
  }
}

function move_in(img_name,img_src) {
document[img_name].src=img_src;
}
function move_out(img_name,img_src) {
document[img_name].src=img_src;
}
// -->