var counter30 = 0
var factor1 = 0
var factor2 = 0
var downpay = 0
var long_bills = 0
var month_income = 0
var house_expense = 0
var house_expen1 = 0
var house_expen2 = 0
var income1 = 0
var monthly_pay = 0
var auto1 = 0
var alimon1 = 0
var credit1 = 0
var student1 = 0
var othr1 = 0
var morge_30 = 0
var afford = 0
function cutDollar (Val) {
	Dollar = Math.floor(Val)
	if (Dollar < 0) {Dollar = 0}
	return (Dollar);

}
// Calculate downpayment factor
function downCalc(form) {
if (form.Downpayment.options[0].selected) { downpay = .03;}
				if (form.Downpayment.options[1].selected) { downpay = .05;}
				if (form.Downpayment.options[2].selected) { downpay = .1;}
				if (form.Downpayment.options[3].selected) { downpay = .15;}
				if (form.Downpayment.options[4].selected) { downpay = .20;}
				if (form.Downpayment.options[5].selected) { downpay = .25;}
				if (form.Downpayment.options[6].selected) { downpay = .30;}
				factor2 = 1-downpay;
								
}
// Calculate interest rate factor
function intCalc(form) {
if (form.Interest.options[0].selected) { factor1 = .0060;}
				if (form.Interest.options[1].selected) { factor1 = .00615;}
				if (form.Interest.options[2].selected) { factor1 = .0063;}
				if (form.Interest.options[3].selected) { factor1 = .0065;}
				if (form.Interest.options[4].selected) { factor1 = .0067;}
				if (form.Interest.options[5].selected) { factor1 = .00685;}
				if (form.Interest.options[6].selected) { factor1 = .0070;}
				if (form.Interest.options[7].selected) { factor1 = .0074;}
				if (form.Interest.options[8].selected) { factor1 = .0077;}
				if (form.Interest.options[9].selected) { factor1 = .00785;}
				if (form.Interest.options[10].selected) { factor1 = .0080;}
				if (form.Interest.options[11].selected) { factor1 = .0083;}
				if (form.Interest.options[12].selected) { factor1 = .0085;}
				if (form.Interest.options[13].selected) { factor1 = .0087;}
				if (form.Interest.options[14].selected) { factor1 = .0090;}

					
}

// Calculate total monthly long term obligations
function longCalc(form) {
auto1= eval(form.Automobile.value);
				if (isNaN(auto1)) {auto1=0;}

				alimon1 = eval(form.Alimony.value);
				if (isNaN(alimon1)) {alimon1=0;}

				credit1 = eval(form.Credit.value);
				if (isNaN(credit1)) {credit1=0;}
				
				student1 = eval(form.Student.value);
				if (isNaN(student1)) {student1;}

				othr1 = eval(form.Other.value);
				if (isNaN(othr1)) {othr1=0;}
				long_bills = (auto1 + alimon1 + credit1 + student1 + othr1);
				form.Subtotal.value= cutDollar(long_bills);
				
}

// Calculate Monthly allowable housing expense
function houseCalc(form) {
				income1 = eval(form.Gross.value);
				if (isNaN(income1)) {income1=0;}
				house_expen1 = ((.36 * (income1/12))-(long_bills));
				house_expen2 = ((income1/12)*(.28));
				if (house_expen1 > house_expen2) {house_expense = house_expen2;} else {
				house_expense = house_expen1;}
				
}

// Calculate 30 Yr estimated mortgage amount
function morgeCalc(form) {
				morge_30 = ((house_expense * .80) / factor1);
				afford = (morge_30 / factor2);
				form.Mortgage.value = cutDollar(morge_30);
				form.Price_Range.value = cutDollar(afford);
}

// Calculate the whole magilla
function momaCalc(form) {
				downCalc(form);
				longCalc(form); 
				intCalc(form);
				houseCalc(form);
				morgeCalc(form)
}

