The Museum of HP Calculators
The Museum of HP Calculators
This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Astrology Solution Book. 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
LINE KEYS 01 LBL "ASTRO3" 02 LBL 01 03 RCL 22 04 STO 08 05 RCL 23 06 STO 09 07 PI 08 STO 00 09 R^ 10 RTN 11 LBL 03 12 0 13 X<=Y? 14 GTO 04 15 360 16 + 17 LBL 04 18 + 19 RTN 20 LBL 10 21 LBL A 22 FS?C 02 23 XEQ 01 24 HR 25 RCL 09 26 + 27 XEQ 03 28 STO 23 29 15 30 / 31 HMS 32 STOP 33 GTO 00 34 LBL 11 35 LBL B 36 FS?C 02 37 XEQ 01 38 HR 39 STO 22 40 LASTX 41 STOP 42 RCL 22 43 TAN 44 .993305 45 * 46 ATAN 47 STO 22 48 HMS 49 STOP 50 GTO 00 51 LBL 12 52 LBL C 53 RCL 23 54 1 55 P-R 56 RCL 21 57 COS 58 * 59 GTO 05 60 LBL 13 61 LBL D 62 RCL 23 63 1 64 P-R 65 RCL 21 66 1 67 P-R 68 R^ 69 * 70 X<>Y 71 RCL 22 72 TAN 73 * 74 + 75 CHS 76 LBL 05 77 R-P 78 X<>Y 79 RCL 24 80 FS? 00 81 CLX 82 + 83 XEQ 03 84 HMS 85 STOP 86 ENTER 87 ENTER 88 30 89 / 90 INT 91 1 92 + 93 STOP 94 1 95 - 96 30 97 * 98 - 99 STOP 100 GTO 00 101 LBL 15 102 LBL a 103 SF 00 104 STOP 105 GTO 00 106 LBL 19 107 LBL e 108 CF 00 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