The Museum of HP Calculators

In What Year is a Given Date an M-Day? for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Calendars 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

Program Listing

LINE  KEYS
 01 LBL "M-DAY"
 02 "MONTH ?"
 03 PROMPT
 04 0
 05 STO 01
 06 CLX
 07 11
 08 +
 09 14
 10 X>Y?
 11 GTO 03
 12 RDN
 13 LBL 01
 14 2.6
 15 *
 16 INT
 17 GTO 04
 18 LBL 03
 19 1
 20 STO 01
 21 ENTER
 22 +
 23 -
 24 +
 25 GTO 01
 26 LBL 04
 27 "DAY ?"
 28 PROMPT
 29 +
 30 "M-DAY ?"
 31 PROMPT
 32 -
 33 ENTER
 34 ENTER
 35 7
 36 /
 37 INT
 38 7
 39 *
 40 -
 41 2
 42 /
 43 ENTER
 44 INT
 45 X#Y?
 46 XEQ 00
 47 4
 48 *
 49 ENTER
 50 ENTER
 51 GTO 08
 52 LBL 00
 53 4
 54 +
 55 RTN
 56 LBL 08
 57 "START. YEAR ?"
 58 PROMPT
 59 1
 60 -
 61 ENTER
 62 R^
 63 -
 64 28
 65 /
 66 INT
 67 28
 68 *
 69 R^
 70 RCL 01
 71 +
 72 LBL 02
 73 +
 74 X>Y?
 75 XEQ 05
 76 6
 77 +
 78 X>Y?
 79 XEQ 05
 80 11
 81 +
 82 X>Y?
 83 XEQ 05
 84 6
 85 +
 86 X>Y?
 87 XEQ 05
 88 5
 89 GTO 02
 90 LBL 05
 91 FIX 00
 92 CF 29
 93 CLA
 94 ARCL X
 95 FIX 04
 96 SF 29
 97 PROMPT
 98 RTN
 99 END

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