formulaA = new Array
formulaA[0] = 10
formulaA[1] = 9
formulaA[2] = 8
formulaA[3] = 7
formulaA[4] = 6

formulaB = new Array
formulaB[0] = 20
formulaB[1] = 17
formulaB[2] = 15
formulaB[3] = 12
formulaB[4] = 5

debtMod = new Array
debtMod[0] = 21
debtMod[1] = 18
debtMod[2] = 16
debtMod[3] = 13
debtMod[4] = 6

absMinLoan = new Array
absMinLoan[0] = 45000
absMinLoan[1] = 35000
absMinLoan[2] = 25000
absMinLoan[3] = 25000
absMinLoan[4] = 20000

factorA=10
factorB=50
crLevel=0

function creditTypeChanged(crForm) {
	l1 = crForm.length
	for (i=0;i<crForm.Credit.length; i++) {
		if (crForm.Credit[i].checked) {
			factorA = formulaA[i]
			factorB = formulaB[i]
			crLevel = i
		}
	}
	IncomeChanged(crForm)
	return
}

function IncomeChanged(crForm) {

minLoan = absMinLoan[crLevel]

approved_amt = crForm.income.value * formulaA[crLevel]
if (approved_amt > minLoan){ approved_amt = minLoan }


debtMod_amount = debtMod[crLevel]


subtract_mortgage = (crForm.mortgage.value - 300) * debtMod_amount
if (subtract_mortgage < 0){ subtract_mortgage = 0 }

subtract_CCPayments = (crForm.CCPayments.value - 300) * debtMod_amount
if (subtract_CCPayments < 0){ subtract_CCPayments = 0 }

subtract_other = (crForm.other.value - 300) * debtMod_amount
if (subtract_other < 0){ subtract_other = 0 }


approved_amt = approved_amt - subtract_mortgage - subtract_CCPayments - subtract_other


//	maxLoanA = crForm.income.value * factorA
//	halfapproved_amt = crForm.approved_amt.value / 2

//	q2 = halfapproved_amt - crForm.mortgage.value
//	q2 = q2 - crForm.CCPayments.value
//	q2 = q2 - crForm.garnishments.value
//	q2 = q2 - crForm.other.value

//	maxLoanB = q2 * factorB

//	if (maxLoanA < maxLoanB) {
//		minLoan = maxLoanA
//	}
//	else {
//		minLoan = maxLoanB
//	}
//	if (minLoan > absMinLoan[crLevel]){
//		minLoan = absMinLoan[crLevel]
//	}

	if (approved_amt < 8500){ approved_amt = 10500 }
	if (isNaN(approved_amt)){ approved_amt = 10500 }

	td = document.getElementById("chosenloancell")
	td.innerHTML = "<font size='4'><b>"+"$"+approved_amt+"</b>"
}

