The Museum of HP Calculators

Cantilever Beams 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 "CNTB67"
 02 LBL 15
 03 LBL a
 04 0
 05 STO 03
 06 STO 04
 07 STO 05
 08 RTN
 09 LBL 16
 10 LBL b
 11 STO 02
 12 RDN
 13 *
 14 STO 24
 15 RTN
 16 LBL 17
 17 LBL c
 18 STO 03
 19 X<>Y
 20 STO 20
 21 RTN
 22 LBL 18
 23 LBL d
 24 STO 04
 25 X<>Y
 26 STO 21
 27 RTN
 28 LBL 19
 29 LBL e
 30 STO 05
 31 X<>Y
 32 STO 22
 33 RTN
 34 LBL 10
 35 LBL A
 36 STO 00
 37 RCL 20
 38 XEQ 04
 39 LASTX
 40 *
 41 CHS
 42 3
 43 *
 44 FS?C 02
 45 0
 46 RCL 01
 47 RCL 20
 48 3
 49 *
 50 -
 51 RCL 01
 52 *
 53 +
 54 RCL 03
 55 *
 56 RCL 01
 57 *
 58 RCL 21
 59 XEQ 04
 60 RCL 21
 61 3
 62 Y^X
 63 *
 64 FS?C 02
 65 CLX
 66 STO 23
 67 RDN
 68 RCL 01
 69 4
 70 /
 71 RCL 21
 72 -
 73 RCL 01
 74 *
 75 RCL 21
 76 X^2
 77 1.5
 78 *
 79 +
 80 RCL 01
 81 X^2
 82 *
 83 RCL 23
 84 +
 85 RCL 04
 86 *
 87 -
 88 RCL 22
 89 XEQ 04
 90 6
 91 *
 92 RCL 01
 93 3
 94 *
 95 X<>Y
 96 FS?C 02
 97 CLX
 98 +
 99 RCL 05
100 *
101 RCL 01
102 *
103 +
104 6
105 /
106 RCL 24
107 /
108 RTN
109 LBL 11
110 LBL B
111 STO 00
112 RCL 20
113 XEQ 04
114 RCL 01
115 2
116 /
117 RCL 20
118 -
119 RCL 03
120 *
121 RCL 01
122 *
123 RCL 21
124 XEQ 04
125 RDN
126 RCL 01
127 6
128 /
129 RCL 21
130 2
131 /
132 -
133 RCL 01
134 *
135 RCL 21
136 X^2
137 2
138 /
139 +
140 RCL 04
141 *
142 RCL 01
143 *
144 -
145 RCL 22
146 XEQ 04
147 RDN
148 RCL 05
149 RCL 01
150 *
151 +
152 RCL 24
153 /
154 RTN
155 LBL 12
156 LBL C
157 STO 00
158 RCL 20
159 XEQ 04
160 RCL 01
161 RCL 20
162 -
163 RCL 03
164 *
165 RCL 21
166 XEQ 04
167 CLX
168 RCL 01
169 2
170 /
171 RCL 21
172 -
173 RCL 01
174 *
175 RCL 21
176 X^2
177 2
178 /
179 +
180 RCL 04
181 *
182 -
183 RCL 22
184 XEQ 04
185 CLX
186 RCL 05
187 X<>Y
188 FS?C 02
189 +
190 RTN
191 LBL 13
192 LBL D
193 STO 00
194 RCL 20
195 XEQ 04
196 0
197 FS?C 02
198 RCL 03
199 RCL 21
200 XEQ 04
201 CLX
202 RCL 01
203 RCL 21
204 -
205 RCL 04
206 *
207 -
208 RTN
209 LBL 04
210 CF 02
211 RCL 00
212 STO 01
213 X<>Y
214 X<=Y?
215 STO 01
216 X>Y?
217 SF 02
218 -
219 RTN
220 STOP
221 END

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