Post Reply 
PPC Journal V2N6 - TVM i% unknown on HP-65
09-13-2017, 07:32 PM (This post was last modified: 09-13-2017 08:21 PM by Dieter.)
Post: #27
RE: PPC Journal V2N6 - TVM i% unknown on HP-65
(09-11-2017 05:23 PM)AndiGer Wrote:  The program code Dieter suggested in post #11 may work if we just omit LBL B.
As I just read in Key 65 Key Note V1N1 (found on TOS) this is possible!
Because if LBL B is not found the calculator will start execution at top of memory.
Just to finally mention ;-)

Wow, that's a great find! I wonder if there is any other calculator that does not throw an error if a nonexisting label is called and instead behaves this way with starting at the memory top.

And indeed this seems to work. For the record, here is the complete listing (with a slight modification in the iteration's exit condition).

Code:
 01  RCL 1  34 01
 02  RCL 3  34 03
 03  x      71
 04  RCL 4  34 04
 05  +      61
 06  RCL 5  34 05
 07  +      61
 08  RCL 5  34 05
 09  RCL 4  34 04
 10  -      51
 11  RCL 1  34 01
 12  x      71
 13  ÷      81
 14  2      02
 15  x      71
 16  STO 2  33 02
 17  LBL    23
 18  1      01
 19  g      35
 20  ABS    06
 21  EEX    43
 22  CHS    42
 23  7      07
 24  g x>y? 35 24
 25  GTO    22
 26  2      02
 27  RCL 2  34 02
 28  1      01
 29  +      61
 30  STO 6  33 06
 31  RCL 1  34 01
 32  CHS    42
 33  g      35
 34  y^x    05
 35  STO 7  33 07
 36  RCL 5  34 05
 37  x      71
 38  1      01
 39  RCL 7  34 07
 40  -      51
 41  RCL 3  34 03
 42  x      71
 43  RCL 2  34 02
 44  ÷      81
 45  STO 8  33 08
 46  f      31
 47  TF 1   61
 48  RCL 6  34 06
 49  x      71
 50  +      61
 51  RCL 4  34 04
 52  +      61
 53  RCL 8  34 08
 54  RCL 2  34 02
 55  ÷      81
 56  RCL 3  34 03
 57  RCL 2  34 02
 58  ÷      81
 59  f      31
 60  TF 1   61
 61  RCL 3  34 03
 62  +      61
 63  RCL 5  34 05
 64  -      51
 65  RCL 7  34 07
 66  x      71
 67  RCL 1  34 01
 68  x      71
 69  RCL 6  34 06
 70  ÷      81
 71  -      51
 72  ÷      81
 73  STO    33
 74  +      61
 75  2      02
 76  GTO    22
 77  1      01
 78  LBL    23
 79  2      02
 80  RCL 2  34 02
 81  EEX    43
 82  2      02
 83  x      71
 84  RTN    24
 85  LBL    23
 86  A      11
 87  STO 1  33 01
 88  RTN    24
 89  LBL    23
 90  C      13
 91  STO 3  33 03
 92  RTN    24
 93  LBL    23
 94  D      14
 95  STO 4  33 04
 96  RTN    24
 97  LBL    23
 98  E      15
 99  STO 5  33 05
100  RTN    24

Example (assuming flag 1 is clear):

n = 5  [ A ]
PMT = 500  [ C ]
PV = 0  [ D ]
FV = -3000  [ E ]
[ B ] => i = 9,128%

With flag 1 set the result is 6,140%

Please also note the version in post #22.

Dieter
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: PPC Journal V2N6 - TVM i% unknown on HP-65 - Dieter - 09-13-2017 07:32 PM



User(s) browsing this thread: 1 Guest(s)