The Museum of HP Calculators

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

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