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 "CPDPP" 02 1 03 "NO. PMT/YR ?" 04 PROMPT 05 "NO. PER./YR ?" 06 PROMPT 07 / 08 STO 04 09 X>Y? 10 SF 00 11 "INT ?" 12 PROMPT 13 100 14 / 15 STO 03 16 LASTX 17 * 18 RCL 03 19 1 20 + 21 RCL 04 22 1/X 23 Y^X 24 STO 05 25 .1 26 STO 06 27 CF 22 28 "NO. PMTS ?" 29 XEQ 09 30 "PMT ?" 31 XEQ 09 32 "FV ?" 33 XEQ 09 34 GTO IND 07 35 LBL 00 36 FS?C 00 37 GTO 10 38 RCL 05 39 1 40 - 41 RCL 02 42 * 43 RCL 05 44 RCL 01 45 * 46 / 47 1 48 + 49 LN 50 RCL 05 51 LN 52 / 53 "N" 54 XEQ 13 55 LBL 10 56 RCL 02 57 RCL 03 58 * 59 RCL 04 60 1 61 + 62 RCL 03 63 2 64 / 65 * 66 RCL 04 67 + 68 RCL 01 69 * 70 / 71 1 72 + 73 LN 74 RCL 03 75 1 76 + 77 LN 78 / 79 RCL 04 80 * 81 "N" 82 XEQ 13 83 LBL 01 84 FS?C 00 85 GTO 11 86 RCL 05 87 1 88 - 89 RCL 05 90 RCL 00 91 Y^X 92 1 93 - 94 / 95 RCL 02 96 * 97 RCL 05 98 / 99 "PMT" 100 XEQ 13 101 LBL 11 102 RCL 04 103 1/X 104 RCL 00 105 * 106 RCL 03 107 1 108 + 109 X<>Y 110 Y^X 111 1 112 - 113 RCL 03 114 X<>Y 115 / 116 RCL 04 117 1 118 + 119 RCL 03 120 2 121 / 122 * 123 RCL 04 124 + 125 / 126 RCL 02 127 * 128 "PMT" 129 XEQ 13 130 LBL 02 131 FS?C 00 132 GTO 12 133 RCL 05 134 RCL 00 135 Y^X 136 1 137 - 138 RCL 05 139 * 140 RCL 01 141 * 142 RCL 05 143 1 144 - 145 / 146 "FV" 147 XEQ 13 148 LBL 12 149 RCL 04 150 1 151 + 152 RCL 03 153 2 154 / 155 * 156 RCL 04 157 + 158 RCL 03 159 1 160 + 161 RCL 00 162 RCL 04 163 1/X 164 * 165 Y^X 166 1 167 - 168 * 169 RCL 01 170 * 171 RCL 03 172 / 173 "FV" 174 LBL 13 175 "=" 176 ARCL X 177 PROMPT 178 RTN 179 LBL 09 180 PROMPT 181 STO IND 06 182 RCL 06 183 FC?C 22 184 STO 07 185 ISG 06 186 RTN 187 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall