The Museum of HP Calculators

Cross Flow Heat Exchangers for the HP-41C/CV/CX

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

Program Listing

LINE  KEYS
 01 LBL "HXXF67"
 02 LBL 15
 03 LBL a
 04 STO 02
 05 RTN
 06 LBL 16
 07 LBL b
 08 *
 09 STO 03
 10 RTN
 11 LBL 17
 12 LBL c
 13 STO 01
 14 RTN
 15 LBL 18
 16 LBL d
 17 *
 18 STO 04
 19 RTN
 20 LBL 19
 21 LBL e
 22 FS? 01
 23 GTO 00
 24 0
 25 SF 01
 26 RTN
 27 LBL 00
 28 1
 29 CF 01
 30 RTN
 31 LBL 10
 32 LBL A
 33 STO 05
 34 XEQ 01
 35 XEQ 00
 36 STO 08
 37 RTN
 38 LBL 11
 39 LBL B
 40 STO 08
 41 XEQ 01
 42 XEQ 02
 43 RCL 07
 44 *
 45 RCL 01
 46 RCL 02
 47 -
 48 *
 49 STO 06
 50 RTN
 51 LBL 12
 52 LBL C
 53 STO 06
 54 RCL 03
 55 /
 56 RCL 02
 57 +
 58 RTN
 59 LBL 13
 60 LBL D
 61 RCL 02
 62 -
 63 RCL 03
 64 *
 65 RCL 04
 66 /
 67 RCL 01
 68 -
 69 CHS
 70 RTN
 71 LBL 14
 72 LBL E
 73 STO 05
 74 XEQ 01
 75 RCL 04
 76 RCL 07
 77 /
 78 RCL 01
 79 RCL 05
 80 -
 81 *
 82 RCL 01
 83 RCL 02
 84 -
 85 /
 86 STO 05
 87 RTN
 88 LBL 00
 89 X#0?
 90 GTO 00
 91 1
 92 RCL 05
 93 -
 94 LN
 95 CHS
 96 RTN
 97 LBL 02
 98 X#0?
 99 GTO 02
100 1
101 RCL 08
102 CHS
103 E^X
104 -
105 RTN
106 LBL 01
107 RCL 03
108 RCL 04
109 X>Y?
110 X<>Y
111 STO 07
112 X<>Y
113 /
114 STO 00
115 RTN
116 STOP
117 STOP
118 STOP
119 STOP
120 STOP
121 STOP
122 STOP
123 STOP
124 LBL 00
125 7FIX
126 0
127 STO 20
128 1
129 RCL 05
130 CHS
131 STO 23
132 +
133 LN
134 CHS
135 STO 08
136 LBL 06
137 RCL 08
138 XEQ 02
139 RCL 05
140 -
141 STO 21
142 RCL 20
143 RCL 08
144 STO 20
145 -
146 RCL 23
147 RCL 21
148 STO 23
149 -
150 /
151 *
152 ST- 08
153 RCL 08
154 /
155 RND
156 X#0?
157 GTO 06
158 RCL 08
159 RTN
160 LBL 02
161 RCL 08
162 RCL 07
163 /
164 ENTER
165 ENTER
166 .22
167 Y^X
168 RCL 00
169 /
170 /
171 LASTX
172 X<>Y
173 CHS
174 E^X
175 1
176 -
177 *
178 E^X
179 CHS
180 1
181 +
182 RTN
183 STOP
184 END

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