Category : Lotus and other Spreadsheets
Archive   : POWERWKS.ZIP
Filename : ROR.WKS

1/





ÿq H
  AGENDA ( (BEEP



BLANKCALC  CASHFLOW

CFMSG

CFMSG_P1
COPYRIGHT

COPYRIGHT_P1

CUMCASH DISCFACTDISCRATE  ENDMSG

ENDMSG_P1EST1IRRFVINGRAPHGRAPHMENU  GRAPHTYPE$$INFLOWS INPUT  INPUTLOOP  MCASH MENU NPDOPTIONSOUTFLOWS PDNUMS PRINT**PVOUTREINVFACT

REINVRATE

RESULTSSAMECALC((SCROLLSETSIEVE . .SETSKIP((SIEVE
SIEVENPV
SIEVEPCT
TEMP\0

\B

\I

\M

ÿÿÿÿÿÿÿÿÿÿÿÿ
 0
 ÿÿÿÿ
 
ÿ# ÿÿÿÿ ÿÿÿÿÿÿÿÿ$
%ò&ò'((
LB)
'*ÿÿÿÿÿÿ-µ


ÿÿ ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿNET PRESENT VALUE test example Discount Rate % $ Net Present Value Cum. Cash Flow qqÿ\=ÿ
\=ÿ\=ÿ\=ÿ\=ÿ\=ÿ"DISCFACT:%ÿð

þ¿ € 

 

ÿÿ '\0: \B: ÿ
'BEEP:
ÿ'\M:
ÿ '\I:.ÿ
'To Finish, Press Ctrl-Break then Alt-I.
ÿ"NPVÿ"%/period
ÿ"% p.a.
ÿ"NPVÿ"%/period
ÿ
'ROR9ÿ
' Copyright (c) 1984, Wildfire Technology Inc.ÿ
"REINVFACT:%ÿ
ð

þ¿ € 

 

ÿ
'{home}ÿ

'//{esc}
ÿ
'{home}
ÿ
'{home}ÿ

\=ÿ
\=ÿ
\=¢
6À

€€

V9²
*
{®Gáz„?

€€ 


T 



€
ÿ

ý¿€
ý¿
€
²
P,,l/"‰?ÿ\-ÿ
\-ÿ\-ÿ\-ÿ\-ÿ\- ÿ"TEMP:
 ÿ '/WGPD
ÿ
'/XR ÿ'/REendmsg_p1~/REcfmsg_p1~ ÿ '/REendmsg_p1~/REcfmsg_p1~!ÿ
' In the Cash Flow Column:¢ž-·œå±À

€€

V9²P,,l/"‰?*
{®Gáz„?

€€ 


T 



€-ÿ
' Rate of Return Calculatorÿ"No of Pds:ÿ4@ ú¿€ú¿€R
ÿ '/DFa10.a310~0~1~300~ÿ'/XMmenu~ÿ '/XMinput~%ÿ
' - Cash Inflows are POSITIVE¢+§AŠÓÿ?

€€

V9²Ä°HB±˜?*
{®Gáz„?

€€ 


T 



€
ÿ\=ÿ
\=ÿ\=ÿ\=ÿ\=ÿ\=ÿ"Present
ÿ"Future?ÿ '/REendmsg_p1~/REcfmsg_p1~/Ccopyright~copyright_p1~/REi1~&ÿ
' - Cash Outflows are NEGATIVE¢BÌó±ã!@

€€

V9²žëý
«4¢?*
{®Gáz„?

€€ 


T 



€  ÿ"Value ÿ"Value ÿ '/WGPE ÿ'QOUT:ÿ
' - Period 0 is NOW ²¢#øø5+@

€€

V9²7&à§?*
{®Gáz„?

€€ 


T 



€ÿ'Number of Periods/Yr:    )¢S~?יjYÀ



€€€€V0¢¹ša‰”•i@!


€ý‡




€€€€Vÿ '/XMmenu~ÿ'{edit}{home}{del}~/XR9ÿ
' Copyright (c) 1984, Wildfire Technology Inc.¢ š“Ãë1@

€€

V9²d3j(Ä_­?*
{®Gáz„?

€€ 


T 



€
ÿ"Periodÿ"Accumulated   ÿ"Cashÿ"Cashÿ"Modified¢fbBÍD3@

€€

V9²ÍV¯Z±?*
{®Gáz„?

€€ 


T 



€
ÿ"Numberÿ
"Cash Flowÿ"Cash Flow   ÿ"Outflowsÿ"Inflowsÿ"Cashflow ÿ 'MENU:¢t˜¢(¤4@

€€

V9²3l™ò³?*
{®Gáz„?

€€ 


T 



€# "
¢    " " "  ÿ 'Input ÿ
'Blankÿ 'Calcÿ 'Results ÿ
'Graph ÿ 'Print
ÿ 'Agendaÿ 'Quit¢ Giè¨Ìj5@

€€

V9² UüFCw¶?*
{®Gáz„?

€€ 


T 



€ ( "

¢

2

"
"
"
=ÿ
'Input cashflow values and discount/reinvestment rates.)ÿ

'Blank out input data and results. ÿ
'Calculate results.ÿ
'Display results.ÿ

'Display graphs.ÿ
'Print results.,ÿ
'Return to worksheet selection agenda. ÿ
'Exit to 1-2-3 READY mode.¢
/”ÅíÁ5@

€€

V9²
•©´gë¸?*
{®Gáz„?

€€ 


T 



€
- "
 ¢ÿ\=ÿ\=ÿ\= " " "ÿ '/XMinput~ÿ
'/XMblank~ÿ'/XGcalc~ÿ '/XGresults~ÿ
'/XGgraph~ÿ'/XGprint~ÿ'/XMagenda~¢ÉÊÓñ‚Æ5@

€€

V9²ø/œO»?*
{®Gáz„?

€€ 


T 



€2 "
¢ ÿ ' Discount Rate ======>> 2 " " " ¢ ‚í=…ú5@

€€

V9² Ú±ò§}¤½?*
{®Gáz„?

€€ 


T 



€ 7 "

¢
ÿ
' Reinvestment Rate ==>> 2
"
"
"

ÿ
'INPUT:ÿ
'RESULTS:¢
ÜÕN”.5@

€€

V9²
àÃÁ3ë¿?*
{®Gáz„?

€€ 


T 



€
< "
 ¢ÿ\-ÿ\-ÿ\- " "ÿ 'Cashflowÿ
'Periods/Yrÿ'DiscRateÿ 'ReinvRate
ÿ
'EstIRRÿ'Quit
ÿ'{home}¢QîNÀ®4@

€€

V9²#gF½4Á?*
{®Gáz„?

€€ 


T 



€A "
 ¢ÿ' Internal ROR ......... ² " "ÿ 'Enter cashflow values.(ÿ
'Enter number of periods per year.<ÿ'Enter the annual discount rate (%) for cash outflows.@ÿ 'Enter the annual re-investment rate (%) for cash inflows.8ÿ
'Enter first estimate for internal rate of return.ÿ'Return to main menu.$ÿ'/XI2>@count(b20.b21)~/XMmenu~¢Ë&¡Ó4@

€€

V9²n¨'
j(Â?*
{®Gáz„?

€€ 


T 



€F "
 ¢ÿ' Modified IRR ......... ² " "4ÿ '/RUendmsg_p1~/Cendmsg~endmsg_p1~/RUendmsg_p1~"ÿ
'/XNPeriods per year: ~temp~&ÿ'/XNAnnual discount rate: ~temp~*ÿ '/XNAnnual reinvestment rate: ~temp~'ÿ
'/XNEnter estimate of IRR: ~temp~ÿ'/XMmenu~ÿ'/WTH¢ÏNz÷Ñv3@

€€

V9²Z38Ã?*
{®Gáz„?

€€ 


T 



€K "
 ¢ÿ' Financial Mgmt. ROR .. ² ² " "0ÿ '/RUcfmsg_p1~/Ccfmsg~cfmsg_p1~/RUcfmsg_p1~[ÿ
'/XI(temp<=0)#OR#temp<>@int(temp)~/XCbeep~/XLMust be a positive integer.~temp~/XGj17~+ÿ'{goto}discrate~.01*temp{calc}~{home},ÿ '{goto}reinvrate~.01*temp{calc}~{home}*ÿ
'{goto}est1irr~.01*temp{calc}~{home}ÿ'/XMscroll~¢œûœy
Ë2@

€€

V9²1CƒëBÄ?*
{®Gáz„?

€€ 


T 



€P "
 ¢ÿ\-ÿ\-ÿ\- " "ÿ '{goto}b10~ÿ
'/Ctemp~c7~ÿ'/XMinput~ÿ '/XMinput~ÿ
'/XMinput~¢®¦7X2@

€€

V9²£Q2ÏÊGÅ?*
{®Gáz„?

€€ 


T 



€U "
 ¢ÿ' IRR 1st Estimate ===>> 2 " "ÿ '{?}{down}/XGinputloop~ÿ
'/XMinput~¢®r Íg1@

€€

V9²>Vk5nGÆ?*
{®Gáz„?

€€ 


T 



€Z "
 ¢ " " "¢ƒ­Y•µ0@

€€

V9²åʇlBÇ?*
{®Gáz„?

€€ 


T 



€_ "
 ¢ " " " ÿ 'CALC:
ÿ'BLANK:ÿ'SCROLL:¢;ç_S0@

€€

V9²©¸Qð7È?*
{®Gáz„?

€€ 


T 



€d "
 ¢ " " "2ÿ '/XIi1=@COUNT(b10.b310)~/XCsamecalc~/XMmenu~ ÿ'No
ÿ 'Yesÿ'Down ÿ'Upÿ'Quit "
 ¢ " " "Mÿ '/XI2>@COUNT(b10.b11)~/XCbeep~/XLToo few cashflow values.~temp~/XMmenu~2ÿ'Do not blank out data. Return to main menu.>ÿ 'Blank out input and results areas. Return to main menu.ÿ'Scroll down one screen.ÿ'Scroll up one screen.ÿ'Return to main menu. "
 ¢ " " "Eÿ '/XI$c$7=0~/XCbeep~/XLPeriods/Year not specified.~temp~/XMmenu~ÿ'/XMmenu~ ÿ '/WGPD
ÿ'{pgdn}
ÿ'{pgup}ÿ'/WTC "
 ¢ " " " ÿ '/WGPD6ÿ '/REb10.c310~/REc7~/REf13.f14~/REf16.f18~/REf20~ÿ'/XMscroll~ÿ'/XMscroll~ÿ'/XMmenu~
ÿ'GRAPH: "
 ¢ " " "ÿ '/REc10.c310~/REg10.i310~ ÿ '/WGPEÿ'/GOTS{?}~QQ "
 ¢ " " ":ÿ '{goto}a10~/RNCpdnums~{bs}.{right}{end}{down}{left}~ÿ '/XMmenu~ÿ'/XMgraphmenu~ "
 ¢ " " ",ÿ '{right}/RNCcashflow~{bs}.{end}{down}~ "
 ¢ ¢ ¢ ¢8ÿ '{right}/RNCcumcash~{bs}.{left}{end}{down}{right}~ÿ 'GRAPHMENU:ÿ'OPTIONS: "
 ¢ ¢ ¢ ¢ ÿ '+{up}+{left}~/C~.cumcash~ÿ 'Cashflow
ÿ
'NPVÿ'Typeÿ'Optionsÿ'Quit ÿ'Color
ÿ'B&W "
 ¢ ¢ ¢ ¢ÿ '/Ccashflow~g10.i10~0ÿ 'Display cashflow and cumulative cashflow.3ÿ
'Display net present value vs. discount rate.5ÿ'Select line graph, bar chart, or scatter plot.*ÿ'Choose color or monochrome monitor.ÿ'Return to main menu.ÿ'Display graphs in color.$ÿ'Display graphs in monochrome. "
¢ ¢ ¢ ¢ Iÿ '{goto}g10~@MIN(0,$b10)~/RNCoutflows~{bs}.{end}{down}~/C~.outflows~Kÿ '/GXpdnums~Acashflow~Bcumcash~OTF{esc}CASH FLOW~TX{esc}Period Number~Qÿ
'/GXsievepct~Asievenpv~RBQOTF{esc}NET PRESENT VALUE~TX{esc}Discount Rate %~ÿ '/XMgraphtype~ÿ '/XMoptions~ÿ '/XMmenu~ÿ '/GOCQQ{graph}ÿ '/GOBQQ{graph} "
! ¢! ¢! ¢! ¢!Dÿ !'{right}@MAX(0,$b10)~/RNCinflows~{bs}.{end}{down}~/C~.inflows~0ÿ !'LA{esc}Cash Flow~LB{esc}Cum. Cash Flow~QQ"ÿ
!'LA{esc}Net Present Value~QQÿ!'/XMgraphmenu~ÿ!'/XMgraphmenu~ "
" ¢" ¢" ¢" ¢"ÿ "'/C{end}{down}~{right}~Nÿ "'{goto}setskip~{down}@MAX(1,@INT(npd/5)){calc}~{edit}{home}'~/XCsetskip~)ÿ
"'{goto}setskip~{down}'4~/XCsetskip~ "
# ¢# ¢# ¢# ¢#4ÿ #'{right}+g7+{left}~/RNCmcash~{bs}.{end}{down}~ÿ #'{home}{graph}ÿ
#'{home}{graph}ÿ#'GRAPHTYPE: "
$ ¢$ ¢$ ¢$ ¢$!ÿ $'{goto}h4~@COUNT(cashflow)~ÿ $'/XMgraphmenu~ÿ
$'/XMgraphmenu~ÿ$'Line
ÿ$'Barÿ$'Scatter "
% ¢% ¢% ¢% ¢%6ÿ %'{goto}g7~+$discfact*@NPV($discfact-1,outflows)~ÿ%'Display line graph.ÿ%'Display bar chart.ÿ%'Display scatter graph. "
& ¢& ¢& ¢& ¢&:ÿ &'{right}($reinvfact^npd)*@NPV($reinvfact-1,inflows)~ÿ&'/GTXOFABBBQQQ{graph}ÿ&'/GTBQ{graph}ÿ&'/GTXOFASBSQQQ{graph} "
' ¢' ¢' ¢' ¢'ÿ ''/XCsetsieve~ÿ ''AGENDA:ÿ''SETSKIP:ÿ''SAMECALC:ÿ''/XMgraphmenu~ÿ''/XMgraphmenu~ÿ''/XMgraphmenu~ "
( ¢( ¢( ¢( ¢(Fÿ ('{goto}f16~(1+@IRR(@IF(est1irr<>0,est1irr,w2),cashflow))^$c$7-1~ ÿ ('No
ÿ
('Yes ÿ('/GOSS ÿ('/WGPD "
) ¢) ¢) ¢) ¢)Rÿ )'{down}@IF(0<@NPV(1,mcash)#OR#0>@NPV(0,mcash),@NA,(1+@IRR(1,mcash))^$c$7-1)~8ÿ )'Do not clear this worksheet. Return to main menu.>ÿ
)'Clear this worksheet. Go to worksheet selection agenda.)'Qÿ)'/XCsetsieve~
ÿ)'PRINT: "
* ¢* ¢* ¢* ¢*Mÿ *'{down}@IF(fvin<@ABS(pvout),@NA,(@ABS(fvin/pvout)^(1/(npd-1)))^$c$7-1)~ÿ *'/XMmenu~ÿ
*'/FRagenda~
ÿ*'~QQ/XR ÿ*'/WGPE)ÿ*'/XLAlign paper. Press enter.~temp~ "
+ ¢+ ¢+ ¢+ ¢+'ÿ +'{goto}i1~@COUNT(b10.b310){calc}~ÿ+'{home}{calc}ÿ+'{home}{goto}a10~ "
, ¢, ¢, ¢, ¢,ÿ ,'{home}/WGPE
ÿ,'/XRÿ,'/XInpd<=10~/PPRa10.f20~Q "
- ¢- ¢- ¢- ¢-
ÿ -'{calc}ÿ -'SETSIEVE:Jÿ-'/XInpd>10~/PPR{bs}.{right}{right}{end}{down}{right}{right}{right}~Q "
. ¢. ¢. ¢. ¢.ÿ .'/XMmenu~*ÿ .'{goto}sieve~{right}/C~.{end}{down}~ÿ.'/PPOBRa7.a9~Q "
/ ¢/ ¢/ ¢/ ¢/5ÿ /'{left}@NPV({right},$cashflow)~/C~.{end}{down}~ÿ/'AGPQ "
0 ¢0 ¢0 ¢0 ¢0ÿ 0'{query}ÿ0'/XMmenu~ "
1 ¢1 ¢1 ¢1 ¢1
ÿ 1'/XR