,;     COMPUTE PRESENT VALUE
,;     Present Value = FV/((1+I/P)^N)
,;     Where:
,;          FV= Required Future Value   (%FV000001)
,;           I= Annual Interest Rate    (%I0000001)
,;           P= Compounding Period      (%P0000001)
,;           N= Number of Periods       (%N0000001)
,;
,;
,;     Name cell to contain Future Value 
,;
/GN
/F%HERE0001
,NUMBER "Future Value cell?" %HERE0001
,MARK
,AT %HERE0001
/F%FV000001
,BACK
,;
,;     Name cell to contain Interest Rate
,;
,NUMBER "Annual Interest cell?" %HERE0001
,MARK
,AT %HERE0001
/F%I0000001
,BACK
,;
,;     Name cell to contain Compounding Period
,;
,NUMBER "Compounding Per. cell?" %HERE0001
,MARK
,AT %HERE0001
/F%P0000001
,BACK
,;
,;     Name cell to contain Number of Periods
,;
,NUMBER "# of Periods cell?" %HERE0001
,;
,MARK
,AT %HERE0001
/F%N0000001
,BACK
,;
,;     Generate Equation
:%FV000001?/((1+%I0000001?/%P0000001?)^%N0000001?)
,;
,;     Clean-up
,;
@%FV000001
/F%        /
@%I0000001
/F%        /
@%P0000001
/F%        /
@%N0000001
/F%        /
@%HERE0001
/F%        /
/GC
,;
,QUIT