%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:42
File Name:PV
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
\Sum \Seq(\List 1[B]/(1+A/100)^(B-1),B,1,\Dim \List 1,1)
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:47
File Name:DPV
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
\Sum \Seq((1-B)\List 1[B]/(1+A/100)^B,B,2,\Dim \List 1,1)/100
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:36
File Name:NPV
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
"Rate"?\->A
\Prog "PV"
"Present value"
\Ans
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:67
File Name:NPVGRAPH
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
\Cls
\AxesOn
0\->C
\Lbl 0
\Xmin+C(\Xmax-\Xmin)/31\->A
\Prog "PV"
\Ans\->B
\Plot A,B
C\<>0\=>\Line
C+1\->C
C\<=31\=>\Goto0

%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:76
File Name:IRR
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
"Initial guess"?\->A
\Lbl 0
\Prog "PV"
\Ans\->C
\Prog "DPV"
\Ans\->D
C/D\->D
A-D\->A
\Abs D>1\EE\(-)8\=>\Goto0
"IRR"
A
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:253
File Name:CFLDESIN
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
"Cash flow design"
"Number of points"?\->A
\Identity A\->\Mat A
\Seq(0,B,1,A,1)\->\List 1
\List->Mat(\List 1)\->\Mat B
1\->B
\Lbl 0
"Rate number"
B\Disp?\->C
1\->D
\Lbl 1
(1+C/100)^(1-D)\->\Mat A[B,D]
D+1\->D
D\<=A\=>\Goto1
B+1\->B
B\<=A\=>\Goto0
1\->B
\Lbl 2
"NPV at rate"
B\Disp?\->\Mat B[B,1]
B+1\->B
B\<=A\=>\Goto2
\Mat A\x^-1\Mat B\->\Mat C
\Mat->List\Mat C,1)\->\List 1
"Flow in List 1"
%End