var nl = null;
if (navigator.appVersion.lastIndexOf('Win') != -1)
   nl = "\r\n";
else
   nl = "\n";
function VOD(obj, defval) {
        var str = obj.value;
        if (str.length == 0 || str == "" || str == null) { return defval; }
        var nstr = "";
        for (var i = 0; i < str.length; i++) {
             var ch = str.substring(i, i + 1);
             if ((ch >= "0" && ch <= "9") || ch == '.') {
                nstr += ch;
             }
             else if (ch != " " && ch != "'") {
                return defval;
             }
        }
        val = parseFloat(nstr);
        return val;
}
function format(val1, len, decimal) {
        var val = Math.abs(val1);
        var scale = 1;
        for (i = 1; i <= decimal; i++)
             scale *= 10;
        var str = "" + Math.round(parseFloat(val) * scale);
        if (str.length == 0 || str == "0") {
                str = "00";
        }
        if (val < 1.00) str = "0" + str;
        if (val > 999) {
           l   = str.length;
           p   = l-(3+decimal);
           str = str.substring(0,p) + "'" + str.substring(p,l);
        }
        if (parseFloat(val1) < 0.0) {
           str = "-" + str;
	}
        else {
           str = "" + str;
	}
        i = len - str.length;
        if (scale != 1)
                i--;
        while (0 < i--)
                str = " " + str;
        if (scale != 1) {
                var p = len - (decimal + 1);
                var a = str.substring(0, p);
                var b = str.substring(p, len);
                return a + "." + b;
        }
        return str;
}
function compute() {
     var taille  = VOD(document.form1.taille, 170);
     var poids   = VOD(document.form1.poids,   65);
     document.form1.taille.value = format(taille, 5,0);
     document.form1.poids.value  = format(poids,  5,0);
     var poids_ideal;
     if (document.form1.sexe[0].checked) {
        poids_ideal = (taille-100) - ((taille-150)/4);
     }
     else if (document.form1.sexe[1].checked) {
        poids_ideal = (taille-100) - ((taille-150)/2.5);
     }
     else {
        document.form1.sexe[0].checked = "1";
        poids_ideal = (taille-100) - ((taille-150)/4);
     }
     var diff_abs = Math.abs(poids - poids_ideal);
     var diff_rel = (poids - poids_ideal)/poids_ideal * 100;
     document.form1.poids_ideal.value = format(poids_ideal, 4,0);
     document.form1.diff_abs.value    = format(diff_abs, 4,0);
     document.form1.diff_rel.value    = format(diff_rel, 4,0);
     if (diff_rel > 20.) {
        document.form1.diagnosis.value   =
        "Vous dépassez de plus de 20% la moyenne de votre poids idéal:" + nl + nl +
	"A partir de 20% du poids idéal, on parle d'obésité moyenne," +nl +
	"au-dessus de 40% d'obésité massive." +nl +
	"L'obésité augmente le risque de certaines maladies:" +nl +
	" - l'hypertension artérielle" + nl +
	" - le diabète non insulino-dépendant" +nl +
	" - l'augmentation du cholestérol et des graisses dans le sang" +nl +
	" - les maladies cardio-vasculaires" +nl +
	" - les difficultés respiratoires" +nl +
	" - les problèmes articulaires" +nl +
	" - le calcul biliaire" +nl +
	" - la goutte" +nl +nl +
	"C'est vrai, une telle énumération a de quoi faire peur et" +nl +
	"prouver qu'il est nécessaire de perdre quelques kilos." +nl +nl +
	"Cependant, si votre excédent de poids dépasse les 25%, nous" + nl +
	"vous déconseillons d'entamer un régime sans consulter" +nl +
	"au préalable votre médecin" +nl +nl +
	"S'il est inférieur à 25%, lisez les quelques conseils qui" +nl +
	"suivent" +nl +
	" - Avant d'entamer un régime, soyez sûr de votre motivation!" +nl +
	"   Il n'y a en effet rien de pire que de perdre du poids et" +nl +
	"   de le reprendre après. Chaque nouveau régime est en effet" +nl +
	"   plus difficile à suivre et moins efficace que le" +nl +
	"   précédent:" +nl +
	"   C'est ce qu'on appelle le phénomène de yoyo." +nl +
	"   Et sur le plan de la santé, le corps n'apprécie guère ces" +nl +
	"   perpétuelles variations alimentaires" +nl +
	" - Entamer un régime n'est pas synonyme de plaisir! Les" +nl +
	"   premiers jours, vous risquez de ressentir une certaine" +nl +
	"   fatigue et des problèmes de concentration: votre corps" +nl +
	"   travaille en effet au ralenti, car il n'a pas son compte" +nl +
	"   habituel de calories." +nl +
	" - La convivialité va en prendre un coup! Les restrictions" +nl +
	"   alimentaires exigées par votre régime font que les repas" +nl +
	"   d'affaires, entre amis ou au restaurant deviennent un" +nl +
	"   véritable casse-tête! Maigrir exige donc un changement de" +nl +
	"   votre mode de vie." +nl + nl+
	"   Une compensation psychologique est très importante" +nl +
	"   sous forme de massages relaxants, par exemple.";
     }
     else if (diff_rel > 10.) {
        document.form1.diagnosis.value   = nl +
        "Vous vous situez entre 10 et 19% au-dessus de la moyenne" + nl +
        "de votre poids idéal:" + nl +nl +
	"Vous accusez un excès pondéral. Cela ne veut pas dire" +nl +
	"pour autant que votre santé soit en danger!" +nl +nl +
	"Avant d'entamer un régime, il nous semble donc important" +nl +
	"de connaître vos motivations." +nl +
	" - Si vous vous sentez mal dans votre peau, que ce poids" +nl +
	"   excédentaire vous gêne, alors là, oui, nous vous" +nl +
	"   encourageons à entamer un régime mais" +nl +
	"   accompagner de séances de massage afin de vous" +nl +
	"   réconcilier avec votre corps." +nl +
	" - Si ce n'est pas le cas, que vous vous sentez bien dans" +nl +
	"   votre poids, il ne nous semble pas nécessaire de" +nl +
	"   conseiller un régime mais surveillez votre poids." +nl +
	" - Avant d'entamer un régime, soyez sûr de votre motivation!" +nl +
	"   Il n'y a en effet rien de pire que de perdre du poids et" +nl +
	"   de le reprendre après. Chaque nouveau régime est en effet" +nl +
	"   plus difficile à suivre que le précédent:" +nl +
        "   C'est ce qu'on appelle le phénomène de yoyo." +nl +
        "   Et sur le plan de la santé, le corps n'apprécie guère ces" +nl +
        "   perpétuelles variations alimentaires" +nl +
        " - Entamer un régime n'est pas synonyme de plaisir! Les" +nl +
        "   premiers jours, vous risquez de ressentir une certaine" +nl +
        "   fatigue et des problèmes de concentration: votre corps" +nl +
        "   travaille en effet au ralenti, car il n'a pas son compte" +nl +
        "   habituel de calories." +nl +
        " - La convivialité va en prendre un coup! Les restrictions" +nl +
        "   alimentaires exigées par votre régime font que les repas" +nl +
        "   d'affaires, entre amis ou au restaurant deviennent un" +nl +
        "   véritable casse-tête! Maigrir exige donc un changement de" +nl +
        "   votre mode de vie." +nl +
        "   Voyez pour votre équilibre de compenser par des"  +nl+
        "   massages plaisirs";
     }
     else if (diff_rel > 0.) {
        document.form1.diagnosis.value   = nl +
        "Vous vous situez entre 0 et 10% au-dessus de la moyenne de"  +nl +
        "votre poids idéal:" +nl +nl +
	"Le poids idéal ne se mesure pas au kilo près! Il se situe" +nl +
	"dans une fourchette variant entre + et - 10% par rapport au" +nl +
	"chiffre obtenu grâce à la méthode Lorentz." +nl +nl +
	"Vous êtes donc simplement dans la norme supérieure." +nl +
	"Il n'y a objectivement aucune raison de perdre du poids. Si" +nl +
	"tel n'est pas votre avis, nous ne pourrons vous y conforter" +nl +
	"que si votre poids augmente sensiblement et régulièrement" +nl+
	"depuis quelque temps. En tel cas, un petit régime et une" +nl +
	"augmentation de l'activité physique pourraient effectivement" +nl +
	"remettre les choses en place avec quelques séances de massage.";
     }
     else if (diff_rel < -10.) {
        document.form1.diagnosis.value   =  nl +
        "Votre poids actuel est inférieur à 10% de la moyenne de votre" + nl +
        "poids idéal:" +nl +nl +
	"Vous vous trouvez au-dessous de la fourchette de votre poids" +nl +
	"idéal. Il n'y a évidemment aucune raison de perdre du poids." +nl+nl+
	"Si vous vous sentez mal dans votre peau, essayer" +nl+
	"les massages plaisirs, au moins une fois.";
     }
     else {
        document.form1.diagnosis.value   = nl +
        "Vous vous situez entre 0 et 10% au-dessous de la moyenne" + nl +
	"de votre poids idéal:" +nl +nl +
 	"Le poids idéal ne se mesure pas au kilo près! Il se situe" +nl +
        "dans une fourchette variant entre + et - 10% par rapport au" +nl +
        "chiffre obtenu grâce à la méthode Lorentz." +nl +nl +
        "Or, vous vous trouvez dans la norme inférieure de votre poids" +nl +
        "idéal. Vous pouvez en être content(e). Il n'y a aucune raison" +nl +
        "valable de vouloir perdre du poids." +nl +nl+ 
        "Mais vous vous sentez mal dans votre peau, voyez plutôt" +nl+
	"des massages plaisirs.";
     }
}