This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 M.E. Pac 1. This program was ported to the HP-41C by reading with the HP-41C card reader and the card reader may be required for operation of this program. 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 "BELT67" 02 LBL 15 03 LBL a 04 0 05 FS?C 02 06 RTN 07 SF 02 08 1 09 RTN 10 LBL 10 11 LBL A 12 7CLREG 13 SF 01 14 STO 00 15 STO 01 16 RDN 17 STO 21 18 RDN 19 STO 20 20 1- 21 ACOS 22 STO 22 23 RCL 00 24 RTN 25 LBL 11 26 LBL B 27 STO 04 28 CLX 29 RCL 03 30 7P<>S 31 STO 03 32 7P<>S 33 X<>Y 34 STO 03 35 X<>Y 36 - 37 X<>Y 38 RCL 02 39 7P<>S 40 STO 02 41 7P<>S 42 X<>Y 43 STO 02 44 X<>Y 45 - 46 R-P 47 X^2 48 X<>Y 49 X<0? 50 XEQ 00 51 FS? 01 52 STO 05 53 FS? 01 54 STO 06 55 RCL 06 56 X<>Y 57 STO 06 58 XEQ 14 59 X<>Y 60 RCL 01 61 RCL 04 62 - 63 X^2 64 - 65 SQRT 66 ST+ 08 67 RCL 01 68 RCL 04 69 - 70 X<>Y 71 XEQ 01 72 STO 07 73 + 74 RCL 01 75 * 76 RCL 22 77 / 78 PI 79 * 80 ST+ 08 81 FS?C 02 82 XEQ 17 83 RCL 04 84 STO 01 85 CF 01 86 RTN 87 LBL 14 88 LBL E 89 - 90 1 91 P-R 92 R-P 93 * 94 ABS 95 RCL 07 96 - 97 RTN 98 LBL 12 99 LBL C 100 RCL 20 101 RCL 21 102 RCL 00 103 XEQ 11 104 RCL 06 105 RCL 05 106 XEQ 14 107 RCL 01 108 * 109 RCL 22 110 / 111 PI 112 * 113 ST+ 08 114 RCL 08 115 RTN 116 LBL 00 117 RCL 22 118 + 119 LASTX 120 + 121 RTN 122 LBL 01 123 R-P 124 RDN 125 COS 126 X<0? 127 GTO 09 128 CLX 129 LASTX 130 RTN 131 LBL 09 132 CLX 133 LASTX 134 RCL 22 135 + 136 1 137 P-R 138 R-P 139 RDN 140 RTN 141 LBL 17 142 LBL c 143 1 144 ASIN 145 RCL 06 146 + 147 RCL 07 148 - 149 STO 23 150 RCL 01 151 P-R 152 7P<>S 153 RCL 02 154 + 155 7PRTX 156 X<>Y 157 RCL 03 158 + 159 7PRTX 160 ADV 161 7P<>S 162 RCL 23 163 RCL 04 164 P-R 165 RCL 02 166 + 167 7PRTX 168 X<>Y 169 RCL 03 170 + 171 7PRTX 172 SF 02 173 ADV 174 ADV 175 RTN 176 STOP 177 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall