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 Applied Stats 1 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 "ANVA2" 02 LBL A 03 CLRG 04 STOP 05 STO 20 06 13 07 X<=Y? 08 GTO 09 09 STOP 10 STO 21 11 30.054 12 STO 27 13 ADV 14 LBL 01 15 STOP 16 ST+ IND 25 17 XROM 30,29 18 SREG 14 19 S+ 20 GTO 01 21 LBL B 22 RCL 15 23 ST+ 13 24 RCL 14 25 ST+ 22 26 "~.B" 27 XEQ 11 28 ADV 29 X^2 30 ST+ 23 31 CLS 32 0 33 STO 25 34 1 35 ST+ 24 36 RCL 21 37 RCL 24 38 X#Y? 39 GTO 01 40 0 41 STO 24 42 LBL 02 43 RCL IND 25 44 "~.T" 45 XEQ 11 46 RCL 21 47 / 48 "MOY." 49 XEQ 11 50 RCL IND 25 51 X^2 52 ST+ 24 53 XEQ 10 54 XROM 30,29 55 RCL 20 56 RCL 25 57 X#Y? 58 GTO 02 59 RCL 22 60 X^2 61 RCL 20 62 RCL 21 63 * 64 / 65 STO 22 66 RCL 13 67 RCL 22 68 - 69 STO 13 70 RCL 23 71 RCL 20 72 / 73 RCL 22 74 - 75 STO 23 76 RCL 24 77 RCL 21 78 / 79 RCL 22 80 - 81 STO 24 82 RCL 13 83 RCL 23 84 RCL 24 85 + 86 - 87 STO 14 88 RCL 20 89 1 90 - 91 RCL 21 92 1 93 - 94 * 95 STO 06 96 / 97 STO 05 98 ADV 99 23 100 STO 25 101 "ANVA" 102 AVIEW 103 "BLOC" 104 AVIEW 105 RCL 21 106 1 107 - 108 STO 00 109 XEQ 05 110 XROM 30,29 111 "TRAIT" 112 AVIEW 113 RCL 20 114 1 115 - 116 STO 00 117 XEQ 05 118 "ERR." 119 AVIEW 120 RCL 06 121 "D.L." 122 XEQ 11 123 RCL 14 124 "S.C." 125 XEQ 11 126 RCL 05 127 "C.M." 128 XEQ 11 129 ADV 130 "TOT." 131 AVIEW 132 RCL 20 133 RCL 21 134 * 135 1 136 - 137 "D.L." 138 XEQ 11 139 RCL 13 140 "S.C." 141 XEQ 11 142 RTN 143 LBL 05 144 "D.L." 145 XEQ 11 146 RCL IND 25 147 "S.C." 148 XEQ 11 149 X<>Y 150 / 151 "C.M." 152 XEQ 11 153 RCL 05 154 / 155 STO 17 156 "F." 157 XEQ 11 158 XEQ 03 159 RTN 160 LBL 03 161 2 162 ENTER 163 9 164 / 165 STO 01 166 RCL 00 167 / 168 STO 03 169 RCL 01 170 RCL 06 171 / 172 STO 01 173 1 174 - 175 CHS 176 RCL 17 177 3 178 1/X 179 Y^X 180 * 181 1 182 RCL 03 183 - 184 - 185 STO 07 186 RCL 01 187 RCL 17 188 2 189 ENTER 190 3 191 / 192 Y^X 193 * 194 RCL 03 195 + 196 SQRT 197 RCL 07 198 X<>Y 199 / 200 STO 08 201 X>0? 202 SF 02 203 ABS 204 1 205 RCL 08 206 .196854 207 * 208 + 209 RCL 08 210 X^2 211 .115194 212 * 213 + 214 RCL 08 215 3 216 Y^X 217 .000344 218 * 219 + 220 RCL 08 221 4 222 Y^X 223 .019527 224 * 225 + 226 -4 227 Y^X 228 2 229 / 230 CHS 231 1 232 + 233 XROM 30,15 234 FS?C 02 235 XEQ 04 236 "P" 237 XEQ 11 238 XROM 30,14 239 ADV 240 RTN 241 LBL 04 242 1 243 X<>Y 244 - 245 RTN 246 LBL 10 247 RCL IND 25 248 STO IND 27 249 ISG 27 250 RCL 21 251 STO IND 27 252 ISG 27 253 RTN 254 LBL 11 255 "=" 256 ARCL X 257 AVIEW 258 RTN 259 LBL E 260 RCL 25 261 1 262 - 263 STO 25 264 STOP 265 ST- IND 25 266 S- 267 GTO 01 268 LBL e 269 STOP 270 ENTER 271 1 272 - 273 STO 26 274 STOP 275 ST- IND 26 276 S- 277 STOP 278 ST+ IND 26 279 S+ 280 GTO 01 281 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall