(11C) Calendar Routines

[Gamo]

Here is another Calendar routine to find "Number of Weekdays Between Two Dates"
and find the "Date" form the mm/dd/yyyy at which result 0 is Sunday 1 is Monday and so on.

This program is from the HP-67 adapted to work on the HP-11C

Sample Problem

Apr. 1, 1974 and May 1, 1974

4.011974 [A] 5.011974 [A] ——— 22.0

-------------------------------------------------

Find the Date on Jan. 1, 1960

1.011960 [A] [B] ——— 5 (Friday)
-------------------------------------------------
Program:

Code:


[LBL] A 9 [ENTER] [EEX] 6 [CHS] [-] [X<>Y] 3 [X<>Y] [X≤Y] [GSB] 1 1 [+] [ENTER] [INT] [STO] 1 [-] [EEX] 2 [x] [ENTER]

[FRC] [EEX] 2 [x] [ENTER] [INT] 7 [-] .75 [x] [INT] [X<>Y] 36525 [x] [INT] [-] [-] [INT] 
[RCL] 1 30.6 [x] [INT] [+] 7 [÷] [ENTER]

[FRC] [-] [LSTx] [STO] 3 12.61 [x] [INT] .1 [x] [+] 5 [x] [RCL] 2 [X<>Y] [STO] 2 [-] [CHS] [FIX] 1 [RTN]

[LBL] B [RCL] 3 7 [x] [FIX] 0 [RTN]

[LBL] 1 [+] [+] [RTN] [R/S]

Gamo