The Museum of HP Calculators


Transmission Line Calculations for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Electrical Engineering 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)
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 "LINE"
 02 FIX 02
 03 "F?"
 04 PROMPT
 05 1 E10
 06 /
 07 STO 09
 08 2
 09 PI
 10 *
 11 *
 12 STO 08
 13 "VR?"
 14 PROMPT
 15 STO 02
 16 "RO?"
 17 PROMPT
 18 STO 01
 19 "L?"
 20 PROMPT
 21 STO 11
 22 2
 23 *
 24 3
 25 RCL 02
 26 *
 27 STO 03
 28 /
 29 STO 07
 30 STOP
 31 LBL "EXACT"
 32 "G?"
 33 PROMPT
 34 "R?"
 35 PROMPT
 36 RCL 03
 37 *
 38 RCL 01
 39 /
 40 STO 05
 41 RDN
 42 RCL 01
 43 *
 44 ST* 03
 45 RCL 08
 46 RCL 05
 47 R-P
 48 SQRT
 49 STO 05
 50 X<>Y
 51 2
 52 /
 53 STO 06
 54 RCL 08
 55 RCL 03
 56 R-P
 57 SQRT
 58 STO 03
 59 X<>Y
 60 2
 61 /
 62 STO 08
 63 RCL 06
 64 +
 65 STO 04
 66 RCL 06
 67 RCL 08
 68 -
 69 STO 02
 70 RCL 05
 71 RCL 03
 72 /
 73 ST* 01
 74 RCL 05
 75 RCL 03
 76 *
 77 ST* 07
 78 GTO "ZIN"
 79 LBL "APPROX"
 80 "AD?"
 81 PROMPT
 82 "AC?"
 83 PROMPT
 84 X<>Y
 85 STO 08
 86 RDN
 87 STO 03
 88 RCL 11
 89 RCL 02
 90 RCL 09
 91 PI
 92 *
 93 1.5
 94 /
 95 X<>Y
 96 /
 97 STO 06
 98 *
 99 2
100 *
101 STO 07
102 RCL 08
103 10
104 LN
105 20
106 /
107 RCL 06
108 /
109 ST* 03
110 ST* 08
111 RCL 08
112 RCL 03
113 -
114 ENTER
115 STO 05
116 RCL 08
117 3
118 *
119 RCL 03
120 +
121 *
122 2
123 /
124 CHS
125 1
126 +
127 R-P
128 ST* 01
129 X<>Y
130 STO 02
131 RCL 05
132 X^2
133 2
134 /
135 1
136 +
137 RCL 03
138 RCL 08
139 +
140 R-P
141 ST* 07
142 X<>Y
143 STO 04
144 LBL "ZIN"
145 "ZL?"
146 PROMPT
147 STO 05
148 "[angle]ZL?"  ;"\0DZL?"
149 PROMPT
150 STO 06
151 RCL 04
152 RCL 07
153 P-R
154 CHS
155 E^X
156 STO 07
157 X<>Y
158 180
159 *
160 PI
161 /
162 STO 08
163 RCL 06
164 RCL 02
165 -
166 RCL 05
167 RCL 01
168 /
169 P-R
170 1
171 +
172 R-P
173 1/X
174 -2
175 *
176 X<>Y
177 CHS
178 X<>Y
179 P-R
180 1
181 +
182 R-P
183 RCL 07
184 *
185 1/X
186 X<>Y
187 RCL 08
188 -
189 CHS
190 X<>Y
191 P-R
192 1
193 -
194 R-P
195 1/X
196 2
197 *
198 X<>Y
199 CHS
200 X<>Y
201 P-R
202 1
203 +
204 R-P
205 RCL 01
206 *
207 X<>Y
208 RCL 02
209 +
210 "[angle]ZIN="  ;"\0DZIN="
211 ARCL X
212 AVIEW
213 STOP
214 X<>Y
215 "ZIN="
216 ARCL X
217 AVIEW
218 STOP
219 END

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