This program is Copyright © HP and is used here by permission. It was originally printed in the Lend/Save/Lease Solution Book. This program was entered and uploaded by Tony Duell.
This program is supplied without representation or warranty of any kind. Tony Duell, Hewlett Packard and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.
Documentation Information (CD or source code)
How to get this Program to your Calculator (via
HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download
LINE KEYS 01 LBL "CONV" 02 STOP 03 LBL A 04 1.1 05 STO 00 06 "INT BASIS <360/" 07 "365> ?" 08 PROMPT 09 STO 05 10 CF 22 11 "NO. DAYS ?" 12 XEQ 12 13 "INT RATE ?" 14 XEQ 12 15 "BEG. AMT ?" 16 XEQ 12 17 "ACC. INT ?" 18 XEQ 12 19 1 E2 20 ST/ 02 21 GTO IND 06 22 LBL 01 23 RCL 04 24 RCL 05 25 * 26 RCL 03 27 / 28 RCL 02 29 / 30 "DAYS" 31 XEQ 13 32 LBL 02 33 RCL 05 34 RCL 04 35 * 36 RCL 01 37 / 38 RCL 03 39 / 40 1 E2 41 * 42 "RATE" 43 XEQ 13 44 LBL 03 45 RCL 04 46 RCL 05 47 * 48 RCL 01 49 / 50 RCL 02 51 / 52 "AMT" 53 XEQ 13 54 LBL 04 55 RCL 03 56 RCL 01 57 RCL 05 58 / 59 RCL 03 60 * 61 RCL 02 62 * 63 "INT" 64 XEQ 13 65 LBL B 66 1.1 67 STO 00 68 "NO. PER. ?" 69 PROMPT 70 STO 05 71 LBL 14 72 CF 22 73 "NOM ?" 74 XEQ 12 75 "EFF ?" 76 XEQ 12 77 GTO IND 06 78 LBL 01 79 RCL 02 80 1 E2 81 / 82 1 83 + 84 RCL 05 85 1/X 86 Y^X 87 1 88 - 89 RCL 05 90 * 91 1 E2 92 * 93 "NOM" 94 XEQ 13 95 LBL 02 96 RCL 01 97 RCL 05 98 1 E2 99 * 100 / 101 1 102 + 103 RCL 05 104 Y^X 105 1 106 - 107 1 E2 108 * 109 "EFF" 110 XEQ 13 111 LBL C 112 3.1 113 STO 00 114 GTO 14 115 LBL 03 116 RCL 04 117 1 E2 118 / 119 1 120 + 121 LN 122 1 E2 123 * 124 "C.NOM" 125 XEQ 13 126 LBL 04 127 RCL 03 128 LBL 07 129 1 E2 130 / 131 E^X 132 1 133 - 134 1 E2 135 * 136 "C.EFF" 137 LBL 13 138 "=" 139 ARCL X 140 PROMPT 141 RTN 142 LBL 12 143 PROMPT 144 STO IND 00 145 RCL 00 146 FC?C 22 147 STO 06 148 ISG 00 149 RTN 150 LBL D 151 "NOM ?" 152 PROMPT 153 365 154 * 155 360 156 / 157 GTO 07 158 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall