The Museum of HP Calculators


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

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