The Museum of HP Calculators


Mundoscope, Regiomontanus for the HP-41C/CV/CX

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

Program Listing

LINE  KEYS
 01 LBL "MUNDRG"
 02 LBL 18
 03 LBL d
 04 SF 01
 05 RTN
 06 LBL 19
 07 LBL e
 08 CF 01
 09 RTN
 10 LBL 15
 11 LBL a
 12 HR
 13 15
 14 X<>Y
 15 FS? 01
 16 *
 17 STO 23
 18 RTN
 19 LBL 16
 20 LBL b
 21 HR
 22 STO 22
 23 RTN
 24 LBL 17
 25 LBL c
 26 1
 27 -
 28 30
 29 *
 30 +
 31 HR
 32 STO 01
 33 RTN
 34 LBL 12
 35 LBL C
 36 1
 37 -
 38 30
 39 *
 40 +
 41 HR
 42 GTO 09
 43 LBL 14
 44 LBL E
 45 HR
 46 LBL 09
 47 X<>Y
 48 HR
 49 1
 50 P-R
 51 RDN
 52 X<>Y
 53 R^
 54 P-R
 55 STO 02
 56 RDN
 57 R-P
 58 X<>Y
 59 RCL 21
 60 +
 61 X<>Y
 62 P-R
 63 RCL 02
 64 R-P
 65 RDN
 66 STO 03
 67 RDN
 68 ASIN
 69 STO 04
 70 GTO 08
 71 LBL 10
 72 LBL A
 73 X<>Y
 74 HR
 75 STO 04
 76 RDN
 77 HR
 78 15
 79 X<>Y
 80 FS? 01
 81 *
 82 STO 03
 83 LBL 08
 84 RCL 03
 85 RCL 23
 86 -
 87 1
 88 P-R
 89 RCL 22
 90 TAN
 91 RCL 04
 92 TAN
 93 *
 94 +
 95 R-P
 96 X<>Y
 97 FS? 00
 98 GTO 07
 99 CHS
100 360
101 +
102 LBL 07
103 RCL 01
104 +
105 360
106 /
107 LASTX
108 X<>Y
109 FRC
110 1
111 +
112 FRC
113 *
114 HMS
115 STOP
116 ENTER
117 ENTER
118 30
119 /
120 INT
121 1
122 +
123 STOP
124 1
125 -
126 30
127 *
128 -
129 STOP
130 GTO 00
131 LBL 13
132 LBL D
133 CF 00
134 STOP
135 LBL 11
136 LBL B
137 SF 00
138 STOP
139 END

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