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