home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / busi / rd10a.zip / INTR-DO.LBM < prev    next >
Text File  |  1990-02-12  |  946b  |  16 lines

  1. {This macro uses a DO loop to figure compound interest.}
  2. {Try the INTEREST macro to figure interest WITHOUT a DO loop.}
  3. c                              {clears the calculator tape}
  4. c                              {second "c" clears F4 & F8 memories}
  5. "ANNUAL INTEREST PERCENT"=     {asks for and then displays percent}
  6. /100+                          {converts % to frac, adds next line}
  7. 1=                             {"=" causes result to display}
  8. ALT-F8                         {stores result in F8 memory}
  9. "YEARS TO COMPOUND"=           {asks for & displays period held}
  10. ALT-F4                         {stores result in F4 memory}
  11. "INITIAL INVESTMENT"=          {asks for & displys investment}
  12. DO                             {begins DO loop}
  13. *F8=                           {multiplies result by 8}
  14. UNTIL COUNT=F4                 {ends DO loop when count equals}
  15.                                {  F4, which is "YEARS TO COMPOUND"}
  16.