The Museum of HP Calculators

# Ballistic Missile Range 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 Space Science Solution Book. 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)

## Data Set

Currently, we know how to transfer the .d41 files to an HP-4C1 with Tony Duell's LIF Utilities for linux. Other users can enter the register listings below by hand. If you determine how DOS users can transfer these files, please let me know. The data should be saved to a magnetic card.

```RR000 = +4.900980000E+3
RR001 = +1.739290000E+3
RR002 = +2.152150000E+4
RR003 = +2.420990000E+3
RR004 = +3.248150000E+5
RR005 = +6.052000000E+3
RR006 = +3.986012000E+5
RR007 = +6.371017000E+3
RR008 = +4.304300000E+4
RR009 = +3.387550000E+3
RR010 = +1.266580000E+8
RR011 = +7.137500000E+4
RR012 = +3.794160000E+7
RR013 = +6.040000000E+4
RR014 = +5.778920000E+6
RR015 = +2.350000000E+4
RR016 = +6.855000000E+6
RR017 = +2.500000000E+4
RR018 = +3.312370000E+5
RR019 = +2.930000000E+3
RR020 = +1.324948000E+11
RR021 = +6.960000000E+5
RR022 = +0.000000000E+0
RR023 = +0.000000000E+0
RR024 = +0.000000000E+0
RR025 = +0.000000000E+0```

## Program Listing

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