home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
busi
/
rd10a.zip
/
INT3.LBM
< prev
next >
Wrap
Text File
|
1990-03-17
|
682b
|
28 lines
{ Macro calculating interest rate from present value, etc.}
{ FORMULA: i=((A/P)^(1/n))-1}
{ where P=principal, A=amount, n=number of periods, i=interest }
c {clears the calculator tape}
c {second "c" clears F4 & F8 memories}
D=9 {switches to 9 decimal places to}
{minimize rounding errors}
"FIND INTEREST"
"RATE NEEDED TO"
"ACCUMULATE THE"
"DESIRED AMOUNT"
" "
"BEGINNING PRINCIPAL"=
ALT-F8
"AMOUNT DESIRED AFTER AFTER COMPOUNDING"=
ALT-F3
1/
"NUMBER OF PERIODS COMPOUNDED"=
ALT-F4
F3/
F8^
F4-
1*
100=
ALT-F4
D=2
F4=
"INTEREST RATE"