home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / busi / rd10a.zip / INT2.LBM < prev    next >
Text File  |  1990-03-17  |  1KB  |  23 lines
  1. { Macro calculating present value of interest compounded n times}
  2. { FORMULA: P=A/(1+i)^n }
  3. {    where P=principal, A=amount, n=number of periods, i=interest }
  4. c                               {clears the calculator tape}
  5. c                               {second "c" clears F4 & F8 memories}
  6. D=9                             {switches to 9 decimal places to}
  7.                                 {minimize rounding errors}
  8. "FIND  PRESENT"
  9. "VALUE   OF  A"
  10. "FUTURE AMOUNT"
  11. " "
  12. "AMOUNT WHOSE PRESENT VALUE YOU WANT TO FIND"=
  13. ALT-F8                          {stores figure in F8 memory}
  14. "PERIODIC INTEREST PERCENTAGE"= {asks for and then displays percent}
  15. /100+                           {converts % to frac, adds next line}
  16. 1^                              {raises result to the power of the}
  17.                                 {figure on the next line}
  18. "PERIODS COMPOUNDED"=
  19. ALT-F4                          {stores figure in F4 memory}
  20. D=2                             {switches back to 2 decimal places}
  21. F8/                             {recalls F8 memory and divides...}
  22. F4=                             {...by F4 memory}
  23. "PRESENT VALUE"