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 "ASTRO2" 02 LBL 10 03 LBL A 04 7.48 05 RCL 20 06 * 07 6962911.23 08 - 09 RCL 20 10 * 11 933059.79 12 + 13 3600 14 STO 03 15 / 16 360 17 STO 04 18 / 19 FRC 20 RCL 04 21 * 22 0 23 X<=Y? 24 GTO 01 25 RCL 04 26 + 27 LBL 01 28 + 29 STO 01 30 259205536 31 RCL 20 32 * 33 2013816 34 + 35 RCL 03 36 / 37 STO 02 38 COS 39 .55 40 * 41 RCL 01 42 COS 43 9.21 44 * 45 + 46 RCL 03 47 / 48 STO 05 49 17.23 50 RCL 01 51 SIN 52 * 53 1.27 54 RCL 02 55 SIN 56 * 57 + 58 1.11 59 RCL 20 60 * 61 5025.64 62 + 63 RCL 20 64 * 65 - 66 84038.27 67 - 68 RCL 03 69 / 70 STO 24 71 LBL 12 72 LBL C 73 RCL 01 74 HMS 75 STOP 76 ENTER 77 ENTER 78 30 79 / 80 INT 81 1 82 + 83 STOP 84 1 85 - 86 30 87 * 88 - 89 STOP 90 RCL 24 91 30 92 + 93 HMS 94 STOP 95 GTO 12 96 LBL 03 97 0 98 / 99 GTO 03 100 LBL 19 101 LBL e 102 FS?C 02 103 GTO 04 104 GTO 03 105 LBL 04 106 RCL 21 107 RCL 05 108 + 109 STO 21 110 HMS 111 STOP 112 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall