private void AmoritizeButton_Click(object sender, EventArgs e)
{
//FindLowestInterestPaidPlan();
var loan1 = new Loan(name1.Text, InitPrRemainInput1.Text, InterestRateInput1.Text, MonthlyPaymentInput1.Text,
LumpSumInput1.Text, AddlMonthlyInput1.Text);
var output1 = loan1.AmoritizeThis();
Schedule1.Text = output1;
var loan2 = new Loan(name2.Text, InitPrRemainInput2.Text, InterestRateInput2.Text, MonthlyPaymentInput2.Text,
LumpSumInput2.Text, AddlMonthlyInput2.Text);
var output2 = loan2.AmoritizeThis();
Schedule2.Text = output2;
}
private void FindLowestInterestPaidPlan()
{
var loan1 = new Loan(name1.Text, InitPrRemainInput1.Text, InterestRateInput1.Text, MonthlyPaymentInput1.Text,
LumpSumInput1.Text, AddlMonthlyInput1.Text);
var loan2 = new Loan(name2.Text, InitPrRemainInput2.Text, InterestRateInput2.Text, MonthlyPaymentInput2.Text,
LumpSumInput2.Text, AddlMonthlyInput2.Text);
var maxAddl = 500;
var addlPayment1 = maxAddl;
var addlpayment2 = 0;
var paymentIncrement = 5;
var outcomes = new List <Outcome>();
while (addlPayment1 >= 0 && addlpayment2 <= maxAddl)
{
loan1.PrincipalRemaining = loan1.InitialPrincipalRemaining;
loan2.PrincipalRemaining = loan2.InitialPrincipalRemaining;
loan1.OneTimePayment = addlPayment1;
loan2.OneTimePayment = addlpayment2;
var outcome = new Outcome()
{
AddlLumpSum1 = addlPayment1, AddlLumpSum2 = addlpayment2
};
loan1.AmoritizeThis();
loan2.AmoritizeThis();
outcome.InterestPaid1 = loan1.SecondLoan.TotalInterestPaid;
outcome.InterestPaid2 = loan2.SecondLoan.TotalInterestPaid;
outcome.PaymentsApplied1 = loan1.SecondLoan.PaymentsApplied;
outcome.PaymentsApplied2 = loan2.SecondLoan.PaymentsApplied;
outcomes.Add(outcome);
addlPayment1 -= paymentIncrement;
addlpayment2 += paymentIncrement;
loan1 = loan1.CopyLoan();
loan2 = loan2.CopyLoan();
}
int v = 4;
var lowestInterest = outcomes.Where(o1 => o1.TotalInterestPaid == outcomes.Min(o => o.TotalInterestPaid)).First();
}
private void OptimizeButton_Click(object sender, EventArgs e)
{
//just work on monthly for now
decimal maxAddlMonthly = Convert.ToDecimal(maxAddlMonthlyInput.Text);
//decimal maxAddlLumpSum = Convert.ToDecimal(maxAddlLumpSumInput.Text);
var paymentIncrement = 5;
bool optimizeMonthly = maxAddlMonthly > 0;
//bool optimizeLumpSum = maxAddlLumpSum > 0;
decimal monthly1 = optimizeMonthly ? maxAddlMonthly : 0;
//yuck
decimal monthly2 = 0;
//decimal lumpy1 = optimizeLumpSum ? maxAddlLumpSum : 0;
////yuck
//decimal lumpy2 = 0;
var loan1 = new Loan(name1.Text, InitPrRemainInput1.Text, InterestRateInput1.Text, MonthlyPaymentInput1.Text,
null, monthly1.ToString());
var loan2 = new Loan(name2.Text, InitPrRemainInput2.Text, InterestRateInput2.Text, MonthlyPaymentInput2.Text,
null, monthly2.ToString());
var outcomes = new List <Outcome>();
if (optimizeMonthly)
{
while (monthly1 >= 0 && monthly2 <= maxAddlMonthly)
{
loan1.PrincipalRemaining = loan1.InitialPrincipalRemaining;
loan2.PrincipalRemaining = loan2.InitialPrincipalRemaining;
loan1.MonthlyPayment = loan1.InitialMonthlyPayment + monthly1;
loan2.MonthlyPayment = loan2.InitialMonthlyPayment + monthly2;
var outcome = new Outcome()
{
AddlMonthly1 = monthly1, AddlMonthly2 = monthly2
};
loan1.AmoritizeThis(true);
loan2.AmoritizeThis(true);
outcome.InterestPaid1 = loan1.SecondLoan.TotalInterestPaid;
outcome.InterestPaid2 = loan2.SecondLoan.TotalInterestPaid;
outcome.PaymentsApplied1 = loan1.SecondLoan.PaymentsApplied;
outcome.PaymentsApplied2 = loan2.SecondLoan.PaymentsApplied;
outcomes.Add(outcome);
monthly1 -= paymentIncrement;
monthly2 += paymentIncrement;
loan1 = loan1.CopyLoan();
loan1.AddlMonthlyPayment = monthly1;
loan2 = loan2.CopyLoan();
loan2.AddlMonthlyPayment = monthly2;
}
var lowestInterest = outcomes.Where(o1 => o1.TotalInterestPaid == outcomes.Min(o => o.TotalInterestPaid)).First();
var fastestPayoff = outcomes.Where(o1 => o1.PaymentsApplied1 + o1.PaymentsApplied2 == outcomes.Min(o => o.PaymentsApplied1 + o.PaymentsApplied2)).First();
var lowIntTotalMonthly1 = lowestInterest.AddlMonthly1 + loan1.InitialMonthlyPayment;
var lowIntTotalMonthly2 = lowestInterest.AddlMonthly2 + loan2.InitialMonthlyPayment;
var sb = new StringBuilder();
sb.Append($"Lowest interest possible: {lowestInterest.InterestPaid1:c} + {lowestInterest.InterestPaid2:c} = {lowestInterest.TotalInterestPaid:c}");
sb.Append(Environment.NewLine);
sb.Append($"Achievable when you pay an add'l {lowestInterest.AddlMonthly1} and {lowestInterest.AddlMonthly2:c} per month");
sb.Append(Environment.NewLine);
sb.Append($"You'd be paying {lowIntTotalMonthly1:c} and {lowIntTotalMonthly2:c} per month, total of {(lowIntTotalMonthly1 + lowIntTotalMonthly2):c}");
sb.Append(Environment.NewLine);
sb.Append($"That would take you {lowestInterest.PaymentsApplied1} and {lowestInterest.PaymentsApplied2} months");
OptimizeTextBox.Text = sb.ToString();
}
}