The Museum of HP Calculators


Air Duct Conversion for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the HVAC 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

Program Listing

LINE  KEYS
 01 LBL "REC-RND"
 02 LBL 01
 03 ADV
 04 0
 05 STO 00
 06 "a"
 07 XEQ "IN"
 08 "b"
 09 XEQ "IN"
 10 ADV
 11 RCL 01
 12 *
 13 .625
 14 Y^X
 15 RCL 01
 16 RCL 02
 17 +
 18 SQRT
 19 SQRT
 20 /
 21 1.3
 22 *
 23 "D"
 24 .5
 25 +
 26 INT
 27 XEQ "O"
 28 GTO 01
 29 LBL "RND-REC"
 30 LBL 02
 31 ADV
 32 0
 33 STO 00
 34 "D"
 35 XEQ "IN"
 36 "a"
 37 XEQ "IN"
 38 RCL 02
 39 RCL 01
 40 *
 41 RCL 02
 42 ST+ X
 43 RCL 01
 44 -
 45 /
 46 STO 00
 47 ADV
 48 LBL 03
 49 RCL 00
 50 RCL 02
 51 *
 52 .625
 53 Y^X
 54 1.3
 55 *
 56 RCL 00
 57 RCL 02
 58 +
 59 SQRT
 60 SQRT
 61 RCL 01
 62 *
 63 -
 64 RCL 00
 65 -.375
 66 Y^X
 67 RCL 02
 68 .625
 69 Y^X
 70 *
 71 .8125
 72 *
 73 RCL 02
 74 RCL 00
 75 +
 76 -.75
 77 Y^X
 78 RCL 01
 79 *
 80 4
 81 /
 82 -
 83 /
 84 ST- 00
 85 RCL 00
 86 /
 87 ABS
 88 .25
 89 X<=Y?
 90 GTO 03
 91 RCL 00
 92 .5
 93 +
 94 INT
 95 "b"
 96 XEQ "O"
 97 GTO 02
 98 LBL "IN"
 99 CF 22
100 1
101 ST+ 00
102 RCL IND 00
103 "|-="
104 ASTO Y
105 "|-?"
106 CF 21
107 AVIEW
108 SF 21
109 CLA
110 ARCL Y
111 STOP
112 STO IND 00
113 FS? 22
114 FC? 55
115 RTN
116 ARCL X
117 XROM 29,08
118 RTN
119 LBL "O"
120 "|-="
121 ARCL X
122 AVIEW
123 END

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