The Museum of HP Calculators

Parabolic Antenna Calculations for the HP-41C/CV/CX

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 a
 02 CF 00
 03 "FREQ.?"
 04 PROMPT
 05 STO 02
 06 LOG
 07 20
 08 STO 06
 09 *
 10 STO 03
 11 3.28
 12 STO 04
 13 "% EFF.?"
 14 PROMPT
 15 ENTER
 16 .102
 17 *
 18 LOG
 19 10
 20 *
 21 ST+ 03
 22 RTN
 23 LBL "GAIN"
 24 FS? 00
 25 XEQ a
 26 "DIA. ?"
 27 PROMPT
 28 FS? 01
 29 XEQ 09
 30 LOG
 31 RCL 06
 32 *
 33 RCL 03
 34 +
 35 "dB1="
 36 ARCL X
 37 AVIEW
 38 STOP
 39 LBL "DIA"
 40 FS? 00
 41 XEQ a
 42 "dB1?"
 43 PROMPT
 44 RCL 03
 45 -
 46 RCL 06
 47 /
 48 10^X
 49 FS? 01
 50 XEQ 08
 51 "DIA="
 52 ARCL X
 53 AVIEW
 54 STOP
 55 LBL 08
 56 RCL 04
 57 /
 58 RTN
 59 LBL 09
 60 RCL 04
 61 *
 62 RTN
 63 LBL "3dB"
 64 FS? 00
 65 XEQ a
 66 "DIA. ?"
 67 PROMPT
 68 FS? 01
 69 XEQ 09
 70 RCL 02
 71 *
 72 66.4
 73 X<>Y
 74 /
 75 STO 01
 76 "="  ;"\0D="
 77 ARCL X
 78 AVIEW
 79 STOP
 80 LBL "NdB"
 81 FS? 00
 82 XEQ a
 83 "N?"
 84 PROMPT
 85 RCL 01
 86 X^2
 87 *
 88 3
 89 /
 90 SQRT
 91 "="  ;"\0D="
 92 ARCL X
 93 AVIEW
 94 STOP
 95 LBL "dB"
 96 FS? 00
 97 XEQ a
 98 "?"  ;"\0D?"
 99 PROMPT
100 X^2
101 12
102 *
103 RCL 01
104 X^2
105 /
106 "dB="
107 ARCL X
108 AVIEW
109 STOP
110 END

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