The Museum of HP Calculators

3-Factor ANOVA for the HP-41C/CV/CX

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

Program Listing

LINE  KEYS
 01 LBL "ANVA7"
 02 LBL A
 03 CLRG
 04 STOP
 05 STO 20
 06 STOP
 07 STO 21
 08 13
 09 X<=Y?
 10 GTO 09
 11 XEQ 07
 12 ADV
 13 LBL 08
 14 STOP
 15 STO 30
 16 ST+ 31
 17 ADV
 18 LBL 01
 19 STOP
 20 ST+ IND 25
 21 XROM 30,29
 22 SREG 14
 23 S+
 24 GTO 01
 25 LBL B
 26 RCL 15
 27 ST+ 13
 28 RCL 14
 29 "~B"
 30 XEQ 11
 31 ADV
 32 ST+ 22
 33 X^2
 34 ST+ 23
 35 CLS
 36 0
 37 STO 25
 38 1
 39 ST+ 24
 40 RCL 24
 41 RCL 30
 42 X>Y?
 43 GTO 01
 44 0
 45 STO 24
 46 LBL 02
 47 RCL IND 25
 48 "~T"
 49 XEQ 11
 50 RCL 30
 51 /
 52 "MOY"
 53 XEQ 11
 54 RCL IND 25
 55 ST+ IND 27
 56 ISG 27
 57 X^2
 58 ST+ 24
 59 XROM 30,29
 60 RCL 25
 61 RCL 21
 62 X>Y?
 63 GTO 02
 64 RCL 22
 65 X^2
 66 RCL 21
 67 RCL 30
 68 *
 69 /
 70 STO 22
 71 ST+ 29
 72 RCL 13
 73 RCL 22
 74 -
 75 STO 13
 76 RCL 23
 77 RCL 21
 78 /
 79 RCL 22
 80 -
 81 STO 23
 82 ST+ 26
 83 RCL 24
 84 RCL 30
 85 /
 86 RCL 22
 87 -
 88 STO 24
 89 ST+ 33
 90 RCL 13
 91 RCL 23
 92 RCL 24
 93 +
 94 -
 95 ST+ 28
 96 0
 97 STO 00
 98 STO 01
 99 STO 02
100 STO 03
101 STO 04
102 STO 05
103 STO 06
104 STO 07
105 STO 08
106 STO 09
107 STO 10
108 STO 11
109 STO 12
110 STO 13
111 STO 22
112 STO 23
113 STO 24
114 STO 25
115 CLS
116 XEQ 07
117 1
118 ST+ 32
119 RCL 32
120 RCL 20
121 X>Y?
122 GTO 08
123 0
124 STO 00
125 STO 01
126 LBL 06
127 RCL IND 27
128 ST+ 00
129 X^2
130 ST+ 01
131 ISG 27
132 RCL 27
133 35
134 -
135 RCL 21
136 X>Y?
137 GTO 06
138 ADV
139 RCL 00
140 X^2
141 RCL 21
142 /
143 RCL 31
144 /
145 STO 10
146 RCL 20
147 1
148 -
149 STO 02
150 ST+ 09
151 RCL 29
152 RCL 10
153 -
154 STO 03
155 ST+ 08
156 RCL 26
157 RCL 31
158 RCL 20
159 -
160 STO 04
161 /
162 STO 11
163 "ANVA"
164 AVIEW
165 "A"
166 AVIEW
167 XEQ 05
168 XEQ 04
169 "ERR.B<A>"
170 AVIEW
171 RCL 04
172 ST+ 09
173 STO 02
174 RCL 26
175 ST+ 08
176 STO 03
177 XEQ 05
178 ADV
179 RCL 21
180 1
181 -
182 STO 02
183 ST+ 09
184 RCL 01
185 RCL 31
186 /
187 RCL 10
188 -
189 STO 03
190 ST+ 08
191 RCL 28
192 RCL 04
193 RCL 02
194 *
195 STO 04
196 /
197 STO 11
198 "C"
199 AVIEW
200 XEQ 05
201 XEQ 04
202 "A*C"
203 AVIEW
204 RCL 20
205 1
206 -
207 RCL 21
208 1
209 -
210 *
211 STO 02
212 ST+ 09
213 RCL 33
214 RCL 03
215 -
216 STO 03
217 ST+ 08
218 XEQ 05
219 XEQ 04
220 "ERR.B*C<A>"
221 AVIEW
222 RCL 04
223 ST+ 09
224 STO 02
225 RCL 28
226 ST+ 08
227 STO 03
228 XEQ 05
229 ADV
230 "TOT"
231 AVIEW
232 RCL 09
233 "D.L."
234 XEQ 11
235 RCL 08
236 "S.C."
237 XEQ 11
238 RTN
239 LBL 07
240 35.050
241 STO 27
242 RTN
243 LBL 05
244 RCL 02
245 "D.L."
246 XEQ 11
247 RCL 03
248 "S.C."
249 XEQ 11
250 X<>Y
251 /
252 "C.M."
253 XEQ 11
254 RTN
255 LBL 04
256 RCL 11
257 /
258 STO 05
259 "F"
260 XEQ 11
261 XEQ 10
262 RTN
263 LBL 10
264 2
265 ENTER
266 9
267 /
268 STO 35
269 RCL 02
270 /
271 STO 36
272 RCL 35
273 RCL 04
274 /
275 STO 35
276 1
277 -
278 CHS
279 RCL 05
280 3
281 1/X
282 Y^X
283 *
284 1
285 RCL 36
286 -
287 -
288 STO 37
289 RCL 35
290 RCL 05
291 2
292 ENTER
293 3
294 /
295 Y^X
296 *
297 RCL 36
298 +
299 SQRT
300 RCL 37
301 X<>Y
302 /
303 STO 38
304 X>0?
305 SF 02
306 ABS
307 1
308 RCL 38
309 .196854
310 *
311 +
312 RCL 38
313 X^2
314 .115194
315 *
316 +
317 RCL 38
318 3
319 Y^X
320 .000344
321 *
322 +
323 RCL 38
324 4
325 Y^X
326 .019527
327 *
328 +
329 -4
330 Y^X
331 2
332 /
333 CHS
334 1
335 +
336 FIX 03
337 FS?C 02
338 XEQ 12
339 "P"
340 XEQ 11
341 FIX 02
342 ADV
343 RTN
344 LBL 12
345 1
346 X<>Y
347 -
348 RTN
349 LBL 11
350 "="
351 ARCL X
352 AVIEW
353 RTN
354 LBL E
355 RCL 25
356 1
357 -
358 STO 25
359 STOP
360 ST- IND 25
361 S-
362 GTO 01
363 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall