X o ALOAANNUALRATNUMBEROFYEARNUMBEROFPOINTMONTHLYINTERESTRATNUMBEROFPAYMENTPOINTSPAIFACTORMONTHLYPAYMENCOSDEBTOTALAMORTIZATIOTOTALINTERESYEARLYINTERESYEARLYAMORTIZATIOMONTHLYINTERESMONTHLYAMORTIZATIOTOTALCOS ǒҸDzӄd##*****************************n##* *x##* HOME MORTGAGE CALCULATOR *##* *##* WRITTEN JULY 1984 *##* *##* INPUT:LOAN AMOUNT-$ *##* INTEREST RATE-% *##* LENGTH OF LOAN-YRS *##* LOAN POINTS-% *##* *##* OUTPUT:MONTHLY PAYMENT *##* POINTS PAID-$ *##* TOTAL COST *##* INTEREST BY YEAR *##* AMORTIZATION BY YR *##* TOTAL INTEREST *##* TOTAL AMORTIZATION *##* *"##*****************************,;@,6 +@%! HARDCOPY OR DISPLAY (H/D)%J##@@E:T6 4H@6@@P:^%! AMOUNT OF MORTGAGE......%h5 4H5 @AMOUNT OF MORTGAGE = $r3! ANNUAL PERCENTAGE RATE..%36-'A|< 4H< @ANNUAL PERCENTAGE RATE = $A%! LENGTH OF LOAN IN YEARS.%4 4H4 @LENGTH OF LOAN IN YEARS= 3! NUMBER OF POINTS........%36-'A< 4H< @NUMBER OF POINTS = $AΠӠ6-'@6-$@ -$٠Ԡ6-+@%,#6-$++$,'+&@,,6-P:+%>P,$A,6-'A̠Ԡ6-+$,%9 @9 @MONTHLY PAYMENT WOULD BE :$&.. @POINTS PAID WOULD BE :$0.. @TOTAL COST WOULD BE :$DԠΠN 6-X6-b6-l@ @@ @$YEAR INTEREST AMORTIZATION v-@!6-"@!6-6--@@ 6-+$,6-P:+%>P,$A,6-'A 6-& 6-& 6-% 6-%  @ 6-% 6-%   6-% / @ @/ @TOTALS:*!! @INTEREST $4!! @AMORTIZATION $>!! @COST $H@ & CALCULATE ANY MORE (Y/N)...*24Y=@@%D2:MORTGAGE.BAS}}}