/*
	patient and HCP seroquel.nl additional JS functions
*/

// Script for the BMI calculator

var h_imperial = 0; //flags for input modes
var w_imperial = 0;
var pounds_to_kgs = 2.204623;
var inches_to_meters = 39.4
var h_ft, h_ins, h_m, h_cms;
var w_st, w_pds, w_kgs;
var h,w, w1;
var weight_in_pounds;

function dispnum(x) {
	x = Math.floor(x*10)/10; // rounded off to two decimal places
	return(x);
}

function clearvalues(){ // clears all the contents of the form

	document.data.height_meters.value=''
	document.data.height_cms.value=''
	document.data.weight_kgs.value=''
	document.data.bmi.value=''
	document.data.expl.value=''
	document.data.max_stones.value=''
	document.data.max_pounds.value=''
	document.data.max_kgs.value=''
}

function initialise() { // initialise the variables

	if (document.data.height_meters.value == '') {
		document.data.height_meters.value = 0;
	}
	if (document.data.height_cms.value == '') {
		document.data.height_cms.value = 0;
	}
	if (document.data.weight_kgs.value == '') {
		document.data.weight_kgs.value = 0;
	}
}

function compute() { // the main routine

	initialise();

	h_m = parseFloat(document.data.height_meters.value);
	h_cms = parseFloat(document.data.height_cms.value);

	if (h_imperial) {
		h = ((h_ft*12)+h_ins)
		h /= inches_to_meters; }	// convert inches to metres
	else {
		h = ((h_m*100)+h_cms)/100;
	}

	if (h <= 1.22) {
		alert(dispnum(h)+" Metres seems to be too short\n\nPlease try again.");
	}

	if (h >= 2.13) {
		alert(dispnum(h)+" Metres seems to be too tall\n\nPlease try again.");
	}

	w_kgs = parseFloat(document.data.weight_kgs.value);

	w=w_kgs;

	if (w <= 25) {
		alert(dispnum(w)+" Kgs? Thats much too light\n\nPlease try again.");
	}

	if (w >= 227) {
		alert(dispnum(w)+" Kgs? Thats much too heavy\n\nPlease try again.");
	}

	bmi = w / (h*h);

	max_kgs = 25*h*h;
	weight_in_pounds = (max_kgs*2.2);

	document.data.bmi.value = dispnum(bmi);

	if (bmi < 18.5 )
		document.data.expl.value = "Met een BMI waarde van minder dan 18,5 bent u te licht. Het is verstandig te proberen wat aan te komen door regelmatig te eten en geen maaltijd over te slaan. Eet of drink daarbij vier keer per dag iets tussendoor, om zo extra energie binnen te krijgen.";
	if (bmi >= 18.5 && bmi < 25 )
		document.data.expl.value = "U hebt een gezond gewicht. Probeer uw gewicht te handhaven op dit peil. Check minstens een keer per half jaar opnieuw hoe het ervoor staat.";
	if (bmi > 25 && bmi <= 30 )
		document.data.expl.value = "U bent iets te zwaar. Mensen met een BMI tussen 25 en 30 zonder bijkomende gezondheidsrisico's moeten voorkomen dat ze dikker worden. Het advies is om in ieder geval niet in gewicht aan te komen, uw eetpatroon te verbeteren en meer te bewegen.";
	if (bmi > 30 )
		document.data.expl.value = "U bent veel te zwaar. Medisch gezien is het noodzakelijk af te vallen bij een Body Mass Index boven de 30. Dit levert een risico op voor uw gezondheid. Een gewichtsvermindering van 5-10% levert al een fikse gezondheidswinst op.";

max_imperial = (weight_in_pounds/14)*10;

max_imperial = Math.round(max_imperial);
max_imperial = max_imperial/10;

document.data.max_stones.value = Math.floor(max_imperial);

temp1 = max_imperial - (Math.floor(max_imperial));

temp1 = Math.round(temp1*10);
document.data.max_pounds.value = Math.round(temp1*1.4);

document.data.max_kgs.value = dispnum(max_kgs);

}