The Museum of HP Calculators

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

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