L01
LBL
L
L02
STO
i
L03
FN=
T
L04
SOLVE<i>
L05
VIEW<i>
L06
GTO<i)
Bytes
i
and
Checksum:
T01
LBL
T
T02
INPUT
N
T03
INPUT
I
T04
INPUT
B
T05
INPUT
P
T06
INPUT
F
T07
RCL
I
T08
x =
0?
T09
GTO
K
T10
100
Til
-r
T12
STO
Z
T13
1
T14
+
T15
RCL
N
T16
+•-
T17
yx
T18
ENTER
T19
+/-
T20
1
T21
+
T22
RCL-^
Z
This label controls the computation of the
selected
variable.
Stores
the
index value (for indirect address
ing) in i.
Selects
the
T
routine,
which
contains
the
equation, for
SOLVE.
Solves for the variable indirectly addressed
by i.
Displays the result addressed by i.
Goes
back
for
another
calculation.
009.0,
7878
This routine contains the equation defining
the time value of money.
Prompts for
and
stores N.
Prompts for and stores I.
Prompts for
and
stores B.
Prompts for
and
stores P.
Prompts for
and
stores F.
Recalls the interest rate in percent.
If
7=0...
...then
uses the equation in routine K.
Converts
I
to
decimal
form
and
stores
it
inZ.
Calculates (1 + Z).
Calculates (1 +
Z)~N.
Duplicates quantity so
that
it can be
used
later.
Calculates 1 - (1 +
Z)~N.
Calculates
(1
-
(1
+
Z)~N)
224
14:
Miscellaneous
Programs