,;     COMPUTE FUTURE VALUE OF AN ANNUITY DUE
,;     Future Value of an Annuity Due = (PMT*(((1+I/P)^N-1)/(I/P)))*(1+I/P)
,;     Where:
,;          PMT= Payment                (%PMT00004)
,;            I= Annual Interest Rate   (%I0000004)
,;            P= Compounding Period     (%P0000004)
,;            N= Number of Periods      (%N0000004)
,;
,;
,;     Name cell to contain Payment
,;
/GN
/F%HERE0004
,NUMBER "Payment Amount cell?" %HERE0004
,MARK
,AT %HERE0004
/F%PMT00004
,BACK
,;
,;     Name cell to contain Interest Rate
,;
,NUMBER "Annual Interest cell?" %HERE0004
,MARK
,AT %HERE0004
/F%I0000004
,BACK
,;
,;     Name cell to contain Compounding Period
,;
,NUMBER "Compounding Per. cell?" %HERE0004
,MARK
,AT %HERE0004
/F%P0000004
,BACK
,;
,;     Name cell to contain Number of Periods
,;
,NUMBER "# of Periods cell?" %HERE0004
,;
,MARK
,AT %HERE0004
/F%N0000004
,BACK
,;
,;     Generate Equation
: (%PMT00004?*(((1+%I0000004?/%P0000004?)^%N0000004?-1)/(%I0000004?/%P0000004?)))*(1+%I0000004?/%P0000004?)
,;
,;     Clean-up
,;
@%P0000004
/F%        /
@%I0000004
/F%        /
@%N0000004
/F%        /
@%PMT00004
/F%        /
@%HERE0004
/F%        /
/GC
,;
,QUIT