The Museum of HP Calculators


Mundoscope, Campanus 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 "MUNDCM"
 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 COS
 91 *
 92 RCL 22
 93 SIN
 94 RCL 04
 95 TAN
 96 *
 97 +
 98 R-P
 99 X<>Y
100 FS? 00
101 GTO 07
102 CHS
103 360
104 +
105 LBL 07
106 RCL 01
107 +
108 360
109 /
110 LASTX
111 X<>Y
112 FRC
113 1
114 +
115 FRC
116 *
117 HMS
118 STOP
119 ENTER
120 ENTER
121 30
122 /
123 INT
124 1
125 +
126 STOP
127 1
128 -
129 30
130 *
131 -
132 STOP
133 GTO 00
134 LBL 13
135 LBL D
136 CF 00
137 STOP
138 LBL 11
139 LBL B
140 SF 00
141 STOP
142 END

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