This program is Copyright © HP and is used here by permission. It was originally printed in the Antennas 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
LINE KEYS 01 LBL "DEG" 02 FIX 02 03 "BS?" 04 PROMPT 05 STO 07 06 LBL A 07 "SIN ALPHA?" 08 PROMPT 09 "SIN BETA?" 10 PROMPT 11 STO 01 12 ASIN 13 COS 14 STO 02 15 X<>Y 16 STO 03 17 ASIN 18 COS 19 STO 04 20 XEQ C 21 * 22 X<>Y 23 RCL 01 24 * 25 - 26 XEQ D 27 STO 08 28 "AZ=" 29 XEQ d 30 XEQ E 31 + 32 ASIN 33 "ELE.=" 34 XEQ d 35 GTO A 36 LBL d 37 ARCL X 38 " DEG" 39 AVIEW 40 STOP 41 RTN 42 LBL "SINE" 43 FIX 02 44 "BS?" 45 PROMPT 46 STO 07 47 LBL B 48 "DEG AZ?" 49 PROMPT 50 "DEG ELE.?" 51 PROMPT 52 ENTER 53 ENTER 54 1 55 * 56 SIN 57 STO 01 58 RDN 59 COS 60 STO 02 61 RDN 62 SIN 63 STO 03 64 RDN 65 COS 66 STO 04 67 XEQ C 68 RCL 02 69 * 70 R^ 71 RCL 01 72 * 73 + 74 XEQ D 75 SIN 76 STO 08 77 "SIN ALPHA=" 78 XEQ b 79 XEQ E 80 - 81 "SIN BETA=" 82 XEQ b 83 GTO B 84 LBL b 85 ARCL X 86 AVIEW 87 STOP 88 RTN 89 LBL C 90 RCL 07 91 COS 92 STO 05 93 RCL 07 94 SIN 95 STO 06 96 RDN 97 * 98 RTN 99 LBL D 100 RCL 02 101 RCL 03 102 * 103 X<>Y 104 / 105 ATAN 106 RTN 107 LBL E 108 RCL 05 109 RCL 01 110 * 111 RCL 06 112 RCL 04 113 RCL 02 114 * 115 * 116 RTN 117 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall